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