DEADSOFTWARE

update copyrights
[flatwaifu.git] / src / sdl / main.c
index df880c432e3a2b9cf8e447faf0adfd02e6872082..7bc04d0eaa5dc659769d21a0d3d159b1f0fd9675 100644 (file)
@@ -1,30 +1,26 @@
-/*
-   Copyright (C) Prikol Software 1996-1997
-   Copyright (C) Aleksey Volynskov 1996-1997
-   Copyright (C) <ARembo@gmail.com> 2011
+/* Copyright (C) 2020 SovietPony
+ *
+ * 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, version 3 of the License ONLY.
+ *
+ * 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.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <http://www.gnu.org/licenses/>.
+ */
 
-   This file is part of the Doom2D:Rembo project.
-
-   Doom2D:Rembo is free software; you can redistribute it and/or modify
-   it under the terms of the GNU General Public License version 2 as
-   published by the Free Software Foundation.
-
-   Doom2D:Rembo 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.
-
-   You should have received a copy of the GNU General Public License
-   along with this program; if not, see <http://www.gnu.org/licenses/> or
-   write to the Free Software Foundation, Inc.,
-   51 Franklin St, Fifth Floor, Boston, MA  02110-1301 USA
-*/
+#ifdef __EMSCRIPTEN__
+#  include <emscripten.h>
+#endif
 
-#include <SDL.h>
+#include <SDL/SDL.h>
 #include <stdio.h>
 #include <stdarg.h>
 #include <stdlib.h> // srand exit
-#include <string.h> // strcasecmp
 #include <assert.h>
 #include "system.h"
 #include "input.h"
 #include "player.h" // pl1 pl2
 #include "menu.h" // G_keyf
 #include "error.h" // logo
+#include "monster.h" // nomon
 
 #include "files.h" // F_startup F_addwad F_initwads F_allocres
 #include "config.h" // CFG_args CFG_load CFG_save
+#include "args.h" // ARG_parse
 #include "memory.h" // M_startup
 #include "game.h" // G_init G_act
 #include "sound.h" // S_init S_done
 #include "music.h" // S_initmusic S_updatemusic S_donemusic
 #include "render.h" // R_init R_draw R_done
 
+#define MODE_NONE 0
+#define MODE_OPENGL 1
+#define MODE_SOFTWARE 2
+
+static Uint32 ticks;
 static int quit = 0;
 static SDL_Surface *surf = NULL;
+static int mode = MODE_NONE;
+static int text_input;
+static videomode_t vlist;
+
+static const cfg_t arg[] = {
+  {"file", NULL, Y_FILES},
+  {"cheat", &cheat, Y_SW_ON},
+//  {"vga", &shot_vga, Y_SW_ON},
+//  {"musvol", &mus_vol, Y_WORD},
+  {"mon", &nomon, Y_SW_OFF},
+  {"warp", &_warp, Y_BYTE},
+//  {"config", NULL, cfg_file, Y_STRING},
+  {NULL, NULL, 0} // end
+};
+
+static const cfg_t cfg[] = {
+//  {"screenshot", &shot_vga, Y_SW_ON},
+//  {"music_volume", &mus_vol, Y_WORD},
+//  {"music_random", &music_random, Y_SW_ON},
+//  {"music_time", &music_time, Y_DWORD},
+//  {"music_fade", &music_fade, Y_DWORD},
+  {"pl1_left", &pl1.kl, Y_KEY},
+  {"pl1_right",&pl1.kr, Y_KEY},
+  {"pl1_up", &pl1.ku, Y_KEY},
+  {"pl1_down", &pl1.kd, Y_KEY},
+  {"pl1_jump", &pl1.kj, Y_KEY},
+  {"pl1_fire", &pl1.kf, Y_KEY},
+  {"pl1_next", &pl1.kwr, Y_KEY},
+  {"pl1_prev", &pl1.kwl, Y_KEY},
+  {"pl1_use", &pl1.kp, Y_KEY},
+  {"pl2_left", &pl2.kl, Y_KEY},
+  {"pl2_right", &pl2.kr, Y_KEY},
+  {"pl2_up", &pl2.ku, Y_KEY},
+  {"pl2_down", &pl2.kd, Y_KEY},
+  {"pl2_jump", &pl2.kj, Y_KEY},
+  {"pl2_fire", &pl2.kf, Y_KEY},
+  {"pl2_next", &pl2.kwr, Y_KEY},
+  {"pl2_prev", &pl2.kwl, Y_KEY},
+  {"pl2_use", &pl2.kp, Y_KEY},
+  {NULL, NULL, 0} // end
+};
+
+static void CFG_args (int argc, char **argv) {
+  const cfg_t *list[] = { arg, R_args(), S_args(), MUS_args() };
+  ARG_parse(argc, argv, 4, list);
+}
+
+static void CFG_load (void) {
+  const cfg_t *list[] = { cfg, R_conf(), S_conf(), MUS_conf() };
+  CFG_read_config("default.cfg", 4, list);
+  CFG_read_config("doom2d.cfg", 4, list);
+}
+
+static void CFG_save (void) {
+  const cfg_t *list[] = { cfg, R_conf(), S_conf(), MUS_conf() };
+  CFG_update_config("doom2d.cfg", "doom2d.cfg", 4, list, "generated by doom2d, do not modify");
+}
 
 /* --- error.h --- */
 
