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