1 /***********************************************************
2 * Artsoft Retro-Game Library *
3 *----------------------------------------------------------*
4 * (c) 1994-2002 Artsoft Entertainment *
6 * Detmolder Strasse 189 *
9 * e-mail: info@artsoft.org *
10 *----------------------------------------------------------*
12 ***********************************************************/
20 #if defined(TARGET_X11)
22 static void X11InitDisplay();
23 static DrawWindow *X11InitWindow();
25 inline void X11InitVideoDisplay(void)
27 /* initialize X11 video */
30 /* set default X11 depth */
31 video.default_depth = XDefaultDepth(display, screen);
34 inline void X11InitVideoBuffer(DrawBuffer **backbuffer, DrawWindow **window)
36 *window = X11InitWindow();
38 XMapWindow(display, (*window)->drawable);
41 /* create additional (off-screen) buffer for double-buffering */
42 *backbuffer = CreateBitmap(video.width, video.height, video.depth);
45 static void X11InitDisplay()
47 #if !defined(PLATFORM_MSDOS)
48 XVisualInfo vinfo_template, *vinfo;
53 /* connect to X server */
54 if (!(display = XOpenDisplay(options.display_name)))
55 Error(ERR_EXIT, "cannot connect to X server %s",
56 XDisplayName(options.display_name));
58 screen = DefaultScreen(display);
59 visual = DefaultVisual(display, screen);
60 depth = DefaultDepth(display, screen);
61 cmap = DefaultColormap(display, screen);
63 #if !defined(PLATFORM_MSDOS)
64 /* look for good enough visual */
65 vinfo_template.screen = screen;
66 vinfo_template.class = (depth == 8 ? PseudoColor : TrueColor);
67 vinfo_template.depth = depth;
68 if ((vinfo = XGetVisualInfo(display, VisualScreenMask | VisualClassMask |
69 VisualDepthMask, &vinfo_template, &num_visuals)))
71 visual = vinfo->visual;
75 /* got appropriate visual? */
77 Error(ERR_EXIT, "X11 display not supported (less than 8 bits per pixel)");
78 else if ((depth ==8 && visual->class != PseudoColor) ||
79 (depth > 8 && visual->class != TrueColor &&
80 visual->class != DirectColor))
81 Error(ERR_EXIT, "X11 display not supported (inappropriate visual)");
82 #endif /* !PLATFORM_MSDOS */
85 static DrawWindow *X11InitWindow()
87 DrawWindow *new_window = CreateBitmapStruct();
88 unsigned int border_width = 4;
90 unsigned long gc_valuemask;
91 #if !defined(PLATFORM_MSDOS)
92 XTextProperty windowName, iconName;
93 Pixmap icon_pixmap, iconmask_pixmap;
94 unsigned int icon_width, icon_height;
95 int icon_hot_x, icon_hot_y;
97 char icon_filename[256];
99 XSizeHints size_hints;
101 XClassHint class_hints;
102 char *window_name = program.window_title;
103 char *icon_name = program.window_title;
104 long window_event_mask;
105 Atom proto_atom = None, delete_atom = None;
107 int screen_width, screen_height;
108 int win_xpos, win_ypos;
109 unsigned long pen_fg = WhitePixel(display,screen);
110 unsigned long pen_bg = BlackPixel(display,screen);
111 const int width = video.width, height = video.height;
115 #if !defined(PLATFORM_MSDOS)
116 static struct IconFileInfo icon_pic =
124 screen_width = XDisplayWidth(display, screen);
125 screen_height = XDisplayHeight(display, screen);
127 win_xpos = (screen_width - width) / 2;
128 win_ypos = (screen_height - height) / 2;
130 new_window->drawable = XCreateSimpleWindow(display,
131 RootWindow(display, screen),
133 width, height, border_width,
136 #if !defined(PLATFORM_MSDOS)
137 proto_atom = XInternAtom(display, "WM_PROTOCOLS", FALSE);
138 delete_atom = XInternAtom(display, "WM_DELETE_WINDOW", FALSE);
139 if ((proto_atom != None) && (delete_atom != None))
140 XChangeProperty(display, new_window->drawable, proto_atom, XA_ATOM, 32,
141 PropModePrepend, (unsigned char *) &delete_atom, 1);
144 sprintf(icon_filename, "%s/%s", options.graphics_directory,
145 icon_pic.picture_filename);
147 if (XReadBitmapFile(display, new_window->drawable,
148 getCustomImageFilename(program.x11_icon_filename),
149 &icon_width, &icon_height, &icon_pixmap,
150 &icon_hot_x, &icon_hot_y) != BitmapSuccess)
151 Error(ERR_EXIT, "cannot read icon bitmap file '%s'",
152 program.x11_icon_filename);
155 sprintf(icon_filename, "%s/%s", options.graphics_directory,
156 icon_pic.picturemask_filename);
158 if (XReadBitmapFile(display, new_window->drawable,
159 getCustomImageFilename(program.x11_iconmask_filename),
160 &icon_width, &icon_height, &iconmask_pixmap,
161 &icon_hot_x, &icon_hot_y) != BitmapSuccess)
162 Error(ERR_EXIT, "cannot read icon bitmap file '%s'",
163 program.x11_iconmask_filename);
165 size_hints.width = size_hints.min_width = size_hints.max_width = width;
166 size_hints.height = size_hints.min_height = size_hints.max_height = height;
167 size_hints.flags = PSize | PMinSize | PMaxSize;
169 if (win_xpos || win_ypos)
171 size_hints.x = win_xpos;
172 size_hints.y = win_ypos;
173 size_hints.flags |= PPosition;
176 if (!XStringListToTextProperty(&window_name, 1, &windowName))
177 Error(ERR_EXIT, "structure allocation for windowName failed");
179 if (!XStringListToTextProperty(&icon_name, 1, &iconName))
180 Error(ERR_EXIT, "structure allocation for iconName failed");
182 wm_hints.initial_state = NormalState;
183 wm_hints.input = True;
184 wm_hints.icon_pixmap = icon_pixmap;
185 wm_hints.icon_mask = iconmask_pixmap;
186 wm_hints.flags = StateHint | IconPixmapHint | IconMaskHint | InputHint;
188 class_hints.res_name = program.command_basename;
189 class_hints.res_class = program.program_title;
191 XSetWMProperties(display, new_window->drawable, &windowName, &iconName,
192 NULL, 0, &size_hints, &wm_hints,
195 XFree(windowName.value);
196 XFree(iconName.value);
198 /* Select event types wanted */
200 ExposureMask | StructureNotifyMask | FocusChangeMask |
201 ButtonPressMask | ButtonReleaseMask | PointerMotionMask |
202 KeyPressMask | KeyReleaseMask;
204 /* unwanted mouse motion events now get filtered out by filter function */
205 /* window_event_mask |= PointerMotionHintMask; */
207 XSelectInput(display, new_window->drawable, window_event_mask);
210 /* create GC for drawing with window depth and background color (black) */
211 gc_values.graphics_exposures = False;
212 gc_values.foreground = pen_bg;
213 gc_values.background = pen_bg;
214 gc_valuemask = GCGraphicsExposures | GCForeground | GCBackground;
216 XCreateGC(display, new_window->drawable, gc_valuemask, &gc_values);
218 /* create GCs for line drawing (black and white) */
221 gc_values.graphics_exposures = False;
222 gc_values.foreground = (i ? pen_fg : pen_bg);
223 gc_values.background = pen_bg;
224 gc_values.line_width = 4;
225 gc_values.line_style = LineSolid;
226 gc_values.cap_style = CapRound;
227 gc_values.join_style = JoinRound;
229 gc_valuemask = GCGraphicsExposures | GCForeground | GCBackground |
230 GCLineWidth | GCLineStyle | GCCapStyle | GCJoinStyle;
231 new_window->line_gc[i] =
232 XCreateGC(display, new_window->drawable, gc_valuemask, &gc_values);
238 void X11ZoomBitmap(Bitmap *src_bitmap, Bitmap *dst_bitmap)
240 #if defined(TARGET_ALLEGRO)
241 AllegroZoomBitmap(src_bitmap->drawable, dst_bitmap->drawable,
242 src_bitmap->width, src_bitmap->height,
243 dst_bitmap->width, dst_bitmap->height);
245 ZoomPixmap(display, src_bitmap->gc,
246 src_bitmap->drawable, dst_bitmap->drawable,
247 src_bitmap->width, src_bitmap->height,
248 dst_bitmap->width, dst_bitmap->height);
252 static void SetImageDimensions(Bitmap *bitmap)
254 #if defined(TARGET_ALLEGRO)
255 BITMAP *allegro_bitmap = (BITMAP *)(bitmap->drawable);
257 bitmap->width = allegro_bitmap->w;
258 bitmap->height = allegro_bitmap->h;
262 unsigned int border_width, depth;
264 XGetGeometry(display, bitmap->drawable, &root, &x, &y,
265 &bitmap->width, &bitmap->height, &border_width, &depth);
269 Bitmap *X11LoadImage(char *filename)
271 Bitmap *new_bitmap = CreateBitmapStruct();
272 char *error = "Read_PCX_to_Pixmap(): %s '%s'";
274 XGCValues clip_gc_values;
275 unsigned long clip_gc_valuemask;
277 pcx_err = Read_PCX_to_Pixmap(display, window->drawable, window->gc, filename,
278 &new_bitmap->drawable, &new_bitmap->clip_mask);
284 SetError(error, "cannot open PCX file", filename);
287 SetError(error, "cannot read PCX file", filename);
289 case PCX_FileInvalid:
290 SetError(error, "invalid PCX file", filename);
293 SetError(error, "not enough memory for PCX file", filename);
295 case PCX_ColorFailed:
296 SetError(error, "cannot get colors for PCX file", filename);
299 /* this should already have called SetError() */
302 SetError(error, "unknown error reading PCX file", filename);
306 if (!new_bitmap->drawable)
308 SetError("X11LoadImage(): cannot get graphics for '%s'", filename);
312 if (!new_bitmap->clip_mask)
314 SetError("X11LoadImage(): cannot get clipmask for '%s'", filename);
318 clip_gc_values.graphics_exposures = False;
319 clip_gc_values.clip_mask = new_bitmap->clip_mask;
320 clip_gc_valuemask = GCGraphicsExposures | GCClipMask;
321 new_bitmap->stored_clip_gc = XCreateGC(display, window->drawable,
322 clip_gc_valuemask, &clip_gc_values);
324 /* set GraphicContext inheritated from Window */
325 new_bitmap->gc = window->gc;
327 /* set image width and height */
328 SetImageDimensions(new_bitmap);
333 inline void X11CreateBitmapContent(Bitmap *new_bitmap,
334 int width, int height, int depth)
338 if ((pixmap = XCreatePixmap(display, window->drawable, width, height, depth))
340 Error(ERR_EXIT, "cannot create pixmap");
342 new_bitmap->drawable = pixmap;
345 Error(ERR_EXIT, "Window GC needed for Bitmap -- create Window first");
347 new_bitmap->gc = window->gc;
349 new_bitmap->line_gc[0] = window->line_gc[0];
350 new_bitmap->line_gc[1] = window->line_gc[1];
353 inline void X11FreeBitmapPointers(Bitmap *bitmap)
355 /* The X11 version seems to have a memory leak here -- although
356 "XFreePixmap()" is called, the corresponding memory seems not
357 to be freed (according to "ps"). The SDL version apparently
358 does not have this problem. */
360 if (bitmap->drawable)
361 XFreePixmap(display, bitmap->drawable);
362 if (bitmap->clip_mask)
363 XFreePixmap(display, bitmap->clip_mask);
364 if (bitmap->stored_clip_gc)
365 XFreeGC(display, bitmap->stored_clip_gc);
366 /* the other GCs are only pointers to GCs used elsewhere */
367 bitmap->drawable = None;
368 bitmap->clip_mask = None;
369 bitmap->stored_clip_gc = None;
372 inline void X11CopyArea(Bitmap *src_bitmap, Bitmap *dst_bitmap,
373 int src_x, int src_y, int width, int height,
374 int dst_x, int dst_y, int mask_mode)
376 XCopyArea(display, src_bitmap->drawable, dst_bitmap->drawable,
377 (mask_mode == BLIT_MASKED ? src_bitmap->clip_gc : dst_bitmap->gc),
378 src_x, src_y, width, height, dst_x, dst_y);
381 inline void X11FillRectangle(Bitmap *bitmap, int x, int y,
382 int width, int height, Pixel color)
384 XSetForeground(display, bitmap->gc, color);
385 XFillRectangle(display, bitmap->drawable, bitmap->gc, x, y, width, height);
388 inline void X11DrawSimpleLine(Bitmap *bitmap, int from_x, int from_y,
389 int to_x, int to_y, Pixel color)
391 XSetForeground(display, bitmap->gc, color);
392 XDrawLine(display, bitmap->drawable, bitmap->gc, from_x, from_y, to_x, to_y);
395 inline Pixel X11GetPixel(Bitmap *bitmap, int x, int y)
400 pixel_image = XGetImage(display, bitmap->drawable, x, y, 1, 1,
402 pixel_value = XGetPixel(pixel_image, 0, 0);
404 XDestroyImage(pixel_image);
409 inline Pixel X11GetPixelFromRGB(unsigned int color_r, unsigned int color_g,
410 unsigned int color_b)
415 xcolor.flags = DoRed | DoGreen | DoBlue;
416 xcolor.red = (color_r << 8);
417 xcolor.green = (color_g << 8);
418 xcolor.blue = (color_b << 8);
420 XAllocColor(display, cmap, &xcolor);
421 pixel = xcolor.pixel;
426 /* ------------------------------------------------------------------------- */
427 /* mouse pointer functions */
428 /* ------------------------------------------------------------------------- */
430 #if defined(TARGET_X11_NATIVE)
432 static Cursor create_cursor(struct MouseCursorInfo *cursor_info)
434 Pixmap pixmap_data, pixmap_mask;
435 XColor color_fg, color_bg;
438 /* shape and mask are single plane pixmaps */
440 XCreatePixmapFromBitmapData(display, window->drawable, cursor_info->data,
441 cursor_info->width, cursor_info->height,
444 XCreatePixmapFromBitmapData(display, window->drawable, cursor_info->mask,
445 cursor_info->width, cursor_info->height,
448 XParseColor(display, cmap, "black", &color_fg);
449 XParseColor(display, cmap, "white", &color_bg);
451 cursor = XCreatePixmapCursor(display, pixmap_data, pixmap_mask,
452 &color_fg, &color_bg,
453 cursor_info->hot_x, cursor_info->hot_y);
458 void X11SetMouseCursor(struct MouseCursorInfo *cursor_info)
460 static struct MouseCursorInfo *last_cursor_info = NULL;
461 static Cursor cursor_default = None;
462 static Cursor cursor_current = None;
464 if (cursor_info != NULL && cursor_info != last_cursor_info)
466 cursor_current = create_cursor(cursor_info);
467 last_cursor_info = cursor_info;
470 XDefineCursor(display, window->drawable,
471 cursor_info ? cursor_current : cursor_default);
473 #endif /* TARGET_X11_NATIVE */
475 #endif /* TARGET_X11 */