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