src/init.c

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