src/init.c

   1 /***********************************************************
   2 *  Rocks'n'Diamonds -- McDuffin Strikes Back!              *
   3 *----------------------------------------------------------*
   4 *  ©1995 Artsoft Development                               *
   5 *        Holger Schemel                                    *
   6 *        33659 Bielefeld-Senne                             *
   7 *        Telefon: (0521) 493245                            *
   8 *        eMail: aeglos@valinor.owl.de                      *
   9 *               aeglos@uni-paderborn.de                    *
  10 *               q99492@pbhrzx.uni-paderborn.de             *
  11 *----------------------------------------------------------*
  12 *  init.c                                                  *
  13 ***********************************************************/
  14
  15 #include "init.h"
  16 #include "misc.h"
  17 #include "sound.h"
  18 #include "screens.h"
  19 #include "tools.h"
  20 #include "files.h"
  21 #include "joystick.h"
  22 #include "gfxload.h"
  23 #include "gifload.h"
  24
  25 #include <signal.h>
  26
  27 #ifdef DEBUG
  28 /*
  29 #define DEBUG_TIMING
  30 */
  31 #endif
  32
  33 struct PictureFileInfo
  34 {
  35   char *picture_filename;
  36   BOOL picture_with_mask;
  37 };
  38
  39 struct IconFileInfo
  40 {
  41   char *picture_filename;
  42   char *picturemask_filename;
  43 };
  44
  45 static int sound_process_id = 0;
  46
  47 static void InitLevelAndPlayerInfo(void);
  48 static void InitDisplay(int, char **);
  49 static void InitSound(void);
  50 static void InitSoundProcess(void);
  51 static void InitWindow(int, char **);
  52 static void InitGfx(void);
  53 static void LoadGfx(int, struct PictureFileInfo *);
  54 static void InitElementProperties(void);
  55
  56 void OpenAll(int argc, char *argv[])
  57 {
  58   InitLevelAndPlayerInfo();
  59
  60   InitCounter();
  61   InitSound();
  62   InitSoundProcess();
  63   InitJoystick();
  64   InitRND(NEW_RANDOMIZE);
  65
  66   signal(SIGINT, CloseAll);
  67   signal(SIGTERM, CloseAll);
  68
  69   InitDisplay(argc, argv);
  70   InitWindow(argc, argv);
  71
  72   XMapWindow(display, window);
  73   XFlush(display);
  74
  75   InitGfx();
  76   InitElementProperties();
  77
  78   DrawMainMenu();
  79 }
  80
  81 void InitLevelAndPlayerInfo()
  82 {
  83   local_player = &stored_player[0];
  84
  85   if (!LoadLevelInfo())                 /* global level info */
  86     CloseAll();
  87
  88   LoadPlayerInfo(PLAYER_SETUP);         /* global setup info */
  89   LoadPlayerInfo(PLAYER_LEVEL);         /* level specific info */
  90 }
  91
  92 void InitSound()
  93 {
  94   int i;
  95
  96   if (sound_status==SOUND_OFF)
  97     return;
  98
  99 #ifndef MSDOS
 100   if (access(sound_device_name,W_OK)<0)
 101   {
 102     fprintf(stderr,"%s: cannot access sound device - no sounds\n",progname);
 103     sound_status=SOUND_OFF;
 104     return;
 105   }
 106
 107   if ((sound_device=open(sound_device_name,O_WRONLY))<0)
 108   {
 109     fprintf(stderr,"%s: cannot open sound device - no sounds\n",progname);
 110     sound_status=SOUND_OFF;
 111     return;
 112   }
 113
 114   close(sound_device);
 115   sound_status=SOUND_AVAILABLE;
 116
 117 #ifdef VOXWARE
 118   sound_loops_allowed = TRUE;
 119   sound_loops_on = TRUE;
 120 #endif
 121 #else
 122   sound_loops_allowed = TRUE;
 123   sound_loops_on = TRUE;
 124 #endif
 125
 126   for(i=0;i<NUM_SOUNDS;i++)
 127   {
 128 #ifdef MSDOS
 129   sprintf(sound_name[i], "%d", i+1);
 130 #endif
 131     Sound[i].name = sound_name[i];
 132     if (!LoadSound(&Sound[i]))
 133     {
 134       sound_status=SOUND_OFF;
 135       return;
 136     }
 137   }
 138 }
 139
 140 void InitSoundProcess()
 141 {
 142   if (sound_status==SOUND_OFF)
 143     return;
 144
 145 #ifndef MSDOS
 146   if (pipe(sound_pipe)<0)
 147   {
 148     fprintf(stderr,"%s: cannot create pipe - no sounds\n",progname);
 149     sound_status=SOUND_OFF;
 150     return;
 151   }
 152
 153   if ((sound_process_id=fork())<0)
 154   {
 155     fprintf(stderr,"%s: cannot create child process - no sounds\n",progname);
 156     sound_status=SOUND_OFF;
 157     return;
 158   }
 159
 160   if (!sound_process_id)        /* we are child */
 161     SoundServer();
 162   else                          /* we are parent */
 163     close(sound_pipe[0]);       /* no reading from pipe needed */
 164 #else
 165   SoundServer();
 166 #endif
 167 }
 168
 169 void InitJoystick()
 170 {
 171   if (global_joystick_status==JOYSTICK_OFF)
 172     return;
 173
 174 #ifndef MSDOS
 175   if (access(joystick_device_name[joystick_nr],R_OK)<0)
 176   {
 177     fprintf(stderr,"%s: cannot access joystick device '%s'\n",
 178             progname,joystick_device_name[joystick_nr]);
 179     joystick_status = JOYSTICK_OFF;
 180     return;
 181   }
 182
 183   if ((joystick_device=open(joystick_device_name[joystick_nr],O_RDONLY))<0)
 184   {
 185     fprintf(stderr,"%s: cannot open joystick device '%s'\n",
 186             progname,joystick_device_name[joystick_nr]);
 187     joystick_status = JOYSTICK_OFF;
 188     return;
 189   }
 190
 191   joystick_status = JOYSTICK_AVAILABLE;
 192   LoadJoystickData();
 193 #else
 194   joystick_status = JOYSTICK_AVAILABLE;
 195 #endif
 196 }
 197
 198 void InitDisplay(int argc, char *argv[])
 199 {
 200   char *display_name = NULL;
 201   XVisualInfo vinfo_template, *vinfo;
 202   int num_visuals;
 203   unsigned int depth;
 204   int i;
 205
 206   /* get X server to connect to, if given as an argument */
 207   for (i=1;i<argc-1;i++)
 208   {
 209     char *dispstr="-display";
 210     int len=MAX(strlen(dispstr),strlen(argv[i]));
 211
 212     if (len<4)
 213       continue;
 214     else if (!strncmp(argv[i],dispstr,len))
 215     {
 216       display_name=argv[i+1];
 217       break;
 218     }
 219   }
 220
 221   /* connect to X server */
 222   if (!(display=XOpenDisplay(display_name)))
 223   {
 224     fprintf(stderr,"%s: cannot connect to X server %s\n",
 225             progname, XDisplayName(display_name));
 226     exit(-1);
 227   }
 228
 229   screen = DefaultScreen(display);
 230   visual = DefaultVisual(display, screen);
 231   depth  = DefaultDepth(display, screen);
 232   cmap   = DefaultColormap(display, screen);
 233
 234   /* look for good enough visual */
 235   vinfo_template.screen = screen;
 236   vinfo_template.class = (depth == 8 ? PseudoColor : TrueColor);
 237   vinfo_template.depth = depth;
 238   if ((vinfo = XGetVisualInfo(display, VisualScreenMask | VisualClassMask |
 239                               VisualDepthMask, &vinfo_template, &num_visuals)))
 240   {
 241     visual = vinfo->visual;
 242     XFree((void *)vinfo);
 243   }
 244
 245   /* got appropriate visual? */
 246   if (depth < 8)
 247   {
 248     printf("Sorry, displays with less than 8 bits per pixel not supported.\n");
 249     exit(-1);
 250   }
 251   else if ((depth ==8 && visual->class != PseudoColor) ||
 252            (depth > 8 && visual->class != TrueColor &&
 253             visual->class != DirectColor))
 254   {
 255     printf("Sorry, cannot get appropriate visual.\n");
 256     exit(-1);
 257   }
 258 }
 259
 260 void InitWindow(int argc, char *argv[])
 261 {
 262   unsigned int border_width = 4;
 263   Pixmap icon_pixmap, iconmask_pixmap;
 264   unsigned int icon_width,icon_height;
 265   int icon_hot_x,icon_hot_y;
 266   char icon_filename[256];
 267   XSizeHints size_hints;
 268   XWMHints wm_hints;
 269   XClassHint class_hints;
 270   XTextProperty windowName, iconName;
 271   XGCValues gc_values;
 272   unsigned long gc_valuemask;
 273   char *window_name = WINDOWTITLE_STRING;
 274   char *icon_name = WINDOWTITLE_STRING;
 275   long window_event_mask;
 276   Atom proto_atom = None, delete_atom = None;
 277   int screen_width, screen_height;
 278   int win_xpos = WIN_XPOS, win_ypos = WIN_YPOS;
 279   unsigned long pen_fg = WhitePixel(display,screen);
 280   unsigned long pen_bg = BlackPixel(display,screen);
 281
 282 #ifndef MSDOS
 283   static struct IconFileInfo icon_pic =
 284   {
 285     "rocks_icon.xbm",
 286     "rocks_iconmask.xbm"
 287   };
 288 #endif
 289
 290   screen_width = XDisplayWidth(display, screen);
 291   screen_height = XDisplayHeight(display, screen);
 292
 293   width = WIN_XSIZE;
 294   height = WIN_YSIZE;
 295
 296   win_xpos = (screen_width - width) / 2;
 297   win_ypos = (screen_height - height) / 2;
 298
 299   window = XCreateSimpleWindow(display, RootWindow(display, screen),
 300                                win_xpos, win_ypos, width, height, border_width,
 301                                pen_fg, pen_bg);
 302
 303 #ifndef MSDOS
 304   proto_atom = XInternAtom(display, "WM_PROTOCOLS", FALSE);
 305   delete_atom = XInternAtom(display, "WM_DELETE_WINDOW", FALSE);
 306   if ((proto_atom != None) && (delete_atom != None))
 307     XChangeProperty(display, window, proto_atom, XA_ATOM, 32,
 308                     PropModePrepend, (unsigned char *) &delete_atom, 1);
 309
 310   sprintf(icon_filename,"%s/%s",GFX_PATH,icon_pic.picture_filename);
 311   XReadBitmapFile(display,window,icon_filename,
 312                   &icon_width,&icon_height,
 313                   &icon_pixmap,&icon_hot_x,&icon_hot_y);
 314   if (!icon_pixmap)
 315   {
 316     fprintf(stderr, "%s: cannot read icon bitmap file '%s'.\n",
 317             progname,icon_filename);
 318     exit(-1);
 319   }
 320
 321   sprintf(icon_filename,"%s/%s",GFX_PATH,icon_pic.picturemask_filename);
 322   XReadBitmapFile(display,window,icon_filename,
 323                   &icon_width,&icon_height,
 324                   &iconmask_pixmap,&icon_hot_x,&icon_hot_y);
 325   if (!iconmask_pixmap)
 326   {
 327     fprintf(stderr, "%s: cannot read icon bitmap file '%s'.\n",
 328             progname,icon_filename);
 329     exit(-1);
 330   }
 331
 332   size_hints.width  = size_hints.min_width  = size_hints.max_width  = width;
 333   size_hints.height = size_hints.min_height = size_hints.max_height = height;
 334   size_hints.flags = PSize | PMinSize | PMaxSize;
 335
 336   if (win_xpos || win_ypos)
 337   {
 338     size_hints.x = win_xpos;
 339     size_hints.y = win_ypos;
 340     size_hints.flags |= PPosition;
 341   }
 342
 343   if (!XStringListToTextProperty(&window_name, 1, &windowName))
 344   {
 345     fprintf(stderr, "%s: structure allocation for windowName failed.\n",
 346             progname);
 347     exit(-1);
 348   }
 349
 350   if (!XStringListToTextProperty(&icon_name, 1, &iconName))
 351   {
 352     fprintf(stderr, "%s: structure allocation for iconName failed.\n",
 353             progname);
 354     exit(-1);
 355   }
 356
 357   wm_hints.initial_state = NormalState;
 358   wm_hints.input = True;
 359   wm_hints.icon_pixmap = icon_pixmap;
 360   wm_hints.icon_mask = iconmask_pixmap;
 361   wm_hints.flags = StateHint | IconPixmapHint | IconMaskHint | InputHint;
 362
 363   class_hints.res_name = progname;
 364   class_hints.res_class = "Rocks'n'Diamonds";
 365
 366   XSetWMProperties(display, window, &windowName, &iconName,
 367                    argv, argc, &size_hints, &wm_hints,
 368                    &class_hints);
 369
 370   XFree(windowName.value);
 371   XFree(iconName.value);
 372
 373   /* Select event types wanted */
 374   window_event_mask = ExposureMask | StructureNotifyMask | FocusChangeMask |
 375                       ButtonPressMask | ButtonReleaseMask | ButtonMotionMask |
 376                       KeyPressMask | KeyReleaseMask;
 377   XSelectInput(display, window, window_event_mask);
 378 #endif
 379
 380   /* create GC for drawing with window depth */
 381   gc_values.graphics_exposures = False;
 382   gc_values.foreground = pen_bg;
 383   gc_values.background = pen_bg;
 384   gc_valuemask = GCGraphicsExposures | GCForeground | GCBackground;
 385   gc = XCreateGC(display, window, gc_valuemask, &gc_values);
 386 }
 387
 388 void DrawInitText(char *text, int ypos, int color)
 389 {
 390   if (display && window && pix[PIX_SMALLFONT])
 391   {
 392     XFillRectangle(display,window,gc,0,ypos, WIN_XSIZE,FONT2_YSIZE);
 393     DrawTextExt(window,gc,(WIN_XSIZE-strlen(text)*FONT2_XSIZE)/2,
 394                 ypos,text,FS_SMALL,color);
 395     XFlush(display);
 396   }
 397 }
 398
 399 void InitGfx()
 400 {
 401   int i,j;
 402   GC copy_clipmask_gc;
 403   XGCValues clip_gc_values;
 404   unsigned long clip_gc_valuemask;
 405
 406 #ifdef MSDOS
 407   static struct PictureFileInfo pic[NUM_PICTURES] =
 408   {
 409     { "Screen", TRUE },
 410     { "Door",   TRUE },
 411     { "Heroes", TRUE },
 412     { "Toons",  TRUE },
 413     { "Font",   FALSE },
 414     { "Font2",  FALSE }
 415   };
 416 #else
 417   static struct PictureFileInfo pic[NUM_PICTURES] =
 418   {
 419     { "RocksScreen",    TRUE },
 420     { "RocksDoor",      TRUE },
 421     { "RocksHeroes",    TRUE },
 422     { "RocksToons",     TRUE },
 423     { "RocksFont",      FALSE },
 424     { "RocksFont2",     FALSE }
 425   };
 426 #endif
 427
 428   static struct
 429   {
 430     int start;
 431     int count;
 432   }
 433   tile_needs_clipping[] =
 434   {
 435     { GFX_SPIELER_UP, 4 },
 436     { GFX_SPIELER_DOWN, 4 },
 437     { GFX_SPIELER_LEFT, 4 },
 438     { GFX_SPIELER_RIGHT, 4 },
 439     { GFX_SPIELER_PUSH_LEFT, 4 },
 440     { GFX_SPIELER_PUSH_RIGHT, 4 },
 441     { GFX_GEBLUBBER, 4 },
 442     { GFX_DYNAMIT, 7 },
 443     { GFX_DYNABOMB, 4 },
 444     { GFX_SOKOBAN_OBJEKT, 1 },
 445     { GFX_MASK_SPARKLING, 3 },
 446     { -1, 0 }
 447   };
 448
 449 #ifdef DEBUG_TIMING
 450   long count1, count2;
 451   count1 = Counter();
 452 #endif
 453
 454   LoadGfx(PIX_SMALLFONT,&pic[PIX_SMALLFONT]);
 455   DrawInitText(WINDOWTITLE_STRING,20,FC_YELLOW);
 456   DrawInitText(COPYRIGHT_STRING,50,FC_RED);
 457 #ifdef MSDOS
 458   DrawInitText("MSDOS version done by Guido Schulz",210,FC_BLUE);
 459   rest(200);
 460 #endif MSDOS
 461   DrawInitText("Loading graphics:",120,FC_GREEN);
 462
 463   for(i=0; i<NUM_PICTURES; i++)
 464     if (i != PIX_SMALLFONT)
 465       LoadGfx(i,&pic[i]);
 466
 467 #ifdef DEBUG_TIMING
 468   count2 = Counter();
 469   printf("SUMMARY: %.2f SECONDS LOADING TIME\n",(float)(count2-count1)/1000.0);
 470 #endif
 471
 472
 473   pix[PIX_DB_BACK] = XCreatePixmap(display, window,
 474                                    WIN_XSIZE,WIN_YSIZE,
 475                                    XDefaultDepth(display,screen));
 476   pix[PIX_DB_DOOR] = XCreatePixmap(display, window,
 477                                    3*DXSIZE,DYSIZE+VYSIZE,
 478                                    XDefaultDepth(display,screen));
 479   pix[PIX_DB_FIELD] = XCreatePixmap(display, window,
 480                                     FXSIZE,FYSIZE,
 481                                     XDefaultDepth(display,screen));
 482
 483   clip_gc_values.graphics_exposures = False;
 484   clip_gc_valuemask = GCGraphicsExposures;
 485   copy_clipmask_gc =
 486     XCreateGC(display,clipmask[PIX_BACK],clip_gc_valuemask,&clip_gc_values);
 487
 488   clip_gc_values.graphics_exposures = False;
 489   clip_gc_valuemask = GCGraphicsExposures;
 490   tile_clip_gc =
 491     XCreateGC(display,window,clip_gc_valuemask,&clip_gc_values);
 492
 493   /* initialize pixmap array to Pixmap 'None' */
 494   for(i=0; i<NUM_TILES; i++)
 495     tile_clipmask[i] = None;
 496
 497   /* create only those clipping Pixmaps we really need */
 498   for(i=0; tile_needs_clipping[i].start>=0; i++)
 499   {
 500     for(j=0; j<tile_needs_clipping[i].count; j++)
 501     {
 502       int tile = tile_needs_clipping[i].start + j;
 503       int graphic = tile;
 504       int src_x, src_y;
 505       Pixmap src_pixmap;
 506
 507       if (tile_needs_clipping[i].start == GFX_MASK_SPARKLING)
 508       {
 509         /* special case -- should be cleaned up sometimes... */
 510         src_pixmap = clipmask[PIX_BACK];
 511         src_x  = SX + GFX_PER_LINE*TILEX;
 512         src_y  = SY + j*TILEY;
 513       }
 514       else if (graphic >= GFX_START_ROCKSSCREEN &&
 515                graphic <= GFX_END_ROCKSSCREEN)
 516       {
 517         src_pixmap = clipmask[PIX_BACK];
 518         graphic -= GFX_START_ROCKSSCREEN;
 519         src_x = SX + (graphic % GFX_PER_LINE) * TILEX;
 520         src_y = SY + (graphic / GFX_PER_LINE) * TILEY;
 521       }
 522       else if (graphic >= GFX_START_ROCKSHEROES &&
 523                graphic <= GFX_END_ROCKSHEROES)
 524       {
 525         src_pixmap = clipmask[PIX_HEROES];
 526         graphic -= GFX_START_ROCKSHEROES;
 527         src_x = (graphic % HEROES_PER_LINE) * TILEX;
 528         src_y = (graphic / HEROES_PER_LINE) * TILEY;
 529       }
 530       else if (graphic >= GFX_START_ROCKSFONT &&
 531                graphic <= GFX_END_ROCKSFONT)
 532       {
 533         src_pixmap = clipmask[PIX_BIGFONT];
 534         graphic -= GFX_START_ROCKSFONT;
 535         src_x = (graphic % FONT_CHARS_PER_LINE) * TILEX;
 536         src_y = (graphic / FONT_CHARS_PER_LINE) * TILEY +
 537           FC_SPECIAL1 * FONT_LINES_PER_FONT * TILEY;
 538       }
 539       else
 540         break;
 541
 542       tile_clipmask[tile] = XCreatePixmap(display, window, TILEX,TILEY, 1);
 543
 544       XCopyArea(display,src_pixmap,tile_clipmask[tile],copy_clipmask_gc,
 545                 src_x,src_y, TILEX,TILEY, 0,0);
 546     }
 547   }
 548
 549   if (!pix[PIX_DB_BACK] || !pix[PIX_DB_DOOR])
 550   {
 551     fprintf(stderr, "%s: cannot create additional Pixmaps!\n",progname);
 552     CloseAll();
 553     exit(-1);
 554   }
 555
 556   for(i=0;i<NUM_PIXMAPS;i++)
 557   {
 558     if (clipmask[i])
 559     {
 560       clip_gc_values.graphics_exposures = False;
 561       clip_gc_values.clip_mask = clipmask[i];
 562       clip_gc_valuemask = GCGraphicsExposures | GCClipMask;
 563       clip_gc[i] = XCreateGC(display,window,clip_gc_valuemask,&clip_gc_values);
 564     }
 565   }
 566
 567   drawto = backbuffer = pix[PIX_DB_BACK];
 568   fieldbuffer = pix[PIX_DB_FIELD];
 569   SetDrawtoField(DRAW_BACKBUFFER);
 570
 571   XCopyArea(display,pix[PIX_BACK],backbuffer,gc,
 572             0,0, WIN_XSIZE,WIN_YSIZE, 0,0);
 573   XFillRectangle(display,pix[PIX_DB_BACK],gc,
 574                  REAL_SX,REAL_SY, FULL_SXSIZE,FULL_SYSIZE);
 575   XFillRectangle(display,pix[PIX_DB_DOOR],gc,
 576                  0,0, 3*DXSIZE,DYSIZE+VYSIZE);
 577
 578   for(i=0; i<MAX_BUF_XSIZE; i++)
 579     for(j=0; j<MAX_BUF_YSIZE; j++)
 580       redraw[i][j] = 0;
 581   redraw_tiles = 0;
 582   redraw_mask = REDRAW_ALL;
 583 }
 584
 585 void LoadGfx(int pos, struct PictureFileInfo *pic)
 586 {
 587   char basefilename[256];
 588   char filename[256];
 589
 590 #ifdef XPM_INCLUDE_FILE
 591   int xpm_err, xbm_err;
 592   unsigned int width,height;
 593   int hot_x,hot_y;
 594   Pixmap shapemask;
 595   char *picture_ext = ".xpm";
 596   char *picturemask_ext = "Mask.xbm";
 597 #else
 598   int gif_err;
 599   char *picture_ext = ".gif";
 600 #endif
 601
 602 #ifdef DEBUG_TIMING
 603   long count1, count2;
 604 #endif
 605
 606   /* Grafik laden */
 607   if (pic->picture_filename)
 608   {
 609     sprintf(basefilename,"%s%s",pic->picture_filename,picture_ext);
 610     DrawInitText(basefilename,150,FC_YELLOW);
 611     sprintf(filename,"%s/%s",GFX_PATH,basefilename);
 612
 613 #ifdef MSDOS
 614     rest(100);
 615 #endif MSDOS
 616
 617 #ifdef DEBUG_TIMING
 618     count1 = Counter();
 619 #endif
 620
 621 #ifdef XPM_INCLUDE_FILE
 622
 623     xpm_att[pos].valuemask = XpmCloseness;
 624     xpm_att[pos].closeness = 20000;
 625     xpm_err = XpmReadFileToPixmap(display,window,filename,
 626                                   &pix[pos],&shapemask,&xpm_att[pos]);
 627
 628     switch(xpm_err)
 629     {
 630       case XpmOpenFailed:
 631         fprintf(stderr,"Cannot open Xpm file '%s' !\n",filename);
 632         CloseAll();
 633         exit(-1);
 634       case XpmFileInvalid:
 635         fprintf(stderr,"Invalid Xpm file '%s'!\n",filename);
 636         CloseAll();
 637         exit(-1);
 638       case XpmNoMemory:
 639         fprintf(stderr,"Not enough memory for Xpm file '%s'!\n",filename);
 640         CloseAll();
 641         exit(1);
 642       case XpmColorFailed:
 643         fprintf(stderr,"Can't get colors for Xpm file '%s'!\n",filename);
 644         CloseAll();
 645         exit(-1);
 646       default:
 647         break;
 648     }
 649
 650 #ifdef DEBUG_TIMING
 651     count2 = Counter();
 652     printf("XPM LOADING %s IN %.2f SECONDS\n",
 653            filename,(float)(count2-count1)/1000.0);
 654 #endif
 655
 656 #else
 657
 658     gif_err = Read_GIF_to_Pixmaps(display, window, filename,
 659                                   &pix[pos], &clipmask[pos]);
 660
 661     switch(gif_err)
 662     {
 663       case GIF_Success:
 664         break;
 665       case GIF_OpenFailed:
 666         fprintf(stderr,"Cannot open GIF file '%s' !\n",filename);
 667         CloseAll();
 668         exit(-1);
 669       case GIF_ReadFailed:
 670         fprintf(stderr,"Cannot read GIF file '%s' !\n",filename);
 671         CloseAll();
 672         exit(-1);
 673       case GIF_FileInvalid:
 674         fprintf(stderr,"Invalid GIF file '%s'!\n",filename);
 675         CloseAll();
 676         exit(-1);
 677       case GIF_NoMemory:
 678         fprintf(stderr,"Not enough memory for GIF file '%s'!\n",filename);
 679         CloseAll();
 680         exit(1);
 681       case GIF_ColorFailed:
 682         fprintf(stderr,"Can't get colors for GIF file '%s'!\n",filename);
 683         CloseAll();
 684         exit(-1);
 685       default:
 686         break;
 687     }
 688
 689 #ifdef DEBUG_TIMING
 690     count2 = Counter();
 691     printf("GIF LOADING %s IN %.2f SECONDS\n",
 692            filename,(float)(count2-count1)/1000.0);
 693 #endif
 694
 695 #endif
 696
 697     if (!pix[pos])
 698     {
 699       fprintf(stderr, "%s: cannot get graphics for '%s'.\n",
 700               progname, pic->picture_filename);
 701       CloseAll();
 702       exit(-1);
 703     }
 704   }
 705
 706   /* zugehörige Maske laden (wenn vorhanden) */
 707   if (pic->picture_with_mask)
 708   {
 709
 710 #ifdef XPM_INCLUDE_FILE
 711
 712     sprintf(basefilename,"%s%s",pic->picture_filename,picturemask_ext);
 713     DrawInitText(basefilename,150,FC_YELLOW);
 714     sprintf(filename,"%s/%s",GFX_PATH,basefilename);
 715
 716 #ifdef DEBUG_TIMING
 717     count1 = Counter();
 718 #endif
 719
 720     xbm_err = XReadBitmapFile(display,window,filename,
 721                               &width,&height,&clipmask[pos],&hot_x,&hot_y);
 722
 723     switch(xbm_err)
 724     {
 725       case BitmapSuccess:
 726         break;
 727       case BitmapOpenFailed:
 728         fprintf(stderr,"Bitmap file open failed on '%s' !\n",filename);
 729         CloseAll();
 730         exit(-1);
 731         break;
 732       case BitmapFileInvalid:
 733         fprintf(stderr,"Bitmap file invalid: '%s' !\n",filename);
 734         CloseAll();
 735         exit(-1);
 736         break;
 737       case BitmapNoMemory:
 738         fprintf(stderr,"No memory for file '%s' !\n",filename);
 739         CloseAll();
 740         exit(-1);
 741         break;
 742       default:
 743         break;
 744     }
 745
 746 #ifdef DEBUG_TIMING
 747     count2 = Counter();
 748     printf("XBM LOADING %s IN %.2f SECONDS\n",
 749            filename,(float)(count2-count1)/1000.0);
 750 #endif
 751
 752 #endif
 753
 754     if (!clipmask[pos])
 755     {
 756       fprintf(stderr, "%s: cannot get clipmask for '%s'.\n",
 757               progname, pic->picture_filename);
 758       CloseAll();
 759       exit(-1);
 760     }
 761   }
 762 }
 763
 764 void InitElementProperties()
 765 {
 766   int i,j;
 767
 768   static int ep_amoebalive[] =
 769   {
 770     EL_AMOEBE_NASS,
 771     EL_AMOEBE_NORM,
 772     EL_AMOEBE_VOLL,
 773     EL_AMOEBE_BD
 774   };
 775   static int ep_amoebalive_num = sizeof(ep_amoebalive)/sizeof(int);
 776
 777   static int ep_amoeboid[] =
 778   {
 779     EL_AMOEBE_TOT,
 780     EL_AMOEBE_NASS,
 781     EL_AMOEBE_NORM,
 782     EL_AMOEBE_VOLL,
 783     EL_AMOEBE_BD
 784   };
 785   static int ep_amoeboid_num = sizeof(ep_amoeboid)/sizeof(int);
 786
 787   static int ep_schluessel[] =
 788   {
 789     EL_SCHLUESSEL1,
 790     EL_SCHLUESSEL2,
 791     EL_SCHLUESSEL3,
 792     EL_SCHLUESSEL4
 793   };
 794   static int ep_schluessel_num = sizeof(ep_schluessel)/sizeof(int);
 795
 796   static int ep_pforte[] =
 797   {
 798     EL_PFORTE1,
 799     EL_PFORTE2,
 800     EL_PFORTE3,
 801     EL_PFORTE4,
 802     EL_PFORTE1X,
 803     EL_PFORTE2X,
 804     EL_PFORTE3X,
 805     EL_PFORTE4X
 806   };
 807   static int ep_pforte_num = sizeof(ep_pforte)/sizeof(int);
 808
 809   static int ep_solid[] =
 810   {
 811     EL_BETON,
 812     EL_MAUERWERK,
 813     EL_MAUER_LEBT,
 814     EL_FELSBODEN,
 815     EL_AUSGANG_ZU,
 816     EL_AUSGANG_ACT,
 817     EL_AUSGANG_AUF,
 818     EL_AMOEBE_TOT,
 819     EL_AMOEBE_NASS,
 820     EL_AMOEBE_NORM,
 821     EL_AMOEBE_VOLL,
 822     EL_AMOEBE_BD,
 823     EL_MORAST_VOLL,
 824     EL_MORAST_LEER,
 825     EL_SIEB_VOLL,
 826     EL_SIEB_LEER,
 827     EL_SIEB_TOT,
 828     EL_SIEB2_VOLL,
 829     EL_SIEB2_LEER,
 830     EL_SIEB2_TOT,
 831     EL_LIFE,
 832     EL_LIFE_ASYNC,
 833     EL_BADEWANNE1,
 834     EL_BADEWANNE2,
 835     EL_BADEWANNE3,
 836     EL_BADEWANNE4,
 837     EL_BADEWANNE5
 838   };
 839   static int ep_solid_num = sizeof(ep_solid)/sizeof(int);
 840
 841   static int ep_massiv[] =
 842   {
 843     EL_BETON,
 844     EL_SALZSAEURE,
 845     EL_BADEWANNE1,
 846     EL_BADEWANNE2,
 847     EL_BADEWANNE3,
 848     EL_BADEWANNE4,
 849     EL_BADEWANNE5,
 850     EL_PFORTE1,
 851     EL_PFORTE2,
 852     EL_PFORTE3,
 853     EL_PFORTE4,
 854     EL_PFORTE1X,
 855     EL_PFORTE2X,
 856     EL_PFORTE3X,
 857     EL_PFORTE4X
 858   };
 859   static int ep_massiv_num = sizeof(ep_massiv)/sizeof(int);
 860
 861   static int ep_slippery[] =
 862   {
 863     EL_FELSBODEN,
 864     EL_FELSBROCKEN,
 865     EL_EDELSTEIN,
 866     EL_EDELSTEIN_BD,
 867     EL_EDELSTEIN_GELB,
 868     EL_EDELSTEIN_ROT,
 869     EL_EDELSTEIN_LILA,
 870     EL_DIAMANT,
 871     EL_BOMBE,
 872     EL_KOKOSNUSS,
 873     EL_ABLENK_EIN,
 874     EL_ABLENK_AUS,
 875     EL_ZEIT_VOLL,
 876     EL_ZEIT_LEER,
 877     EL_BIRNE_EIN,
 878     EL_BIRNE_AUS,
 879     EL_BADEWANNE1,
 880     EL_BADEWANNE2,
 881     EL_SONDE
 882   };
 883   static int ep_slippery_num = sizeof(ep_slippery)/sizeof(int);
 884
 885   static int ep_enemy[] =
 886   {
 887     EL_KAEFER,
 888     EL_FLIEGER,
 889     EL_BUTTERFLY,
 890     EL_FIREFLY,
 891     EL_MAMPFER,
 892     EL_MAMPFER2,
 893     EL_ROBOT,
 894     EL_PACMAN
 895   };
 896   static int ep_enemy_num = sizeof(ep_enemy)/sizeof(int);
 897
 898   static int ep_mauer[] =
 899   {
 900     EL_BETON,
 901     EL_PFORTE1,
 902     EL_PFORTE2,
 903     EL_PFORTE3,
 904     EL_PFORTE4,
 905     EL_PFORTE1X,
 906     EL_PFORTE2X,
 907     EL_PFORTE3X,
 908     EL_PFORTE4X,
 909     EL_AUSGANG_ZU,
 910     EL_AUSGANG_ACT,
 911     EL_AUSGANG_AUF,
 912     EL_MAUERWERK,
 913     EL_FELSBODEN,
 914     EL_MAUER_LEBT,
 915     EL_MAUERND
 916   };
 917   static int ep_mauer_num = sizeof(ep_mauer)/sizeof(int);
 918
 919   static int ep_can_fall[] =
 920   {
 921     EL_FELSBROCKEN,
 922     EL_EDELSTEIN,
 923     EL_EDELSTEIN_BD,
 924     EL_EDELSTEIN_GELB,
 925     EL_EDELSTEIN_ROT,
 926     EL_EDELSTEIN_LILA,
 927     EL_DIAMANT,
 928     EL_BOMBE,
 929     EL_KOKOSNUSS,
 930     EL_TROPFEN,
 931     EL_MORAST_VOLL,
 932     EL_SIEB_VOLL,
 933     EL_SIEB2_VOLL,
 934     EL_ZEIT_VOLL,
 935     EL_ZEIT_LEER
 936   };
 937   static int ep_can_fall_num = sizeof(ep_can_fall)/sizeof(int);
 938
 939   static int ep_can_smash[] =
 940   {
 941     EL_FELSBROCKEN,
 942     EL_EDELSTEIN,
 943     EL_EDELSTEIN_BD,
 944     EL_EDELSTEIN_GELB,
 945     EL_EDELSTEIN_ROT,
 946     EL_EDELSTEIN_LILA,
 947     EL_DIAMANT,
 948     EL_SCHLUESSEL1,
 949     EL_SCHLUESSEL2,
 950     EL_SCHLUESSEL3,
 951     EL_SCHLUESSEL4,
 952     EL_BOMBE,
 953     EL_KOKOSNUSS,
 954     EL_TROPFEN,
 955     EL_ZEIT_VOLL,
 956     EL_ZEIT_LEER
 957   };
 958   static int ep_can_smash_num = sizeof(ep_can_smash)/sizeof(int);
 959
 960   static int ep_can_change[] =
 961   {
 962     EL_FELSBROCKEN,
 963     EL_EDELSTEIN,
 964     EL_EDELSTEIN_BD,
 965     EL_EDELSTEIN_GELB,
 966     EL_EDELSTEIN_ROT,
 967     EL_EDELSTEIN_LILA,
 968     EL_DIAMANT
 969   };
 970   static int ep_can_change_num = sizeof(ep_can_change)/sizeof(int);
 971
 972   static int ep_can_move[] =
 973   {
 974     EL_KAEFER,
 975     EL_FLIEGER,
 976     EL_BUTTERFLY,
 977     EL_FIREFLY,
 978     EL_MAMPFER,
 979     EL_MAMPFER2,
 980     EL_ROBOT,
 981     EL_PACMAN,
 982     EL_MAULWURF,
 983     EL_PINGUIN,
 984     EL_SCHWEIN,
 985     EL_DRACHE,
 986     EL_SONDE
 987   };
 988   static int ep_can_move_num = sizeof(ep_can_move)/sizeof(int);
 989
 990   static int ep_could_move[] =
 991   {
 992     EL_KAEFER_R,
 993     EL_KAEFER_O,
 994     EL_KAEFER_L,
 995     EL_KAEFER_U,
 996     EL_FLIEGER_R,
 997     EL_FLIEGER_O,
 998     EL_FLIEGER_L,
 999     EL_FLIEGER_U,
1000     EL_BUTTERFLY_R,
1001     EL_BUTTERFLY_O,
1002     EL_BUTTERFLY_L,
1003     EL_BUTTERFLY_U,
1004     EL_FIREFLY_R,
1005     EL_FIREFLY_O,
1006     EL_FIREFLY_L,
1007     EL_FIREFLY_U,
1008     EL_PACMAN_R,
1009     EL_PACMAN_O,
1010     EL_PACMAN_L,
1011     EL_PACMAN_U
1012   };
1013   static int ep_could_move_num = sizeof(ep_could_move)/sizeof(int);
1014
1015   static int ep_dont_touch[] =
1016   {
1017     EL_KAEFER,
1018     EL_FLIEGER,
1019     EL_BUTTERFLY,
1020     EL_FIREFLY
1021   };
1022   static int ep_dont_touch_num = sizeof(ep_dont_touch)/sizeof(int);
1023
1024   static int ep_dont_go_to[] =
1025   {
1026     EL_KAEFER,
1027     EL_FLIEGER,
1028     EL_BUTTERFLY,
1029     EL_FIREFLY,
1030     EL_MAMPFER,
1031     EL_MAMPFER2,
1032     EL_ROBOT,
1033     EL_PACMAN,
1034     EL_TROPFEN,
1035     EL_SALZSAEURE
1036   };
1037   static int ep_dont_go_to_num = sizeof(ep_dont_go_to)/sizeof(int);
1038
1039   static int ep_mampf2[] =
1040   {
1041     EL_ERDREICH,
1042     EL_KAEFER,
1043     EL_FLIEGER,
1044     EL_BUTTERFLY,
1045     EL_FIREFLY,
1046     EL_MAMPFER,
1047     EL_ROBOT,
1048     EL_PACMAN,
1049     EL_TROPFEN,
1050     EL_AMOEBE_TOT,
1051     EL_AMOEBE_NASS,
1052     EL_AMOEBE_NORM,
1053     EL_AMOEBE_VOLL,
1054     EL_AMOEBE_BD,
1055     EL_EDELSTEIN,
1056     EL_EDELSTEIN_BD,
1057     EL_EDELSTEIN_GELB,
1058     EL_EDELSTEIN_ROT,
1059     EL_EDELSTEIN_LILA,
1060     EL_DIAMANT
1061   };
1062   static int ep_mampf2_num = sizeof(ep_mampf2)/sizeof(int);
1063
1064   static int ep_bd_element[] =
1065   {
1066     EL_LEERRAUM,
1067     EL_ERDREICH,
1068     EL_FELSBODEN,
1069     EL_FELSBROCKEN,
1070     EL_EDELSTEIN_BD,
1071     EL_SIEB2_LEER,
1072     EL_AUSGANG_ZU,
1073     EL_AUSGANG_AUF,
1074     EL_BETON,
1075     EL_SPIELFIGUR,
1076     EL_FIREFLY,
1077     EL_FIREFLY_1,
1078     EL_FIREFLY_2,
1079     EL_FIREFLY_3,
1080     EL_FIREFLY_4,
1081     EL_BUTTERFLY,
1082     EL_BUTTERFLY_1,
1083     EL_BUTTERFLY_2,
1084     EL_BUTTERFLY_3,
1085     EL_BUTTERFLY_4,
1086     EL_AMOEBE_BD,
1087     EL_CHAR_FRAGE
1088   };
1089   static int ep_bd_element_num = sizeof(ep_bd_element)/sizeof(int);
1090
1091   static int ep_sb_element[] =
1092   {
1093     EL_LEERRAUM,
1094     EL_BETON,
1095     EL_SOKOBAN_OBJEKT,
1096     EL_SOKOBAN_FELD_LEER,
1097     EL_SOKOBAN_FELD_VOLL,
1098     EL_SPIELFIGUR
1099   };
1100   static int ep_sb_element_num = sizeof(ep_sb_element)/sizeof(int);
1101
1102   static int ep_gem[] =
1103   {
1104     EL_EDELSTEIN,
1105     EL_EDELSTEIN_BD,
1106     EL_EDELSTEIN_GELB,
1107     EL_EDELSTEIN_ROT,
1108     EL_EDELSTEIN_LILA,
1109     EL_DIAMANT
1110   };
1111   static int ep_gem_num = sizeof(ep_gem)/sizeof(int);
1112
1113   static int ep_inactive[] =
1114   {
1115     EL_LEERRAUM,
1116     EL_ERDREICH,
1117     EL_MAUERWERK,
1118     EL_FELSBODEN,
1119     EL_SCHLUESSEL,
1120     EL_BETON,
1121     EL_AMOEBE_TOT,
1122     EL_MORAST_LEER,
1123     EL_BADEWANNE,
1124     EL_ABLENK_AUS,
1125     EL_SCHLUESSEL1,
1126     EL_SCHLUESSEL2,
1127     EL_SCHLUESSEL3,
1128     EL_SCHLUESSEL4,
1129     EL_PFORTE1,
1130     EL_PFORTE2,
1131     EL_PFORTE3,
1132     EL_PFORTE4,
1133     EL_PFORTE1X,
1134     EL_PFORTE2X,
1135     EL_PFORTE3X,
1136     EL_PFORTE4X,
1137     EL_DYNAMIT_AUS,
1138     EL_UNSICHTBAR,
1139     EL_BIRNE_AUS,
1140     EL_BIRNE_EIN,
1141     EL_ERZ_EDEL,
1142     EL_ERZ_DIAM,
1143     EL_ERZ_EDEL_BD,
1144     EL_ERZ_EDEL_GELB,
1145     EL_DYNABOMB_NR,
1146     EL_DYNABOMB_SZ,
1147     EL_DYNABOMB_XL,
1148     EL_SOKOBAN_OBJEKT,
1149     EL_SOKOBAN_FELD_LEER,
1150     EL_SOKOBAN_FELD_VOLL,
1151     EL_ERZ_EDEL_ROT,
1152     EL_ERZ_EDEL_LILA,
1153     EL_BADEWANNE1,
1154     EL_BADEWANNE2,
1155     EL_BADEWANNE3,
1156     EL_BADEWANNE4,
1157     EL_BADEWANNE5,
1158     EL_SIEB_TOT,
1159     EL_SIEB2_TOT,
1160     EL_AMOEBA2DIAM,
1161     EL_BLOCKED
1162   };
1163   static int ep_inactive_num = sizeof(ep_inactive)/sizeof(int);
1164
1165   static int ep_explosive[] =
1166   {
1167     EL_BOMBE,
1168     EL_DYNAMIT,
1169     EL_DYNAMIT_AUS,
1170     EL_DYNABOMB,
1171     EL_DYNABOMB_NR,
1172     EL_DYNABOMB_SZ,
1173     EL_DYNABOMB_XL,
1174     EL_KAEFER,
1175     EL_MAULWURF,
1176     EL_PINGUIN,
1177     EL_SCHWEIN,
1178     EL_DRACHE,
1179     EL_SONDE
1180   };
1181   static int ep_explosive_num = sizeof(ep_explosive)/sizeof(int);
1182
1183   static int ep_mampf3[] =
1184   {
1185     EL_EDELSTEIN,
1186     EL_EDELSTEIN_BD,
1187     EL_EDELSTEIN_GELB,
1188     EL_EDELSTEIN_ROT,
1189     EL_EDELSTEIN_LILA,
1190     EL_DIAMANT
1191   };
1192   static int ep_mampf3_num = sizeof(ep_mampf3)/sizeof(int);
1193
1194   static int ep_pushable[] =
1195   {
1196     EL_FELSBROCKEN,
1197     EL_BOMBE,
1198     EL_KOKOSNUSS,
1199     EL_ZEIT_LEER,
1200     EL_SOKOBAN_FELD_VOLL,
1201     EL_SOKOBAN_OBJEKT,
1202     EL_SONDE
1203   };
1204   static int ep_pushable_num = sizeof(ep_pushable)/sizeof(int);
1205
1206   static long ep_bit[] =
1207   {
1208     EP_BIT_AMOEBALIVE,
1209     EP_BIT_AMOEBOID,
1210     EP_BIT_SCHLUESSEL,
1211     EP_BIT_PFORTE,
1212     EP_BIT_SOLID,
1213     EP_BIT_MASSIV,
1214     EP_BIT_SLIPPERY,
1215     EP_BIT_ENEMY,
1216     EP_BIT_MAUER,
1217     EP_BIT_CAN_FALL,
1218     EP_BIT_CAN_SMASH,
1219     EP_BIT_CAN_CHANGE,
1220     EP_BIT_CAN_MOVE,
1221     EP_BIT_COULD_MOVE,
1222     EP_BIT_DONT_TOUCH,
1223     EP_BIT_DONT_GO_TO,
1224     EP_BIT_MAMPF2,
1225     EP_BIT_BD_ELEMENT,
1226     EP_BIT_SB_ELEMENT,
1227     EP_BIT_GEM,
1228     EP_BIT_INACTIVE,
1229     EP_BIT_EXPLOSIVE,
1230     EP_BIT_MAMPF3,
1231     EP_BIT_PUSHABLE
1232   };
1233   static int *ep_array[] =
1234   {
1235     ep_amoebalive,
1236     ep_amoeboid,
1237     ep_schluessel,
1238     ep_pforte,
1239     ep_solid,
1240     ep_massiv,
1241     ep_slippery,
1242     ep_enemy,
1243     ep_mauer,
1244     ep_can_fall,
1245     ep_can_smash,
1246     ep_can_change,
1247     ep_can_move,
1248     ep_could_move,
1249     ep_dont_touch,
1250     ep_dont_go_to,
1251     ep_mampf2,
1252     ep_bd_element,
1253     ep_sb_element,
1254     ep_gem,
1255     ep_inactive,
1256     ep_explosive,
1257     ep_mampf3,
1258     ep_pushable
1259   };
1260   static int *ep_num[] =
1261   {
1262     &ep_amoebalive_num,
1263     &ep_amoeboid_num,
1264     &ep_schluessel_num,
1265     &ep_pforte_num,
1266     &ep_solid_num,
1267     &ep_massiv_num,
1268     &ep_slippery_num,
1269     &ep_enemy_num,
1270     &ep_mauer_num,
1271     &ep_can_fall_num,
1272     &ep_can_smash_num,
1273     &ep_can_change_num,
1274     &ep_can_move_num,
1275     &ep_could_move_num,
1276     &ep_dont_touch_num,
1277     &ep_dont_go_to_num,
1278     &ep_mampf2_num,
1279     &ep_bd_element_num,
1280     &ep_sb_element_num,
1281     &ep_gem_num,
1282     &ep_inactive_num,
1283     &ep_explosive_num,
1284     &ep_mampf3_num,
1285     &ep_pushable_num
1286   };
1287   static int num_properties = sizeof(ep_num)/sizeof(int *);
1288
1289   for(i=0;i<MAX_ELEMENTS;i++)
1290     Elementeigenschaften[i] = 0;
1291
1292   for(i=0;i<num_properties;i++)
1293     for(j=0;j<*(ep_num[i]);j++)
1294       Elementeigenschaften[(ep_array[i])[j]] |= ep_bit[i];
1295   for(i=EL_CHAR_START;i<EL_CHAR_END;i++)
1296     Elementeigenschaften[i] |= (EP_BIT_CHAR | EP_BIT_INACTIVE);
1297 }
1298
1299 void CloseAll()
1300 {
1301   int i;
1302
1303   if (sound_process_id)
1304   {
1305     StopSounds();
1306     kill(sound_process_id, SIGTERM);
1307     FreeSounds(NUM_SOUNDS);
1308   }
1309
1310   for(i=0;i<NUM_PIXMAPS;i++)
1311   {
1312     if (pix[i])
1313     {
1314 #ifdef XPM_INCLUDE_FILE
1315       if (i<NUM_PICTURES)       /* XPM pictures */
1316       {
1317         XFreeColors(display,DefaultColormap(display,screen),
1318                     xpm_att[i].pixels,xpm_att[i].npixels,0);
1319         XpmFreeAttributes(&xpm_att[i]);
1320       }
1321 #endif
1322       XFreePixmap(display,pix[i]);
1323     }
1324     if (clipmask[i])
1325       XFreePixmap(display,clipmask[i]);
1326     if (clip_gc[i])
1327       XFreeGC(display, clip_gc[i]);
1328   }
1329
1330   if (gc)
1331     XFreeGC(display, gc);
1332
1333   if (display)
1334   {
1335     XAutoRepeatOn(display);
1336     XCloseDisplay(display);
1337   }
1338
1339   exit(0);
1340 }