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