4f0a25e4b5244c53ceebb70d8f88a9f18faf6e72
[rocksndiamonds.git] / src / libgame / x11.c
1 /***********************************************************
2 *  Rocks'n'Diamonds -- McDuffin Strikes Back!              *
3 *----------------------------------------------------------*
4 *  ©1995 Artsoft Development                               *
5 *        Holger Schemel                                    *
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 *----------------------------------------------------------*
12 *  x11.c                                                   *
13 ***********************************************************/
14
15 #include "libgame.h"
16
17 #if defined(TARGET_X11)
18
19 static void X11InitDisplay();
20 static DrawWindow X11InitWindow();
21
22 inline void X11InitVideoDisplay(void)
23 {
24   /* initialize X11 video */
25   X11InitDisplay();
26
27   /* set default X11 depth */
28   video.default_depth = XDefaultDepth(display, screen);
29 }
30
31 inline void X11InitVideoBuffer(DrawBuffer *backbuffer, DrawWindow *window)
32 {
33   *window = X11InitWindow();
34
35   XMapWindow(display, *window);
36   FlushDisplay();
37
38   /* create additional (off-screen) buffer for double-buffering */
39   *backbuffer = CreateBitmap(video.width, video.height, video.depth);
40 }
41
42 static void X11InitDisplay()
43 {
44 #if !defined(PLATFORM_MSDOS)
45   XVisualInfo vinfo_template, *vinfo;
46   int num_visuals;
47 #endif
48   unsigned int depth;
49
50   /* connect to X server */
51   if (!(display = XOpenDisplay(options.display_name)))
52     Error(ERR_EXIT, "cannot connect to X server %s",
53           XDisplayName(options.display_name));
54
55   screen = DefaultScreen(display);
56   visual = DefaultVisual(display, screen);
57   depth  = DefaultDepth(display, screen);
58   cmap   = DefaultColormap(display, screen);
59
60 #if !defined(PLATFORM_MSDOS)
61   /* look for good enough visual */
62   vinfo_template.screen = screen;
63   vinfo_template.class = (depth == 8 ? PseudoColor : TrueColor);
64   vinfo_template.depth = depth;
65   if ((vinfo = XGetVisualInfo(display, VisualScreenMask | VisualClassMask |
66                               VisualDepthMask, &vinfo_template, &num_visuals)))
67   {
68     visual = vinfo->visual;
69     XFree((void *)vinfo);
70   }
71
72   /* got appropriate visual? */
73   if (depth < 8)
74   {
75     printf("Sorry, displays with less than 8 bits per pixel not supported.\n");
76     exit(-1);
77   }
78   else if ((depth ==8 && visual->class != PseudoColor) ||
79            (depth > 8 && visual->class != TrueColor &&
80             visual->class != DirectColor))
81   {
82     printf("Sorry, cannot get appropriate visual.\n");
83     exit(-1);
84   }
85 #endif /* !PLATFORM_MSDOS */
86 }
87
88 static DrawWindow X11InitWindow()
89 {
90   Window window;
91   unsigned int border_width = 4;
92   XGCValues gc_values;
93   unsigned long gc_valuemask;
94 #if !defined(PLATFORM_MSDOS)
95   XTextProperty windowName, iconName;
96   Pixmap icon_pixmap, iconmask_pixmap;
97   unsigned int icon_width, icon_height;
98   int icon_hot_x, icon_hot_y;
99   char icon_filename[256];
100   XSizeHints size_hints;
101   XWMHints wm_hints;
102   XClassHint class_hints;
103   char *window_name = program.window_title;
104   char *icon_name = program.window_title;
105   long window_event_mask;
106   Atom proto_atom = None, delete_atom = None;
107 #endif
108   int screen_width, screen_height;
109   int win_xpos, win_ypos;
110   unsigned long pen_fg = WhitePixel(display,screen);
111   unsigned long pen_bg = BlackPixel(display,screen);
112   const int width = video.width, height = video.height;
113
114 #if 0
115 #if !defined(PLATFORM_MSDOS)
116   static struct IconFileInfo icon_pic =
117   {
118     "rocks_icon.xbm",
119     "rocks_iconmask.xbm"
120   };
121 #endif
122 #endif
123
124   screen_width = XDisplayWidth(display, screen);
125   screen_height = XDisplayHeight(display, screen);
126
127   win_xpos = (screen_width - width) / 2;
128   win_ypos = (screen_height - height) / 2;
129
130   window = XCreateSimpleWindow(display, RootWindow(display, screen),
131                                win_xpos, win_ypos, width, height, border_width,
132                                pen_fg, pen_bg);
133
134 #if !defined(PLATFORM_MSDOS)
135   proto_atom = XInternAtom(display, "WM_PROTOCOLS", FALSE);
136   delete_atom = XInternAtom(display, "WM_DELETE_WINDOW", FALSE);
137   if ((proto_atom != None) && (delete_atom != None))
138     XChangeProperty(display, window, proto_atom, XA_ATOM, 32,
139                     PropModePrepend, (unsigned char *) &delete_atom, 1);
140
141 #if 0
142   sprintf(icon_filename, "%s/%s/%s",
143           options.ro_base_directory, GRAPHICS_DIRECTORY,
144           icon_pic.picture_filename);
145 #endif
146   XReadBitmapFile(display, window, program.x11_icon_filename,
147                   &icon_width, &icon_height,
148                   &icon_pixmap, &icon_hot_x, &icon_hot_y);
149   if (!icon_pixmap)
150     Error(ERR_EXIT, "cannot read icon bitmap file '%s'", icon_filename);
151
152 #if 0
153   sprintf(icon_filename, "%s/%s/%s",
154           options.ro_base_directory, GRAPHICS_DIRECTORY,
155           icon_pic.picturemask_filename);
156 #endif
157   XReadBitmapFile(display, window, program.x11_iconmask_filename,
158                   &icon_width, &icon_height,
159                   &iconmask_pixmap, &icon_hot_x, &icon_hot_y);
160   if (!iconmask_pixmap)
161     Error(ERR_EXIT, "cannot read icon bitmap file '%s'", icon_filename);
162
163   size_hints.width  = size_hints.min_width  = size_hints.max_width  = width;
164   size_hints.height = size_hints.min_height = size_hints.max_height = height;
165   size_hints.flags = PSize | PMinSize | PMaxSize;
166
167   if (win_xpos || win_ypos)
168   {
169     size_hints.x = win_xpos;
170     size_hints.y = win_ypos;
171     size_hints.flags |= PPosition;
172   }
173
174   if (!XStringListToTextProperty(&window_name, 1, &windowName))
175     Error(ERR_EXIT, "structure allocation for windowName failed");
176
177   if (!XStringListToTextProperty(&icon_name, 1, &iconName))
178     Error(ERR_EXIT, "structure allocation for iconName failed");
179
180   wm_hints.initial_state = NormalState;
181   wm_hints.input = True;
182   wm_hints.icon_pixmap = icon_pixmap;
183   wm_hints.icon_mask = iconmask_pixmap;
184   wm_hints.flags = StateHint | IconPixmapHint | IconMaskHint | InputHint;
185
186   class_hints.res_name = program.command_name;
187   class_hints.res_class = program.program_title;
188
189   XSetWMProperties(display, window, &windowName, &iconName, 
190                    NULL, 0, &size_hints, &wm_hints, 
191                    &class_hints);
192
193   XFree(windowName.value);
194   XFree(iconName.value);
195
196   /* Select event types wanted */
197   window_event_mask =
198     ExposureMask | StructureNotifyMask | FocusChangeMask |
199     ButtonPressMask | ButtonReleaseMask | PointerMotionMask |
200     PointerMotionHintMask | KeyPressMask | KeyReleaseMask;
201
202   XSelectInput(display, window, window_event_mask);
203 #endif
204
205   /* create GC for drawing with window depth and background color (black) */
206   gc_values.graphics_exposures = False;
207   gc_values.foreground = pen_bg;
208   gc_values.background = pen_bg;
209   gc_valuemask = GCGraphicsExposures | GCForeground | GCBackground;
210   gc = XCreateGC(display, window, gc_valuemask, &gc_values);
211
212   return window;
213 }
214
215 #endif /* TARGET_X11 */