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