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