/*
 *  Copyright (C) 2017 The Contributors
 *
 *  This program is free software: you can redistribute it and/or modify
 *  it under the terms of the GNU General Public License as published by
 *  the Free Software Foundation, either version 3 of the License, or (at
 *  your option) any later version.
 *
 *  This program is distributed in the hope that it will be useful, but
 *  WITHOUT ANY WARRANTY; without even the implied warranty of
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
 *  General Public License for more details.
 *
 *  A copy of the GNU General Public License can be found in the file
 *  "gpl.txt" in the top directory of this repository.
 */

#include <all.h>

int32_t sdl_verbose = 0;

#define ver(...) _ver(sdl_verbose, 0, __VA_ARGS__)
#define ver2(...) _ver(sdl_verbose, 1, __VA_ARGS__)
#define ver3(...) _ver(sdl_verbose, 2, __VA_ARGS__)

typedef void (*sdl_func_t)(void);

static sdl_func_t sdl_funcs[] = {
	ser_sdl
};

void sdl_init(void)
{
	if (SDL_Init(SDL_INIT_VIDEO | SDL_INIT_EVENTS | SDL_INIT_TIMER) < 0) {
		fprintf(stderr, "SDL_Init() failed: %s\n", SDL_GetError());
		exit(1);
	}

	SDL_LogSetPriority(SDL_LOG_CATEGORY_APPLICATION, SDL_LOG_PRIORITY_VERBOSE);

	if (SDLNet_Init() < 0) {
		fail("SDLNet_Init() failed: %s", SDLNet_GetError());
	}

	if (TTF_Init() < 0) {
		fail("TTF_Init() failed: %s", TTF_GetError());
	}

	SDL_SetHint(SDL_HINT_RENDER_SCALE_QUALITY, "1");
	SDL_StartTextInput();
}

void sdl_quit(void)
{
	TTF_Quit();
	SDLNet_Quit();
	SDL_Quit();
}

void sdl_loop(void)
{
	inf("entering SDL loop");

#if defined EMU_LINUX
	SDL_Scancode down = SDL_SCANCODE_UNKNOWN;
#endif

	while (SDL_AtomicGet(&run) != 0) {
		for (int32_t i = 0; i < ARRAY_COUNT(sdl_funcs); ++i) {
			sdl_funcs[i]();
		}

		SDL_Event ev;

		while (SDL_PollEvent(&ev) > 0) {
#if defined EMU_LINUX
			// Work around duplicate key-down events on Linux.

			if (ev.type == SDL_KEYDOWN) {
				if (down == ev.key.keysym.scancode) {
					continue;
				}

				down = ev.key.keysym.scancode;
			}
			else if (ev.type == SDL_KEYUP) {
				down = SDL_SCANCODE_UNKNOWN;
			}
#endif

			if (ev.type == SDL_QUIT ||
					(ev.type == SDL_KEYDOWN && ev.key.keysym.sym == SDLK_ESCAPE)) {
				ver("quit");
				SDL_AtomicSet(&run, 0);
				continue;
			}

			if (ev.type == SDL_TEXTINPUT) {
				ser_text(&ev.text);
				continue;
			}

			if (ev.type == SDL_KEYDOWN) {
				ser_key(&ev.key);
				continue;
			}

			SDL_Delay(50);
		}
	}

	inf("leaving SDL loop");
}