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