#include <assert.h>
#include <stdio.h>
#include <stdlib.h>
#include <SDL2/SDL.h>

#define WINDOW_W 1280
#define WINDOW_H 720

void editMask(float *mask, float x, float y, float color, float size) {
	for (int j = y - size / 2; j < y + size / 2; j++) {
		for (int i = x - size / 2; i < x + size / 2; i++) {
			if (i > 0 && i < WINDOW_W && j > 0 && j < WINDOW_H) {
				size_t index = i + j * WINDOW_W;
				mask[index] = color;
			}
		}
	}
}

SDL_Texture *createTiledTexture(SDL_Renderer *context, const char *filename) {
	SDL_Surface *texture_surface = SDL_LoadBMP(filename);
	SDL_Texture *texture_tile = SDL_CreateTextureFromSurface(context, texture_surface);
	int tile_w = texture_surface->w;
	int tile_h = texture_surface->h;
	SDL_FreeSurface(texture_surface);

	SDL_Texture *texture = SDL_CreateTexture(context,
			SDL_PIXELFORMAT_RGBA8888,
			SDL_TEXTUREACCESS_TARGET,
			WINDOW_W, WINDOW_H);
	SDL_SetRenderTarget(context, texture);
	for (int y = 0; y < WINDOW_H; y += tile_h) {
		for (int x = 0; x < WINDOW_W; x += tile_w) {
			SDL_Rect tile_rect = { x, y, tile_w, tile_h };
			SDL_RenderCopy(context, texture_tile, 0, &tile_rect);
		}
	}
	SDL_DestroyTexture(texture_tile);
	SDL_SetRenderTarget(context, 0);
	return texture;
}

int main() {
	SDL_Init(SDL_INIT_VIDEO);

	SDL_Window *window = SDL_CreateWindow("Cannons",
			SDL_WINDOWPOS_UNDEFINED,
			SDL_WINDOWPOS_UNDEFINED,
			WINDOW_W,
			WINDOW_H,
			0);

	SDL_Renderer *context = SDL_CreateRenderer(window, -1, SDL_RENDERER_ACCELERATED);

	SDL_Texture *background = createTiledTexture(context, "background.bmp");

	SDL_Texture *foreground = createTiledTexture(context, "foreground.bmp");
	SDL_SetTextureBlendMode(foreground, SDL_BLENDMODE_MOD);

	SDL_Texture *terrain = SDL_CreateTexture(context,
			SDL_PIXELFORMAT_RGBA8888,
			SDL_TEXTUREACCESS_TARGET,
			WINDOW_W, WINDOW_H);
	SDL_SetTextureBlendMode(terrain, SDL_BLENDMODE_BLEND);

	// Terrain generation
	float *mask = calloc(WINDOW_W * WINDOW_H, sizeof(float));
	for (int i = 500 * WINDOW_W; i < WINDOW_W * WINDOW_H; i++) {
		mask[i] = 1.0;
	}
	SDL_Surface *mask_surface = SDL_CreateRGBSurfaceWithFormat(0,
			WINDOW_W, WINDOW_H, 32, SDL_PIXELFORMAT_RGBA8888);

	// Player variables
	float player_x = 100;
	float player_y = 500;
	float player_vy = 0;
	float player_ay = -9.8;

	// Timer variables
	float old_t = 0.0;

	// Event handling
	int exit = 0;
	while (!exit) {
		SDL_Event event = {0};
		while (SDL_PollEvent(&event)) {
			if (event.type == SDL_QUIT) {
				exit = 1;
			}
		}
		int mouse_x, mouse_y;
		Uint32 mouse_state = SDL_GetMouseState(&mouse_x, &mouse_y);
		float size = 100;
		if (mouse_state & SDL_BUTTON_LMASK) {
			editMask(mask, mouse_x, mouse_y, 1.0, size);
		} else if (mouse_state & SDL_BUTTON_RMASK) {
			editMask(mask, mouse_x, mouse_y, 0.0, size);
		}

		// Main loop
		SDL_SetRenderDrawColor(context, 40, 40, 40, 255);
		SDL_RenderClear(context);

		SDL_RenderCopy(context, background, 0, 0);

		SDL_LockSurface(mask_surface);
		for (int i = 0; i < mask_surface->w * mask_surface->h; i++) {
			((Uint32 *)mask_surface->pixels)[i] = mask[i] ? 0xffffffff : 0x00000000;
		}
		SDL_UnlockSurface(mask_surface);
		SDL_Texture *mask_texture = SDL_CreateTextureFromSurface(context, mask_surface);
		SDL_SetRenderTarget(context, terrain);
		SDL_SetRenderDrawColor(context, 0, 0, 0, 0);
		SDL_RenderClear(context);
		SDL_RenderCopy(context, mask_texture, 0, 0);
		SDL_RenderCopy(context, foreground, 0, 0);
		SDL_SetRenderTarget(context, 0);
		SDL_RenderCopy(context, terrain, 0, 0);
		SDL_DestroyTexture(mask_texture);

		// Time delta calculation
		double new_t = (double) SDL_GetTicks64() / 1000.0;
		double dt = new_t - old_t;
		old_t = new_t;

		// Player logic
		if (mask[(int)player_x + (WINDOW_H - (int)player_y) * WINDOW_W] == 0.0) {
			player_y += player_vy * dt;
			player_vy += player_ay * dt;
		} else {
			player_y += 1;
			player_vy = 0;
		}

		// Draw player
		SDL_SetRenderDrawColor(context, 255, 0, 0, 255);
		SDL_Rect player_rect = {player_x - 5, WINDOW_H - player_y - 10, 10, 10 };
		SDL_RenderFillRect(context, &player_rect);

		SDL_RenderPresent(context);
		SDL_Delay(1);
	}

	SDL_DestroyRenderer(context);
	SDL_DestroyWindow(window);
	SDL_Quit();
	return 0;
}