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