@@ -71,8 +131,8 @@ void ERR_failinit (char *s, ...) {
 void ERR_fatal (char *s, ...) {
   va_list ap;
   R_done();
+  MUS_done();
   S_done();
-  S_donemusic();
   M_shutdown();
   SDL_Quit();
   puts("\nКРИТИЧЕСКАЯ ОШИБКА:");
@@ -84,39 +144,104 @@ void ERR_fatal (char *s, ...) {
 }
 
 void ERR_quit (void) {
-  puts("Спасибо за то, что вы играли в Операцию \"Смятка\"!");
-  //F_loadres(F_getresid("ENDOOM"),p,0,4000);
   quit = 1;
 }
 
 /* --- system.h --- */
 
-int Y_set_videomode (int w, int h, int flags) {
-  SDL_Surface *s;
-  int colors;
-  Uint32 f;
+int Y_set_videomode_opengl (int w, int h, int fullscreen) {
   assert(w > 0);
   assert(h > 0);
-  f = SDL_DOUBLEBUF;
-  if (flags & SYSTEM_USE_FULLSCREEN) {
-    f = flags | SDL_FULLSCREEN;
-  }
-  if (flags & SYSTEM_USE_OPENGL) {
-    f = flags | SDL_OPENGL;
-    colors = 0;
+  Uint32 flags;
+  SDL_Surface *s;
+  if (mode == MODE_OPENGL && surf->w == w && surf->h == h && Y_get_fullscreen() == fullscreen) {
+    s = surf;
   } else {
-    f = flags | SDL_SWSURFACE | SDL_HWPALETTE;
-    colors = 8;
+    flags = SDL_DOUBLEBUF | SDL_OPENGL;
+    if (fullscreen) {
+      flags = flags | SDL_FULLSCREEN;
+    }
+#   ifdef WIN32
+      flags = flags | SDL_RESIZABLE;
+#   endif
+    s = SDL_SetVideoMode(w, h, 0, flags);
+    if (s != NULL) {
+      mode = MODE_OPENGL;
+      surf = s;
+    } else {
+      logo("Y_set_videomode_opengl: error: %s\n", SDL_GetError());
+    }
   }
-  s = SDL_SetVideoMode(w, h, colors, f);
-  if (s != NULL) {
-    surf = s;
+  return s != NULL;
+}
+
+int Y_set_videomode_software (int w, int h, int fullscreen) {
+  assert(w > 0);
+  assert(h > 0);
+  Uint32 flags;
+  SDL_Surface *s;
+  if (mode == MODE_OPENGL && surf->w == w && surf->h == h && Y_get_fullscreen() == fullscreen) {
+    s = surf;
+  } else {
+    flags = SDL_DOUBLEBUF | SDL_SWSURFACE | SDL_HWPALETTE;
+    if (fullscreen) {
+      flags = flags | SDL_FULLSCREEN;
+    }
+#   ifdef WIN32
+      flags = flags | SDL_RESIZABLE;
+#   endif
+    s = SDL_SetVideoMode(w, h, 8, flags);
+    if (s != NULL) {
+      mode = MODE_SOFTWARE;
+      surf = s;
+    }
   }
   return s != NULL;
 }
 
+static void init_videomode_list (Uint32 flags) {
+  int i, n;
+  SDL_Rect **r;
+  if (vlist.modes != NULL) {
+    free(vlist.modes);
+    vlist.modes = NULL;
+    vlist.n = 0;
+  }
+  r = SDL_ListModes(NULL, flags);
+  if (r == (SDL_Rect **)-1) {
+    if ((flags & SDL_FULLSCREEN) == 0) {
+      init_videomode_list(flags | SDL_FULLSCREEN);
+    }
+  } else if (r != (SDL_Rect**)0) {
+    n = 0;
+    while (r[n] != NULL) {
+      n++;
+    }
+    vlist.modes = malloc(n * sizeof(videomode_size_t));
+    if (vlist.modes != NULL) {
+      vlist.n = n;
+      for (i = 0; i < n; i++) {
+        vlist.modes[i] = (videomode_size_t) {
+          .w = r[i]->w,
+          .h = r[i]->h
+        };
+      }
+    }
+  }
+}
+
+const videomode_t *Y_get_videomode_list_opengl (int fullscreen) {
+  init_videomode_list(SDL_OPENGL | (fullscreen ? SDL_FULLSCREEN : 0));
+  return &vlist;
+}
+
+const videomode_t *Y_get_videomode_list_software (int fullscreen) {
+  init_videomode_list(SDL_SWSURFACE | SDL_HWPALETTE | (fullscreen ? SDL_FULLSCREEN : 0));
+  return &vlist;
+}
+
 void Y_get_videomode (int *w, int *h) {
-  if (surf != NULL) {
+  if (mode != MODE_NONE) {
     *w = surf->w;
     *h = surf->h;
   } else {
@@ -126,40 +251,45 @@ void Y_get_videomode (int *w, int *h) {
 }
 
 int Y_videomode_setted (void) {
-  return surf != NULL;
+  return mode != MODE_NONE;
 }
 
 void Y_unset_videomode (void) {
   surf = NULL;
+  mode = MODE_NONE;
+#ifndef __EMSCRIPTEN__
   SDL_QuitSubSystem(SDL_INIT_VIDEO);
   SDL_InitSubSystem(SDL_INIT_VIDEO);
+#endif
 }
 
-void Y_set_fullscreen (int yes) {
-  assert(surf != NULL);
-  int flags = 0;
-  if ((surf->flags & SDL_FULLSCREEN) == 0) {
-    flags |= SYSTEM_USE_FULLSCREEN;
-  }
-  if (surf->flags & SDL_OPENGL) {
-    flags |= SDL_OPENGL;
+void Y_set_fullscreen (int fullscreen) {
+  int fs = Y_get_fullscreen();
+  if (mode != MODE_NONE && fs != fullscreen) {
+    if (SDL_WM_ToggleFullScreen(surf) == 0) {
+      switch (mode) {
+        case MODE_OPENGL:
+          Y_set_videomode_opengl(surf->w, surf->h, fullscreen);
+          break;
+        case MODE_SOFTWARE:
+          Y_set_videomode_software(surf->w, surf->h, fullscreen);
+          break;
+      }
+    }
   }
-  Y_set_videomode(surf->w, surf->h, flags);
 }
 
 int Y_get_fullscreen (void) {
-  return (surf != NULL) && ((surf->flags & SDL_FULLSCREEN) != 0);
+  return (mode != MODE_NONE) && ((surf->flags & SDL_FULLSCREEN) != 0);
 }
 
 void Y_swap_buffers (void) {
-  assert(surf != NULL);
-  assert(surf->flags & SDL_OPENGL);
+  assert(mode == MODE_OPENGL);
   SDL_GL_SwapBuffers();
 }
 
 void Y_get_buffer (byte **buf, int *w, int *h, int *pitch) {
-  assert(surf != NULL);
-  assert((surf->flags & SDL_OPENGL) == 0);
+  assert(mode == MODE_SOFTWARE);
   *buf = surf->pixels;
   *w = surf->w;
   *h = surf->h;
@@ -170,8 +300,7 @@ void Y_set_vga_palette (byte *vgapal) {
   int i;
   byte *p = vgapal;
   assert(vgapal != NULL);
-  assert(surf != NULL);
-  assert((surf->flags & SDL_OPENGL) == 0);
+  assert(mode == MODE_SOFTWARE);
   SDL_Color colors[256];
   for (i = 0; i < 256; i++) {
     colors[i] = (SDL_Color) {
@@ -185,17 +314,23 @@ void Y_set_vga_palette (byte *vgapal) {
 }
 
 void Y_repaint_rect (int x, int y, int w, int h) {
-  assert(surf != NULL);
-  assert((surf->flags & SDL_OPENGL) == 0);
+  assert(mode == MODE_SOFTWARE);
   SDL_UpdateRect(surf, x, y, w, h);
 }
 
 void Y_repaint (void) {
-  assert(surf != NULL);
-  assert((surf->flags & SDL_OPENGL) == 0);
+  assert(mode == MODE_SOFTWARE);
   SDL_Flip(surf);
 }
 
+void Y_enable_text_input (void) {
+  text_input = 1;
+}
+
+void Y_disable_text_input (void) {
+  text_input = 0;
+}
+
 /* --- main --- */
 
 static int sdl_to_key (int code) {
@@ -308,35 +443,52 @@ static int sdl_to_key (int code) {
   }
 }
 
-static void poll_events (void (*h)(int key, int down)) {
-  int key;
+static void poll_events (void) {
+  int key, sym, down;
   SDL_Event ev;
   while (SDL_PollEvent(&ev)) {
     switch (ev.type) {
       case SDL_QUIT:
         ERR_quit();
         break;
+      case SDL_VIDEORESIZE:
+        R_set_videomode(ev.resize.w, ev.resize.h, Y_get_fullscreen());
+        break;
       case SDL_KEYDOWN:
       case SDL_KEYUP:
-        key = sdl_to_key(ev.key.keysym.sym);
-        I_press(key, ev.type == SDL_KEYDOWN);
-        if (h != NULL) {
-          (*h)(key, ev.type == SDL_KEYDOWN);
+        sym = ev.key.keysym.sym;
+        down = ev.type == SDL_KEYDOWN;
+        key = sdl_to_key(sym);
+        I_press(key, down);
+        GM_key(key, down);
+        if (down && text_input && sym >= 0x20 && sym <= 0x7e) {
+          // TODO fix this
+          GM_input(sym);
         }
         break;
     }
   }
 }
 
+static void step (void) {
+  poll_events();
+  MUS_update();
+  Uint32 t = SDL_GetTicks();
+  if (t - ticks > DELAY) {
+    ticks = t;
+    G_act();
+  }
+  R_draw();
+}
+
 int main (int argc, char *argv[]) {
   char *pw;
-  Uint32 t, ticks;
   logo("main: initialize SDL\n");
   if (SDL_Init(SDL_INIT_VIDEO | SDL_INIT_TIMER) == -1) {
     logo("main: failed to init SDL: %s\n", SDL_GetError());
     return 1;
   }
-  SDL_WM_SetCaption("Doom 2D v1.351", "Doom 2D");
+  SDL_WM_SetCaption("Doom 2D (SDL)", "Doom 2D");
   // Player 1 defaults
   pl1.ku = KEY_KP_8;
   pl1.kd = KEY_KP_5;
@@ -375,23 +527,20 @@ int main (int argc, char *argv[]) {
   M_startup();
   F_allocres();
   S_init();
-  S_initmusic();
+  MUS_init();
   R_init();
   G_init();
   ticks = SDL_GetTicks();
+#ifdef __EMSCRIPTEN__
+  emscripten_set_main_loop(step, 0, 1);
+#else
   while (!quit) {
-    poll_events(&G_keyf);
-    S_updatemusic();
-    t = SDL_GetTicks();
-    if (t - ticks > DELAY) {
-      ticks = t;
-      G_act();
-    }
-    R_draw();
+    step();
   }
+#endif
   CFG_save();
   R_done();
-  S_donemusic();
+  MUS_done();
   S_done();
   M_shutdown();
   SDL_Quit();