src/init.c

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