+ new_window->gc =
+ XCreateGC(display, new_window->drawable, gc_valuemask, &gc_values);
+
+ /* create GCs for line drawing (black and white) */
+ for(i=0; i<2; i++)
+ {
+ gc_values.graphics_exposures = False;
+ gc_values.foreground = (i ? pen_fg : pen_bg);
+ gc_values.background = pen_bg;
+ gc_values.line_width = 4;
+ gc_values.line_style = LineSolid;
+ gc_values.cap_style = CapRound;
+ gc_values.join_style = JoinRound;
+
+ gc_valuemask = GCGraphicsExposures | GCForeground | GCBackground |
+ GCLineWidth | GCLineStyle | GCCapStyle | GCJoinStyle;
+ new_window->line_gc[i] =
+ XCreateGC(display, new_window->drawable, gc_valuemask, &gc_values);
+ }
+
+ return new_window;
+}
+
+static void SetImageDimensions(Bitmap *bitmap)
+{
+#if defined(TARGET_ALLEGRO)
+ BITMAP *allegro_bitmap = (BITMAP *)(bitmap->drawable);
+
+ bitmap->width = allegro_bitmap->w;
+ bitmap->height = allegro_bitmap->h;
+#else
+ Window root;
+ int x, y;
+ unsigned int border_width, depth;
+
+ XGetGeometry(display, bitmap->drawable, &root, &x, &y,
+ &bitmap->width, &bitmap->height, &border_width, &depth);
+#endif
+}
+
+Bitmap *X11LoadImage(char *filename)
+{
+ Bitmap *new_bitmap = CreateBitmapStruct();
+ char *error = "Read_PCX_to_Pixmap(): %s '%s'";
+ int pcx_err;
+
+#if defined(PLATFORM_MSDOS)
+ rest(100);
+#endif
+
+ pcx_err = Read_PCX_to_Pixmap(display, window->drawable, window->gc, filename,
+ &new_bitmap->drawable, &new_bitmap->clip_mask);
+ switch(pcx_err)
+ {
+ case PCX_Success:
+ break;
+ case PCX_OpenFailed:
+ SetError(error, "cannot open PCX file", filename);
+ return NULL;
+ case PCX_ReadFailed:
+ SetError(error, "cannot read PCX file", filename);
+ return NULL;
+ case PCX_FileInvalid:
+ SetError(error, "invalid PCX file", filename);
+ return NULL;
+ case PCX_NoMemory:
+ SetError(error, "not enough memory for PCX file", filename);
+ return NULL;
+ case PCX_ColorFailed:
+ SetError(error, "cannot get colors for PCX file", filename);
+ return NULL;
+ case PCX_OtherError:
+ /* this should already have called SetError() */
+ return NULL;
+ default:
+ SetError(error, "unknown error reading PCX file", filename);
+ return NULL;
+ }
+
+ if (!new_bitmap->drawable)
+ {
+ SetError("X11LoadImage(): cannot get graphics for '%s'", filename);
+ return NULL;
+ }
+
+ if (!new_bitmap->clip_mask)
+ {
+ SetError("X11LoadImage(): cannot get clipmask for '%s'", filename);
+ return NULL;
+ }
+
+ /* set GraphicContext inheritated from Window */
+ new_bitmap->gc = window->gc;
+
+ /* set image width and height */
+ SetImageDimensions(new_bitmap);