DEADSOFTWARE

f9eb159fe7b7342c1ab28cd2fd9a9a9a5ed783c7
[flatwaifu.git] / src / sdl2 / main.c
1 #ifdef __EMSCRIPTEN__
2 # include <emscripten.h>
3 #endif
5 #include <SDL2/SDL.h>
6 #include <stdio.h>
7 #include <stdarg.h>
8 #include <stdlib.h> // srand exit
9 #include <string.h> // strcasecmp
10 #include <assert.h>
11 #include "system.h"
12 #include "input.h"
14 #include "cp866.h"
16 #include "my.h" // fexists
17 #include "player.h" // pl1 pl2
18 #include "menu.h" // G_keyf
19 #include "error.h" // logo
20 #include "monster.h" // nomon
22 #include "files.h" // F_startup F_addwad F_initwads F_allocres
23 #include "config.h" // CFG_args CFG_load CFG_save
24 #include "args.h" // ARG_parse
25 #include "memory.h" // M_startup
26 #include "game.h" // G_init G_act
27 #include "sound.h" // S_init S_done
28 #include "music.h" // S_initmusic S_updatemusic S_donemusic
29 #include "render.h" // R_init R_draw R_done
31 #define TITLE_STR "Doom 2D (SDL2)"
33 static Uint32 ticks;
34 static int quit = 0;
35 static SDL_Window *window;
36 static SDL_GLContext context;
37 static SDL_Surface *surf;
38 static videomode_t vlist;
40 static const cfg_t arg[] = {
41 {"file", NULL, Y_FILES},
42 {"cheat", &cheat, Y_SW_ON},
43 // {"vga", &shot_vga, Y_SW_ON},
44 {"sndvol", &snd_vol, Y_WORD},
45 {"musvol", &mus_vol, Y_WORD},
46 {"mon", &nomon, Y_SW_OFF},
47 {"warp", &_warp, Y_BYTE},
48 // {"config", NULL, cfg_file, Y_STRING},
49 {NULL, NULL, 0} // end
50 };
52 static const cfg_t cfg[] = {
53 // {"screenshot", &shot_vga, Y_SW_ON},
54 {"sound_volume", &snd_vol, Y_WORD},
55 {"music_volume", &mus_vol, Y_WORD},
56 {"music_random", &music_random, Y_SW_ON},
57 {"music_time", &music_time, Y_DWORD},
58 {"music_fade", &music_fade, Y_DWORD},
59 {"pl1_left", &pl1.kl, Y_KEY},
60 {"pl1_right",&pl1.kr, Y_KEY},
61 {"pl1_up", &pl1.ku, Y_KEY},
62 {"pl1_down", &pl1.kd, Y_KEY},
63 {"pl1_jump", &pl1.kj, Y_KEY},
64 {"pl1_fire", &pl1.kf, Y_KEY},
65 {"pl1_next", &pl1.kwr, Y_KEY},
66 {"pl1_prev", &pl1.kwl, Y_KEY},
67 {"pl1_use", &pl1.kp, Y_KEY},
68 {"pl2_left", &pl2.kl, Y_KEY},
69 {"pl2_right", &pl2.kr, Y_KEY},
70 {"pl2_up", &pl2.ku, Y_KEY},
71 {"pl2_down", &pl2.kd, Y_KEY},
72 {"pl2_jump", &pl2.kj, Y_KEY},
73 {"pl2_fire", &pl2.kf, Y_KEY},
74 {"pl2_next", &pl2.kwr, Y_KEY},
75 {"pl2_prev", &pl2.kwl, Y_KEY},
76 {"pl2_use", &pl2.kp, Y_KEY},
77 {NULL, NULL, 0} // end
78 };
80 static void CFG_args (int argc, char **argv) {
81 const cfg_t *list[] = { arg, R_args() };
82 ARG_parse(argc, argv, 2, list);
83 }
85 static void CFG_load (void) {
86 const cfg_t *list[] = { cfg, R_conf() };
87 CFG_read_config("default.cfg", 2, list);
88 CFG_read_config("doom2d.cfg", 2, list);
89 }
91 static void CFG_save (void) {
92 const cfg_t *list[] = { cfg, R_conf() };
93 CFG_update_config("doom2d.cfg", "doom2d.cfg", 2, list, "generated by doom2d, do not modify");
94 }
96 /* --- error.h --- */
98 void logo (const char *s, ...) {
99 va_list ap;
100 va_start(ap, s);
101 vprintf(s, ap);
102 va_end(ap);
103 fflush(stdout);
106 void logo_gas (int cur, int all) {
107 // stub
110 void ERR_failinit (char *s, ...) {
111 va_list ap;
112 va_start(ap, s);
113 vprintf(s, ap);
114 va_end(ap);
115 puts("");
116 exit(1);
119 void ERR_fatal (char *s, ...) {
120 va_list ap;
121 R_done();
122 S_done();
123 S_donemusic();
124 M_shutdown();
125 SDL_Quit();
126 puts("\nКРИТИЧЕСКАЯ ОШИБКА:");
127 va_start(ap, s);
128 vprintf(s, ap);
129 va_end(ap);
130 puts("");
131 exit(1);
134 void ERR_quit (void) {
135 quit = 1;
138 /* --- system.h --- */
140 static int Y_resize_window (int w, int h, int fullscreen) {
141 assert(w > 0);
142 assert(h > 0);
143 assert(window != NULL);
144 if (surf != NULL) {
145 if (surf->w != w || surf->h != h) {
146 SDL_Surface *s = SDL_CreateRGBSurface(0, w, h, 8, 0, 0, 0, 0);
147 if (s != NULL) {
148 SDL_SetPaletteColors(s->format->palette, surf->format->palette->colors, 0, surf->format->palette->ncolors);
149 SDL_FreeSurface(surf);
150 surf = s;
154 SDL_SetWindowSize(window, w, h);
155 Y_set_fullscreen(fullscreen);
156 return 1;
159 int Y_set_videomode_opengl (int w, int h, int fullscreen) {
160 assert(w > 0);
161 assert(h > 0);
162 Uint32 flags;
163 SDL_Window *win;
164 SDL_GLContext ctx;
165 if (window != NULL && context != NULL) {
166 Y_resize_window(w, h, fullscreen);
167 win = window;
168 } else {
169 flags = SDL_WINDOW_RESIZABLE | SDL_WINDOW_OPENGL;
170 if (fullscreen) {
171 flags = flags | SDL_WINDOW_FULLSCREEN;
173 // TODO set context version and type
174 #ifdef __EMSCRIPTEN__
175 SDL_GL_SetAttribute(SDL_GL_CONTEXT_PROFILE_MASK, SDL_GL_CONTEXT_PROFILE_ES);
176 SDL_GL_SetAttribute(SDL_GL_CONTEXT_MAJOR_VERSION, 2);
177 SDL_GL_SetAttribute(SDL_GL_CONTEXT_MINOR_VERSION, 0);
178 #else
179 SDL_GL_SetAttribute(SDL_GL_CONTEXT_MAJOR_VERSION, 1);
180 SDL_GL_SetAttribute(SDL_GL_CONTEXT_MINOR_VERSION, 1);
181 #endif
182 SDL_GL_SetAttribute(SDL_GL_DOUBLEBUFFER, 1);
183 win = SDL_CreateWindow(TITLE_STR, SDL_WINDOWPOS_CENTERED, SDL_WINDOWPOS_CENTERED, w, h, flags);
184 if (win != NULL) {
185 ctx = SDL_GL_CreateContext(win);
186 if (ctx != NULL) {
187 Y_unset_videomode();
188 window = win;
189 context = ctx;
190 SDL_GL_MakeCurrent(window, context);
191 } else {
192 SDL_DestroyWindow(win);
193 win = NULL;
197 if (win == NULL) {
198 logo("Y_set_videomode_opengl: error: %s\n", SDL_GetError());
200 return win != NULL;
203 int Y_set_videomode_software (int w, int h, int fullscreen) {
204 assert(w > 0);
205 assert(h > 0);
206 Uint32 flags;
207 SDL_Surface *s;
208 SDL_Window *win;
209 if (window != NULL && surf != NULL) {
210 Y_resize_window(w, h, fullscreen);
211 win = window;
212 } else {
213 flags = SDL_WINDOW_RESIZABLE;
214 if (fullscreen) {
215 flags = flags | SDL_WINDOW_FULLSCREEN;
217 win = SDL_CreateWindow(TITLE_STR, SDL_WINDOWPOS_CENTERED, SDL_WINDOWPOS_CENTERED, w, h, flags);
218 if (win != NULL) {
219 s = SDL_CreateRGBSurface(0, w, h, 8, 0, 0, 0, 0);
220 if (s != NULL) {
221 Y_unset_videomode();
222 window = win;
223 surf = s;
224 } else {
225 SDL_DestroyWindow(win);
226 win = NULL;
230 if (win == NULL) {
231 logo("Y_set_videomode_software: error: %s\n", SDL_GetError());
233 return win != NULL;
236 void Y_get_videomode (int *w, int *h) {
237 if (window != NULL) {
238 SDL_GetWindowSize(window, w, h);
239 } else {
240 *w = 0;
241 *h = 0;
245 int Y_videomode_setted (void) {
246 return window != NULL;
249 void Y_unset_videomode (void) {
250 if (window != NULL) {
251 if (context != NULL) {
252 SDL_GL_MakeCurrent(window, NULL);
253 SDL_GL_DeleteContext(context);
254 context = NULL;
256 if (surf != NULL) {
257 SDL_FreeSurface(surf);
258 surf = NULL;
260 SDL_DestroyWindow(window);
261 window = NULL;
265 static void init_videomode_list (void) {
266 int i, j, k;
267 SDL_DisplayMode m;
268 int n = SDL_GetNumDisplayModes(0);
269 if (vlist.modes != NULL) {
270 free(vlist.modes);
271 vlist.modes = NULL;
272 vlist.n = 0;
274 if (n > 0) {
275 vlist.modes = malloc(n * sizeof(videomode_size_t));
276 if (vlist.modes != NULL) {
277 j = 0;
278 for (i = 0; i < n; i++) {
279 SDL_GetDisplayMode(0, i, &m);
280 k = 0;
281 while (k < j && (m.w != vlist.modes[k].w || m.h != vlist.modes[k].h)) {
282 k++;
284 if (k >= j) {
285 vlist.modes[j] = (videomode_size_t) {
286 .w = m.w,
287 .h = m.h
288 };
289 j++;
292 vlist.n = j;
297 const videomode_t *Y_get_videomode_list_opengl (int fullscreen) {
298 init_videomode_list();
299 return &vlist;
302 const videomode_t *Y_get_videomode_list_software (int fullscreen) {
303 init_videomode_list();
304 return &vlist;
307 void Y_set_fullscreen (int yes) {
308 if (window != NULL) {
309 SDL_SetWindowFullscreen(window, yes ? SDL_WINDOW_FULLSCREEN : 0);
313 int Y_get_fullscreen (void) {
314 return (window != NULL) && (SDL_GetWindowFlags(window) & SDL_WINDOW_FULLSCREEN);
317 void Y_swap_buffers (void) {
318 assert(window != NULL);
319 assert(context != NULL);
320 SDL_GL_SwapWindow(window);
323 void Y_get_buffer (byte **buf, int *w, int *h, int *pitch) {
324 assert(window != NULL);
325 assert(surf != NULL);
326 *buf = surf->pixels;
327 *w = surf->w;
328 *h = surf->h;
329 *pitch = surf->pitch;
332 void Y_set_vga_palette (byte *vgapal) {
333 assert(window != NULL);
334 assert(surf != NULL);
335 int i;
336 byte *p = vgapal;
337 SDL_Color colors[256];
338 for (i = 0; i < 256; i++) {
339 colors[i] = (SDL_Color) {
340 .r = p[0] * 255 / 63,
341 .g = p[1] * 255 / 63,
342 .b = p[2] * 255 / 63
343 };
344 p += 3;
346 SDL_SetPaletteColors(surf->format->palette, colors, 0, 256);
349 void Y_repaint_rect (int x, int y, int w, int h) {
350 assert(window != NULL);
351 assert(surf != NULL);
352 SDL_Surface *s = SDL_GetWindowSurface(window);
353 SDL_Rect r = (SDL_Rect) {
354 .x = x,
355 .y = y,
356 .w = w,
357 .h = h
358 };
359 SDL_BlitSurface(surf, &r, s, &r);
360 SDL_UpdateWindowSurfaceRects(window, &r, 1);
363 void Y_repaint (void) {
364 Y_repaint_rect(0, 0, surf->w, surf->h);
367 void Y_enable_text_input (void) {
368 SDL_StartTextInput();
371 void Y_disable_text_input (void) {
372 SDL_StopTextInput();
375 /* --- main --- */
377 static int sdl_to_key (int code) {
378 switch (code) {
379 case SDL_SCANCODE_0: return KEY_0;
380 case SDL_SCANCODE_1: return KEY_1;
381 case SDL_SCANCODE_2: return KEY_2;
382 case SDL_SCANCODE_3: return KEY_3;
383 case SDL_SCANCODE_4: return KEY_4;
384 case SDL_SCANCODE_5: return KEY_5;
385 case SDL_SCANCODE_6: return KEY_6;
386 case SDL_SCANCODE_7: return KEY_7;
387 case SDL_SCANCODE_8: return KEY_8;
388 case SDL_SCANCODE_9: return KEY_9;
389 case SDL_SCANCODE_A: return KEY_A;
390 case SDL_SCANCODE_B: return KEY_B;
391 case SDL_SCANCODE_C: return KEY_C;
392 case SDL_SCANCODE_D: return KEY_D;
393 case SDL_SCANCODE_E: return KEY_E;
394 case SDL_SCANCODE_F: return KEY_F;
395 case SDL_SCANCODE_G: return KEY_G;
396 case SDL_SCANCODE_H: return KEY_H;
397 case SDL_SCANCODE_I: return KEY_I;
398 case SDL_SCANCODE_J: return KEY_J;
399 case SDL_SCANCODE_K: return KEY_K;
400 case SDL_SCANCODE_L: return KEY_L;
401 case SDL_SCANCODE_M: return KEY_M;
402 case SDL_SCANCODE_N: return KEY_N;
403 case SDL_SCANCODE_O: return KEY_O;
404 case SDL_SCANCODE_P: return KEY_P;
405 case SDL_SCANCODE_Q: return KEY_Q;
406 case SDL_SCANCODE_R: return KEY_R;
407 case SDL_SCANCODE_S: return KEY_S;
408 case SDL_SCANCODE_T: return KEY_T;
409 case SDL_SCANCODE_U: return KEY_U;
410 case SDL_SCANCODE_V: return KEY_V;
411 case SDL_SCANCODE_W: return KEY_W;
412 case SDL_SCANCODE_X: return KEY_X;
413 case SDL_SCANCODE_Y: return KEY_Y;
414 case SDL_SCANCODE_Z: return KEY_Z;
415 case SDL_SCANCODE_RETURN: return KEY_RETURN;
416 case SDL_SCANCODE_ESCAPE: return KEY_ESCAPE;
417 case SDL_SCANCODE_BACKSPACE: return KEY_BACKSPACE;
418 case SDL_SCANCODE_TAB: return KEY_TAB;
419 case SDL_SCANCODE_SPACE: return KEY_SPACE;
420 case SDL_SCANCODE_MINUS: return KEY_MINUS;
421 case SDL_SCANCODE_EQUALS: return KEY_EQUALS;
422 case SDL_SCANCODE_LEFTBRACKET: return KEY_LEFTBRACKET;
423 case SDL_SCANCODE_RIGHTBRACKET: return KEY_RIGHTBRACKET;
424 case SDL_SCANCODE_BACKSLASH: return KEY_BACKSLASH;
425 case SDL_SCANCODE_SEMICOLON: return KEY_SEMICOLON;
426 case SDL_SCANCODE_APOSTROPHE: return KEY_APOSTROPHE;
427 case SDL_SCANCODE_GRAVE: return KEY_GRAVE;
428 case SDL_SCANCODE_COMMA: return KEY_COMMA;
429 case SDL_SCANCODE_PERIOD: return KEY_PERIOD;
430 case SDL_SCANCODE_SLASH: return KEY_SLASH;
431 case SDL_SCANCODE_CAPSLOCK: return KEY_CAPSLOCK;
432 case SDL_SCANCODE_F1: return KEY_F1;
433 case SDL_SCANCODE_F2: return KEY_F2;
434 case SDL_SCANCODE_F3: return KEY_F3;
435 case SDL_SCANCODE_F4: return KEY_F4;
436 case SDL_SCANCODE_F5: return KEY_F5;
437 case SDL_SCANCODE_F6: return KEY_F6;
438 case SDL_SCANCODE_F7: return KEY_F7;
439 case SDL_SCANCODE_F8: return KEY_F8;
440 case SDL_SCANCODE_F9: return KEY_F9;
441 case SDL_SCANCODE_F10: return KEY_F10;
442 case SDL_SCANCODE_F11: return KEY_F11;
443 case SDL_SCANCODE_F12: return KEY_F12;
444 case SDL_SCANCODE_PRINTSCREEN: return KEY_PRINTSCREEN;
445 case SDL_SCANCODE_SCROLLLOCK: return KEY_SCROLLLOCK;
446 case SDL_SCANCODE_PAUSE: return KEY_PAUSE;
447 case SDL_SCANCODE_INSERT: return KEY_INSERT;
448 case SDL_SCANCODE_HOME: return KEY_HOME;
449 case SDL_SCANCODE_PAGEUP: return KEY_PAGEUP;
450 case SDL_SCANCODE_DELETE: return KEY_DELETE;
451 case SDL_SCANCODE_END: return KEY_END;
452 case SDL_SCANCODE_PAGEDOWN: return KEY_PAGEDOWN;
453 case SDL_SCANCODE_RIGHT: return KEY_RIGHT;
454 case SDL_SCANCODE_LEFT: return KEY_LEFT;
455 case SDL_SCANCODE_DOWN: return KEY_DOWN;
456 case SDL_SCANCODE_UP: return KEY_UP;
457 case SDL_SCANCODE_NUMLOCKCLEAR: return KEY_NUMLOCK;
458 case SDL_SCANCODE_KP_DIVIDE: return KEY_KP_DIVIDE;
459 case SDL_SCANCODE_KP_MULTIPLY: return KEY_KP_MULTIPLY;
460 case SDL_SCANCODE_KP_MINUS: return KEY_KP_MINUS;
461 case SDL_SCANCODE_KP_PLUS: return KEY_KP_PLUS;
462 case SDL_SCANCODE_KP_ENTER: return KEY_KP_ENTER;
463 case SDL_SCANCODE_KP_0: return KEY_KP_0;
464 case SDL_SCANCODE_KP_1: return KEY_KP_1;
465 case SDL_SCANCODE_KP_2: return KEY_KP_2;
466 case SDL_SCANCODE_KP_3: return KEY_KP_3;
467 case SDL_SCANCODE_KP_4: return KEY_KP_4;
468 case SDL_SCANCODE_KP_5: return KEY_KP_5;
469 case SDL_SCANCODE_KP_6: return KEY_KP_6;
470 case SDL_SCANCODE_KP_7: return KEY_KP_7;
471 case SDL_SCANCODE_KP_8: return KEY_KP_8;
472 case SDL_SCANCODE_KP_9: return KEY_KP_9;
473 case SDL_SCANCODE_KP_PERIOD: return KEY_KP_PERIOD;
474 case SDL_SCANCODE_SYSREQ: return KEY_SYSREQ;
475 case SDL_SCANCODE_LCTRL: return KEY_LCTRL;
476 case SDL_SCANCODE_LSHIFT: return KEY_LSHIFT;
477 case SDL_SCANCODE_LALT: return KEY_LALT;
478 case SDL_SCANCODE_LGUI: return KEY_LSUPER;
479 case SDL_SCANCODE_RCTRL: return KEY_RCTRL;
480 case SDL_SCANCODE_RSHIFT: return KEY_RSHIFT;
481 case SDL_SCANCODE_RALT: return KEY_RALT;
482 case SDL_SCANCODE_RGUI: return KEY_RSUPER;
483 default: return KEY_UNKNOWN;
487 static void window_event_handler (SDL_WindowEvent *ev) {
488 switch (ev->event) {
489 case SDL_WINDOWEVENT_RESIZED:
490 R_set_videomode(ev->data1, ev->data2, Y_get_fullscreen());
491 break;
492 case SDL_WINDOWEVENT_CLOSE:
493 ERR_quit();
494 break;
498 static int utf8_to_wchar (char *x) {
499 int i = 0;
500 byte *s = (byte*)x;
501 if (s[0] < 0x80) {
502 return s[0];
503 } else if (s[0] < 0xE0) {
504 if (s[0] - 192 >= 0 && s[1] >= 0x80 && s[1] < 0xE0) {
505 i = (s[0] - 192) * 64 + s[1] - 128;
507 } else if (s[0] < 0xF0) {
508 if (s[1] >= 0x80 && s[1] < 0xE0 && s[2] >= 0x80 && s[2] < 0xE0) {
509 i = ((s[0] - 224) * 64 + s[1] - 128) * 64 + s[2] - 128;
512 return i;
515 static void poll_events (void) {
516 int key, down, uch, ch;
517 SDL_Event ev;
518 while (SDL_PollEvent(&ev)) {
519 switch (ev.type) {
520 case SDL_QUIT:
521 ERR_quit();
522 break;
523 case SDL_WINDOWEVENT:
524 if (ev.window.windowID == SDL_GetWindowID(window)) {
525 window_event_handler(&ev.window);
527 break;
528 case SDL_KEYDOWN:
529 case SDL_KEYUP:
530 down = ev.type == SDL_KEYDOWN;
531 key = sdl_to_key(ev.key.keysym.scancode);
532 I_press(key, down);
533 GM_key(key, down);
534 break;
535 case SDL_TEXTINPUT:
536 uch = utf8_to_wchar(ev.text.text);
537 ch = cp866_utoc(uch);
538 if (ch >= 0) {
539 GM_input(ch);
541 break;
546 static void step (void) {
547 poll_events();
548 S_updatemusic();
549 Uint32 t = SDL_GetTicks();
550 if (t - ticks > DELAY) {
551 ticks = t;
552 G_act();
554 R_draw();
557 int main (int argc, char **argv) {
558 char *pw;
559 CFG_args(argc, argv);
560 logo("system: initialize SDL2\n");
561 if (SDL_Init(SDL_INIT_TIMER | SDL_INIT_VIDEO | SDL_INIT_EVENTS) == -1) {
562 logo("system: failed to init SDL2: %s\n", SDL_GetError());
563 return 1;
565 // Player 1 defaults
566 pl1.ku = KEY_KP_8;
567 pl1.kd = KEY_KP_5;
568 pl1.kl = KEY_KP_4;
569 pl1.kr = KEY_KP_6;
570 pl1.kf = KEY_PAGEDOWN;
571 pl1.kj = KEY_DELETE;
572 pl1.kwl = KEY_HOME;
573 pl1.kwr = KEY_END;
574 pl1.kp = KEY_KP_8;
575 // Player 2 defaults
576 pl2.ku = KEY_E;
577 pl2.kd = KEY_D;
578 pl2.kl = KEY_S;
579 pl2.kr = KEY_F;
580 pl2.kf = KEY_A;
581 pl2.kj = KEY_Q;
582 pl2.kwl = KEY_1;
583 pl2.kwr = KEY_2;
584 pl2.kp = KEY_E;
585 srand(SDL_GetTicks());
586 F_startup();
587 CFG_load();
588 #ifndef WIN32
589 pw = "/usr/share/doom2d-rembo/doom2d.wad";
590 #else
591 pw = "doom2d.wad";
592 #endif
593 if (fexists(pw)) {
594 F_addwad(pw);
595 } else {
596 F_addwad("doom2d.wad");
598 F_initwads();
599 M_startup();
600 F_allocres();
601 S_init();
602 S_initmusic();
603 R_init();
604 G_init();
605 ticks = SDL_GetTicks();
606 #ifdef __EMSCRIPTEN__
607 emscripten_set_main_loop(step, 0, 1);
608 #else
609 while (!quit) {
610 step();
612 #endif
613 CFG_save();
614 R_done();
615 S_donemusic();
616 S_done();
617 M_shutdown();
618 SDL_Quit();
619 return 0;