src/sdl2/main.c

   1 #include <SDL.h>
   2 #include <stdio.h>
   3 #include <stdarg.h>
   4 #include <stdlib.h> // srand exit
   5 #include <string.h> // strcasecmp
   6 #include <assert.h>
   7 #include "system.h"
   8 #include "input.h"
   9
  10 #include "my.h" // fexists
  11 #include "player.h" // pl1 pl2
  12 #include "menu.h" // G_keyf
  13 #include "error.h" // logo
  14
  15 #include "files.h" // F_startup F_addwad F_initwads F_allocres
  16 #include "config.h" // CFG_args CFG_load CFG_save
  17 #include "memory.h" // M_startup
  18 #include "game.h" // G_init G_act
  19 #include "sound.h" // S_init S_done
  20 #include "music.h" // S_initmusic S_updatemusic S_donemusic
  21 #include "render.h" // R_init R_draw R_done
  22
  23 #define TITLE_STR "DooM 2D (SDL2)"
  24
  25 static int quit = 0;
  26 static SDL_Window *window;
  27 static SDL_GLContext context;
  28 static SDL_Surface *surf;
  29
  30 /* --- error.h --- */
  31
  32 void logo (const char *s, ...) {
  33   va_list ap;
  34   va_start(ap, s);
  35   vprintf(s, ap);
  36   va_end(ap);
  37   fflush(stdout);
  38 }
  39
  40 void logo_gas (int cur, int all) {
  41   // stub
  42 }
  43
  44 void ERR_failinit (char *s, ...) {
  45   va_list ap;
  46   va_start(ap, s);
  47   vprintf(s, ap);
  48   va_end(ap);
  49   puts("");
  50   exit(1);
  51 }
  52
  53 void ERR_fatal (char *s, ...) {
  54   va_list ap;
  55   R_done();
  56   S_done();
  57   S_donemusic();
  58   M_shutdown();
  59   SDL_Quit();
  60   puts("\nКРИТИЧЕСКАЯ ОШИБКА:");
  61   va_start(ap, s);
  62   vprintf(s, ap);
  63   va_end(ap);
  64   puts("");
  65   exit(1);
  66 }
  67
  68 void ERR_quit (void) {
  69   puts("Спасибо за то, что вы играли в Операцию \"Смятка\"!");
  70   //F_loadres(F_getresid("ENDOOM"),p,0,4000);
  71   quit = 1;
  72 }
  73
  74 /* --- system.h --- */
  75
  76 static int Y_set_videomode_opengl (int w, int h, int fullscreen) {
  77   assert(w > 0);
  78   assert(h > 0);
  79   Uint32 flags = SDL_WINDOW_RESIZABLE | SDL_WINDOW_OPENGL;
  80   flags |= fullscreen ? SDL_WINDOW_FULLSCREEN : 0;
  81   // TODO set context version and type
  82   SDL_GL_SetAttribute(SDL_GL_CONTEXT_MAJOR_VERSION, 1);
  83   SDL_GL_SetAttribute(SDL_GL_CONTEXT_MINOR_VERSION, 1);
  84   SDL_GL_SetAttribute(SDL_GL_DOUBLEBUFFER, 1);
  85   int x = SDL_WINDOWPOS_CENTERED;
  86   int y = SDL_WINDOWPOS_CENTERED;
  87   SDL_Window *win = SDL_CreateWindow(TITLE_STR, x, y, w, h, flags);
  88   if (win != NULL) {
  89     SDL_GLContext ctx = SDL_GL_CreateContext(win);
  90     if (ctx != NULL) {
  91       Y_unset_videomode();
  92       window = win;
  93       context = ctx;
  94       SDL_GL_MakeCurrent(window, context);
  95     } else {
  96       SDL_DestroyWindow(win);
  97       win = NULL;
  98     }
  99   }
 100   return win != NULL;
 101 }
 102
 103 static int Y_set_videomode_software (int w, int h, int fullscreen) {
 104   assert(w > 0);
 105   assert(h > 0);
 106   int x = SDL_WINDOWPOS_CENTERED;
 107   int y = SDL_WINDOWPOS_CENTERED;
 108   Uint32 flags = SDL_WINDOW_RESIZABLE;
 109   flags |= fullscreen ? SDL_WINDOW_FULLSCREEN : 0;
 110   SDL_Window *win = SDL_CreateWindow(TITLE_STR, x, y, w, h, flags);
 111   if (win != NULL) {
 112     SDL_Surface *s = SDL_CreateRGBSurface(0, w, h, 8, 0, 0, 0, 0);
 113     if (s != NULL) {
 114       Y_unset_videomode();
 115       window = win;
 116       surf = s;
 117     } else {
 118       SDL_DestroyWindow(win);
 119       win = NULL;
 120     }
 121   }
 122   return win != NULL;
 123 }
 124
 125 static int Y_resize_window (int w, int h, int fullscreen) {
 126   assert(w > 0);
 127   assert(h > 0);
 128   assert(window != NULL);
 129   if (surf != NULL) {
 130     SDL_Surface *s = SDL_CreateRGBSurface(0, w, h, 8, 0, 0, 0, 0);
 131     if (s != NULL) {
 132       SDL_SetPaletteColors(s->format->palette, surf->format->palette->colors, 0, surf->format->palette->ncolors);
 133       SDL_FreeSurface(surf);
 134       surf = s;
 135     }
 136   }
 137   SDL_SetWindowSize(window, w, h);
 138   Y_set_fullscreen(fullscreen);
 139   return 1;
 140 }
 141
 142 int Y_set_videomode (int w, int h, int flags) {
 143   assert(w > 0);
 144   assert(h > 0);
 145   int fullscreen = (flags & SYSTEM_USE_FULLSCREEN) != 0;
 146   if (flags & SYSTEM_USE_OPENGL) {
 147     if (window != NULL && context != NULL) {
 148       return Y_resize_window(w, h, fullscreen);
 149     } else {
 150       return Y_set_videomode_opengl(w, h, fullscreen);
 151     }
 152   } else {
 153     if (window != NULL && surf != NULL) {
 154       return Y_resize_window(w, h, fullscreen);
 155     } else {
 156       return Y_set_videomode_software(w, h, fullscreen);
 157     }
 158   }
 159 }
 160
 161 void Y_get_videomode (int *w, int *h) {
 162   if (window != NULL) {
 163     SDL_GetWindowSize(window, w, h);
 164   } else {
 165     *w = 0;
 166     *h = 0;
 167   }
 168 }
 169
 170 int Y_videomode_setted (void) {
 171   return window != NULL;
 172 }
 173
 174 void Y_unset_videomode (void) {
 175   if (window != NULL) {
 176     if (context != NULL) {
 177       SDL_GL_MakeCurrent(window, NULL);
 178       SDL_GL_DeleteContext(context);
 179       context = NULL;
 180     }
 181     if (surf != NULL) {
 182       SDL_FreeSurface(surf);
 183       surf = NULL;
 184     }
 185     SDL_DestroyWindow(window);
 186     window = NULL;
 187   }
 188 }
 189
 190 int Y_set_fullscreen (int yes) {
 191   if (window != NULL) {
 192     SDL_SetWindowFullscreen(window, yes ? SDL_WINDOW_FULLSCREEN : 0);
 193   }
 194   return yes;
 195 }
 196
 197 int Y_get_fullscreen (void) {
 198   return (window != NULL) && (SDL_GetWindowFlags(window) & SDL_WINDOW_FULLSCREEN);
 199 }
 200
 201 void Y_swap_buffers (void) {
 202   assert(window != NULL);
 203   assert(context != NULL);
 204   SDL_GL_SwapWindow(window);
 205 }
 206
 207 void Y_get_buffer (byte **buf, int *w, int *h, int *pitch) {
 208   assert(window != NULL);
 209   assert(surf != NULL);
 210   *buf = surf->pixels;
 211   *w = surf->w;
 212   *h = surf->h;
 213   *pitch = surf->pitch;
 214 }
 215
 216 void Y_set_vga_palette (byte *vgapal) {
 217   assert(window != NULL);
 218   assert(surf != NULL);
 219   int i;
 220   byte *p = vgapal;
 221   SDL_Color colors[256];
 222   for (i = 0; i < 256; i++) {
 223     colors[i] = (SDL_Color) {
 224       .r = p[0] * 255 / 63,
 225       .g = p[1] * 255 / 63,
 226       .b = p[2] * 255 / 63
 227     };
 228     p += 3;
 229   }
 230   SDL_SetPaletteColors(surf->format->palette, colors, 0, 256);
 231 }
 232
 233 void Y_repaint_rect (int x, int y, int w, int h) {
 234   assert(window != NULL);
 235   assert(surf != NULL);
 236   SDL_Surface *s = SDL_GetWindowSurface(window);
 237   SDL_Rect r = (SDL_Rect) {
 238     .x = x,
 239     .y = y,
 240     .w = w,
 241     .h = h
 242   };
 243   SDL_BlitSurface(surf, &r, s, &r);
 244   SDL_UpdateWindowSurfaceRects(window, &r, 1);
 245 }
 246
 247 void Y_repaint (void) {
 248   Y_repaint_rect(0, 0, surf->w, surf->h);
 249 }
 250
 251 /* --- main --- */
 252
 253 static int sdl_to_key (int code) {
 254   switch (code) {
 255     case SDL_SCANCODE_0: return KEY_0;
 256     case SDL_SCANCODE_1: return KEY_1;
 257     case SDL_SCANCODE_2: return KEY_2;
 258     case SDL_SCANCODE_3: return KEY_3;
 259     case SDL_SCANCODE_4: return KEY_4;
 260     case SDL_SCANCODE_5: return KEY_5;
 261     case SDL_SCANCODE_6: return KEY_6;
 262     case SDL_SCANCODE_7: return KEY_7;
 263     case SDL_SCANCODE_8: return KEY_8;
 264     case SDL_SCANCODE_9: return KEY_9;
 265     case SDL_SCANCODE_A: return KEY_A;
 266     case SDL_SCANCODE_B: return KEY_B;
 267     case SDL_SCANCODE_C: return KEY_C;
 268     case SDL_SCANCODE_D: return KEY_D;
 269     case SDL_SCANCODE_E: return KEY_E;
 270     case SDL_SCANCODE_F: return KEY_F;
 271     case SDL_SCANCODE_G: return KEY_G;
 272     case SDL_SCANCODE_H: return KEY_H;
 273     case SDL_SCANCODE_I: return KEY_I;
 274     case SDL_SCANCODE_J: return KEY_J;
 275     case SDL_SCANCODE_K: return KEY_K;
 276     case SDL_SCANCODE_L: return KEY_L;
 277     case SDL_SCANCODE_M: return KEY_M;
 278     case SDL_SCANCODE_N: return KEY_N;
 279     case SDL_SCANCODE_O: return KEY_O;
 280     case SDL_SCANCODE_P: return KEY_P;
 281     case SDL_SCANCODE_Q: return KEY_Q;
 282     case SDL_SCANCODE_R: return KEY_R;
 283     case SDL_SCANCODE_S: return KEY_S;
 284     case SDL_SCANCODE_T: return KEY_T;
 285     case SDL_SCANCODE_U: return KEY_U;
 286     case SDL_SCANCODE_V: return KEY_V;
 287     case SDL_SCANCODE_W: return KEY_W;
 288     case SDL_SCANCODE_X: return KEY_X;
 289     case SDL_SCANCODE_Y: return KEY_Y;
 290     case SDL_SCANCODE_Z: return KEY_Z;
 291     case SDL_SCANCODE_RETURN: return KEY_RETURN;
 292     case SDL_SCANCODE_ESCAPE: return KEY_ESCAPE;
 293     case SDL_SCANCODE_BACKSPACE: return KEY_BACKSPACE;
 294     case SDL_SCANCODE_TAB: return KEY_TAB;
 295     case SDL_SCANCODE_SPACE: return KEY_SPACE;
 296     case SDL_SCANCODE_MINUS: return KEY_MINUS;
 297     case SDL_SCANCODE_EQUALS: return KEY_EQUALS;
 298     case SDL_SCANCODE_LEFTBRACKET: return KEY_LEFTBRACKET;
 299     case SDL_SCANCODE_RIGHTBRACKET: return KEY_RIGHTBRACKET;
 300     case SDL_SCANCODE_BACKSLASH: return KEY_BACKSLASH;
 301     case SDL_SCANCODE_SEMICOLON: return KEY_SEMICOLON;
 302     case SDL_SCANCODE_APOSTROPHE: return KEY_APOSTROPHE;
 303     case SDL_SCANCODE_GRAVE: return KEY_GRAVE;
 304     case SDL_SCANCODE_COMMA: return KEY_COMMA;
 305     case SDL_SCANCODE_PERIOD: return KEY_PERIOD;
 306     case SDL_SCANCODE_SLASH: return KEY_SLASH;
 307     case SDL_SCANCODE_CAPSLOCK: return KEY_CAPSLOCK;
 308     case SDL_SCANCODE_F1: return KEY_F1;
 309     case SDL_SCANCODE_F2: return KEY_F2;
 310     case SDL_SCANCODE_F3: return KEY_F3;
 311     case SDL_SCANCODE_F4: return KEY_F4;
 312     case SDL_SCANCODE_F5: return KEY_F5;
 313     case SDL_SCANCODE_F6: return KEY_F6;
 314     case SDL_SCANCODE_F7: return KEY_F7;
 315     case SDL_SCANCODE_F8: return KEY_F8;
 316     case SDL_SCANCODE_F9: return KEY_F9;
 317     case SDL_SCANCODE_F10: return KEY_F10;
 318     case SDL_SCANCODE_F11: return KEY_F11;
 319     case SDL_SCANCODE_F12: return KEY_F12;
 320     case SDL_SCANCODE_PRINTSCREEN: return KEY_PRINTSCREEN;
 321     case SDL_SCANCODE_SCROLLLOCK: return KEY_SCROLLLOCK;
 322     case SDL_SCANCODE_PAUSE: return KEY_PAUSE;
 323     case SDL_SCANCODE_INSERT: return KEY_INSERT;
 324     case SDL_SCANCODE_HOME: return KEY_HOME;
 325     case SDL_SCANCODE_PAGEUP: return KEY_PAGEUP;
 326     case SDL_SCANCODE_DELETE: return KEY_DELETE;
 327     case SDL_SCANCODE_END: return KEY_END;
 328     case SDL_SCANCODE_PAGEDOWN: return KEY_PAGEDOWN;
 329     case SDL_SCANCODE_RIGHT: return KEY_RIGHT;
 330     case SDL_SCANCODE_LEFT: return KEY_LEFT;
 331     case SDL_SCANCODE_DOWN: return KEY_DOWN;
 332     case SDL_SCANCODE_UP: return KEY_UP;
 333     case SDL_SCANCODE_NUMLOCKCLEAR: return KEY_NUMLOCK;
 334     case SDL_SCANCODE_KP_DIVIDE: return KEY_KP_DIVIDE;
 335     case SDL_SCANCODE_KP_MULTIPLY: return KEY_KP_MULTIPLY;
 336     case SDL_SCANCODE_KP_MINUS: return KEY_KP_MINUS;
 337     case SDL_SCANCODE_KP_PLUS: return KEY_KP_PLUS;
 338     case SDL_SCANCODE_KP_ENTER: return KEY_KP_ENTER;
 339     case SDL_SCANCODE_KP_0: return KEY_KP_0;
 340     case SDL_SCANCODE_KP_1: return KEY_KP_1;
 341     case SDL_SCANCODE_KP_2: return KEY_KP_2;
 342     case SDL_SCANCODE_KP_3: return KEY_KP_3;
 343     case SDL_SCANCODE_KP_4: return KEY_KP_4;
 344     case SDL_SCANCODE_KP_5: return KEY_KP_5;
 345     case SDL_SCANCODE_KP_6: return KEY_KP_6;
 346     case SDL_SCANCODE_KP_7: return KEY_KP_7;
 347     case SDL_SCANCODE_KP_8: return KEY_KP_8;
 348     case SDL_SCANCODE_KP_9: return KEY_KP_9;
 349     case SDL_SCANCODE_KP_PERIOD: return KEY_KP_PERIOD;
 350     case SDL_SCANCODE_SYSREQ: return KEY_SYSREQ;
 351     case SDL_SCANCODE_LCTRL: return KEY_LCTRL;
 352     case SDL_SCANCODE_LSHIFT: return KEY_LSHIFT;
 353     case SDL_SCANCODE_LALT: return KEY_LALT;
 354     case SDL_SCANCODE_LGUI: return KEY_LSUPER;
 355     case SDL_SCANCODE_RCTRL: return KEY_RCTRL;
 356     case SDL_SCANCODE_RSHIFT: return KEY_RSHIFT;
 357     case SDL_SCANCODE_RALT: return KEY_RALT;
 358     case SDL_SCANCODE_RGUI: return KEY_RSUPER;
 359     default: return KEY_UNKNOWN;
 360   }
 361 }
 362
 363 static void window_event_handler (SDL_WindowEvent *ev) {
 364   switch (ev->event) {
 365     case SDL_WINDOWEVENT_RESIZED:
 366       if (window != NULL && ev->windowID == SDL_GetWindowID(window)) {
 367         R_set_videomode(ev->data1, ev->data2, Y_get_fullscreen());
 368       }
 369       break;
 370     case SDL_WINDOWEVENT_CLOSE:
 371       ERR_quit();
 372       break;
 373   }
 374 }
 375
 376 static void poll_events (void (*h)(int key, int down)) {
 377   int key;
 378   SDL_Event ev;
 379   while (SDL_PollEvent(&ev)) {
 380     switch (ev.type) {
 381       case SDL_QUIT:
 382         ERR_quit();
 383         break;
 384       case SDL_WINDOWEVENT:
 385         window_event_handler(&ev.window);
 386         break;
 387       case SDL_KEYDOWN:
 388       case SDL_KEYUP:
 389         key = sdl_to_key(ev.key.keysym.scancode);
 390         I_press(key, ev.type == SDL_KEYDOWN);
 391         if (h != NULL) {
 392           (*h)(key, ev.type == SDL_KEYDOWN);
 393         }
 394         break;
 395     }
 396   }
 397 }
 398
 399 int main (int argc, char **argv) {
 400   char *pw;
 401   Uint32 t, ticks;
 402   logo("system: initialize SDL2\n");
 403   if (SDL_Init(SDL_INIT_TIMER | SDL_INIT_VIDEO | SDL_INIT_EVENTS) == -1) {
 404     logo("system: failed to init SDL2: %s\n", SDL_GetError());
 405     return 1;
 406   }
 407   //SDL_WM_SetCaption("Doom 2D v1.351", "Doom 2D");
 408   // Player 1 defaults
 409   pl1.ku = KEY_KP_8;
 410   pl1.kd = KEY_KP_5;
 411   pl1.kl = KEY_KP_4;
 412   pl1.kr = KEY_KP_6;
 413   pl1.kf = KEY_PAGEDOWN;
 414   pl1.kj = KEY_DELETE;
 415   pl1.kwl = KEY_HOME;
 416   pl1.kwr = KEY_END;
 417   pl1.kp = KEY_KP_8;
 418   // Player 2 defaults
 419   pl2.ku = KEY_E;
 420   pl2.kd = KEY_D;
 421   pl2.kl = KEY_S;
 422   pl2.kr = KEY_F;
 423   pl2.kf = KEY_A;
 424   pl2.kj = KEY_Q;
 425   pl2.kwl = KEY_1;
 426   pl2.kwr = KEY_2;
 427   pl2.kp = KEY_E;
 428   srand(SDL_GetTicks());
 429   F_startup();
 430 #ifndef WIN32
 431   pw = "/usr/share/doom2d-rembo/doom2d.wad";
 432 #else
 433   pw = "doom2d.wad";
 434 #endif
 435   if (fexists(pw)) {
 436     F_addwad(pw);
 437   } else {
 438     F_addwad("doom2d.wad");
 439   }
 440   CFG_args(argc, argv);
 441   CFG_load();
 442   F_initwads();
 443   M_startup();
 444   F_allocres();
 445   S_init();
 446   S_initmusic();
 447   R_init();
 448   G_init();
 449   ticks = SDL_GetTicks();
 450   while (!quit) {
 451     poll_events(&G_keyf);
 452     S_updatemusic();
 453     t = SDL_GetTicks();
 454     if (t - ticks > DELAY) {
 455       ticks = t;
 456       G_act();
 457     }
 458     R_draw();
 459   }
 460   CFG_save();
 461   R_done();
 462   S_donemusic();
 463   S_done();
 464   M_shutdown();
 465   SDL_Quit();
 466   return 0;
 467 }