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 ***********************************************************/
17 #if defined(TARGET_X11)
19 static void X11InitDisplay();
20 static DrawWindow X11InitWindow();
22 inline void X11InitVideoDisplay(void)
24 /* initialize X11 video */
27 /* set default X11 depth */
28 video.default_depth = XDefaultDepth(display, screen);
31 inline void X11InitVideoBuffer(DrawBuffer *backbuffer, DrawWindow *window)
33 *window = X11InitWindow();
35 XMapWindow(display, *window);
38 /* create additional (off-screen) buffer for double-buffering */
39 *backbuffer = CreateBitmap(video.width, video.height, video.depth);
42 static void X11InitDisplay()
44 #if !defined(PLATFORM_MSDOS)
45 XVisualInfo vinfo_template, *vinfo;
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));
55 screen = DefaultScreen(display);
56 visual = DefaultVisual(display, screen);
57 depth = DefaultDepth(display, screen);
58 cmap = DefaultColormap(display, screen);
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)))
68 visual = vinfo->visual;
72 /* got appropriate visual? */
75 printf("Sorry, displays with less than 8 bits per pixel not supported.\n");
78 else if ((depth ==8 && visual->class != PseudoColor) ||
79 (depth > 8 && visual->class != TrueColor &&
80 visual->class != DirectColor))
82 printf("Sorry, cannot get appropriate visual.\n");
85 #endif /* !PLATFORM_MSDOS */
88 static DrawWindow X11InitWindow()
91 unsigned int border_width = 4;
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;
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;
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;
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 window = XCreateSimpleWindow(display, RootWindow(display, screen),
131 win_xpos, win_ypos, width, height, border_width,
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);
142 sprintf(icon_filename, "%s/%s/%s",
143 options.ro_base_directory, GRAPHICS_DIRECTORY,
144 icon_pic.picture_filename);
146 XReadBitmapFile(display, window, program.x11_icon_filename,
147 &icon_width, &icon_height,
148 &icon_pixmap, &icon_hot_x, &icon_hot_y);
150 Error(ERR_EXIT, "cannot read icon bitmap file '%s'", icon_filename);
153 sprintf(icon_filename, "%s/%s/%s",
154 options.ro_base_directory, GRAPHICS_DIRECTORY,
155 icon_pic.picturemask_filename);
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);
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;
167 if (win_xpos || win_ypos)
169 size_hints.x = win_xpos;
170 size_hints.y = win_ypos;
171 size_hints.flags |= PPosition;
174 if (!XStringListToTextProperty(&window_name, 1, &windowName))
175 Error(ERR_EXIT, "structure allocation for windowName failed");
177 if (!XStringListToTextProperty(&icon_name, 1, &iconName))
178 Error(ERR_EXIT, "structure allocation for iconName failed");
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;
186 class_hints.res_name = program.command_name;
187 class_hints.res_class = program.program_title;
189 XSetWMProperties(display, window, &windowName, &iconName,
190 NULL, 0, &size_hints, &wm_hints,
193 XFree(windowName.value);
194 XFree(iconName.value);
196 /* Select event types wanted */
198 ExposureMask | StructureNotifyMask | FocusChangeMask |
199 ButtonPressMask | ButtonReleaseMask | PointerMotionMask |
200 PointerMotionHintMask | KeyPressMask | KeyReleaseMask;
202 XSelectInput(display, window, window_event_mask);
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);
215 #endif /* TARGET_X11 */