rnd-19980906
[rocksndiamonds.git] / src / init.c
index 2d9b3042354422e5cec4b7cd88edeae3be0d7910..0262c37ea1e887ca48655f17e33f03f0b66f4797 100644 (file)
 #include "screens.h"
 #include "tools.h"
 #include "files.h"
+#include "joystick.h"
+#include "gfxload.h"
+#include "gifload.h"
+
 #include <signal.h>
 
+#ifdef DEBUG
+#define DEBUG_TIMING
+#endif
+
+struct PictureFileInfo
+{
+  char *picture_filename;
+  BOOL picture_with_mask;
+};
+
+struct IconFileInfo
+{
+  char *picture_filename;
+  char *picturemask_filename;
+};
+
 static int sound_process_id = 0;
 
+static void InitLevelAndPlayerInfo(void);
+static void InitDisplay(int, char **);
+static void InitSound(void);
+static void InitSoundProcess(void);
+static void InitWindow(int, char **);
+static void InitGfx(void);
+static void LoadGfx(int, struct PictureFileInfo *);
+static void InitElementProperties(void);
+
 void OpenAll(int argc, char *argv[])
 {
   InitLevelAndPlayerInfo();
@@ -63,6 +92,7 @@ void InitSound()
   if (sound_status==SOUND_OFF)
     return;
 
+#ifndef MSDOS
   if (access(sound_device_name,W_OK)<0)
   {
     fprintf(stderr,"%s: cannot access sound device - no sounds\n",progname);
@@ -84,9 +114,16 @@ void InitSound()
   sound_loops_allowed = TRUE;
   sound_loops_on = TRUE;
 #endif
+#else
+  sound_loops_allowed = TRUE;
+  sound_loops_on = TRUE;
+#endif
 
   for(i=0;i<NUM_SOUNDS;i++)
   {
+#ifdef MSDOS
+  sprintf(sound_name[i], "%d", i+1);
+#endif
     Sound[i].name = sound_name[i];
     if (!LoadSound(&Sound[i]))
     {
@@ -101,6 +138,7 @@ void InitSoundProcess()
   if (sound_status==SOUND_OFF)
     return;
 
+#ifndef MSDOS
   if (pipe(sound_pipe)<0)
   {
     fprintf(stderr,"%s: cannot create pipe - no sounds\n",progname);
@@ -119,6 +157,9 @@ void InitSoundProcess()
     SoundServer();
   else                         /* we are parent */
     close(sound_pipe[0]);      /* no reading from pipe needed */
+#else
+  SoundServer();
+#endif
 }
 
 void InitJoystick()
@@ -126,6 +167,7 @@ void InitJoystick()
   if (global_joystick_status==JOYSTICK_OFF)
     return;
 
+#ifndef MSDOS
   if (access(joystick_device_name[joystick_nr],R_OK)<0)
   {
     fprintf(stderr,"%s: cannot access joystick device '%s'\n",
@@ -144,11 +186,17 @@ void InitJoystick()
 
   joystick_status = JOYSTICK_AVAILABLE;
   LoadJoystickData();
+#else
+  joystick_status = JOYSTICK_AVAILABLE;
+#endif
 }
 
 void InitDisplay(int argc, char *argv[])
 {
   char *display_name = NULL;
+  XVisualInfo vinfo_template, *vinfo;
+  int num_visuals;
+  unsigned int depth;
   int i;
 
   /* get X server to connect to, if given as an argument */
@@ -175,9 +223,36 @@ void InitDisplay(int argc, char *argv[])
   }
   
   screen = DefaultScreen(display);
+  visual = DefaultVisual(display, screen);
+  depth  = DefaultDepth(display, screen);
   cmap   = DefaultColormap(display, screen);
   pen_fg = WhitePixel(display,screen);
   pen_bg = BlackPixel(display,screen);
+
+  /* look for good enough visual */
+  vinfo_template.screen = screen;
+  vinfo_template.class = (depth == 8 ? PseudoColor : TrueColor);
+  vinfo_template.depth = depth;
+  if ((vinfo = XGetVisualInfo(display, VisualScreenMask | VisualClassMask |
+                             VisualDepthMask, &vinfo_template, &num_visuals)))
+  {
+    visual = vinfo->visual;
+    XFree((void *)vinfo);
+  }
+
+  /* got appropriate visual? */
+  if (depth < 8)
+  {
+    printf("Sorry, displays with less than 8 bits per pixel not supported.\n");
+    exit(-1);
+  }
+  else if ((depth ==8 && visual->class != PseudoColor) ||
+          (depth > 8 && visual->class != TrueColor &&
+           visual->class != DirectColor))
+  {
+    printf("Sorry, cannot get appropriate visual.\n");
+    exit(-1);
+  }
 }
 
 void InitWindow(int argc, char *argv[])
@@ -196,18 +271,37 @@ void InitWindow(int argc, char *argv[])
   char *window_name = WINDOWTITLE_STRING;
   char *icon_name = WINDOWTITLE_STRING;
   long window_event_mask;
-  static struct PictureFile icon_pic =
+  Atom proto_atom = None, delete_atom = None;
+  int screen_width, screen_height;
+  int win_xpos = WIN_XPOS, win_ypos = WIN_YPOS;
+
+#ifndef MSDOS
+  static struct IconFileInfo icon_pic =
   {
     "rocks_icon.xbm",
     "rocks_iconmask.xbm"
   };
+#endif
+
+  screen_width = XDisplayWidth(display, screen);
+  screen_height = XDisplayHeight(display, screen);
 
   width = WIN_XSIZE;
   height = WIN_YSIZE;
 
+  win_xpos = (screen_width - width) / 2;
+  win_ypos = (screen_height - height) / 2;
+
   window = XCreateSimpleWindow(display, RootWindow(display, screen),
-                           WIN_XPOS, WIN_YPOS, width, height, border_width,
-                           pen_fg, pen_bg);
+                              win_xpos, win_ypos, width, height, border_width,
+                              pen_fg, pen_bg);
+
+#ifndef MSDOS
+  proto_atom = XInternAtom(display, "WM_PROTOCOLS", FALSE);
+  delete_atom = XInternAtom(display, "WM_DELETE_WINDOW", FALSE);
+  if ((proto_atom != None) && (delete_atom != None))
+    XChangeProperty(display, window, proto_atom, XA_ATOM, 32,
+                   PropModePrepend, (unsigned char *) &delete_atom, 1);
 
   sprintf(icon_filename,"%s/%s",GFX_PATH,icon_pic.picture_filename);
   XReadBitmapFile(display,window,icon_filename,
@@ -231,9 +325,16 @@ void InitWindow(int argc, char *argv[])
     exit(-1);
   }
 
-  size_hints.flags = PSize | PMinSize | PMaxSize;
   size_hints.width  = size_hints.min_width  = size_hints.max_width  = width;
   size_hints.height = size_hints.min_height = size_hints.max_height = height;
+  size_hints.flags = PSize | PMinSize | PMaxSize;
+
+  if (win_xpos || win_ypos)
+  {
+    size_hints.x = win_xpos;
+    size_hints.y = win_ypos;
+    size_hints.flags |= PPosition;
+  }
 
   if (!XStringListToTextProperty(&window_name, 1, &windowName))
   {
@@ -271,6 +372,7 @@ void InitWindow(int argc, char *argv[])
                       KeyPressMask | KeyReleaseMask;
   XSelectInput(display, window, window_event_mask);
 
+#endif
   /* create GC for drawing with window depth */
   gc_values.graphics_exposures = False;
   gc_values.foreground = pen_bg;
@@ -295,30 +397,61 @@ void InitGfx()
   int i,j;
   XGCValues clip_gc_values;
   unsigned long clip_gc_valuemask;
-  static struct PictureFile pic[NUM_PICTURES] =
+#ifdef MSDOS
+  static struct PictureFileInfo pic[NUM_PICTURES] =
+  {
+    { "Screen",        TRUE },
+    { "Door",  TRUE },
+    { "Heroes",        TRUE },
+    { "Toons", TRUE },
+    { "Font",  FALSE },
+    { "Font2", FALSE }
+  }; 
+#else
+  static struct PictureFileInfo pic[NUM_PICTURES] =
   {
-    { "RocksScreen.xpm",       "RocksScreenMaske.xbm" },
-    { "RocksDoor.xpm",         "RocksDoorMaske.xbm" },
-    { "RocksToons.xpm",                "RocksToonsMaske.xbm" },
-    { "RocksFont.xpm",         NULL },
-    { "RocksFont2.xpm",                NULL }
+    { "RocksScreen",   TRUE },
+    { "RocksDoor",     TRUE },
+    { "RocksHeroes",   TRUE },
+    { "RocksToons",    TRUE },
+    { "RocksFont",     FALSE },
+    { "RocksFont2",    FALSE }
   }; 
+#endif
+
+#ifdef DEBUG_TIMING
+  long count1, count2;
+  count1 = Counter();
+#endif
 
   LoadGfx(PIX_SMALLFONT,&pic[PIX_SMALLFONT]);
   DrawInitText(WINDOWTITLE_STRING,20,FC_YELLOW);
   DrawInitText(COPYRIGHT_STRING,50,FC_RED);
+#ifdef MSDOS
+  DrawInitText("MSDOS version done by Guido Schulz",210,FC_BLUE);
+  rest(200);
+#endif MSDOS
   DrawInitText("Loading graphics:",120,FC_GREEN);
 
   for(i=0;i<NUM_PICTURES;i++)
     if (i!=PIX_SMALLFONT)
       LoadGfx(i,&pic[i]);
 
+#ifdef DEBUG_TIMING
+  count2 = Counter();
+  printf("SUMMARY: %.2f SECONDS LOADING TIME\n",(float)(count2-count1)/100.0);
+#endif
+
+
   pix[PIX_DB_BACK] = XCreatePixmap(display, window,
                                   WIN_XSIZE,WIN_YSIZE,
                                   XDefaultDepth(display,screen));
   pix[PIX_DB_DOOR] = XCreatePixmap(display, window,
                                   3*DXSIZE,DYSIZE+VYSIZE,
                                   XDefaultDepth(display,screen));
+  pix[PIX_DB_FIELD] = XCreatePixmap(display, window,
+                                   FXSIZE,FYSIZE,
+                                   XDefaultDepth(display,screen));
 
   if (!pix[PIX_DB_BACK] || !pix[PIX_DB_DOOR])
   {
@@ -341,7 +474,9 @@ void InitGfx()
     }
   }
 
-  drawto = drawto_field = backbuffer = pix[PIX_DB_BACK];
+  drawto = backbuffer = pix[PIX_DB_BACK];
+  fieldbuffer = pix[PIX_DB_FIELD];
+  SetDrawtoField(DRAW_BACKBUFFER);
 
   XCopyArea(display,pix[PIX_BACK],backbuffer,gc,
            0,0, WIN_XSIZE,WIN_YSIZE, 0,0);
@@ -350,35 +485,60 @@ void InitGfx()
   XFillRectangle(display,pix[PIX_DB_DOOR],gc,
                 0,0, 3*DXSIZE,DYSIZE+VYSIZE);
 
-  for(i=0;i<SCR_FIELDX;i++)
-    for(j=0;j<SCR_FIELDY;j++)
-      redraw[i][j]=0;
-  redraw_tiles=0;
-  redraw_mask=REDRAW_ALL;
+  for(i=0; i<MAX_BUF_XSIZE; i++)
+    for(j=0; j<MAX_BUF_YSIZE; j++)
+      redraw[i][j] = 0;
+  redraw_tiles = 0;
+  redraw_mask = REDRAW_ALL;
 }
 
-void LoadGfx(int pos, struct PictureFile *pic)
+void LoadGfx(int pos, struct PictureFileInfo *pic)
 {
+  char basefilename[256];
+  char filename[256];
+
+#ifdef XPM_INCLUDE_FILE
   int xpm_err, xbm_err;
   unsigned int width,height;
   int hot_x,hot_y;
-  char filename[256];
   Pixmap shapemask;
+  char *picture_ext = ".xpm";
+  char *picturemask_ext = "Mask.xbm";
+#else
+  int gif_err;
+  char *picture_ext = ".gif";
+#endif
+
+#ifdef DEBUG_TIMING
+  long count1, count2;
+#endif
 
   /* Grafik laden */
   if (pic->picture_filename)
   {
-    DrawInitText(pic->picture_filename,150,FC_YELLOW);
-    sprintf(filename,"%s/%s",GFX_PATH,pic->picture_filename);
+    sprintf(basefilename,"%s%s",pic->picture_filename,picture_ext);
+    DrawInitText(basefilename,150,FC_YELLOW);
+    sprintf(filename,"%s/%s",GFX_PATH,basefilename);
+
+#ifdef MSDOS
+    rest(100);
+#endif MSDOS
+
+#ifdef DEBUG_TIMING
+    count1 = Counter();
+#endif
+
+#ifdef XPM_INCLUDE_FILE
 
     xpm_att[pos].valuemask = XpmCloseness;
     xpm_att[pos].closeness = 20000;
     xpm_err = XpmReadFileToPixmap(display,window,filename,
                                  &pix[pos],&shapemask,&xpm_att[pos]);
+
     switch(xpm_err)
     {
       case XpmOpenFailed:
-        fprintf(stderr,"Xpm file open failed on '%s' !\n",filename);
+        fprintf(stderr,"Cannot open Xpm file '%s' !\n",filename);
        CloseAll();
        exit(-1);
       case XpmFileInvalid:
@@ -386,34 +546,90 @@ void LoadGfx(int pos, struct PictureFile *pic)
        CloseAll();
        exit(-1);
       case XpmNoMemory:
-       fprintf(stderr,"Not enough memory !\n");        
+       fprintf(stderr,"Not enough memory for Xpm file '%s'!\n",filename);
        CloseAll();
        exit(1);
       case XpmColorFailed:
-       fprintf(stderr,"Can`t get any colors...\n");
+       fprintf(stderr,"Can't get colors for Xpm file '%s'!\n",filename);
+       CloseAll();
+       exit(-1);
+      default:
+       break;
+    }
+
+#ifdef DEBUG_TIMING
+    count2 = Counter();
+    printf("XPM LOADING %s IN %.2f SECONDS\n",
+          filename,(float)(count2-count1)/100.0);
+#endif
+
+#else 
+
+    gif_err = Read_GIF_to_Pixmaps(display, window, filename,
+                                 &pix[pos], &clipmask[pos]);
+
+    switch(gif_err)
+    {
+      case GIF_Success:
+        break;
+      case GIF_OpenFailed:
+        fprintf(stderr,"Cannot open GIF file '%s' !\n",filename);
+       CloseAll();
+       exit(-1);
+      case GIF_ReadFailed:
+        fprintf(stderr,"Cannot read GIF file '%s' !\n",filename);
+       CloseAll();
+       exit(-1);
+      case GIF_FileInvalid:
+       fprintf(stderr,"Invalid GIF file '%s'!\n",filename);
+       CloseAll();
+       exit(-1);
+      case GIF_NoMemory:
+       fprintf(stderr,"Not enough memory for GIF file '%s'!\n",filename);
+       CloseAll();
+       exit(1);
+      case GIF_ColorFailed:
+       fprintf(stderr,"Can't get colors for GIF file '%s'!\n",filename);
        CloseAll();
        exit(-1);
       default:
        break;
     }
 
+#ifdef DEBUG_TIMING
+    count2 = Counter();
+    printf("GIF LOADING %s IN %.2f SECONDS\n",
+          filename,(float)(count2-count1)/100.0);
+#endif
+
+#endif
+
     if (!pix[pos])
     {
-      fprintf(stderr, "%s: cannot read Xpm file '%s'.\n",
-             progname,filename);
+      fprintf(stderr, "%s: cannot get graphics for '%s'.\n",
+             progname, pic->picture_filename);
       CloseAll();
       exit(-1);
     }
   }
 
   /* zugehörige Maske laden (wenn vorhanden) */
-  if (pic->picturemask_filename)
+  if (pic->picture_with_mask)
   {
-    DrawInitText(pic->picturemask_filename,150,FC_YELLOW);
-    sprintf(filename,"%s/%s",GFX_PATH,pic->picturemask_filename);
+
+#ifdef XPM_INCLUDE_FILE
+
+    sprintf(basefilename,"%s%s",pic->picture_filename,picturemask_ext);
+    DrawInitText(basefilename,150,FC_YELLOW);
+    sprintf(filename,"%s/%s",GFX_PATH,basefilename);
+
+#ifdef DEBUG_TIMING
+    count1 = Counter();
+#endif
 
     xbm_err = XReadBitmapFile(display,window,filename,
                              &width,&height,&clipmask[pos],&hot_x,&hot_y);
+
     switch(xbm_err)
     {
       case BitmapSuccess:
@@ -437,10 +653,18 @@ void LoadGfx(int pos, struct PictureFile *pic)
        break;
     }
 
+#ifdef DEBUG_TIMING
+    count2 = Counter();
+    printf("XBM LOADING %s IN %.2f SECONDS\n",
+          filename,(float)(count2-count1)/100.0);
+#endif
+
+#endif
+
     if (!clipmask[pos])
     {
-      fprintf(stderr, "%s: cannot read X11 bitmap file '%s'.\n",
-             progname,filename);
+      fprintf(stderr, "%s: cannot get clipmask for '%s'.\n",
+             progname, pic->picture_filename);
       CloseAll();
       exit(-1);
     }
@@ -470,16 +694,6 @@ void InitElementProperties()
   };
   static int ep_amoeboid_num = sizeof(ep_amoeboid)/sizeof(int);
 
-  static int ep_badewannoid[] =
-  {
-    EL_BADEWANNE1,
-    EL_BADEWANNE2,
-    EL_BADEWANNE3,
-    EL_BADEWANNE4,
-    EL_BADEWANNE5
-  };
-  static int ep_badewannoid_num = sizeof(ep_badewannoid)/sizeof(int);
-
   static int ep_schluessel[] =
   {
     EL_SCHLUESSEL1,
@@ -573,7 +787,8 @@ void InitElementProperties()
     EL_BIRNE_EIN,
     EL_BIRNE_AUS,
     EL_BADEWANNE1,
-    EL_BADEWANNE2
+    EL_BADEWANNE2,
+    EL_SONDE
   };
   static int ep_slippery_num = sizeof(ep_slippery)/sizeof(int);
 
@@ -585,7 +800,7 @@ void InitElementProperties()
     EL_FIREFLY,
     EL_MAMPFER,
     EL_MAMPFER2,
-    EL_ZOMBIE,
+    EL_ROBOT,
     EL_PACMAN
   };
   static int ep_enemy_num = sizeof(ep_enemy)/sizeof(int);
@@ -672,8 +887,13 @@ void InitElementProperties()
     EL_FIREFLY,
     EL_MAMPFER,
     EL_MAMPFER2,
-    EL_ZOMBIE,
-    EL_PACMAN
+    EL_ROBOT,
+    EL_PACMAN,
+    EL_MAULWURF,
+    EL_PINGUIN,
+    EL_SCHWEIN,
+    EL_DRACHE,
+    EL_SONDE
   };
   static int ep_can_move_num = sizeof(ep_can_move)/sizeof(int);
 
@@ -719,7 +939,7 @@ void InitElementProperties()
     EL_FIREFLY,
     EL_MAMPFER,
     EL_MAMPFER2,
-    EL_ZOMBIE,
+    EL_ROBOT,
     EL_PACMAN,
     EL_TROPFEN,
     EL_SALZSAEURE
@@ -734,7 +954,7 @@ void InitElementProperties()
     EL_BUTTERFLY,
     EL_FIREFLY,
     EL_MAMPFER,
-    EL_ZOMBIE,
+    EL_ROBOT,
     EL_PACMAN,
     EL_TROPFEN,
     EL_AMOEBE_TOT,
@@ -852,11 +1072,51 @@ void InitElementProperties()
   };
   static int ep_inactive_num = sizeof(ep_inactive)/sizeof(int);
 
