source: buchla-emu/emu/sdl.c@ 7cc6ac0

/*
 *  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");
}