source: buchla-emu/emu/sdl.c@ c8a92ef

Last change on this file since c8a92ef was f51359c, checked in by Alexander Heinrich <alex.heinrich@…>, 7 years ago

Merge branch 'master' of ssh://bob.lopatic.de:11501/home/git/buchla-emu into lcda

  • Property mode set to 100644
File size: 4.2 KB
Line 
1/*
2 * Copyright (C) 2017 The Contributors
3 *
4 * This program is free software: you can redistribute it and/or modify
5 * it under the terms of the GNU General Public License as published by
6 * the Free Software Foundation, either version 3 of the License, or (at
7 * your option) any later version.
8 *
9 * This program is distributed in the hope that it will be useful, but
10 * WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12 * General Public License for more details.
13 *
14 * A copy of the GNU General Public License can be found in the file
15 * "gpl.txt" in the top directory of this repository.
16 */
17
18#include <all.h>
19
20int32_t sdl_verbose = 0;
21
22#define ver(...) _ver(sdl_verbose, 0, __VA_ARGS__)
23#define ver2(...) _ver(sdl_verbose, 1, __VA_ARGS__)
24#define ver3(...) _ver(sdl_verbose, 2, __VA_ARGS__)
25
26typedef void (*sdl_func_t)(void);
27
28static sdl_func_t sdl_funcs[] = {
29 lcd_sdl, ser_sdl, vid_sdl
30};
31
32void sdl_init(void)
33{
34 if (SDL_Init(SDL_INIT_VIDEO | SDL_INIT_EVENTS | SDL_INIT_TIMER) < 0) {
35 fprintf(stderr, "SDL_Init() failed: %s\n", SDL_GetError());
36 exit(1);
37 }
38
39 SDL_LogSetPriority(SDL_LOG_CATEGORY_APPLICATION, SDL_LOG_PRIORITY_VERBOSE);
40
41 if (SDLNet_Init() < 0) {
42 fail("SDLNet_Init() failed: %s", SDLNet_GetError());
43 }
44
45 if (TTF_Init() < 0) {
46 fail("TTF_Init() failed: %s", TTF_GetError());
47 }
48
49 SDL_SetHint(SDL_HINT_RENDER_SCALE_QUALITY, "1");
50 SDL_StartTextInput();
51}
52
53void sdl_quit(void)
54{
55 TTF_Quit();
56 SDLNet_Quit();
57 SDL_Quit();
58}
59
60void sdl_loop(void)
61{
62 inf("entering SDL loop");
63
64#if defined EMU_LINUX
65 SDL_Scancode down = SDL_SCANCODE_UNKNOWN;
66#endif
67
68 bool rel_mod = false;
69 uint32_t win = 0;
70
71 while (SDL_AtomicGet(&run) != 0) {
72 for (int32_t i = 0; i < ARRAY_COUNT(sdl_funcs); ++i) {
73 sdl_funcs[i]();
74 }
75
76 SDL_Event ev;
77
78 while (SDL_PollEvent(&ev) > 0) {
79 ver2("sdl ev %d", ev.type);
80
81#if defined EMU_LINUX
82 // Work around duplicate key-down events on Linux.
83
84 if (ev.type == SDL_KEYDOWN) {
85 if (down == ev.key.keysym.scancode) {
86 ver2("sdl dedup: skip %d", (int32_t)down);
87 continue;
88 }
89
90 down = ev.key.keysym.scancode;
91 ver2("sdl dedup: %d", (int32_t)down);
92 }
93 else if (ev.type == SDL_KEYUP) {
94 down = SDL_SCANCODE_UNKNOWN;
95 ver2("sdl dedup: reset");
96 }
97#endif
98
99 if (ev.type == SDL_QUIT ||
100 (ev.type == SDL_KEYDOWN && ev.key.keysym.sym == SDLK_ESCAPE)) {
101 inf("quit event");
102 SDL_AtomicSet(&run, 0);
103 continue;
104 }
105
106 if (ev.type == SDL_WINDOWEVENT) {
107 if (ev.window.event == SDL_WINDOWEVENT_FOCUS_GAINED) {
108 ver("sdl ev win %u", ev.window.windowID);
109 win = ev.window.windowID;
110 }
111 }
112
113 if (ev.type == SDL_KEYDOWN && ev.key.keysym.sym == SDLK_DOWN) {
114 ver("sdl ev down-arrow");
115 rel_mod = true;
116 ser_mou_res();
117 continue;
118 }
119
120 if (ev.type == SDL_KEYDOWN && ev.key.keysym.sym == SDLK_UP) {
121 ver("sdl ev up-arrow");
122 rel_mod = false;
123 continue;
124 }
125
126 if (rel_mod) {
127 if (ev.type == SDL_MOUSEMOTION) {
128 ver("sdl ev mousemotion (%d, %d)", ev.motion.xrel, ev.motion.yrel);
129 ser_mou_mov(&ev.motion);
130 continue;
131 }
132
133 if (ev.type == SDL_MOUSEBUTTONDOWN) {
134 ver("sdl ev mousebuttondown %d", ev.button.button);
135 ser_mou_dn(&ev.button);
136 continue;
137 }
138
139 if (ev.type == SDL_MOUSEBUTTONUP) {
140 ver("sdl ev mousebuttonup %d", ev.button.button);
141 ser_mou_up(&ev.button);
142 continue;
143 }
144 }
145
146 if (ev.type == SDL_TEXTINPUT) {
147 ver("sdl ev text input %d", ev.text.text[0]);
148
149 if (win == ser_win) {
150 ser_text(&ev.text);
151 }
152
153 continue;
154 }
155
156 if (ev.type == SDL_KEYDOWN) {
157 ver("sdl ev key down %d", (int32_t)ev.key.keysym.sym);
158
159 if (win == ser_win) {
160 ser_key(&ev.key);
161 }
162 else if (win == vid_win) {
163 kbd_key(&ev.key, true);
164 }
165
166 continue;
167 }
168
169 if (ev.type == SDL_KEYUP) {
170 ver("sdl ev key up %d", (int32_t)ev.key.keysym.sym);
171
172 if (win == vid_win) {
173 kbd_key(&ev.key, false);
174 }
175
176 continue;
177 }
178 }
179
180 SDL_Delay(50);
181
182 if (SDL_GetRelativeMouseMode() != rel_mod) {
183 SDL_SetRelativeMouseMode(rel_mod);
184
185 if (rel_mod) {
186 inf("MOUSE CAPTURED - press UP-ARROW KEY to release");
187 }
188 else {
189 inf("mouse released");
190 }
191 }
192 }
193
194 inf("leaving SDL loop");
195}
Note: See TracBrowser for help on using the repository browser.