1 /***********************************************************
2 * Rocks'n'Diamonds -- McDuffin Strikes Back! *
3 *----------------------------------------------------------*
4 * ©1995 Artsoft Development *
6 * 33659 Bielefeld-Senne *
7 * Telefon: (0521) 493245 *
8 * eMail: aeglos@valinor.owl.de *
9 * aeglos@uni-paderborn.de *
10 * q99492@pbhrzx.uni-paderborn.de *
11 *----------------------------------------------------------*
13 ***********************************************************/
31 struct PictureFileInfo
33 char *picture_filename;
34 BOOL picture_with_mask;
39 char *picture_filename;
40 char *picturemask_filename;
43 static int sound_process_id = 0;
45 static void InitLevelAndPlayerInfo(void);
46 static void InitDisplay(int, char **);
47 static void InitSound(void);
48 static void InitSoundProcess(void);
49 static void InitWindow(int, char **);
50 static void InitGfx(void);
51 static void LoadGfx(int, struct PictureFileInfo *);
52 static void InitElementProperties(void);
54 void OpenAll(int argc, char *argv[])
56 InitLevelAndPlayerInfo();
62 InitRND(NEW_RANDOMIZE);
64 signal(SIGINT, CloseAll);
65 signal(SIGTERM, CloseAll);
67 InitDisplay(argc, argv);
68 InitWindow(argc, argv);
70 XMapWindow(display, window);
74 InitElementProperties();
79 void InitLevelAndPlayerInfo()
81 if (!LoadLevelInfo()) /* global level info */
84 LoadPlayerInfo(PLAYER_SETUP); /* global setup info */
85 LoadPlayerInfo(PLAYER_LEVEL); /* level specific info */
92 if (sound_status==SOUND_OFF)
96 if (access(sound_device_name,W_OK)<0)
98 fprintf(stderr,"%s: cannot access sound device - no sounds\n",progname);
99 sound_status=SOUND_OFF;
103 if ((sound_device=open(sound_device_name,O_WRONLY))<0)
105 fprintf(stderr,"%s: cannot open sound device - no sounds\n",progname);
106 sound_status=SOUND_OFF;
111 sound_status=SOUND_AVAILABLE;
114 sound_loops_allowed = TRUE;
115 sound_loops_on = TRUE;
118 sound_loops_allowed = TRUE;
119 sound_loops_on = TRUE;
122 for(i=0;i<NUM_SOUNDS;i++)
125 sprintf(sound_name[i], "%d", i+1);
127 Sound[i].name = sound_name[i];
128 if (!LoadSound(&Sound[i]))
130 sound_status=SOUND_OFF;
136 void InitSoundProcess()
138 if (sound_status==SOUND_OFF)
142 if (pipe(sound_pipe)<0)
144 fprintf(stderr,"%s: cannot create pipe - no sounds\n",progname);
145 sound_status=SOUND_OFF;
149 if ((sound_process_id=fork())<0)
151 fprintf(stderr,"%s: cannot create child process - no sounds\n",progname);
152 sound_status=SOUND_OFF;
156 if (!sound_process_id) /* we are child */
158 else /* we are parent */
159 close(sound_pipe[0]); /* no reading from pipe needed */
167 if (global_joystick_status==JOYSTICK_OFF)
171 if (access(joystick_device_name[joystick_nr],R_OK)<0)
173 fprintf(stderr,"%s: cannot access joystick device '%s'\n",
174 progname,joystick_device_name[joystick_nr]);
175 joystick_status = JOYSTICK_OFF;
179 if ((joystick_device=open(joystick_device_name[joystick_nr],O_RDONLY))<0)
181 fprintf(stderr,"%s: cannot open joystick device '%s'\n",
182 progname,joystick_device_name[joystick_nr]);
183 joystick_status = JOYSTICK_OFF;
187 joystick_status = JOYSTICK_AVAILABLE;
190 joystick_status = JOYSTICK_AVAILABLE;
194 void InitDisplay(int argc, char *argv[])
196 char *display_name = NULL;
197 XVisualInfo vinfo_template, *vinfo;
202 /* get X server to connect to, if given as an argument */
203 for (i=1;i<argc-1;i++)
205 char *dispstr="-display";
206 int len=MAX(strlen(dispstr),strlen(argv[i]));
210 else if (!strncmp(argv[i],dispstr,len))
212 display_name=argv[i+1];
217 /* connect to X server */
218 if (!(display=XOpenDisplay(display_name)))
220 fprintf(stderr,"%s: cannot connect to X server %s\n",
221 progname, XDisplayName(display_name));
225 screen = DefaultScreen(display);
226 visual = DefaultVisual(display, screen);
227 depth = DefaultDepth(display, screen);
228 cmap = DefaultColormap(display, screen);
229 pen_fg = WhitePixel(display,screen);
230 pen_bg = BlackPixel(display,screen);
232 /* look for good enough visual */
233 vinfo_template.screen = screen;
234 vinfo_template.class = (depth == 8 ? PseudoColor : TrueColor);
235 vinfo_template.depth = depth;
236 if ((vinfo = XGetVisualInfo(display, VisualScreenMask | VisualClassMask |
237 VisualDepthMask, &vinfo_template, &num_visuals)))
239 visual = vinfo->visual;
240 XFree((void *)vinfo);
243 /* got appropriate visual? */
246 printf("Sorry, displays with less than 8 bits per pixel not supported.\n");
249 else if ((depth ==8 && visual->class != PseudoColor) ||
250 (depth > 8 && visual->class != TrueColor &&
251 visual->class != DirectColor))
253 printf("Sorry, cannot get appropriate visual.\n");
258 void InitWindow(int argc, char *argv[])
260 unsigned int border_width = 4;
261 Pixmap icon_pixmap, iconmask_pixmap;
262 unsigned int icon_width,icon_height;
263 int icon_hot_x,icon_hot_y;
264 char icon_filename[256];
265 XSizeHints size_hints;
267 XClassHint class_hints;
268 XTextProperty windowName, iconName;
270 unsigned long gc_valuemask;
271 char *window_name = WINDOWTITLE_STRING;
272 char *icon_name = WINDOWTITLE_STRING;
273 long window_event_mask;
274 Atom proto_atom = None, delete_atom = None;
275 int screen_width, screen_height;
276 int win_xpos = WIN_XPOS, win_ypos = WIN_YPOS;
279 static struct IconFileInfo icon_pic =
286 screen_width = XDisplayWidth(display, screen);
287 screen_height = XDisplayHeight(display, screen);
292 win_xpos = (screen_width - width) / 2;
293 win_ypos = (screen_height - height) / 2;
295 window = XCreateSimpleWindow(display, RootWindow(display, screen),
296 win_xpos, win_ypos, width, height, border_width,
300 proto_atom = XInternAtom(display, "WM_PROTOCOLS", FALSE);
301 delete_atom = XInternAtom(display, "WM_DELETE_WINDOW", FALSE);
302 if ((proto_atom != None) && (delete_atom != None))
303 XChangeProperty(display, window, proto_atom, XA_ATOM, 32,
304 PropModePrepend, (unsigned char *) &delete_atom, 1);
306 sprintf(icon_filename,"%s/%s",GFX_PATH,icon_pic.picture_filename);
307 XReadBitmapFile(display,window,icon_filename,
308 &icon_width,&icon_height,
309 &icon_pixmap,&icon_hot_x,&icon_hot_y);
312 fprintf(stderr, "%s: cannot read icon bitmap file '%s'.\n",
313 progname,icon_filename);
317 sprintf(icon_filename,"%s/%s",GFX_PATH,icon_pic.picturemask_filename);
318 XReadBitmapFile(display,window,icon_filename,
319 &icon_width,&icon_height,
320 &iconmask_pixmap,&icon_hot_x,&icon_hot_y);
321 if (!iconmask_pixmap)
323 fprintf(stderr, "%s: cannot read icon bitmap file '%s'.\n",
324 progname,icon_filename);
328 size_hints.width = size_hints.min_width = size_hints.max_width = width;
329 size_hints.height = size_hints.min_height = size_hints.max_height = height;
330 size_hints.flags = PSize | PMinSize | PMaxSize;
332 if (win_xpos || win_ypos)
334 size_hints.x = win_xpos;
335 size_hints.y = win_ypos;
336 size_hints.flags |= PPosition;
339 if (!XStringListToTextProperty(&window_name, 1, &windowName))
341 fprintf(stderr, "%s: structure allocation for windowName failed.\n",
346 if (!XStringListToTextProperty(&icon_name, 1, &iconName))
348 fprintf(stderr, "%s: structure allocation for iconName failed.\n",
353 wm_hints.initial_state = NormalState;
354 wm_hints.input = True;
355 wm_hints.icon_pixmap = icon_pixmap;
356 wm_hints.icon_mask = iconmask_pixmap;
357 wm_hints.flags = StateHint | IconPixmapHint | IconMaskHint | InputHint;
359 class_hints.res_name = progname;
360 class_hints.res_class = "Rocks'n'Diamonds";
362 XSetWMProperties(display, window, &windowName, &iconName,
363 argv, argc, &size_hints, &wm_hints,
366 XFree(windowName.value);
367 XFree(iconName.value);
369 /* Select event types wanted */
370 window_event_mask = ExposureMask | StructureNotifyMask | FocusChangeMask |
371 ButtonPressMask | ButtonReleaseMask | ButtonMotionMask |
372 KeyPressMask | KeyReleaseMask;
373 XSelectInput(display, window, window_event_mask);
376 /* create GC for drawing with window depth */
377 gc_values.graphics_exposures = False;
378 gc_values.foreground = pen_bg;
379 gc_values.background = pen_bg;
380 gc_valuemask = GCGraphicsExposures | GCForeground | GCBackground;
381 gc = XCreateGC(display, window, gc_valuemask, &gc_values);
384 void DrawInitText(char *text, int ypos, int color)
386 if (display && window && pix[PIX_SMALLFONT])
388 XFillRectangle(display,window,gc,0,ypos, WIN_XSIZE,FONT2_YSIZE);
389 DrawTextExt(window,gc,(WIN_XSIZE-strlen(text)*FONT2_XSIZE)/2,
390 ypos,text,FS_SMALL,color);
398 XGCValues clip_gc_values;
399 unsigned long clip_gc_valuemask;
401 static struct PictureFileInfo pic[NUM_PICTURES] =
411 static struct PictureFileInfo pic[NUM_PICTURES] =
413 { "RocksScreen", TRUE },
414 { "RocksDoor", TRUE },
415 { "RocksHeroes", TRUE },
416 { "RocksToons", TRUE },
417 { "RocksFont", FALSE },
418 { "RocksFont2", FALSE }
427 LoadGfx(PIX_SMALLFONT,&pic[PIX_SMALLFONT]);
428 DrawInitText(WINDOWTITLE_STRING,20,FC_YELLOW);
429 DrawInitText(COPYRIGHT_STRING,50,FC_RED);
431 DrawInitText("MSDOS version done by Guido Schulz",210,FC_BLUE);
434 DrawInitText("Loading graphics:",120,FC_GREEN);
436 for(i=0;i<NUM_PICTURES;i++)
437 if (i!=PIX_SMALLFONT)
442 printf("SUMMARY: %.2f SECONDS LOADING TIME\n",(float)(count2-count1)/100.0);
446 pix[PIX_DB_BACK] = XCreatePixmap(display, window,
448 XDefaultDepth(display,screen));
449 pix[PIX_DB_DOOR] = XCreatePixmap(display, window,
450 3*DXSIZE,DYSIZE+VYSIZE,
451 XDefaultDepth(display,screen));
452 pix[PIX_DB_FIELD] = XCreatePixmap(display, window,
454 XDefaultDepth(display,screen));
456 if (!pix[PIX_DB_BACK] || !pix[PIX_DB_DOOR])
458 fprintf(stderr, "%s: cannot create additional Pixmaps!\n",progname);
463 for(i=0;i<NUM_PIXMAPS;i++)
467 clip_gc_values.graphics_exposures = False;
468 clip_gc_values.foreground = pen_fg;
469 clip_gc_values.background = pen_bg;
470 clip_gc_values.clip_mask = clipmask[i];
472 GCGraphicsExposures | GCForeground | GCBackground | GCClipMask;
473 clip_gc[i] = XCreateGC(display,window,clip_gc_valuemask,&clip_gc_values);
477 drawto = backbuffer = pix[PIX_DB_BACK];
478 fieldbuffer = pix[PIX_DB_FIELD];
479 SetDrawtoField(DRAW_BACKBUFFER);
481 XCopyArea(display,pix[PIX_BACK],backbuffer,gc,
482 0,0, WIN_XSIZE,WIN_YSIZE, 0,0);
483 XFillRectangle(display,pix[PIX_DB_BACK],gc,
484 REAL_SX,REAL_SY, FULL_SXSIZE,FULL_SYSIZE);
485 XFillRectangle(display,pix[PIX_DB_DOOR],gc,
486 0,0, 3*DXSIZE,DYSIZE+VYSIZE);
488 for(i=0; i<MAX_BUF_XSIZE; i++)
489 for(j=0; j<MAX_BUF_YSIZE; j++)
492 redraw_mask = REDRAW_ALL;
495 void LoadGfx(int pos, struct PictureFileInfo *pic)
497 char basefilename[256];
500 #ifdef XPM_INCLUDE_FILE
501 int xpm_err, xbm_err;
502 unsigned int width,height;
505 char *picture_ext = ".xpm";
506 char *picturemask_ext = "Mask.xbm";
509 char *picture_ext = ".gif";
517 if (pic->picture_filename)
519 sprintf(basefilename,"%s%s",pic->picture_filename,picture_ext);
520 DrawInitText(basefilename,150,FC_YELLOW);
521 sprintf(filename,"%s/%s",GFX_PATH,basefilename);
531 #ifdef XPM_INCLUDE_FILE
533 xpm_att[pos].valuemask = XpmCloseness;
534 xpm_att[pos].closeness = 20000;
535 xpm_err = XpmReadFileToPixmap(display,window,filename,
536 &pix[pos],&shapemask,&xpm_att[pos]);
541 fprintf(stderr,"Cannot open Xpm file '%s' !\n",filename);
545 fprintf(stderr,"Invalid Xpm file '%s'!\n",filename);
549 fprintf(stderr,"Not enough memory for Xpm file '%s'!\n",filename);
553 fprintf(stderr,"Can't get colors for Xpm file '%s'!\n",filename);
562 printf("XPM LOADING %s IN %.2f SECONDS\n",
563 filename,(float)(count2-count1)/100.0);
568 gif_err = Read_GIF_to_Pixmaps(display, window, filename,
569 &pix[pos], &clipmask[pos]);
576 fprintf(stderr,"Cannot open GIF file '%s' !\n",filename);
580 fprintf(stderr,"Cannot read GIF file '%s' !\n",filename);
583 case GIF_FileInvalid:
584 fprintf(stderr,"Invalid GIF file '%s'!\n",filename);
588 fprintf(stderr,"Not enough memory for GIF file '%s'!\n",filename);
591 case GIF_ColorFailed:
592 fprintf(stderr,"Can't get colors for GIF file '%s'!\n",filename);
601 printf("GIF LOADING %s IN %.2f SECONDS\n",
602 filename,(float)(count2-count1)/100.0);
609 fprintf(stderr, "%s: cannot get graphics for '%s'.\n",
610 progname, pic->picture_filename);
616 /* zugehörige Maske laden (wenn vorhanden) */
617 if (pic->picture_with_mask)
620 #ifdef XPM_INCLUDE_FILE
622 sprintf(basefilename,"%s%s",pic->picture_filename,picturemask_ext);
623 DrawInitText(basefilename,150,FC_YELLOW);
624 sprintf(filename,"%s/%s",GFX_PATH,basefilename);
630 xbm_err = XReadBitmapFile(display,window,filename,
631 &width,&height,&clipmask[pos],&hot_x,&hot_y);
637 case BitmapOpenFailed:
638 fprintf(stderr,"Bitmap file open failed on '%s' !\n",filename);
642 case BitmapFileInvalid:
643 fprintf(stderr,"Bitmap file invalid: '%s' !\n",filename);
648 fprintf(stderr,"No memory for file '%s' !\n",filename);
658 printf("XBM LOADING %s IN %.2f SECONDS\n",
659 filename,(float)(count2-count1)/100.0);
666 fprintf(stderr, "%s: cannot get clipmask for '%s'.\n",
667 progname, pic->picture_filename);
674 void InitElementProperties()
678 static int ep_amoebalive[] =
685 static int ep_amoebalive_num = sizeof(ep_amoebalive)/sizeof(int);
687 static int ep_amoeboid[] =
695 static int ep_amoeboid_num = sizeof(ep_amoeboid)/sizeof(int);
697 static int ep_schluessel[] =
704 static int ep_schluessel_num = sizeof(ep_schluessel)/sizeof(int);
706 static int ep_pforte[] =
717 static int ep_pforte_num = sizeof(ep_pforte)/sizeof(int);
719 static int ep_solid[] =
749 static int ep_solid_num = sizeof(ep_solid)/sizeof(int);
751 static int ep_massiv[] =
769 static int ep_massiv_num = sizeof(ep_massiv)/sizeof(int);
771 static int ep_slippery[] =
793 static int ep_slippery_num = sizeof(ep_slippery)/sizeof(int);
795 static int ep_enemy[] =
806 static int ep_enemy_num = sizeof(ep_enemy)/sizeof(int);
808 static int ep_mauer[] =
827 static int ep_mauer_num = sizeof(ep_mauer)/sizeof(int);
829 static int ep_can_fall[] =
847 static int ep_can_fall_num = sizeof(ep_can_fall)/sizeof(int);
849 static int ep_can_smash[] =
868 static int ep_can_smash_num = sizeof(ep_can_smash)/sizeof(int);
870 static int ep_can_change[] =
880 static int ep_can_change_num = sizeof(ep_can_change)/sizeof(int);
882 static int ep_can_move[] =
898 static int ep_can_move_num = sizeof(ep_can_move)/sizeof(int);
900 static int ep_could_move[] =
923 static int ep_could_move_num = sizeof(ep_could_move)/sizeof(int);
925 static int ep_dont_touch[] =
932 static int ep_dont_touch_num = sizeof(ep_dont_touch)/sizeof(int);
934 static int ep_dont_go_to[] =
947 static int ep_dont_go_to_num = sizeof(ep_dont_go_to)/sizeof(int);
949 static int ep_mampf2[] =
972 static int ep_mampf2_num = sizeof(ep_mampf2)/sizeof(int);
974 static int ep_bd_element[] =
999 static int ep_bd_element_num = sizeof(ep_bd_element)/sizeof(int);
1001 static int ep_sb_element[] =
1006 EL_SOKOBAN_FELD_LEER,
1007 EL_SOKOBAN_FELD_VOLL,
1010 static int ep_sb_element_num = sizeof(ep_sb_element)/sizeof(int);
1012 static int ep_gem[] =
1021 static int ep_gem_num = sizeof(ep_gem)/sizeof(int);
1023 static int ep_inactive[] =
1059 EL_SOKOBAN_FELD_LEER,
1060 EL_SOKOBAN_FELD_VOLL,
1073 static int ep_inactive_num = sizeof(ep_inactive)/sizeof(int);
1075 static int ep_explosive[] =
1091 static int ep_explosive_num = sizeof(ep_explosive)/sizeof(int);
1093 static int ep_mampf3[] =
1102 static int ep_mampf3_num = sizeof(ep_mampf3)/sizeof(int);
1104 static int ep_pushable[] =
1110 EL_SOKOBAN_FELD_VOLL,
1114 static int ep_pushable_num = sizeof(ep_pushable)/sizeof(int);
1116 static long ep_bit[] =
1143 static int *ep_array[] =
1170 static int *ep_num[] =
1197 static int num_properties = sizeof(ep_num)/sizeof(int *);
1199 for(i=0;i<MAX_ELEMENTS;i++)
1200 Elementeigenschaften[i] = 0;
1202 for(i=0;i<num_properties;i++)
1203 for(j=0;j<*(ep_num[i]);j++)
1204 Elementeigenschaften[(ep_array[i])[j]] |= ep_bit[i];
1205 for(i=EL_CHAR_START;i<EL_CHAR_END;i++)
1206 Elementeigenschaften[i] |= (EP_BIT_CHAR | EP_BIT_INACTIVE);
1213 if (sound_process_id)
1216 kill(sound_process_id, SIGTERM);
1217 FreeSounds(NUM_SOUNDS);
1220 for(i=0;i<NUM_PIXMAPS;i++)
1224 #ifdef XPM_INCLUDE_FILE
1225 if (i<NUM_PICTURES) /* XPM pictures */
1227 XFreeColors(display,DefaultColormap(display,screen),
1228 xpm_att[i].pixels,xpm_att[i].npixels,0);
1229 XpmFreeAttributes(&xpm_att[i]);
1232 XFreePixmap(display,pix[i]);
1235 XFreePixmap(display,clipmask[i]);
1237 XFreeGC(display, clip_gc[i]);
1241 XFreeGC(display, gc);
1245 XAutoRepeatOn(display);
1246 XCloseDisplay(display);