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