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