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