Merge branch 'xa_branch'
[mesa.git] / src / glx / drisw_glx.c
1 /*
2 * Copyright 2008 George Sapountzis
3 *
4 * Permission is hereby granted, free of charge, to any person obtaining a
5 * copy of this software and associated documentation files (the "Software"),
6 * to deal in the Software without restriction, including without limitation
7 * the rights to use, copy, modify, merge, publish, distribute, sublicense,
8 * and/or sell copies of the Software, and to permit persons to whom the
9 * Software is furnished to do so, subject to the following conditions:
10 *
11 * The above copyright notice and this permission notice (including the next
12 * paragraph) shall be included in all copies or substantial portions of the
13 * Software.
14 *
15 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
16 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
17 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
18 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
19 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
20 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
21 * SOFTWARE.
22 */
23
24 #if defined(GLX_DIRECT_RENDERING) && !defined(GLX_USE_APPLEGL)
25
26 #include <X11/Xlib.h>
27 #include "glxclient.h"
28 #include <dlfcn.h>
29 #include "dri_common.h"
30
31 struct drisw_display
32 {
33 __GLXDRIdisplay base;
34 };
35
36 struct drisw_context
37 {
38 struct glx_context base;
39 __DRIcontext *driContext;
40
41 };
42
43 struct drisw_screen
44 {
45 struct glx_screen base;
46
47 __DRIscreen *driScreen;
48 __GLXDRIscreen vtable;
49 const __DRIcoreExtension *core;
50 const __DRIswrastExtension *swrast;
51 const __DRIconfig **driver_configs;
52
53 void *driver;
54 };
55
56 struct drisw_drawable
57 {
58 __GLXDRIdrawable base;
59
60 GC gc;
61 GC swapgc;
62
63 __DRIdrawable *driDrawable;
64 XVisualInfo *visinfo;
65 XImage *ximage;
66 };
67
68 static Bool
69 XCreateDrawable(struct drisw_drawable * pdp,
70 Display * dpy, XID drawable, int visualid)
71 {
72 XGCValues gcvalues;
73 long visMask;
74 XVisualInfo visTemp;
75 int num_visuals;
76
77 /* create GC's */
78 pdp->gc = XCreateGC(dpy, drawable, 0, NULL);
79 pdp->swapgc = XCreateGC(dpy, drawable, 0, NULL);
80
81 gcvalues.function = GXcopy;
82 gcvalues.graphics_exposures = False;
83 XChangeGC(dpy, pdp->gc, GCFunction, &gcvalues);
84 XChangeGC(dpy, pdp->swapgc, GCFunction, &gcvalues);
85 XChangeGC(dpy, pdp->swapgc, GCGraphicsExposures, &gcvalues);
86
87 /* visual */
88 visTemp.screen = DefaultScreen(dpy);
89 visTemp.visualid = visualid;
90 visMask = (VisualScreenMask | VisualIDMask);
91 pdp->visinfo = XGetVisualInfo(dpy, visMask, &visTemp, &num_visuals);
92
93 /* create XImage */
94 pdp->ximage = XCreateImage(dpy,
95 pdp->visinfo->visual,
96 pdp->visinfo->depth,
97 ZPixmap, 0, /* format, offset */
98 NULL, /* data */
99 0, 0, /* width, height */
100 32, /* bitmap_pad */
101 0); /* bytes_per_line */
102
103 return True;
104 }
105
106 static void
107 XDestroyDrawable(struct drisw_drawable * pdp, Display * dpy, XID drawable)
108 {
109 XDestroyImage(pdp->ximage);
110 XFree(pdp->visinfo);
111
112 XFreeGC(dpy, pdp->gc);
113 XFreeGC(dpy, pdp->swapgc);
114 }
115
116 /**
117 * swrast loader functions
118 */
119
120 static void
121 swrastGetDrawableInfo(__DRIdrawable * draw,
122 int *x, int *y, int *w, int *h,
123 void *loaderPrivate)
124 {
125 struct drisw_drawable *pdp = loaderPrivate;
126 __GLXDRIdrawable *pdraw = &(pdp->base);
127 Display *dpy = pdraw->psc->dpy;
128 Drawable drawable;
129
130 Window root;
131 unsigned uw, uh, bw, depth;
132
133 drawable = pdraw->xDrawable;
134
135 XGetGeometry(dpy, drawable, &root, x, y, &uw, &uh, &bw, &depth);
136 *w = uw;
137 *h = uh;
138 }
139
140 /**
141 * Align renderbuffer pitch.
142 *
143 * This should be chosen by the driver and the loader (libGL, xserver/glx)
144 * should use the driver provided pitch.
145 *
146 * It seems that the xorg loader (that is the xserver loading swrast_dri for
147 * indirect rendering, not client-side libGL) requires that the pitch is
148 * exactly the image width padded to 32 bits. XXX
149 *
150 * The above restriction can probably be overcome by using ScratchPixmap and
151 * CopyArea in the xserver, similar to ShmPutImage, and setting the width of
152 * the scratch pixmap to 'pitch / cpp'.
153 */
154 static inline int
155 bytes_per_line(unsigned pitch_bits, unsigned mul)
156 {
157 unsigned mask = mul - 1;
158
159 return ((pitch_bits + mask) & ~mask) / 8;
160 }
161
162 static void
163 swrastPutImage(__DRIdrawable * draw, int op,
164 int x, int y, int w, int h,
165 char *data, void *loaderPrivate)
166 {
167 struct drisw_drawable *pdp = loaderPrivate;
168 __GLXDRIdrawable *pdraw = &(pdp->base);
169 Display *dpy = pdraw->psc->dpy;
170 Drawable drawable;
171 XImage *ximage;
172 GC gc;
173
174 switch (op) {
175 case __DRI_SWRAST_IMAGE_OP_DRAW:
176 gc = pdp->gc;
177 break;
178 case __DRI_SWRAST_IMAGE_OP_SWAP:
179 gc = pdp->swapgc;
180 break;
181 default:
182 return;
183 }
184
185 drawable = pdraw->xDrawable;
186
187 ximage = pdp->ximage;
188 ximage->data = data;
189 ximage->width = w;
190 ximage->height = h;
191 ximage->bytes_per_line = bytes_per_line(w * ximage->bits_per_pixel, 32);
192
193 XPutImage(dpy, drawable, gc, ximage, 0, 0, x, y, w, h);
194
195 ximage->data = NULL;
196 }
197
198 static void
199 swrastGetImage(__DRIdrawable * read,
200 int x, int y, int w, int h,
201 char *data, void *loaderPrivate)
202 {
203 struct drisw_drawable *prp = loaderPrivate;
204 __GLXDRIdrawable *pread = &(prp->base);
205 Display *dpy = pread->psc->dpy;
206 Drawable readable;
207 XImage *ximage;
208
209 readable = pread->xDrawable;
210
211 ximage = prp->ximage;
212 ximage->data = data;
213 ximage->width = w;
214 ximage->height = h;
215 ximage->bytes_per_line = bytes_per_line(w * ximage->bits_per_pixel, 32);
216
217 XGetSubImage(dpy, readable, x, y, w, h, ~0L, ZPixmap, ximage, 0, 0);
218
219 ximage->data = NULL;
220 }
221
222 static const __DRIswrastLoaderExtension swrastLoaderExtension = {
223 {__DRI_SWRAST_LOADER, __DRI_SWRAST_LOADER_VERSION},
224 swrastGetDrawableInfo,
225 swrastPutImage,
226 swrastGetImage
227 };
228
229 static const __DRIextension *loader_extensions[] = {
230 &systemTimeExtension.base,
231 &swrastLoaderExtension.base,
232 NULL
233 };
234
235 /**
236 * GLXDRI functions
237 */
238
239 static void
240 drisw_destroy_context(struct glx_context *context)
241 {
242 struct drisw_context *pcp = (struct drisw_context *) context;
243 struct drisw_screen *psc = (struct drisw_screen *) context->psc;
244
245 driReleaseDrawables(&pcp->base);
246
247 if (context->xid)
248 glx_send_destroy_context(psc->base.dpy, context->xid);
249
250 if (context->extensions)
251 XFree((char *) context->extensions);
252
253 (*psc->core->destroyContext) (pcp->driContext);
254
255 Xfree(pcp);
256 }
257
258 static int
259 drisw_bind_context(struct glx_context *context, struct glx_context *old,
260 GLXDrawable draw, GLXDrawable read)
261 {
262 struct drisw_context *pcp = (struct drisw_context *) context;
263 struct drisw_screen *psc = (struct drisw_screen *) pcp->base.psc;
264 struct drisw_drawable *pdraw, *pread;
265
266 pdraw = (struct drisw_drawable *) driFetchDrawable(context, draw);
267 pread = (struct drisw_drawable *) driFetchDrawable(context, read);
268
269 driReleaseDrawables(&pcp->base);
270
271 if (pdraw == NULL || pread == NULL)
272 return GLXBadDrawable;
273
274 if ((*psc->core->bindContext) (pcp->driContext,
275 pdraw->driDrawable, pread->driDrawable))
276 return Success;
277
278 return GLXBadContext;
279 }
280
281 static void
282 drisw_unbind_context(struct glx_context *context, struct glx_context *new)
283 {
284 struct drisw_context *pcp = (struct drisw_context *) context;
285 struct drisw_screen *psc = (struct drisw_screen *) pcp->base.psc;
286
287 (*psc->core->unbindContext) (pcp->driContext);
288 }
289
290 static const struct glx_context_vtable drisw_context_vtable = {
291 drisw_destroy_context,
292 drisw_bind_context,
293 drisw_unbind_context,
294 NULL,
295 NULL,
296 DRI_glXUseXFont,
297 NULL,
298 NULL,
299 NULL, /* get_proc_address */
300 };
301
302 static struct glx_context *
303 drisw_create_context(struct glx_screen *base,
304 struct glx_config *config_base,
305 struct glx_context *shareList, int renderType)
306 {
307 struct drisw_context *pcp, *pcp_shared;
308 __GLXDRIconfigPrivate *config = (__GLXDRIconfigPrivate *) config_base;
309 struct drisw_screen *psc = (struct drisw_screen *) base;
310 __DRIcontext *shared = NULL;
311
312 if (!psc->base.driScreen)
313 return NULL;
314
315 if (shareList) {
316 pcp_shared = (struct drisw_context *) shareList;
317 shared = pcp_shared->driContext;
318 }
319
320 pcp = Xmalloc(sizeof *pcp);
321 if (pcp == NULL)
322 return NULL;
323
324 memset(pcp, 0, sizeof *pcp);
325 if (!glx_context_init(&pcp->base, &psc->base, &config->base)) {
326 Xfree(pcp);
327 return NULL;
328 }
329
330 pcp->driContext =
331 (*psc->core->createNewContext) (psc->driScreen,
332 config->driConfig, shared, pcp);
333 if (pcp->driContext == NULL) {
334 Xfree(pcp);
335 return NULL;
336 }
337
338 pcp->base.vtable = &drisw_context_vtable;
339
340 return &pcp->base;
341 }
342
343 static void
344 driswDestroyDrawable(__GLXDRIdrawable * pdraw)
345 {
346 struct drisw_drawable *pdp = (struct drisw_drawable *) pdraw;
347 struct drisw_screen *psc = (struct drisw_screen *) pdp->base.psc;
348
349 (*psc->core->destroyDrawable) (pdp->driDrawable);
350
351 XDestroyDrawable(pdp, pdraw->psc->dpy, pdraw->drawable);
352 Xfree(pdp);
353 }
354
355 static __GLXDRIdrawable *
356 driswCreateDrawable(struct glx_screen *base, XID xDrawable,
357 GLXDrawable drawable, struct glx_config *modes)
358 {
359 struct drisw_drawable *pdp;
360 __GLXDRIconfigPrivate *config = (__GLXDRIconfigPrivate *) modes;
361 struct drisw_screen *psc = (struct drisw_screen *) base;
362
363 const __DRIswrastExtension *swrast = psc->swrast;
364
365 pdp = Xmalloc(sizeof(*pdp));
366 if (!pdp)
367 return NULL;
368
369 memset(pdp, 0, sizeof *pdp);
370 pdp->base.xDrawable = xDrawable;
371 pdp->base.drawable = drawable;
372 pdp->base.psc = &psc->base;
373
374 XCreateDrawable(pdp, psc->base.dpy, xDrawable, modes->visualID);
375
376 /* Create a new drawable */
377 pdp->driDrawable =
378 (*swrast->createNewDrawable) (psc->driScreen, config->driConfig, pdp);
379
380 if (!pdp->driDrawable) {
381 XDestroyDrawable(pdp, psc->base.dpy, xDrawable);
382 Xfree(pdp);
383 return NULL;
384 }
385
386 pdp->base.destroyDrawable = driswDestroyDrawable;
387
388 return &pdp->base;
389 }
390
391 static int64_t
392 driswSwapBuffers(__GLXDRIdrawable * pdraw,
393 int64_t target_msc, int64_t divisor, int64_t remainder)
394 {
395 struct drisw_drawable *pdp = (struct drisw_drawable *) pdraw;
396 struct drisw_screen *psc = (struct drisw_screen *) pdp->base.psc;
397
398 (void) target_msc;
399 (void) divisor;
400 (void) remainder;
401
402 (*psc->core->swapBuffers) (pdp->driDrawable);
403
404 return 0;
405 }
406
407 static void
408 driswDestroyScreen(struct glx_screen *base)
409 {
410 struct drisw_screen *psc = (struct drisw_screen *) base;
411
412 /* Free the direct rendering per screen data */
413 (*psc->core->destroyScreen) (psc->driScreen);
414 driDestroyConfigs(psc->driver_configs);
415 psc->driScreen = NULL;
416 if (psc->driver)
417 dlclose(psc->driver);
418 }
419
420 static void *
421 driOpenSwrast(void)
422 {
423 void *driver = NULL;
424
425 if (driver == NULL)
426 driver = driOpenDriver("swrast");
427
428 if (driver == NULL)
429 driver = driOpenDriver("swrastg");
430
431 return driver;
432 }
433
434 static const struct glx_screen_vtable drisw_screen_vtable = {
435 drisw_create_context
436 };
437
438 static struct glx_screen *
439 driswCreateScreen(int screen, struct glx_display *priv)
440 {
441 __GLXDRIscreen *psp;
442 const __DRIconfig **driver_configs;
443 const __DRIextension **extensions;
444 struct drisw_screen *psc;
445 int i;
446
447 psc = Xcalloc(1, sizeof *psc);
448 if (psc == NULL)
449 return NULL;
450
451 memset(psc, 0, sizeof *psc);
452 if (!glx_screen_init(&psc->base, screen, priv)) {
453 Xfree(psc);
454 return NULL;
455 }
456
457 psc->driver = driOpenSwrast();
458 if (psc->driver == NULL)
459 goto handle_error;
460
461 extensions = dlsym(psc->driver, __DRI_DRIVER_EXTENSIONS);
462 if (extensions == NULL) {
463 ErrorMessageF("driver exports no extensions (%s)\n", dlerror());
464 goto handle_error;
465 }
466
467 for (i = 0; extensions[i]; i++) {
468 if (strcmp(extensions[i]->name, __DRI_CORE) == 0)
469 psc->core = (__DRIcoreExtension *) extensions[i];
470 if (strcmp(extensions[i]->name, __DRI_SWRAST) == 0)
471 psc->swrast = (__DRIswrastExtension *) extensions[i];
472 }
473
474 if (psc->core == NULL || psc->swrast == NULL) {
475 ErrorMessageF("core dri extension not found\n");
476 goto handle_error;
477 }
478
479 psc->driScreen =
480 psc->swrast->createNewScreen(screen, loader_extensions,
481 &driver_configs, psc);
482 if (psc->driScreen == NULL) {
483 ErrorMessageF("failed to create dri screen\n");
484 goto handle_error;
485 }
486
487 psc->base.configs =
488 driConvertConfigs(psc->core, psc->base.configs, driver_configs);
489 psc->base.visuals =
490 driConvertConfigs(psc->core, psc->base.visuals, driver_configs);
491
492 psc->driver_configs = driver_configs;
493
494 psc->base.vtable = &drisw_screen_vtable;
495 psp = &psc->vtable;
496 psc->base.driScreen = psp;
497 psp->destroyScreen = driswDestroyScreen;
498 psp->createDrawable = driswCreateDrawable;
499 psp->swapBuffers = driswSwapBuffers;
500
501 return &psc->base;
502
503 handle_error:
504 if (psc->driver)
505 dlclose(psc->driver);
506 glx_screen_cleanup(&psc->base);
507 Xfree(psc);
508
509 ErrorMessageF("reverting to indirect rendering\n");
510
511 return NULL;
512 }
513
514 /* Called from __glXFreeDisplayPrivate.
515 */
516 static void
517 driswDestroyDisplay(__GLXDRIdisplay * dpy)
518 {
519 Xfree(dpy);
520 }
521
522 /*
523 * Allocate, initialize and return a __DRIdisplayPrivate object.
524 * This is called from __glXInitialize() when we are given a new
525 * display pointer.
526 */
527 _X_HIDDEN __GLXDRIdisplay *
528 driswCreateDisplay(Display * dpy)
529 {
530 struct drisw_display *pdpyp;
531
532 pdpyp = Xmalloc(sizeof *pdpyp);
533 if (pdpyp == NULL)
534 return NULL;
535
536 pdpyp->base.destroyDisplay = driswDestroyDisplay;
537 pdpyp->base.createScreen = driswCreateScreen;
538
539 return &pdpyp->base;
540 }
541
542 #endif /* GLX_DIRECT_RENDERING */