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