+  static int ep_explosive[] =
+  {
+    EL_BOMBE,
+    EL_DYNAMIT,
+    EL_DYNAMIT_AUS,
+    EL_DYNABOMB,
+    EL_DYNABOMB_NR,
+    EL_DYNABOMB_SZ,
+    EL_DYNABOMB_XL,
+    EL_KAEFER,
+    EL_MAULWURF,
+    EL_PINGUIN,
+    EL_SCHWEIN,
+    EL_DRACHE,
+    EL_SONDE
+  };
+  static int ep_explosive_num = sizeof(ep_explosive)/sizeof(int);
+
+  static int ep_mampf3[] =
+  {
+    EL_EDELSTEIN,
+    EL_EDELSTEIN_BD,
+    EL_EDELSTEIN_GELB,
+    EL_EDELSTEIN_ROT,
+    EL_EDELSTEIN_LILA,
+    EL_DIAMANT
+  };
+  static int ep_mampf3_num = sizeof(ep_mampf3)/sizeof(int);
+
+  static int ep_pushable[] =
+  {
+    EL_FELSBROCKEN,
+    EL_BOMBE,
+    EL_KOKOSNUSS,
+    EL_ZEIT_LEER,
+    EL_SOKOBAN_FELD_VOLL,
+    EL_SOKOBAN_OBJEKT,
+    EL_SONDE
+  };
+  static int ep_pushable_num = sizeof(ep_pushable)/sizeof(int);
+
   static long ep_bit[] =
   {
     EP_BIT_AMOEBALIVE,
     EP_BIT_AMOEBOID,
-    EP_BIT_BADEWANNOID,
     EP_BIT_SCHLUESSEL,
     EP_BIT_PFORTE,
     EP_BIT_SOLID,
@@ -875,13 +1135,15 @@ void InitElementProperties()
     EP_BIT_BD_ELEMENT,
     EP_BIT_SB_ELEMENT,
     EP_BIT_GEM,
-    EP_BIT_INACTIVE
+    EP_BIT_INACTIVE,
+    EP_BIT_EXPLOSIVE,
+    EP_BIT_MAMPF3,
+    EP_BIT_PUSHABLE
   };
   static int *ep_array[] =
   {
     ep_amoebalive,
     ep_amoeboid,
-    ep_badewannoid,
     ep_schluessel,
     ep_pforte,
     ep_solid,
@@ -900,13 +1162,15 @@ void InitElementProperties()
     ep_bd_element,
     ep_sb_element,
     ep_gem,
-    ep_inactive
+    ep_inactive,
+    ep_explosive,
+    ep_mampf3,
+    ep_pushable
   };
   static int *ep_num[] =
   {
     &ep_amoebalive_num,
     &ep_amoeboid_num,
-    &ep_badewannoid_num,
     &ep_schluessel_num,
     &ep_pforte_num,
     &ep_solid_num,
@@ -925,7 +1189,10 @@ void InitElementProperties()
     &ep_bd_element_num,
     &ep_sb_element_num,
     &ep_gem_num,
-    &ep_inactive_num
+    &ep_inactive_num,
+    &ep_explosive_num,
+    &ep_mampf3_num,
+    &ep_pushable_num
   };
   static int num_properties = sizeof(ep_num)/sizeof(int *);
 
@@ -954,12 +1221,14 @@ void CloseAll()
   {
     if (pix[i])
     {
+#ifdef XPM_INCLUDE_FILE
       if (i<NUM_PICTURES)      /* XPM pictures */
       {
        XFreeColors(display,DefaultColormap(display,screen),
                    xpm_att[i].pixels,xpm_att[i].npixels,0);
        XpmFreeAttributes(&xpm_att[i]);
       }
+#endif
       XFreePixmap(display,pix[i]);
     }
     if (clipmask[i])
@@ -970,8 +1239,12 @@ void CloseAll()
 
   if (gc)
     XFreeGC(display, gc);
+
   if (display)
+  {
+    XAutoRepeatOn(display);
     XCloseDisplay(display);
+  }
 
   exit(0);
 }