1/*
2 * Copyright © 2008 Red Hat, Inc.
3 *
4 * Permission is hereby granted, free of charge, to any person obtaining a
5 * copy of this software and associated documentation files (the "Soft-
6 * ware"), to deal in the Software without restriction, including without
7 * limitation the rights to use, copy, modify, merge, publish, distribute,
8 * and/or sell copies of the Software, and to permit persons to whom the
9 * Software is furnished to do so, provided that the above copyright
10 * notice(s) and this permission notice appear in all copies of the Soft-
11 * ware and that both the above copyright notice(s) and this permission
12 * notice appear in supporting documentation.
13 *
14 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
15 * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABIL-
16 * ITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT OF THIRD PARTY
17 * RIGHTS. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR HOLDERS INCLUDED IN
18 * THIS NOTICE BE LIABLE FOR ANY CLAIM, OR ANY SPECIAL INDIRECT OR CONSE-
19 * QUENTIAL DAMAGES, OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE,
20 * DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER
21 * TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFOR-
22 * MANCE OF THIS SOFTWARE.
23 *
24 * Except as contained in this notice, the name of a copyright holder shall
25 * not be used in advertising or otherwise to promote the sale, use or
26 * other dealings in this Software without prior written authorization of
27 * the copyright holder.
28 *
29 * Authors:
30 *   Kristian Høgsberg (krh@redhat.com)
31 */
32
33#if defined(GLX_DIRECT_RENDERING) && !defined(GLX_USE_APPLEGL)
34
35#include <X11/Xlib.h>
36#include <X11/extensions/Xfixes.h>
37#include <X11/Xlib-xcb.h>
38#include <xcb/xcb.h>
39#include <xcb/dri2.h>
40#include "glxclient.h"
41#include <X11/extensions/dri2proto.h>
42#include <dlfcn.h>
43#include <fcntl.h>
44#include <unistd.h>
45#include <sys/types.h>
46#include <sys/mman.h>
47#include <sys/time.h>
48#include "dri2.h"
49#include "dri_common.h"
50#include "dri2_priv.h"
51#include "loader.h"
52
53/* From xmlpool/options.h, user exposed so should be stable */
54#define DRI_CONF_VBLANK_NEVER 0
55#define DRI_CONF_VBLANK_DEF_INTERVAL_0 1
56#define DRI_CONF_VBLANK_DEF_INTERVAL_1 2
57#define DRI_CONF_VBLANK_ALWAYS_SYNC 3
58
59#undef DRI2_MINOR
60#define DRI2_MINOR 1
61
62struct dri2_display
63{
64   __GLXDRIdisplay base;
65
66   /*
67    ** XFree86-DRI version information
68    */
69   int driMajor;
70   int driMinor;
71   int driPatch;
72   int swapAvailable;
73   int invalidateAvailable;
74
75   __glxHashTable *dri2Hash;
76
77   const __DRIextension *loader_extensions[4];
78};
79
80struct dri2_drawable
81{
82   __GLXDRIdrawable base;
83   __DRIdrawable *driDrawable;
84   __DRIbuffer buffers[5];
85   int bufferCount;
86   int width, height;
87   int have_back;
88   int have_fake_front;
89   int swap_interval;
90
91   uint64_t previous_time;
92   unsigned frames;
93};
94
95static const struct glx_context_vtable dri2_context_vtable;
96
97/* For XCB's handling of ust/msc/sbc counters, we have to hand it the high and
98 * low halves separately.  This helps you split them.
99 */
100static void
101split_counter(uint64_t counter, uint32_t *hi, uint32_t *lo)
102{
103   *hi = (counter >> 32);
104   *lo = counter & 0xffffffff;
105}
106
107static uint64_t
108merge_counter(uint32_t hi, uint32_t lo)
109{
110   return ((uint64_t)hi << 32) | lo;
111}
112
113static void
114dri2_destroy_context(struct glx_context *context)
115{
116   struct dri2_context *pcp = (struct dri2_context *) context;
117   struct dri2_screen *psc = (struct dri2_screen *) context->psc;
118
119   driReleaseDrawables(&pcp->base);
120
121   free((char *) context->extensions);
122
123   (*psc->core->destroyContext) (pcp->driContext);
124
125   free(pcp);
126}
127
128static Bool
129dri2_bind_context(struct glx_context *context, struct glx_context *old,
130		  GLXDrawable draw, GLXDrawable read)
131{
132   struct dri2_context *pcp = (struct dri2_context *) context;
133   struct dri2_screen *psc = (struct dri2_screen *) pcp->base.psc;
134   struct dri2_drawable *pdraw, *pread;
135   __DRIdrawable *dri_draw = NULL, *dri_read = NULL;
136   struct glx_display *dpyPriv = psc->base.display;
137   struct dri2_display *pdp;
138
139   pdraw = (struct dri2_drawable *) driFetchDrawable(context, draw);
140   pread = (struct dri2_drawable *) driFetchDrawable(context, read);
141
142   driReleaseDrawables(&pcp->base);
143
144   if (pdraw)
145      dri_draw = pdraw->driDrawable;
146   else if (draw != None)
147      return GLXBadDrawable;
148
149   if (pread)
150      dri_read = pread->driDrawable;
151   else if (read != None)
152      return GLXBadDrawable;
153
154   if (!(*psc->core->bindContext) (pcp->driContext, dri_draw, dri_read))
155      return GLXBadContext;
156
157   /* If the server doesn't send invalidate events, we may miss a
158    * resize before the rendering starts.  Invalidate the buffers now
159    * so the driver will recheck before rendering starts. */
160   pdp = (struct dri2_display *) dpyPriv->dri2Display;
161   if (!pdp->invalidateAvailable && pdraw) {
162      dri2InvalidateBuffers(psc->base.dpy, pdraw->base.xDrawable);
163      if (pread != pdraw && pread)
164	 dri2InvalidateBuffers(psc->base.dpy, pread->base.xDrawable);
165   }
166
167   return Success;
168}
169
170static void
171dri2_unbind_context(struct glx_context *context, struct glx_context *new)
172{
173   struct dri2_context *pcp = (struct dri2_context *) context;
174   struct dri2_screen *psc = (struct dri2_screen *) pcp->base.psc;
175
176   (*psc->core->unbindContext) (pcp->driContext);
177}
178
179static struct glx_context *
180dri2_create_context(struct glx_screen *base,
181		    struct glx_config *config_base,
182		    struct glx_context *shareList, int renderType)
183{
184   struct dri2_context *pcp, *pcp_shared;
185   struct dri2_screen *psc = (struct dri2_screen *) base;
186   __GLXDRIconfigPrivate *config = (__GLXDRIconfigPrivate *) config_base;
187   __DRIcontext *shared = NULL;
188
189   /* Check the renderType value */
190   if (!validate_renderType_against_config(config_base, renderType))
191       return NULL;
192
193   if (shareList) {
194      /* If the shareList context is not a DRI2 context, we cannot possibly
195       * create a DRI2 context that shares it.
196       */
197      if (shareList->vtable->destroy != dri2_destroy_context) {
198	 return NULL;
199      }
200
201      pcp_shared = (struct dri2_context *) shareList;
202      shared = pcp_shared->driContext;
203   }
204
205   pcp = calloc(1, sizeof *pcp);
206   if (pcp == NULL)
207      return NULL;
208
209   if (!glx_context_init(&pcp->base, &psc->base, &config->base)) {
210      free(pcp);
211      return NULL;
212   }
213
214   pcp->base.renderType = renderType;
215
216   pcp->driContext =
217      (*psc->dri2->createNewContext) (psc->driScreen,
218                                      config->driConfig, shared, pcp);
219
220   if (pcp->driContext == NULL) {
221      free(pcp);
222      return NULL;
223   }
224
225   pcp->base.vtable = &dri2_context_vtable;
226
227   return &pcp->base;
228}
229
230static struct glx_context *
231dri2_create_context_attribs(struct glx_screen *base,
232			    struct glx_config *config_base,
233			    struct glx_context *shareList,
234			    unsigned num_attribs,
235			    const uint32_t *attribs,
236			    unsigned *error)
237{
238   struct dri2_context *pcp = NULL;
239   struct dri2_context *pcp_shared = NULL;
240   struct dri2_screen *psc = (struct dri2_screen *) base;
241   __GLXDRIconfigPrivate *config = (__GLXDRIconfigPrivate *) config_base;
242   __DRIcontext *shared = NULL;
243
244   uint32_t minor_ver;
245   uint32_t major_ver;
246   uint32_t renderType;
247   uint32_t flags;
248   unsigned api;
249   int reset;
250   uint32_t ctx_attribs[2 * 5];
251   unsigned num_ctx_attribs = 0;
252
253   if (psc->dri2->base.version < 3) {
254      *error = __DRI_CTX_ERROR_NO_MEMORY;
255      goto error_exit;
256   }
257
258   /* Remap the GLX tokens to DRI2 tokens.
259    */
260   if (!dri2_convert_glx_attribs(num_attribs, attribs,
261                                 &major_ver, &minor_ver, &renderType, &flags,
262                                 &api, &reset, error))
263      goto error_exit;
264
265   /* Check the renderType value */
266   if (!validate_renderType_against_config(config_base, renderType))
267       goto error_exit;
268
269   if (shareList) {
270      pcp_shared = (struct dri2_context *) shareList;
271      shared = pcp_shared->driContext;
272   }
273
274   pcp = calloc(1, sizeof *pcp);
275   if (pcp == NULL) {
276      *error = __DRI_CTX_ERROR_NO_MEMORY;
277      goto error_exit;
278   }
279
280   if (!glx_context_init(&pcp->base, &psc->base, &config->base))
281      goto error_exit;
282
283   ctx_attribs[num_ctx_attribs++] = __DRI_CTX_ATTRIB_MAJOR_VERSION;
284   ctx_attribs[num_ctx_attribs++] = major_ver;
285   ctx_attribs[num_ctx_attribs++] = __DRI_CTX_ATTRIB_MINOR_VERSION;
286   ctx_attribs[num_ctx_attribs++] = minor_ver;
287
288   /* Only send a value when the non-default value is requested.  By doing
289    * this we don't have to check the driver's DRI2 version before sending the
290    * default value.
291    */
292   if (reset != __DRI_CTX_RESET_NO_NOTIFICATION) {
293      ctx_attribs[num_ctx_attribs++] = __DRI_CTX_ATTRIB_RESET_STRATEGY;
294      ctx_attribs[num_ctx_attribs++] = reset;
295   }
296
297   if (flags != 0) {
298      ctx_attribs[num_ctx_attribs++] = __DRI_CTX_ATTRIB_FLAGS;
299
300      /* The current __DRI_CTX_FLAG_* values are identical to the
301       * GLX_CONTEXT_*_BIT values.
302       */
303      ctx_attribs[num_ctx_attribs++] = flags;
304   }
305
306   /* The renderType is retrieved from attribs, or set to default
307    *  of GLX_RGBA_TYPE.
308    */
309   pcp->base.renderType = renderType;
310
311   pcp->driContext =
312      (*psc->dri2->createContextAttribs) (psc->driScreen,
313					  api,
314					  config->driConfig,
315					  shared,
316					  num_ctx_attribs / 2,
317					  ctx_attribs,
318					  error,
319					  pcp);
320
321   if (pcp->driContext == NULL)
322      goto error_exit;
323
324   pcp->base.vtable = &dri2_context_vtable;
325
326   return &pcp->base;
327
328error_exit:
329   free(pcp);
330
331   return NULL;
332}
333
334static void
335dri2DestroyDrawable(__GLXDRIdrawable *base)
336{
337   struct dri2_screen *psc = (struct dri2_screen *) base->psc;
338   struct dri2_drawable *pdraw = (struct dri2_drawable *) base;
339   struct glx_display *dpyPriv = psc->base.display;
340   struct dri2_display *pdp = (struct dri2_display *)dpyPriv->dri2Display;
341
342   __glxHashDelete(pdp->dri2Hash, pdraw->base.xDrawable);
343   (*psc->core->destroyDrawable) (pdraw->driDrawable);
344
345   /* If it's a GLX 1.3 drawables, we can destroy the DRI2 drawable
346    * now, as the application explicitly asked to destroy the GLX
347    * drawable.  Otherwise, for legacy drawables, we let the DRI2
348    * drawable linger on the server, since there's no good way of
349    * knowing when the application is done with it.  The server will
350    * destroy the DRI2 drawable when it destroys the X drawable or the
351    * client exits anyway. */
352   if (pdraw->base.xDrawable != pdraw->base.drawable)
353      DRI2DestroyDrawable(psc->base.dpy, pdraw->base.xDrawable);
354
355   free(pdraw);
356}
357
358static __GLXDRIdrawable *
359dri2CreateDrawable(struct glx_screen *base, XID xDrawable,
360		   GLXDrawable drawable, struct glx_config *config_base)
361{
362   struct dri2_drawable *pdraw;
363   struct dri2_screen *psc = (struct dri2_screen *) base;
364   __GLXDRIconfigPrivate *config = (__GLXDRIconfigPrivate *) config_base;
365   struct glx_display *dpyPriv;
366   struct dri2_display *pdp;
367   GLint vblank_mode = DRI_CONF_VBLANK_DEF_INTERVAL_1;
368
369   dpyPriv = __glXInitialize(psc->base.dpy);
370   if (dpyPriv == NULL)
371      return NULL;
372
373   pdraw = calloc(1, sizeof(*pdraw));
374   if (!pdraw)
375      return NULL;
376
377   pdraw->base.destroyDrawable = dri2DestroyDrawable;
378   pdraw->base.xDrawable = xDrawable;
379   pdraw->base.drawable = drawable;
380   pdraw->base.psc = &psc->base;
381   pdraw->bufferCount = 0;
382   pdraw->swap_interval = 1; /* default may be overridden below */
383   pdraw->have_back = 0;
384
385   if (psc->config)
386      psc->config->configQueryi(psc->driScreen,
387				"vblank_mode", &vblank_mode);
388
389   switch (vblank_mode) {
390   case DRI_CONF_VBLANK_NEVER:
391   case DRI_CONF_VBLANK_DEF_INTERVAL_0:
392      pdraw->swap_interval = 0;
393      break;
394   case DRI_CONF_VBLANK_DEF_INTERVAL_1:
395   case DRI_CONF_VBLANK_ALWAYS_SYNC:
396   default:
397      pdraw->swap_interval = 1;
398      break;
399   }
400
401   DRI2CreateDrawable(psc->base.dpy, xDrawable);
402   pdp = (struct dri2_display *)dpyPriv->dri2Display;
403   /* Create a new drawable */
404   pdraw->driDrawable =
405      (*psc->dri2->createNewDrawable) (psc->driScreen,
406                                       config->driConfig, pdraw);
407
408   if (!pdraw->driDrawable) {
409      DRI2DestroyDrawable(psc->base.dpy, xDrawable);
410      free(pdraw);
411      return NULL;
412   }
413
414   if (__glxHashInsert(pdp->dri2Hash, xDrawable, pdraw)) {
415      (*psc->core->destroyDrawable) (pdraw->driDrawable);
416      DRI2DestroyDrawable(psc->base.dpy, xDrawable);
417      free(pdraw);
418      return None;
419   }
420
421   /*
422    * Make sure server has the same swap interval we do for the new
423    * drawable.
424    */
425   if (psc->vtable.setSwapInterval)
426      psc->vtable.setSwapInterval(&pdraw->base, pdraw->swap_interval);
427
428   return &pdraw->base;
429}
430
431static int
432dri2DrawableGetMSC(struct glx_screen *psc, __GLXDRIdrawable *pdraw,
433		   int64_t *ust, int64_t *msc, int64_t *sbc)
434{
435   xcb_connection_t *c = XGetXCBConnection(pdraw->psc->dpy);
436   xcb_dri2_get_msc_cookie_t get_msc_cookie;
437   xcb_dri2_get_msc_reply_t *get_msc_reply;
438
439   get_msc_cookie = xcb_dri2_get_msc_unchecked(c, pdraw->xDrawable);
440   get_msc_reply = xcb_dri2_get_msc_reply(c, get_msc_cookie, NULL);
441
442   if (!get_msc_reply)
443      return 0;
444
445   *ust = merge_counter(get_msc_reply->ust_hi, get_msc_reply->ust_lo);
446   *msc = merge_counter(get_msc_reply->msc_hi, get_msc_reply->msc_lo);
447   *sbc = merge_counter(get_msc_reply->sbc_hi, get_msc_reply->sbc_lo);
448   free(get_msc_reply);
449
450   return 1;
451}
452
453static int
454dri2WaitForMSC(__GLXDRIdrawable *pdraw, int64_t target_msc, int64_t divisor,
455	       int64_t remainder, int64_t *ust, int64_t *msc, int64_t *sbc)
456{
457   xcb_connection_t *c = XGetXCBConnection(pdraw->psc->dpy);
458   xcb_dri2_wait_msc_cookie_t wait_msc_cookie;
459   xcb_dri2_wait_msc_reply_t *wait_msc_reply;
460   uint32_t target_msc_hi, target_msc_lo;
461   uint32_t divisor_hi, divisor_lo;
462   uint32_t remainder_hi, remainder_lo;
463
464   split_counter(target_msc, &target_msc_hi, &target_msc_lo);
465   split_counter(divisor, &divisor_hi, &divisor_lo);
466   split_counter(remainder, &remainder_hi, &remainder_lo);
467
468   wait_msc_cookie = xcb_dri2_wait_msc_unchecked(c, pdraw->xDrawable,
469                                                 target_msc_hi, target_msc_lo,
470                                                 divisor_hi, divisor_lo,
471                                                 remainder_hi, remainder_lo);
472   wait_msc_reply = xcb_dri2_wait_msc_reply(c, wait_msc_cookie, NULL);
473
474   if (!wait_msc_reply)
475      return 0;
476
477   *ust = merge_counter(wait_msc_reply->ust_hi, wait_msc_reply->ust_lo);
478   *msc = merge_counter(wait_msc_reply->msc_hi, wait_msc_reply->msc_lo);
479   *sbc = merge_counter(wait_msc_reply->sbc_hi, wait_msc_reply->sbc_lo);
480   free(wait_msc_reply);
481
482   return 1;
483}
484
485static int
486dri2WaitForSBC(__GLXDRIdrawable *pdraw, int64_t target_sbc, int64_t *ust,
487	       int64_t *msc, int64_t *sbc)
488{
489   xcb_connection_t *c = XGetXCBConnection(pdraw->psc->dpy);
490   xcb_dri2_wait_sbc_cookie_t wait_sbc_cookie;
491   xcb_dri2_wait_sbc_reply_t *wait_sbc_reply;
492   uint32_t target_sbc_hi, target_sbc_lo;
493
494   split_counter(target_sbc, &target_sbc_hi, &target_sbc_lo);
495
496   wait_sbc_cookie = xcb_dri2_wait_sbc_unchecked(c, pdraw->xDrawable,
497                                                 target_sbc_hi, target_sbc_lo);
498   wait_sbc_reply = xcb_dri2_wait_sbc_reply(c, wait_sbc_cookie, NULL);
499
500   if (!wait_sbc_reply)
501      return 0;
502
503   *ust = merge_counter(wait_sbc_reply->ust_hi, wait_sbc_reply->ust_lo);
504   *msc = merge_counter(wait_sbc_reply->msc_hi, wait_sbc_reply->msc_lo);
505   *sbc = merge_counter(wait_sbc_reply->sbc_hi, wait_sbc_reply->sbc_lo);
506   free(wait_sbc_reply);
507
508   return 1;
509}
510
511static __DRIcontext *
512dri2GetCurrentContext()
513{
514   struct glx_context *gc = __glXGetCurrentContext();
515   struct dri2_context *dri2Ctx = (struct dri2_context *)gc;
516
517   return (gc != &dummyContext) ? dri2Ctx->driContext : NULL;
518}
519
520/**
521 * dri2Throttle - Request driver throttling
522 *
523 * This function uses the DRI2 throttle extension to give the
524 * driver the opportunity to throttle on flush front, copysubbuffer
525 * and swapbuffers.
526 */
527static void
528dri2Throttle(struct dri2_screen *psc,
529	     struct dri2_drawable *draw,
530	     enum __DRI2throttleReason reason)
531{
532   if (psc->throttle) {
533      __DRIcontext *ctx = dri2GetCurrentContext();
534
535      psc->throttle->throttle(ctx, draw->driDrawable, reason);
536   }
537}
538
539/**
540 * Asks the driver to flush any queued work necessary for serializing with the
541 * X command stream, and optionally the slightly more strict requirement of
542 * glFlush() equivalence (which would require flushing even if nothing had
543 * been drawn to a window system framebuffer, for example).
544 */
545static void
546dri2Flush(struct dri2_screen *psc,
547          __DRIcontext *ctx,
548          struct dri2_drawable *draw,
549          unsigned flags,
550          enum __DRI2throttleReason throttle_reason)
551{
552   if (ctx && psc->f && psc->f->base.version >= 4) {
553      psc->f->flush_with_flags(ctx, draw->driDrawable, flags, throttle_reason);
554   } else {
555      if (flags & __DRI2_FLUSH_CONTEXT)
556         glFlush();
557
558      if (psc->f)
559         psc->f->flush(draw->driDrawable);
560
561      dri2Throttle(psc, draw, throttle_reason);
562   }
563}
564
565static void
566__dri2CopySubBuffer(__GLXDRIdrawable *pdraw, int x, int y,
567		    int width, int height,
568		    enum __DRI2throttleReason reason, Bool flush)
569{
570   struct dri2_drawable *priv = (struct dri2_drawable *) pdraw;
571   struct dri2_screen *psc = (struct dri2_screen *) pdraw->psc;
572   XRectangle xrect;
573   XserverRegion region;
574   __DRIcontext *ctx = dri2GetCurrentContext();
575   unsigned flags;
576
577   /* Check we have the right attachments */
578   if (!priv->have_back)
579      return;
580
581   xrect.x = x;
582   xrect.y = priv->height - y - height;
583   xrect.width = width;
584   xrect.height = height;
585
586   flags = __DRI2_FLUSH_DRAWABLE;
587   if (flush)
588      flags |= __DRI2_FLUSH_CONTEXT;
589   dri2Flush(psc, ctx, priv, flags, __DRI2_THROTTLE_SWAPBUFFER);
590
591   region = XFixesCreateRegion(psc->base.dpy, &xrect, 1);
592   DRI2CopyRegion(psc->base.dpy, pdraw->xDrawable, region,
593                  DRI2BufferFrontLeft, DRI2BufferBackLeft);
594
595   /* Refresh the fake front (if present) after we just damaged the real
596    * front.
597    */
598   if (priv->have_fake_front)
599      DRI2CopyRegion(psc->base.dpy, pdraw->xDrawable, region,
600		     DRI2BufferFakeFrontLeft, DRI2BufferFrontLeft);
601
602   XFixesDestroyRegion(psc->base.dpy, region);
603}
604
605static void
606dri2CopySubBuffer(__GLXDRIdrawable *pdraw, int x, int y,
607		  int width, int height, Bool flush)
608{
609   __dri2CopySubBuffer(pdraw, x, y, width, height,
610		       __DRI2_THROTTLE_COPYSUBBUFFER, flush);
611}
612
613
614static void
615dri2_copy_drawable(struct dri2_drawable *priv, int dest, int src)
616{
617   XRectangle xrect;
618   XserverRegion region;
619   struct dri2_screen *psc = (struct dri2_screen *) priv->base.psc;
620
621   xrect.x = 0;
622   xrect.y = 0;
623   xrect.width = priv->width;
624   xrect.height = priv->height;
625
626   if (psc->f)
627      (*psc->f->flush) (priv->driDrawable);
628
629   region = XFixesCreateRegion(psc->base.dpy, &xrect, 1);
630   DRI2CopyRegion(psc->base.dpy, priv->base.xDrawable, region, dest, src);
631   XFixesDestroyRegion(psc->base.dpy, region);
632
633}
634
635static void
636dri2_wait_x(struct glx_context *gc)
637{
638   struct dri2_drawable *priv = (struct dri2_drawable *)
639      GetGLXDRIDrawable(gc->currentDpy, gc->currentDrawable);
640
641   if (priv == NULL || !priv->have_fake_front)
642      return;
643
644   dri2_copy_drawable(priv, DRI2BufferFakeFrontLeft, DRI2BufferFrontLeft);
645}
646
647static void
648dri2_wait_gl(struct glx_context *gc)
649{
650   struct dri2_drawable *priv = (struct dri2_drawable *)
651      GetGLXDRIDrawable(gc->currentDpy, gc->currentDrawable);
652
653   if (priv == NULL || !priv->have_fake_front)
654      return;
655
656   dri2_copy_drawable(priv, DRI2BufferFrontLeft, DRI2BufferFakeFrontLeft);
657}
658
659/**
660 * Called by the driver when it needs to update the real front buffer with the
661 * contents of its fake front buffer.
662 */
663static void
664dri2FlushFrontBuffer(__DRIdrawable *driDrawable, void *loaderPrivate)
665{
666   struct glx_display *priv;
667   struct dri2_display *pdp;
668   struct glx_context *gc;
669   struct dri2_drawable *pdraw = loaderPrivate;
670   struct dri2_screen *psc;
671
672   if (!pdraw)
673      return;
674
675   if (!pdraw->base.psc)
676      return;
677
678   psc = (struct dri2_screen *) pdraw->base.psc;
679
680   priv = __glXInitialize(psc->base.dpy);
681
682   if (priv == NULL)
683       return;
684
685   pdp = (struct dri2_display *) priv->dri2Display;
686   gc = __glXGetCurrentContext();
687
688   dri2Throttle(psc, pdraw, __DRI2_THROTTLE_FLUSHFRONT);
689
690   /* Old servers don't send invalidate events */
691   if (!pdp->invalidateAvailable)
692       dri2InvalidateBuffers(priv->dpy, pdraw->base.xDrawable);
693
694   dri2_wait_gl(gc);
695}
696
697
698static void
699dri2DestroyScreen(struct glx_screen *base)
700{
701   struct dri2_screen *psc = (struct dri2_screen *) base;
702
703   /* Free the direct rendering per screen data */
704   (*psc->core->destroyScreen) (psc->driScreen);
705   driDestroyConfigs(psc->driver_configs);
706   close(psc->fd);
707   free(psc);
708}
709
710/**
711 * Process list of buffer received from the server
712 *
713 * Processes the list of buffers received in a reply from the server to either
714 * \c DRI2GetBuffers or \c DRI2GetBuffersWithFormat.
715 */
716static void
717process_buffers(struct dri2_drawable * pdraw, DRI2Buffer * buffers,
718                unsigned count)
719{
720   int i;
721
722   pdraw->bufferCount = count;
723   pdraw->have_fake_front = 0;
724   pdraw->have_back = 0;
725
726   /* This assumes the DRI2 buffer attachment tokens matches the
727    * __DRIbuffer tokens. */
728   for (i = 0; i < count; i++) {
729      pdraw->buffers[i].attachment = buffers[i].attachment;
730      pdraw->buffers[i].name = buffers[i].name;
731      pdraw->buffers[i].pitch = buffers[i].pitch;
732      pdraw->buffers[i].cpp = buffers[i].cpp;
733      pdraw->buffers[i].flags = buffers[i].flags;
734      if (pdraw->buffers[i].attachment == __DRI_BUFFER_FAKE_FRONT_LEFT)
735         pdraw->have_fake_front = 1;
736      if (pdraw->buffers[i].attachment == __DRI_BUFFER_BACK_LEFT)
737         pdraw->have_back = 1;
738   }
739
740}
741
742unsigned dri2GetSwapEventType(Display* dpy, XID drawable)
743{
744      struct glx_display *glx_dpy = __glXInitialize(dpy);
745      __GLXDRIdrawable *pdraw;
746      pdraw = dri2GetGlxDrawableFromXDrawableId(dpy, drawable);
747      if (!pdraw || !(pdraw->eventMask & GLX_BUFFER_SWAP_COMPLETE_INTEL_MASK))
748         return 0;
749      return glx_dpy->codes->first_event + GLX_BufferSwapComplete;
750}
751
752static void show_fps(struct dri2_drawable *draw)
753{
754   const int interval =
755      ((struct dri2_screen *) draw->base.psc)->show_fps_interval;
756   struct timeval tv;
757   uint64_t current_time;
758
759   gettimeofday(&tv, 0);
760   current_time = (uint64_t)tv.tv_sec*1000000 + (uint64_t)tv.tv_usec;
761
762   draw->frames++;
763
764   if (draw->previous_time + interval * 1000000 <= current_time) {
765      if (draw->previous_time) {
766         fprintf(stderr, "libGL: FPS = %.1f\n",
767                 ((uint64_t)draw->frames * 1000000) /
768                 (double)(current_time - draw->previous_time));
769      }
770      draw->frames = 0;
771      draw->previous_time = current_time;
772   }
773}
774
775static int64_t
776dri2XcbSwapBuffers(Display *dpy,
777                  __GLXDRIdrawable *pdraw,
778                  int64_t target_msc,
779                  int64_t divisor,
780                  int64_t remainder)
781{
782   xcb_dri2_swap_buffers_cookie_t swap_buffers_cookie;
783   xcb_dri2_swap_buffers_reply_t *swap_buffers_reply;
784   uint32_t target_msc_hi, target_msc_lo;
785   uint32_t divisor_hi, divisor_lo;
786   uint32_t remainder_hi, remainder_lo;
787   int64_t ret = 0;
788   xcb_connection_t *c = XGetXCBConnection(dpy);
789
790   split_counter(target_msc, &target_msc_hi, &target_msc_lo);
791   split_counter(divisor, &divisor_hi, &divisor_lo);
792   split_counter(remainder, &remainder_hi, &remainder_lo);
793
794   swap_buffers_cookie =
795      xcb_dri2_swap_buffers_unchecked(c, pdraw->xDrawable,
796                                      target_msc_hi, target_msc_lo,
797                                      divisor_hi, divisor_lo,
798                                      remainder_hi, remainder_lo);
799
800   /* Immediately wait on the swapbuffers reply.  If we didn't, we'd have
801    * to do so some time before reusing a (non-pageflipped) backbuffer.
802    * Otherwise, the new rendering could get ahead of the X Server's
803    * dispatch of the swapbuffer and you'd display garbage.
804    *
805    * We use XSync() first to reap the invalidate events through the event
806    * filter, to ensure that the next drawing doesn't use an invalidated
807    * buffer.
808    */
809   XSync(dpy, False);
810
811   swap_buffers_reply =
812      xcb_dri2_swap_buffers_reply(c, swap_buffers_cookie, NULL);
813   if (swap_buffers_reply) {
814      ret = merge_counter(swap_buffers_reply->swap_hi,
815                          swap_buffers_reply->swap_lo);
816      free(swap_buffers_reply);
817   }
818   return ret;
819}
820
821static int64_t
822dri2SwapBuffers(__GLXDRIdrawable *pdraw, int64_t target_msc, int64_t divisor,
823		int64_t remainder, Bool flush)
824{
825    struct dri2_drawable *priv = (struct dri2_drawable *) pdraw;
826    struct glx_display *dpyPriv = __glXInitialize(priv->base.psc->dpy);
827    struct dri2_screen *psc = (struct dri2_screen *) priv->base.psc;
828    struct dri2_display *pdp =
829	(struct dri2_display *)dpyPriv->dri2Display;
830    int64_t ret = 0;
831
832    /* Check we have the right attachments */
833    if (!priv->have_back)
834	return ret;
835
836    /* Old servers can't handle swapbuffers */
837    if (!pdp->swapAvailable) {
838       __dri2CopySubBuffer(pdraw, 0, 0, priv->width, priv->height,
839			   __DRI2_THROTTLE_SWAPBUFFER, flush);
840    } else {
841       __DRIcontext *ctx = dri2GetCurrentContext();
842       unsigned flags = __DRI2_FLUSH_DRAWABLE;
843       if (flush)
844          flags |= __DRI2_FLUSH_CONTEXT;
845       dri2Flush(psc, ctx, priv, flags, __DRI2_THROTTLE_SWAPBUFFER);
846
847       ret = dri2XcbSwapBuffers(pdraw->psc->dpy, pdraw,
848                                target_msc, divisor, remainder);
849    }
850
851    if (psc->show_fps_interval) {
852       show_fps(priv);
853    }
854
855    /* Old servers don't send invalidate events */
856    if (!pdp->invalidateAvailable)
857       dri2InvalidateBuffers(dpyPriv->dpy, pdraw->xDrawable);
858
859    return ret;
860}
861
862static __DRIbuffer *
863dri2GetBuffers(__DRIdrawable * driDrawable,
864               int *width, int *height,
865               unsigned int *attachments, int count,
866               int *out_count, void *loaderPrivate)
867{
868   struct dri2_drawable *pdraw = loaderPrivate;
869   DRI2Buffer *buffers;
870
871   buffers = DRI2GetBuffers(pdraw->base.psc->dpy, pdraw->base.xDrawable,
872                            width, height, attachments, count, out_count);
873   if (buffers == NULL)
874      return NULL;
875
876   pdraw->width = *width;
877   pdraw->height = *height;
878   process_buffers(pdraw, buffers, *out_count);
879
880   free(buffers);
881
882   return pdraw->buffers;
883}
884
885static __DRIbuffer *
886dri2GetBuffersWithFormat(__DRIdrawable * driDrawable,
887                         int *width, int *height,
888                         unsigned int *attachments, int count,
889                         int *out_count, void *loaderPrivate)
890{
891   struct dri2_drawable *pdraw = loaderPrivate;
892   DRI2Buffer *buffers;
893
894   buffers = DRI2GetBuffersWithFormat(pdraw->base.psc->dpy,
895                                      pdraw->base.xDrawable,
896                                      width, height, attachments,
897                                      count, out_count);
898   if (buffers == NULL)
899      return NULL;
900
901   pdraw->width = *width;
902   pdraw->height = *height;
903   process_buffers(pdraw, buffers, *out_count);
904
905   free(buffers);
906
907   return pdraw->buffers;
908}
909
910static int
911dri2SetSwapInterval(__GLXDRIdrawable *pdraw, int interval)
912{
913   xcb_connection_t *c = XGetXCBConnection(pdraw->psc->dpy);
914   struct dri2_drawable *priv =  (struct dri2_drawable *) pdraw;
915   GLint vblank_mode = DRI_CONF_VBLANK_DEF_INTERVAL_1;
916   struct dri2_screen *psc = (struct dri2_screen *) priv->base.psc;
917
918   if (psc->config)
919      psc->config->configQueryi(psc->driScreen,
920				"vblank_mode", &vblank_mode);
921
922   switch (vblank_mode) {
923   case DRI_CONF_VBLANK_NEVER:
924      if (interval != 0)
925         return GLX_BAD_VALUE;
926      break;
927   case DRI_CONF_VBLANK_ALWAYS_SYNC:
928      if (interval <= 0)
929	 return GLX_BAD_VALUE;
930      break;
931   default:
932      break;
933   }
934
935   xcb_dri2_swap_interval(c, priv->base.xDrawable, interval);
936   priv->swap_interval = interval;
937
938   return 0;
939}
940
941static int
942dri2GetSwapInterval(__GLXDRIdrawable *pdraw)
943{
944   struct dri2_drawable *priv =  (struct dri2_drawable *) pdraw;
945
946  return priv->swap_interval;
947}
948
949static const __DRIdri2LoaderExtension dri2LoaderExtension = {
950   .base = { __DRI_DRI2_LOADER, 3 },
951
952   .getBuffers              = dri2GetBuffers,
953   .flushFrontBuffer        = dri2FlushFrontBuffer,
954   .getBuffersWithFormat    = dri2GetBuffersWithFormat,
955};
956
957static const __DRIdri2LoaderExtension dri2LoaderExtension_old = {
958   .base = { __DRI_DRI2_LOADER, 3 },
959
960   .getBuffers              = dri2GetBuffers,
961   .flushFrontBuffer        = dri2FlushFrontBuffer,
962   .getBuffersWithFormat    = NULL,
963};
964
965static const __DRIuseInvalidateExtension dri2UseInvalidate = {
966   .base = { __DRI_USE_INVALIDATE, 1 }
967};
968
969_X_HIDDEN void
970dri2InvalidateBuffers(Display *dpy, XID drawable)
971{
972   __GLXDRIdrawable *pdraw =
973      dri2GetGlxDrawableFromXDrawableId(dpy, drawable);
974   struct dri2_screen *psc;
975   struct dri2_drawable *pdp = (struct dri2_drawable *) pdraw;
976
977   if (!pdraw)
978      return;
979
980   psc = (struct dri2_screen *) pdraw->psc;
981
982   if (pdraw && psc->f && psc->f->base.version >= 3 && psc->f->invalidate)
983       psc->f->invalidate(pdp->driDrawable);
984}
985
986static void
987dri2_bind_tex_image(Display * dpy,
988		    GLXDrawable drawable,
989		    int buffer, const int *attrib_list)
990{
991   struct glx_context *gc = __glXGetCurrentContext();
992   struct dri2_context *pcp = (struct dri2_context *) gc;
993   __GLXDRIdrawable *base = GetGLXDRIDrawable(dpy, drawable);
994   struct glx_display *dpyPriv = __glXInitialize(dpy);
995   struct dri2_drawable *pdraw = (struct dri2_drawable *) base;
996   struct dri2_display *pdp;
997   struct dri2_screen *psc;
998
999   if (dpyPriv == NULL)
1000       return;
1001
1002   pdp = (struct dri2_display *) dpyPriv->dri2Display;
1003
1004   if (pdraw != NULL) {
1005      psc = (struct dri2_screen *) base->psc;
1006
1007      if (!pdp->invalidateAvailable && psc->f &&
1008           psc->f->base.version >= 3 && psc->f->invalidate)
1009	 psc->f->invalidate(pdraw->driDrawable);
1010
1011      if (psc->texBuffer->base.version >= 2 &&
1012	  psc->texBuffer->setTexBuffer2 != NULL) {
1013	 (*psc->texBuffer->setTexBuffer2) (pcp->driContext,
1014					   pdraw->base.textureTarget,
1015					   pdraw->base.textureFormat,
1016					   pdraw->driDrawable);
1017      }
1018      else {
1019	 (*psc->texBuffer->setTexBuffer) (pcp->driContext,
1020					  pdraw->base.textureTarget,
1021					  pdraw->driDrawable);
1022      }
1023   }
1024}
1025
1026static void
1027dri2_release_tex_image(Display * dpy, GLXDrawable drawable, int buffer)
1028{
1029   struct glx_context *gc = __glXGetCurrentContext();
1030   struct dri2_context *pcp = (struct dri2_context *) gc;
1031   __GLXDRIdrawable *base = GetGLXDRIDrawable(dpy, drawable);
1032   struct glx_display *dpyPriv = __glXInitialize(dpy);
1033   struct dri2_drawable *pdraw = (struct dri2_drawable *) base;
1034   struct dri2_screen *psc;
1035
1036   if (dpyPriv != NULL && pdraw != NULL) {
1037      psc = (struct dri2_screen *) base->psc;
1038
1039      if (psc->texBuffer->base.version >= 3 &&
1040          psc->texBuffer->releaseTexBuffer != NULL) {
1041         (*psc->texBuffer->releaseTexBuffer) (pcp->driContext,
1042                                           pdraw->base.textureTarget,
1043                                           pdraw->driDrawable);
1044      }
1045   }
1046}
1047
1048static const struct glx_context_vtable dri2_context_vtable = {
1049   .destroy             = dri2_destroy_context,
1050   .bind                = dri2_bind_context,
1051   .unbind              = dri2_unbind_context,
1052   .wait_gl             = dri2_wait_gl,
1053   .wait_x              = dri2_wait_x,
1054   .use_x_font          = DRI_glXUseXFont,
1055   .bind_tex_image      = dri2_bind_tex_image,
1056   .release_tex_image   = dri2_release_tex_image,
1057   .get_proc_address    = NULL,
1058   .interop_query_device_info = dri2_interop_query_device_info,
1059   .interop_export_object = dri2_interop_export_object
1060};
1061
1062static void
1063dri2BindExtensions(struct dri2_screen *psc, struct glx_display * priv,
1064                   const char *driverName)
1065{
1066   const struct dri2_display *const pdp = (struct dri2_display *)
1067      priv->dri2Display;
1068   const __DRIextension **extensions;
1069   int i;
1070
1071   extensions = psc->core->getExtensions(psc->driScreen);
1072
1073   __glXEnableDirectExtension(&psc->base, "GLX_SGI_video_sync");
1074   __glXEnableDirectExtension(&psc->base, "GLX_SGI_swap_control");
1075   __glXEnableDirectExtension(&psc->base, "GLX_MESA_swap_control");
1076   __glXEnableDirectExtension(&psc->base, "GLX_SGI_make_current_read");
1077
1078   /*
1079    * GLX_INTEL_swap_event is broken on the server side, where it's
1080    * currently unconditionally enabled. This completely breaks
1081    * systems running on drivers which don't support that extension.
1082    * There's no way to test for its presence on this side, so instead
1083    * of disabling it unconditionally, just disable it for drivers
1084    * which are known to not support it, or for DDX drivers supporting
1085    * only an older (pre-ScheduleSwap) version of DRI2.
1086    *
1087    * This is a hack which is required until:
1088    * http://lists.x.org/archives/xorg-devel/2013-February/035449.html
1089    * is merged and updated xserver makes it's way into distros:
1090    */
1091   if (pdp->swapAvailable && strcmp(driverName, "vmwgfx") != 0) {
1092      __glXEnableDirectExtension(&psc->base, "GLX_INTEL_swap_event");
1093   }
1094
1095   if (psc->dri2->base.version >= 3) {
1096      const unsigned mask = psc->dri2->getAPIMask(psc->driScreen);
1097
1098      __glXEnableDirectExtension(&psc->base, "GLX_ARB_create_context");
1099      __glXEnableDirectExtension(&psc->base, "GLX_ARB_create_context_profile");
1100
1101      if ((mask & ((1 << __DRI_API_GLES) |
1102                   (1 << __DRI_API_GLES2) |
1103                   (1 << __DRI_API_GLES3))) != 0) {
1104         __glXEnableDirectExtension(&psc->base,
1105                                    "GLX_EXT_create_context_es_profile");
1106         __glXEnableDirectExtension(&psc->base,
1107                                    "GLX_EXT_create_context_es2_profile");
1108      }
1109   }
1110
1111   for (i = 0; extensions[i]; i++) {
1112      if ((strcmp(extensions[i]->name, __DRI_TEX_BUFFER) == 0)) {
1113	 psc->texBuffer = (__DRItexBufferExtension *) extensions[i];
1114	 __glXEnableDirectExtension(&psc->base, "GLX_EXT_texture_from_pixmap");
1115      }
1116
1117      if ((strcmp(extensions[i]->name, __DRI2_FLUSH) == 0)) {
1118	 psc->f = (__DRI2flushExtension *) extensions[i];
1119	 /* internal driver extension, no GL extension exposed */
1120      }
1121
1122      if ((strcmp(extensions[i]->name, __DRI2_CONFIG_QUERY) == 0))
1123	 psc->config = (__DRI2configQueryExtension *) extensions[i];
1124
1125      if (((strcmp(extensions[i]->name, __DRI2_THROTTLE) == 0)))
1126	 psc->throttle = (__DRI2throttleExtension *) extensions[i];
1127
1128      /* DRI2 version 3 is also required because
1129       * GLX_ARB_create_context_robustness requires GLX_ARB_create_context.
1130       */
1131      if (psc->dri2->base.version >= 3
1132          && strcmp(extensions[i]->name, __DRI2_ROBUSTNESS) == 0)
1133         __glXEnableDirectExtension(&psc->base,
1134                                    "GLX_ARB_create_context_robustness");
1135
1136      /* DRI2 version 3 is also required because GLX_MESA_query_renderer
1137       * requires GLX_ARB_create_context_profile.
1138       */
1139      if (psc->dri2->base.version >= 3
1140          && strcmp(extensions[i]->name, __DRI2_RENDERER_QUERY) == 0) {
1141         psc->rendererQuery = (__DRI2rendererQueryExtension *) extensions[i];
1142         __glXEnableDirectExtension(&psc->base, "GLX_MESA_query_renderer");
1143      }
1144
1145      if (strcmp(extensions[i]->name, __DRI2_INTEROP) == 0)
1146	 psc->interop = (__DRI2interopExtension*)extensions[i];
1147   }
1148}
1149
1150static const struct glx_screen_vtable dri2_screen_vtable = {
1151   .create_context         = dri2_create_context,
1152   .create_context_attribs = dri2_create_context_attribs,
1153   .query_renderer_integer = dri2_query_renderer_integer,
1154   .query_renderer_string  = dri2_query_renderer_string,
1155};
1156
1157static struct glx_screen *
1158dri2CreateScreen(int screen, struct glx_display * priv)
1159{
1160   const __DRIconfig **driver_configs;
1161   const __DRIextension **extensions;
1162   const struct dri2_display *const pdp = (struct dri2_display *)
1163      priv->dri2Display;
1164   struct dri2_screen *psc;
1165   __GLXDRIscreen *psp;
1166   struct glx_config *configs = NULL, *visuals = NULL;
1167   char *driverName = NULL, *loader_driverName, *deviceName, *tmp;
1168   drm_magic_t magic;
1169   int i;
1170
1171   psc = calloc(1, sizeof *psc);
1172   if (psc == NULL)
1173      return NULL;
1174
1175   psc->fd = -1;
1176
1177   if (!glx_screen_init(&psc->base, screen, priv)) {
1178      free(psc);
1179      return NULL;
1180   }
1181
1182   if (!DRI2Connect(priv->dpy, RootWindow(priv->dpy, screen),
1183		    &driverName, &deviceName)) {
1184      glx_screen_cleanup(&psc->base);
1185      free(psc);
1186      InfoMessageF("screen %d does not appear to be DRI2 capable\n", screen);
1187      return NULL;
1188   }
1189
1190   psc->fd = loader_open_device(deviceName);
1191   if (psc->fd < 0) {
1192      ErrorMessageF("failed to open drm device: %s\n", strerror(errno));
1193      goto handle_error;
1194   }
1195
1196   if (drmGetMagic(psc->fd, &magic)) {
1197      ErrorMessageF("failed to get magic\n");
1198      goto handle_error;
1199   }
1200
1201   if (!DRI2Authenticate(priv->dpy, RootWindow(priv->dpy, screen), magic)) {
1202      ErrorMessageF("failed to authenticate magic %d\n", magic);
1203      goto handle_error;
1204   }
1205
1206   /* If Mesa knows about the appropriate driver for this fd, then trust it.
1207    * Otherwise, default to the server's value.
1208    */
1209   loader_driverName = loader_get_driver_for_fd(psc->fd);
1210   if (loader_driverName) {
1211      free(driverName);
1212      driverName = loader_driverName;
1213   }
1214
1215   psc->driver = driOpenDriver(driverName);
1216   if (psc->driver == NULL) {
1217      ErrorMessageF("driver pointer missing\n");
1218      goto handle_error;
1219   }
1220
1221   extensions = driGetDriverExtensions(psc->driver, driverName);
1222   if (extensions == NULL)
1223      goto handle_error;
1224
1225   for (i = 0; extensions[i]; i++) {
1226      if (strcmp(extensions[i]->name, __DRI_CORE) == 0)
1227	 psc->core = (__DRIcoreExtension *) extensions[i];
1228      if (strcmp(extensions[i]->name, __DRI_DRI2) == 0)
1229	 psc->dri2 = (__DRIdri2Extension *) extensions[i];
1230   }
1231
1232   if (psc->core == NULL || psc->dri2 == NULL) {
1233      ErrorMessageF("core dri or dri2 extension not found\n");
1234      goto handle_error;
1235   }
1236
1237   if (psc->dri2->base.version >= 4) {
1238      psc->driScreen =
1239         psc->dri2->createNewScreen2(screen, psc->fd,
1240                                     (const __DRIextension **)
1241                                     &pdp->loader_extensions[0],
1242                                     extensions,
1243                                     &driver_configs, psc);
1244   } else {
1245      psc->driScreen =
1246         psc->dri2->createNewScreen(screen, psc->fd,
1247                                    (const __DRIextension **)
1248                                    &pdp->loader_extensions[0],
1249                                    &driver_configs, psc);
1250   }
1251
1252   if (psc->driScreen == NULL) {
1253      ErrorMessageF("failed to create dri screen\n");
1254      goto handle_error;
1255   }
1256
1257   dri2BindExtensions(psc, priv, driverName);
1258
1259   configs = driConvertConfigs(psc->core, psc->base.configs, driver_configs);
1260   visuals = driConvertConfigs(psc->core, psc->base.visuals, driver_configs);
1261
1262   if (!configs || !visuals) {
1263       ErrorMessageF("No matching fbConfigs or visuals found\n");
1264       goto handle_error;
1265   }
1266
1267   glx_config_destroy_list(psc->base.configs);
1268   psc->base.configs = configs;
1269   glx_config_destroy_list(psc->base.visuals);
1270   psc->base.visuals = visuals;
1271
1272   psc->driver_configs = driver_configs;
1273
1274   psc->base.vtable = &dri2_screen_vtable;
1275   psp = &psc->vtable;
1276   psc->base.driScreen = psp;
1277   psp->destroyScreen = dri2DestroyScreen;
1278   psp->createDrawable = dri2CreateDrawable;
1279   psp->swapBuffers = dri2SwapBuffers;
1280   psp->getDrawableMSC = NULL;
1281   psp->waitForMSC = NULL;
1282   psp->waitForSBC = NULL;
1283   psp->setSwapInterval = NULL;
1284   psp->getSwapInterval = NULL;
1285   psp->getBufferAge = NULL;
1286
1287   if (pdp->driMinor >= 2) {
1288      psp->getDrawableMSC = dri2DrawableGetMSC;
1289      psp->waitForMSC = dri2WaitForMSC;
1290      psp->waitForSBC = dri2WaitForSBC;
1291      psp->setSwapInterval = dri2SetSwapInterval;
1292      psp->getSwapInterval = dri2GetSwapInterval;
1293      __glXEnableDirectExtension(&psc->base, "GLX_OML_sync_control");
1294   }
1295
1296   /* DRI2 supports SubBuffer through DRI2CopyRegion, so it's always
1297    * available.*/
1298   psp->copySubBuffer = dri2CopySubBuffer;
1299   __glXEnableDirectExtension(&psc->base, "GLX_MESA_copy_sub_buffer");
1300
1301   free(driverName);
1302   free(deviceName);
1303
1304   tmp = getenv("LIBGL_SHOW_FPS");
1305   psc->show_fps_interval = (tmp) ? atoi(tmp) : 0;
1306   if (psc->show_fps_interval < 0)
1307      psc->show_fps_interval = 0;
1308
1309   InfoMessageF("Using DRI2 for screen %d\n", screen);
1310
1311   return &psc->base;
1312
1313handle_error:
1314   CriticalErrorMessageF("failed to load driver: %s\n", driverName);
1315
1316   if (configs)
1317       glx_config_destroy_list(configs);
1318   if (visuals)
1319       glx_config_destroy_list(visuals);
1320   if (psc->driScreen)
1321       psc->core->destroyScreen(psc->driScreen);
1322   psc->driScreen = NULL;
1323   if (psc->fd >= 0)
1324      close(psc->fd);
1325   if (psc->driver)
1326      dlclose(psc->driver);
1327
1328   free(driverName);
1329   free(deviceName);
1330   glx_screen_cleanup(&psc->base);
1331   free(psc);
1332
1333   return NULL;
1334}
1335
1336/* Called from __glXFreeDisplayPrivate.
1337 */
1338static void
1339dri2DestroyDisplay(__GLXDRIdisplay * dpy)
1340{
1341   struct dri2_display *pdp = (struct dri2_display *) dpy;
1342
1343   __glxHashDestroy(pdp->dri2Hash);
1344   free(dpy);
1345}
1346
1347_X_HIDDEN __GLXDRIdrawable *
1348dri2GetGlxDrawableFromXDrawableId(Display *dpy, XID id)
1349{
1350   struct glx_display *d = __glXInitialize(dpy);
1351   struct dri2_display *pdp = (struct dri2_display *) d->dri2Display;
1352   __GLXDRIdrawable *pdraw;
1353
1354   if (__glxHashLookup(pdp->dri2Hash, id, (void *) &pdraw) == 0)
1355      return pdraw;
1356
1357   return NULL;
1358}
1359
1360/*
1361 * Allocate, initialize and return a __DRIdisplayPrivate object.
1362 * This is called from __glXInitialize() when we are given a new
1363 * display pointer.
1364 */
1365_X_HIDDEN __GLXDRIdisplay *
1366dri2CreateDisplay(Display * dpy)
1367{
1368   struct dri2_display *pdp;
1369   int eventBase, errorBase, i;
1370
1371   if (!DRI2QueryExtension(dpy, &eventBase, &errorBase))
1372      return NULL;
1373
1374   pdp = malloc(sizeof *pdp);
1375   if (pdp == NULL)
1376      return NULL;
1377
1378   if (!DRI2QueryVersion(dpy, &pdp->driMajor, &pdp->driMinor)) {
1379      free(pdp);
1380      return NULL;
1381   }
1382
1383   pdp->driPatch = 0;
1384   pdp->swapAvailable = (pdp->driMinor >= 2);
1385   pdp->invalidateAvailable = (pdp->driMinor >= 3);
1386
1387   pdp->base.destroyDisplay = dri2DestroyDisplay;
1388   pdp->base.createScreen = dri2CreateScreen;
1389
1390   i = 0;
1391   if (pdp->driMinor < 1)
1392      pdp->loader_extensions[i++] = &dri2LoaderExtension_old.base;
1393   else
1394      pdp->loader_extensions[i++] = &dri2LoaderExtension.base;
1395
1396   pdp->loader_extensions[i++] = &systemTimeExtension.base;
1397
1398   pdp->loader_extensions[i++] = &dri2UseInvalidate.base;
1399
1400   pdp->loader_extensions[i++] = NULL;
1401
1402   pdp->dri2Hash = __glxHashCreate();
1403   if (pdp->dri2Hash == NULL) {
1404      free(pdp);
1405      return NULL;
1406   }
1407
1408   return &pdp->base;
1409}
1410
1411#endif /* GLX_DIRECT_RENDERING */
1412