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