7eaadf68aae617e52ae4c2e56aa9644e178f1f91
[rocksndiamonds.git] / src / libgame / system.c
1 /***********************************************************
2 * Artsoft Retro-Game Library                               *
3 *----------------------------------------------------------*
4 * (c) 1994-2001 Artsoft Entertainment                      *
5 *               Holger Schemel                             *
6 *               Detmolder Strasse 189                      *
7 *               33604 Bielefeld                            *
8 *               Germany                                    *
9 *               e-mail: info@artsoft.org                   *
10 *----------------------------------------------------------*
11 * system.c                                                 *
12 ***********************************************************/
13
14 #include <string.h>
15 #include <signal.h>
16
17 #include "platform.h"
18
19 #if defined(PLATFORM_MSDOS)
20 #include <fcntl.h>
21 #endif
22
23 #include "system.h"
24 #include "sound.h"
25 #include "setup.h"
26 #include "joystick.h"
27 #include "misc.h"
28
29
30 /* ========================================================================= */
31 /* exported variables                                                        */
32 /* ========================================================================= */
33
34 struct ProgramInfo      program;
35 struct OptionInfo       options;
36 struct VideoSystemInfo  video;
37 struct AudioSystemInfo  audio;
38 struct GfxInfo          gfx;
39 struct ArtworkInfo      artwork;
40 struct JoystickInfo     joystick;
41 struct SetupInfo        setup;
42
43 LevelDirTree           *leveldir_first = NULL;
44 LevelDirTree           *leveldir_current = NULL;
45 int                     level_nr;
46
47 Display                *display = NULL;
48 Visual                 *visual = NULL;
49 int                     screen = 0;
50 Colormap                cmap = None;
51
52 DrawWindow             *window = NULL;
53 DrawBuffer             *backbuffer = NULL;
54 DrawBuffer             *drawto = NULL;
55
56 int                     button_status = MB_NOT_PRESSED;
57 boolean                 motion_status = FALSE;
58
59 int                     redraw_mask = REDRAW_NONE;
60 int                     redraw_tiles = 0;
61
62 int                     FrameCounter = 0;
63
64
65 /* ========================================================================= */
66 /* init/close functions                                                      */
67 /* ========================================================================= */
68
69 void InitCommandName(char *argv0)
70 {
71   program.command_basename =
72     (strrchr(argv0, '/') ? strrchr(argv0, '/') + 1 : argv0);
73 }
74
75 void InitExitFunction(void (*exit_function)(int))
76 {
77   program.exit_function = exit_function;
78
79   /* set signal handlers to custom exit function */
80   signal(SIGINT, exit_function);
81   signal(SIGTERM, exit_function);
82
83 #if defined(TARGET_SDL)
84   /* set exit function to automatically cleanup SDL stuff after exit() */
85   atexit(SDL_Quit);
86 #endif
87 }
88
89 void InitPlatformDependantStuff(void)
90 {
91 #if defined(PLATFORM_MSDOS)
92   _fmode = O_BINARY;
93 #endif
94
95 #if !defined(PLATFORM_UNIX)
96   program.userdata_directory = "userdata";
97   initErrorFile();
98 #endif
99
100 #if defined(TARGET_SDL)
101   if (SDL_Init(SDL_INIT_EVENTTHREAD | SDL_INIT_NOPARACHUTE) < 0)
102     Error(ERR_EXIT, "SDL_Init() failed: %s", SDL_GetError());
103 #endif
104 }
105
106 void ClosePlatformDependantStuff(void)
107 {
108 #if !defined(PLATFORM_UNIX)
109   dumpErrorFile();
110 #endif
111 }
112
113 void InitProgramInfo(char *unix_userdata_directory, char *program_title,
114                      char *window_title, char *icon_title,
115                      char *x11_icon_filename, char *x11_iconmask_filename,
116                      char *msdos_pointer_filename,
117                      char *cookie_prefix, char *filename_prefix,
118                      int program_version)
119 {
120 #if defined(PLATFORM_UNIX)
121   program.userdata_directory = unix_userdata_directory;
122 #else
123   program.userdata_directory = "userdata";
124 #endif
125
126   program.program_title = program_title;
127   program.window_title = window_title;
128   program.icon_title = icon_title;
129   program.x11_icon_filename = x11_icon_filename;
130   program.x11_iconmask_filename = x11_iconmask_filename;
131   program.msdos_pointer_filename = msdos_pointer_filename;
132
133   program.cookie_prefix = cookie_prefix;
134   program.filename_prefix = filename_prefix;
135
136   program.version_major = VERSION_MAJOR(program_version);
137   program.version_minor = VERSION_MINOR(program_version);
138   program.version_patch = VERSION_PATCH(program_version);
139 }
140
141 void InitGfxFieldInfo(int sx, int sy, int sxsize, int sysize,
142                       int real_sx, int real_sy,
143                       int full_sxsize, int full_sysize)
144 {
145   gfx.sx = sx;
146   gfx.sy = sy;
147   gfx.sxsize = sxsize;
148   gfx.sysize = sysize;
149   gfx.real_sx = real_sx;
150   gfx.real_sy = real_sy;
151   gfx.full_sxsize = full_sxsize;
152   gfx.full_sysize = full_sysize;
153
154   SetDrawDeactivationMask(REDRAW_NONE);         /* do not deactivate drawing */
155 }
156
157 void InitGfxDoor1Info(int dx, int dy, int dxsize, int dysize)
158 {
159   gfx.dx = dx;
160   gfx.dy = dy;
161   gfx.dxsize = dxsize;
162   gfx.dysize = dysize;
163 }
164
165 void InitGfxDoor2Info(int vx, int vy, int vxsize, int vysize)
166 {
167   gfx.vx = vx;
168   gfx.vy = vy;
169   gfx.vxsize = vxsize;
170   gfx.vysize = vysize;
171 }
172
173 void InitGfxScrollbufferInfo(int scrollbuffer_width, int scrollbuffer_height)
174 {
175   /* currently only used by MSDOS code to alloc VRAM buffer, if available */
176   gfx.scrollbuffer_width = scrollbuffer_width;
177   gfx.scrollbuffer_height = scrollbuffer_height;
178 }
179
180 void SetDrawDeactivationMask(int draw_deactivation_mask)
181 {
182   gfx.draw_deactivation_mask = draw_deactivation_mask;
183 }
184
185
186 /* ========================================================================= */
187 /* video functions                                                           */
188 /* ========================================================================= */
189
190 inline static int GetRealDepth(int depth)
191 {
192   return (depth == DEFAULT_DEPTH ? video.default_depth : depth);
193 }
194
195 inline void InitVideoDisplay(void)
196 {
197 #if defined(TARGET_SDL)
198   SDLInitVideoDisplay();
199 #else
200   X11InitVideoDisplay();
201 #endif
202 }
203
204 inline void CloseVideoDisplay(void)
205 {
206   KeyboardAutoRepeatOn();
207
208 #if defined(TARGET_SDL)
209   SDL_QuitSubSystem(SDL_INIT_VIDEO);
210 #else
211
212   if (display)
213     XCloseDisplay(display);
214 #endif
215 }
216
217 inline void InitVideoBuffer(DrawBuffer **backbuffer, DrawWindow **window,
218                             int width, int height, int depth,
219                             boolean fullscreen)
220 {
221   video.width = width;
222   video.height = height;
223   video.depth = GetRealDepth(depth);
224   video.fullscreen_available = FULLSCREEN_STATUS;
225   video.fullscreen_enabled = FALSE;
226
227 #ifdef TARGET_SDL
228   SDLInitVideoBuffer(backbuffer, window, fullscreen);
229 #else
230   X11InitVideoBuffer(backbuffer, window);
231 #endif
232 }
233
234 inline Bitmap *CreateBitmapStruct(void)
235 {
236 #ifdef TARGET_SDL
237   return checked_calloc(sizeof(struct SDLSurfaceInfo));
238 #else
239   return checked_calloc(sizeof(struct X11DrawableInfo));
240 #endif
241 }
242
243 inline Bitmap *CreateBitmap(int width, int height, int depth)
244 {
245   Bitmap *new_bitmap = CreateBitmapStruct();
246   int real_depth = GetRealDepth(depth);
247
248 #ifdef TARGET_SDL
249   SDL_Surface *surface_tmp, *surface_native;
250
251   if ((surface_tmp = SDL_CreateRGBSurface(SURFACE_FLAGS, width, height,
252                                           real_depth, 0, 0, 0, 0))
253       == NULL)
254     Error(ERR_EXIT, "SDL_CreateRGBSurface() failed: %s", SDL_GetError());
255
256   if ((surface_native = SDL_DisplayFormat(surface_tmp)) == NULL)
257     Error(ERR_EXIT, "SDL_DisplayFormat() failed: %s", SDL_GetError());
258
259   SDL_FreeSurface(surface_tmp);
260
261   new_bitmap->surface = surface_native;
262 #else
263   Pixmap pixmap;
264
265   if ((pixmap = XCreatePixmap(display, window->drawable,
266                               width, height, real_depth))
267       == None)
268     Error(ERR_EXIT, "cannot create pixmap");
269
270   new_bitmap->drawable = pixmap;
271
272   if (window == NULL)
273     Error(ERR_EXIT, "Window GC needed for Bitmap -- create Window first");
274
275   new_bitmap->gc = window->gc;
276
277   new_bitmap->line_gc[0] = window->line_gc[0];
278   new_bitmap->line_gc[1] = window->line_gc[1];
279 #endif
280
281   return new_bitmap;
282 }
283
284 inline void FreeBitmap(Bitmap *bitmap)
285 {
286   if (bitmap == NULL)
287     return;
288
289 #ifdef TARGET_SDL
290   if (bitmap->surface)
291     SDL_FreeSurface(bitmap->surface);
292   if (bitmap->surface_masked)
293     SDL_FreeSurface(bitmap->surface_masked);
294 #else
295   if (bitmap->drawable)
296     XFreePixmap(display, bitmap->drawable);
297   if (bitmap->clip_mask)
298     XFreePixmap(display, bitmap->clip_mask);
299   if (bitmap->stored_clip_gc)
300     XFreeGC(display, bitmap->stored_clip_gc);
301 #endif
302
303   if (bitmap->source_filename)
304     free(bitmap->source_filename);
305
306   free(bitmap);
307 }
308
309 inline void CloseWindow(DrawWindow *window)
310 {
311 #ifdef TARGET_X11
312   if (window->drawable)
313   {
314     XUnmapWindow(display, window->drawable);
315     XDestroyWindow(display, window->drawable);
316   }
317   if (window->gc)
318     XFreeGC(display, window->gc);
319 #endif
320 }
321
322 inline boolean DrawingDeactivated(int x, int y, int width, int height)
323 {
324   if (gfx.draw_deactivation_mask != REDRAW_NONE)
325   {
326     if ((gfx.draw_deactivation_mask & REDRAW_FIELD) &&
327         x < gfx.sx + gfx.sxsize)
328       return TRUE;
329   }
330
331   return FALSE;
332 }
333
334 inline void BlitBitmap(Bitmap *src_bitmap, Bitmap *dst_bitmap,
335                        int src_x, int src_y,
336                        int width, int height,
337                        int dst_x, int dst_y)
338 {
339   if (DrawingDeactivated(dst_x, dst_y, width, height))
340     return;
341
342 #ifdef TARGET_SDL
343   SDLCopyArea(src_bitmap, dst_bitmap,
344               src_x, src_y, width, height, dst_x, dst_y, SDLCOPYAREA_OPAQUE);
345 #else
346   XCopyArea(display, src_bitmap->drawable, dst_bitmap->drawable,
347             dst_bitmap->gc, src_x, src_y, width, height, dst_x, dst_y);
348 #endif
349 }
350
351 inline void ClearRectangle(Bitmap *bitmap, int x, int y, int width, int height)
352 {
353   if (DrawingDeactivated(x, y, width, height))
354     return;
355
356 #ifdef TARGET_SDL
357   SDLFillRectangle(bitmap, x, y, width, height, 0x000000);
358 #else
359   XFillRectangle(display, bitmap->drawable, bitmap->gc, x, y, width, height);
360 #endif
361 }
362
363 #if 0
364 #ifndef TARGET_SDL
365 static GC last_clip_gc = 0;     /* needed for XCopyArea() through clip mask */
366 #endif
367 #endif
368
369 inline void SetClipMask(Bitmap *bitmap, GC clip_gc, Pixmap clip_pixmap)
370 {
371 #ifdef TARGET_X11
372   if (clip_gc)
373   {
374     bitmap->clip_gc = clip_gc;
375     XSetClipMask(display, bitmap->clip_gc, clip_pixmap);
376   }
377 #if 0
378   last_clip_gc = clip_gc;
379 #endif
380 #endif
381 }
382
383 inline void SetClipOrigin(Bitmap *bitmap, GC clip_gc, int clip_x, int clip_y)
384 {
385 #ifdef TARGET_X11
386   if (clip_gc)
387   {
388     bitmap->clip_gc = clip_gc;
389     XSetClipOrigin(display, bitmap->clip_gc, clip_x, clip_y);
390   }
391 #if 0
392   last_clip_gc = clip_gc;
393 #endif
394 #endif
395 }
396
397 inline void BlitBitmapMasked(Bitmap *src_bitmap, Bitmap *dst_bitmap,
398                              int src_x, int src_y,
399                              int width, int height,
400                              int dst_x, int dst_y)
401 {
402   if (DrawingDeactivated(dst_x, dst_y, width, height))
403     return;
404
405 #ifdef TARGET_SDL
406   SDLCopyArea(src_bitmap, dst_bitmap,
407               src_x, src_y, width, height, dst_x, dst_y, SDLCOPYAREA_MASKED);
408 #else
409   XCopyArea(display, src_bitmap->drawable, dst_bitmap->drawable,
410             src_bitmap->clip_gc, src_x, src_y, width, height, dst_x, dst_y);
411 #endif
412 }
413
414 inline void DrawSimpleWhiteLine(Bitmap *bitmap, int from_x, int from_y,
415                                 int to_x, int to_y)
416 {
417 #ifdef TARGET_SDL
418   SDLDrawSimpleLine(bitmap, from_x, from_y, to_x, to_y, 0xffffff);
419 #else
420   XSetForeground(display, bitmap->gc, WhitePixel(display, screen));
421   XDrawLine(display, bitmap->drawable, bitmap->gc, from_x, from_y, to_x, to_y);
422   XSetForeground(display, bitmap->gc, BlackPixel(display, screen));
423 #endif
424 }
425
426 #if !defined(TARGET_X11_NATIVE)
427 inline void DrawLine(Bitmap *bitmap, int from_x, int from_y,
428                      int to_x, int to_y, Pixel pixel, int line_width)
429 {
430   int x, y;
431
432   for (x=0; x<line_width; x++)
433   {
434     for (y=0; y<line_width; y++)
435     {
436       int dx = x - line_width / 2;
437       int dy = y - line_width / 2;
438
439       if ((x == 0 && y == 0) ||
440           (x == 0 && y == line_width - 1) ||
441           (x == line_width - 1 && y == 0) ||
442           (x == line_width - 1 && y == line_width - 1))
443         continue;
444
445 #if defined(TARGET_SDL)
446       SDLDrawLine(bitmap,
447                   from_x + dx, from_y + dy, to_x + dx, to_y + dy, pixel);
448 #elif defined(TARGET_ALLEGRO)
449       AllegroDrawLine(bitmap->drawable, from_x + dx, from_y + dy,
450                       to_x + dx, to_y + dy, pixel);
451 #endif
452     }
453   }
454 }
455 #endif
456
457 inline void DrawLines(Bitmap *bitmap, struct XY *points, int num_points,
458                       Pixel pixel)
459 {
460 #if !defined(TARGET_X11_NATIVE)
461   int line_width = 4;
462   int i;
463
464   for (i=0; i<num_points - 1; i++)
465     DrawLine(bitmap, points[i].x, points[i].y,
466              points[i + 1].x, points[i + 1].y, pixel, line_width);
467
468   /*
469   SDLDrawLines(bitmap->surface, points, num_points, pixel);
470   */
471 #else
472   XSetForeground(display, bitmap->line_gc[1], pixel);
473   XDrawLines(display, bitmap->drawable, bitmap->line_gc[1],
474              (XPoint *)points, num_points, CoordModeOrigin);
475   /*
476   XSetForeground(display, gc, BlackPixel(display, screen));
477   */
478 #endif
479 }
480
481 inline Pixel GetPixel(Bitmap *bitmap, int x, int y)
482 {
483 #if defined(TARGET_SDL)
484   return SDLGetPixel(bitmap, x, y);
485 #elif defined(TARGET_ALLEGRO)
486   return AllegroGetPixel(bitmap->drawable, x, y);
487 #else
488   unsigned long pixel_value;
489   XImage *pixel_image;
490
491   pixel_image = XGetImage(display, bitmap->drawable, x, y, 1, 1,
492                           AllPlanes, ZPixmap);
493   pixel_value = XGetPixel(pixel_image, 0, 0);
494
495   XDestroyImage(pixel_image);
496
497   return pixel_value;
498 #endif
499 }
500
501 inline Pixel GetPixelFromRGB(Bitmap *bitmap, unsigned int color_r,
502                              unsigned int color_g, unsigned int color_b)
503 {
504   Pixel pixel;
505
506 #if defined(TARGET_SDL)
507   pixel = SDL_MapRGB(bitmap->surface->format, color_r, color_g, color_b);
508 #elif defined(TARGET_ALLEGRO)
509   pixel = AllegroAllocColorCell(color_r << 8, color_g << 8, color_b << 8);
510 #elif defined(TARGET_X11_NATIVE)
511   XColor xcolor;
512
513   xcolor.flags = DoRed | DoGreen | DoBlue;
514   xcolor.red = (color_r << 8);
515   xcolor.green = (color_g << 8);
516   xcolor.blue = (color_b << 8);
517   XAllocColor(display, cmap, &xcolor);
518   pixel = xcolor.pixel;
519 #endif
520
521   return pixel;
522 }
523
524 inline Pixel GetPixelFromRGBcompact(Bitmap *bitmap, unsigned int color)
525 {
526   unsigned int color_r = (color >> 16) & 0xff;
527   unsigned int color_g = (color >>  8) & 0xff;
528   unsigned int color_b = (color >>  0) & 0xff;
529
530   return GetPixelFromRGB(bitmap, color_r, color_g, color_b);
531 }
532
533 /* execute all pending screen drawing operations */
534 inline void FlushDisplay(void)
535 {
536 #ifndef TARGET_SDL
537   XFlush(display);
538 #endif
539 }
540
541 /* execute and wait for all pending screen drawing operations */
542 inline void SyncDisplay(void)
543 {
544 #ifndef TARGET_SDL
545   XSync(display, FALSE);
546 #endif
547 }
548
549 inline void KeyboardAutoRepeatOn(void)
550 {
551 #ifdef TARGET_SDL
552   SDL_EnableKeyRepeat(SDL_DEFAULT_REPEAT_DELAY / 2,
553                       SDL_DEFAULT_REPEAT_INTERVAL / 2);
554   SDL_EnableUNICODE(1);
555 #else
556   if (display)
557     XAutoRepeatOn(display);
558 #endif
559 }
560
561 inline void KeyboardAutoRepeatOff(void)
562 {
563 #ifdef TARGET_SDL
564   SDL_EnableKeyRepeat(0, SDL_DEFAULT_REPEAT_INTERVAL);
565   SDL_EnableUNICODE(0);
566 #else
567   if (display)
568     XAutoRepeatOff(display);
569 #endif
570 }
571
572 inline boolean PointerInWindow(DrawWindow *window)
573 {
574 #ifdef TARGET_SDL
575   return TRUE;
576 #else
577   Window root, child;
578   int root_x, root_y;
579   unsigned int mask;
580   int win_x, win_y;
581
582   /* if XQueryPointer() returns False, the pointer
583      is not on the same screen as the specified window */
584   return XQueryPointer(display, window->drawable, &root, &child,
585                        &root_x, &root_y, &win_x, &win_y, &mask);
586 #endif
587 }
588
589 inline boolean SetVideoMode(boolean fullscreen)
590 {
591 #ifdef TARGET_SDL
592   return SDLSetVideoMode(&backbuffer, fullscreen);
593 #else
594   boolean success = TRUE;
595
596   if (fullscreen && video.fullscreen_available)
597   {
598     Error(ERR_WARN, "fullscreen not available in X11 version");
599
600     /* display error message only once */
601     video.fullscreen_available = FALSE;
602
603     success = FALSE;
604   }
605
606   return success;
607 #endif
608 }
609
610 inline boolean ChangeVideoModeIfNeeded(boolean fullscreen)
611 {
612 #ifdef TARGET_SDL
613   if ((fullscreen && !video.fullscreen_enabled && video.fullscreen_available)||
614       (!fullscreen && video.fullscreen_enabled))
615     fullscreen = SetVideoMode(fullscreen);
616 #endif
617
618   return fullscreen;
619 }
620
621 Bitmap *LoadImage(char *filename)
622 {
623   Bitmap *new_bitmap;
624
625 #if defined(TARGET_SDL)
626   new_bitmap = SDLLoadImage(filename);
627 #else
628   new_bitmap = X11LoadImage(filename);
629 #endif
630
631   new_bitmap->source_filename = getStringCopy(filename);
632
633   return new_bitmap;
634 }
635
636 Bitmap *LoadCustomImage(char *basename)
637 {
638   char *filename = getCustomImageFilename(basename);
639   Bitmap *new_bitmap;
640
641   if (filename == NULL)
642     Error(ERR_EXIT, "LoadCustomImage(): cannot find file '%s'", basename);
643
644   if ((new_bitmap = LoadImage(filename)) == NULL)
645     Error(ERR_EXIT, "LoadImage() failed: %s", GetError());
646
647   return new_bitmap;
648 }
649
650 void ReloadCustomImage(Bitmap **bitmap, char *basename)
651 {
652   char *filename = getCustomImageFilename(basename);
653   Bitmap *old_bitmap = *bitmap;
654   Bitmap *new_bitmap;
655
656   if (filename == NULL)         /* (should never happen) */
657   {
658     Error(ERR_WARN, "ReloadCustomImage(): cannot find file '%s'", basename);
659     return;
660   }
661
662   if (strcmp(filename, old_bitmap->source_filename) == 0)
663   {
664     /* The old and new image are the same (have the same filename and path).
665        This usually means that this image does not exist in this graphic set
666        and a fallback to the existing image is done. */
667
668     return;
669   }
670
671   if ((new_bitmap = LoadImage(filename)) == NULL)
672   {
673     Error(ERR_WARN, "LoadImage() failed: %s", GetError());
674     return;
675   }
676
677   if (old_bitmap->width != new_bitmap->width ||
678       old_bitmap->height != new_bitmap->height)
679   {
680     Error(ERR_WARN, "ReloadCustomImage: new image has wrong dimensions");
681     FreeBitmap(new_bitmap);
682     return;
683   }
684
685   /* copy filename for new image */
686   free(old_bitmap->source_filename);
687   old_bitmap->source_filename = getStringCopy(filename);
688
689   /* copy bitmap data for new image */
690   BlitBitmap(new_bitmap, old_bitmap, 0,0,
691              old_bitmap->width, old_bitmap->height, 0,0);
692
693   FreeBitmap(new_bitmap);
694 }
695
696
697 /* ========================================================================= */
698 /* audio functions                                                           */
699 /* ========================================================================= */
700
701 inline void OpenAudio(void)
702 {
703   /* always start with reliable default values */
704   audio.sound_available = FALSE;
705   audio.music_available = FALSE;
706   audio.loops_available = FALSE;
707   audio.mods_available = FALSE;
708   audio.sound_enabled = FALSE;
709
710   audio.soundserver_pipe[0] = audio.soundserver_pipe[1] = 0;
711   audio.soundserver_pid = 0;
712   audio.device_name = NULL;
713   audio.device_fd = 0;
714
715   audio.channels = 0;
716   audio.music_channel = 0;
717   audio.music_nr = 0;
718
719 #if defined(TARGET_SDL)
720   SDLOpenAudio();
721 #elif defined(PLATFORM_UNIX)
722   UnixOpenAudio();
723 #elif defined(PLATFORM_MSDOS)
724   MSDOSOpenAudio();
725 #endif
726 }
727
728 inline void CloseAudio(void)
729 {
730 #if defined(TARGET_SDL)
731   SDLCloseAudio();
732 #elif defined(PLATFORM_UNIX)
733   UnixCloseAudio();
734 #elif defined(PLATFORM_MSDOS)
735   MSDOSCloseAudio();
736 #endif
737
738   audio.sound_enabled = FALSE;
739 }
740
741 inline void SetAudioMode(boolean enabled)
742 {
743   if (!audio.sound_available)
744     return;
745
746   audio.sound_enabled = enabled;
747 }
748
749
750 /* ========================================================================= */
751 /* event functions                                                           */
752 /* ========================================================================= */
753
754 inline void InitEventFilter(EventFilter filter_function)
755 {
756 #ifdef TARGET_SDL
757   /* set event filter to filter out certain events */
758   SDL_SetEventFilter(filter_function);
759 #endif
760 }
761
762 inline boolean PendingEvent(void)
763 {
764 #ifdef TARGET_SDL
765   return (SDL_PollEvent(NULL) ? TRUE : FALSE);
766 #else
767   return (XPending(display) ? TRUE : FALSE);
768 #endif
769 }
770
771 inline void NextEvent(Event *event)
772 {
773 #ifdef TARGET_SDL
774   SDLNextEvent(event);
775 #else
776   XNextEvent(display, event);
777 #endif
778 }
779
780 inline Key GetEventKey(KeyEvent *event, boolean with_modifiers)
781 {
782 #ifdef TARGET_SDL
783 #if 0
784   printf("unicode == '%d', sym == '%d', mod == '0x%04x'\n",
785          (int)event->keysym.unicode,
786          (int)event->keysym.sym,
787          (int)SDL_GetModState());
788 #endif
789
790   if (with_modifiers && event->keysym.unicode != 0)
791     return event->keysym.unicode;
792   else
793     return event->keysym.sym;
794 #else
795 #if 0
796   printf("with modifiers == '0x%04x', without modifiers == '0x%04x'\n",
797          (int)XLookupKeysym(event, event->state),
798          (int)XLookupKeysym(event, 0));
799 #endif
800
801   if (with_modifiers)
802     return XLookupKeysym(event, event->state);
803   else
804     return XLookupKeysym(event, 0);
805 #endif
806 }
807
808 inline boolean CheckCloseWindowEvent(ClientMessageEvent *event)
809 {
810   if (event->type != EVENT_CLIENTMESSAGE)
811     return FALSE;
812
813 #if defined(TARGET_SDL)
814   return TRUE;          /* the only possible message here is SDL_QUIT */
815 #elif defined(PLATFORM_UNIX)
816   if ((event->window == window->drawable) &&
817       (event->data.l[0] == XInternAtom(display, "WM_DELETE_WINDOW", FALSE)))
818     return TRUE;
819 #endif
820
821   return FALSE;
822 }
823
824
825 /* ========================================================================= */
826 /* joystick functions                                                        */
827 /* ========================================================================= */
828
829 inline void InitJoysticks()
830 {
831   int i;
832
833 #ifdef NO_JOYSTICK
834   return;       /* joysticks generally deactivated by compile-time directive */
835 #endif
836
837   /* always start with reliable default values */
838   joystick.status = JOYSTICK_NOT_AVAILABLE;
839   for (i=0; i<MAX_PLAYERS; i++)
840     joystick.fd[i] = -1;                /* joystick device closed */
841
842 #if defined(TARGET_SDL)
843   SDLInitJoysticks();
844 #elif defined(PLATFORM_UNIX)
845   UnixInitJoysticks();
846 #elif defined(PLATFORM_MSDOS)
847   MSDOSInitJoysticks();
848 #endif
849 }
850
851 inline boolean ReadJoystick(int nr, int *x, int *y, boolean *b1, boolean *b2)
852 {
853 #if defined(TARGET_SDL)
854   return SDLReadJoystick(nr, x, y, b1, b2);
855 #elif defined(PLATFORM_UNIX)
856   return UnixReadJoystick(nr, x, y, b1, b2);
857 #elif defined(PLATFORM_MSDOS)
858   return MSDOSReadJoystick(nr, x, y, b1, b2);
859 #endif
860 }