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