egl: drop unused _EGLDriver from {Bind,Release}TexImage()
[platform/upstream/mesa.git] / src / egl / drivers / dri2 / egl_dri2.c
1 /*
2  * Copyright © 2010 Intel Corporation
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,
16  * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
17  * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
18  * NONINFRINGEMENT.  IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT
19  * HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY,
20  * WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
21  * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
22  * DEALINGS IN THE SOFTWARE.
23  *
24  * Authors:
25  *    Kristian Høgsberg <krh@bitplanet.net>
26  */
27
28 #include <stdbool.h>
29 #include <stdint.h>
30 #include <stdbool.h>
31 #include <stdlib.h>
32 #include <string.h>
33 #include <stdio.h>
34 #include <limits.h>
35 #include <dlfcn.h>
36 #include <fcntl.h>
37 #include <errno.h>
38 #include <unistd.h>
39 #include <c11/threads.h>
40 #include <time.h>
41 #ifdef HAVE_LIBDRM
42 #include <xf86drm.h>
43 #include "drm-uapi/drm_fourcc.h"
44 #endif
45 #include <GL/gl.h>
46 #include <GL/internal/dri_interface.h>
47 #include <sys/types.h>
48 #include <sys/stat.h>
49
50 #ifdef HAVE_WAYLAND_PLATFORM
51 #include <wayland-client.h>
52 #include "wayland-drm.h"
53 #include "wayland-drm-client-protocol.h"
54 #include "linux-dmabuf-unstable-v1-client-protocol.h"
55 #endif
56
57 #ifdef HAVE_X11_PLATFORM
58 #include "X11/Xlibint.h"
59 #endif
60
61 #include "egldefines.h"
62 #include "egl_dri2.h"
63 #include "GL/mesa_glinterop.h"
64 #include "loader/loader.h"
65 #include "util/os_file.h"
66 #include "util/u_atomic.h"
67 #include "util/u_vector.h"
68 #include "mapi/glapi/glapi.h"
69 #include "util/bitscan.h"
70 #include "util/u_math.h"
71
72 /* Additional definitions not yet in the drm_fourcc.h.
73  */
74 #ifndef DRM_FORMAT_P010
75 #define DRM_FORMAT_P010          fourcc_code('P', '0', '1', '0') /* 2x2 subsampled Cb:Cr plane 10 bits per channel */
76 #endif
77
78 #ifndef DRM_FORMAT_P012
79 #define DRM_FORMAT_P012          fourcc_code('P', '0', '1', '2') /* 2x2 subsampled Cb:Cr plane 12 bits per channel */
80 #endif
81
82 #ifndef DRM_FORMAT_P016
83 #define DRM_FORMAT_P016          fourcc_code('P', '0', '1', '6') /* 2x2 subsampled Cb:Cr plane 16 bits per channel */
84 #endif
85
86 #define NUM_ATTRIBS 12
87
88 static const struct dri2_pbuffer_visual {
89    const char *format_name;
90    unsigned int dri_image_format;
91    int rgba_shifts[4];
92    unsigned int rgba_sizes[4];
93 } dri2_pbuffer_visuals[] = {
94    {
95       "ABGR16F",
96       __DRI_IMAGE_FORMAT_ABGR16161616F,
97       { 0, 16, 32, 48 },
98       { 16, 16, 16, 16 }
99    },
100    {
101       "XBGR16F",
102       __DRI_IMAGE_FORMAT_XBGR16161616F,
103       { 0, 16, 32, -1 },
104       { 16, 16, 16, 0 }
105    },
106    {
107       "A2RGB10",
108       __DRI_IMAGE_FORMAT_ARGB2101010,
109       { 20, 10, 0, 30 },
110       { 10, 10, 10, 2 }
111    },
112    {
113       "X2RGB10",
114       __DRI_IMAGE_FORMAT_XRGB2101010,
115       { 20, 10, 0, -1 },
116       { 10, 10, 10, 0 }
117    },
118    {
119       "ARGB8888",
120       __DRI_IMAGE_FORMAT_ARGB8888,
121       { 16, 8, 0, 24 },
122       { 8, 8, 8, 8 }
123    },
124    {
125       "RGB888",
126       __DRI_IMAGE_FORMAT_XRGB8888,
127       { 16, 8, 0, -1 },
128       { 8, 8, 8, 0 }
129    },
130    {
131       "RGB565",
132       __DRI_IMAGE_FORMAT_RGB565,
133       { 11, 5, 0, -1 },
134       { 5, 6, 5, 0 }
135    },
136 };
137
138 static void
139 dri_set_background_context(void *loaderPrivate)
140 {
141    _EGLContext *ctx = _eglGetCurrentContext();
142    _EGLThreadInfo *t = _eglGetCurrentThread();
143
144    _eglBindContextToThread(ctx, t);
145 }
146
147 static void
148 dri2_gl_flush()
149 {
150    static void (*glFlush)(void);
151    static mtx_t glFlushMutex = _MTX_INITIALIZER_NP;
152
153    mtx_lock(&glFlushMutex);
154    if (!glFlush)
155       glFlush = _glapi_get_proc_address("glFlush");
156    mtx_unlock(&glFlushMutex);
157
158    /* if glFlush is not available things are horribly broken */
159    if (!glFlush) {
160       _eglLog(_EGL_WARNING, "DRI2: failed to find glFlush entry point");
161       return;
162    }
163
164    glFlush();
165 }
166
167 static GLboolean
168 dri_is_thread_safe(void *loaderPrivate)
169 {
170    struct dri2_egl_surface *dri2_surf = loaderPrivate;
171    UNUSED _EGLDisplay *display =  dri2_surf->base.Resource.Display;
172
173 #ifdef HAVE_X11_PLATFORM
174    Display *xdpy = (Display*)display->PlatformDisplay;
175
176    /* Check Xlib is running in thread safe mode when running on EGL/X11-xlib
177     * platform
178     *
179     * 'lock_fns' is the XLockDisplay function pointer of the X11 display 'dpy'.
180     * It wll be NULL if XInitThreads wasn't called.
181     */
182    if (display->Platform == _EGL_PLATFORM_X11 && xdpy && !xdpy->lock_fns)
183       return false;
184 #endif
185
186 #ifdef HAVE_WAYLAND_PLATFORM
187    if (display->Platform == _EGL_PLATFORM_WAYLAND)
188       return true;
189 #endif
190
191    return true;
192 }
193
194 const __DRIbackgroundCallableExtension background_callable_extension = {
195    .base = { __DRI_BACKGROUND_CALLABLE, 2 },
196
197    .setBackgroundContext = dri_set_background_context,
198    .isThreadSafe         = dri_is_thread_safe,
199 };
200
201 const __DRIuseInvalidateExtension use_invalidate = {
202    .base = { __DRI_USE_INVALIDATE, 1 }
203 };
204
205 static void
206 dri2_get_pbuffer_drawable_info(__DRIdrawable * draw,
207                                int *x, int *y, int *w, int *h,
208                                void *loaderPrivate)
209 {
210    struct dri2_egl_surface *dri2_surf = loaderPrivate;
211
212    *x = *y = 0;
213    *w = dri2_surf->base.Width;
214    *h = dri2_surf->base.Height;
215 }
216
217 static int
218 dri2_get_bytes_per_pixel(struct dri2_egl_surface *dri2_surf)
219 {
220    const int depth = dri2_surf->base.Config->BufferSize;
221    return depth ? util_next_power_of_two(depth / 8) : 0;
222 }
223
224 static void
225 dri2_put_image(__DRIdrawable * draw, int op,
226                int x, int y, int w, int h,
227                char *data, void *loaderPrivate)
228 {
229    struct dri2_egl_surface *dri2_surf = loaderPrivate;
230    const int bpp = dri2_get_bytes_per_pixel(dri2_surf);
231    const int width = dri2_surf->base.Width;
232    const int height = dri2_surf->base.Height;
233    const int dst_stride = width*bpp;
234    const int src_stride = w*bpp;
235    const int x_offset = x*bpp;
236    int copy_width = src_stride;
237
238    if (!dri2_surf->swrast_device_buffer)
239       dri2_surf->swrast_device_buffer = malloc(height*dst_stride);
240
241    if (dri2_surf->swrast_device_buffer) {
242       const char *src = data;
243       char *dst = dri2_surf->swrast_device_buffer;
244
245       dst += x_offset;
246       dst += y*dst_stride;
247
248       /* Drivers are allowed to submit OOB PutImage requests, so clip here. */
249       if (copy_width > dst_stride - x_offset)
250          copy_width = dst_stride - x_offset;
251       if (h > height - y)
252          h = height - y;
253
254       for (; 0 < h; --h) {
255          memcpy(dst, src, copy_width);
256          dst += dst_stride;
257          src += src_stride;
258       }
259    }
260 }
261
262 static void
263 dri2_get_image(__DRIdrawable * read,
264                int x, int y, int w, int h,
265                char *data, void *loaderPrivate)
266 {
267    struct dri2_egl_surface *dri2_surf = loaderPrivate;
268    const int bpp = dri2_get_bytes_per_pixel(dri2_surf);
269    const int width = dri2_surf->base.Width;
270    const int height = dri2_surf->base.Height;
271    const int src_stride = width*bpp;
272    const int dst_stride = w*bpp;
273    const int x_offset = x*bpp;
274    int copy_width = dst_stride;
275    const char *src = dri2_surf->swrast_device_buffer;
276    char *dst = data;
277
278    if (!src) {
279       memset(data, 0, copy_width * h);
280       return;
281    }
282
283    src += x_offset;
284    src += y*src_stride;
285
286    /* Drivers are allowed to submit OOB GetImage requests, so clip here. */
287    if (copy_width > src_stride - x_offset)
288       copy_width = src_stride - x_offset;
289    if (h > height - y)
290       h = height - y;
291
292    for (; 0 < h; --h) {
293       memcpy(dst, src, copy_width);
294       src += src_stride;
295       dst += dst_stride;
296    }
297
298 }
299
300 /* HACK: technically we should have swrast_null, instead of these.
301  */
302 const __DRIswrastLoaderExtension swrast_pbuffer_loader_extension = {
303    .base            = { __DRI_SWRAST_LOADER, 1 },
304    .getDrawableInfo = dri2_get_pbuffer_drawable_info,
305    .putImage        = dri2_put_image,
306    .getImage        = dri2_get_image,
307 };
308
309 static const EGLint dri2_to_egl_attribute_map[__DRI_ATTRIB_MAX] = {
310    [__DRI_ATTRIB_BUFFER_SIZE ]          = EGL_BUFFER_SIZE,
311    [__DRI_ATTRIB_LEVEL]                 = EGL_LEVEL,
312    [__DRI_ATTRIB_LUMINANCE_SIZE]        = EGL_LUMINANCE_SIZE,
313    [__DRI_ATTRIB_DEPTH_SIZE]            = EGL_DEPTH_SIZE,
314    [__DRI_ATTRIB_STENCIL_SIZE]          = EGL_STENCIL_SIZE,
315    [__DRI_ATTRIB_SAMPLE_BUFFERS]        = EGL_SAMPLE_BUFFERS,
316    [__DRI_ATTRIB_SAMPLES]               = EGL_SAMPLES,
317    [__DRI_ATTRIB_MAX_PBUFFER_WIDTH]     = EGL_MAX_PBUFFER_WIDTH,
318    [__DRI_ATTRIB_MAX_PBUFFER_HEIGHT]    = EGL_MAX_PBUFFER_HEIGHT,
319    [__DRI_ATTRIB_MAX_PBUFFER_PIXELS]    = EGL_MAX_PBUFFER_PIXELS,
320    [__DRI_ATTRIB_MAX_SWAP_INTERVAL]     = EGL_MAX_SWAP_INTERVAL,
321    [__DRI_ATTRIB_MIN_SWAP_INTERVAL]     = EGL_MIN_SWAP_INTERVAL,
322    [__DRI_ATTRIB_YINVERTED]             = EGL_Y_INVERTED_NOK,
323 };
324
325 const __DRIconfig *
326 dri2_get_dri_config(struct dri2_egl_config *conf, EGLint surface_type,
327                     EGLenum colorspace)
328 {
329    const bool double_buffer = surface_type == EGL_WINDOW_BIT;
330    const bool srgb = colorspace == EGL_GL_COLORSPACE_SRGB_KHR;
331
332    return conf->dri_config[double_buffer][srgb];
333 }
334
335 static EGLBoolean
336 dri2_match_config(const _EGLConfig *conf, const _EGLConfig *criteria)
337 {
338    if (_eglCompareConfigs(conf, criteria, NULL, EGL_FALSE) != 0)
339       return EGL_FALSE;
340
341    if (!_eglMatchConfig(conf, criteria))
342       return EGL_FALSE;
343
344    return EGL_TRUE;
345 }
346
347 void
348 dri2_get_shifts_and_sizes(const __DRIcoreExtension *core,
349                           const __DRIconfig *config, int *shifts,
350                           unsigned int *sizes)
351 {
352    unsigned int mask;
353
354    if (core->getConfigAttrib(config, __DRI_ATTRIB_RED_SHIFT, (unsigned int *)&shifts[0])) {
355       core->getConfigAttrib(config, __DRI_ATTRIB_GREEN_SHIFT, (unsigned int *)&shifts[1]);
356       core->getConfigAttrib(config, __DRI_ATTRIB_BLUE_SHIFT, (unsigned int *)&shifts[2]);
357       core->getConfigAttrib(config, __DRI_ATTRIB_ALPHA_SHIFT, (unsigned int *)&shifts[3]);
358    } else {
359       /* Driver isn't exposing shifts, so convert masks to shifts */
360       core->getConfigAttrib(config, __DRI_ATTRIB_RED_MASK, &mask);
361       shifts[0] = ffs(mask) - 1;
362       core->getConfigAttrib(config, __DRI_ATTRIB_GREEN_MASK, &mask);
363       shifts[1] = ffs(mask) - 1;
364       core->getConfigAttrib(config, __DRI_ATTRIB_BLUE_MASK, &mask);
365       shifts[2] = ffs(mask) - 1;
366       core->getConfigAttrib(config, __DRI_ATTRIB_ALPHA_MASK, &mask);
367       shifts[3] = ffs(mask) - 1;
368    }
369
370    core->getConfigAttrib(config, __DRI_ATTRIB_RED_SIZE, &sizes[0]);
371    core->getConfigAttrib(config, __DRI_ATTRIB_GREEN_SIZE, &sizes[1]);
372    core->getConfigAttrib(config, __DRI_ATTRIB_BLUE_SIZE, &sizes[2]);
373    core->getConfigAttrib(config, __DRI_ATTRIB_ALPHA_SIZE, &sizes[3]);
374 }
375
376 void
377 dri2_get_render_type_float(const __DRIcoreExtension *core,
378                            const __DRIconfig *config,
379                            bool *is_float)
380 {
381    unsigned int render_type;
382
383    core->getConfigAttrib(config, __DRI_ATTRIB_RENDER_TYPE, &render_type);
384    *is_float = (render_type & __DRI_ATTRIB_FLOAT_BIT) ? true : false;
385 }
386
387 unsigned int
388 dri2_image_format_for_pbuffer_config(struct dri2_egl_display *dri2_dpy,
389                                      const __DRIconfig *config)
390 {
391    int shifts[4];
392    unsigned int sizes[4];
393
394    dri2_get_shifts_and_sizes(dri2_dpy->core, config, shifts, sizes);
395
396    for (unsigned i = 0; i < ARRAY_SIZE(dri2_pbuffer_visuals); ++i) {
397       const struct dri2_pbuffer_visual *visual = &dri2_pbuffer_visuals[i];
398
399       if (shifts[0] == visual->rgba_shifts[0] &&
400           shifts[1] == visual->rgba_shifts[1] &&
401           shifts[2] == visual->rgba_shifts[2] &&
402           shifts[3] == visual->rgba_shifts[3] &&
403           sizes[0] == visual->rgba_sizes[0] &&
404           sizes[1] == visual->rgba_sizes[1] &&
405           sizes[2] == visual->rgba_sizes[2] &&
406           sizes[3] == visual->rgba_sizes[3]) {
407          return visual->dri_image_format;
408       }
409    }
410
411    return __DRI_IMAGE_FORMAT_NONE;
412 }
413
414 struct dri2_egl_config *
415 dri2_add_config(_EGLDisplay *disp, const __DRIconfig *dri_config, int id,
416                 EGLint surface_type, const EGLint *attr_list,
417                 const int *rgba_shifts, const unsigned int *rgba_sizes)
418 {
419    struct dri2_egl_config *conf;
420    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
421    _EGLConfig base;
422    unsigned int attrib, value, double_buffer;
423    bool srgb = false;
424    EGLint key, bind_to_texture_rgb, bind_to_texture_rgba;
425    int dri_shifts[4] = { -1, -1, -1, -1 };
426    unsigned int dri_sizes[4] = { 0, 0, 0, 0 };
427    _EGLConfig *matching_config;
428    EGLint num_configs = 0;
429    EGLint config_id;
430
431    _eglInitConfig(&base, disp, id);
432
433    double_buffer = 0;
434    bind_to_texture_rgb = 0;
435    bind_to_texture_rgba = 0;
436
437    for (int i = 0; i < __DRI_ATTRIB_MAX; ++i) {
438       if (!dri2_dpy->core->indexConfigAttrib(dri_config, i, &attrib, &value))
439          break;
440
441       switch (attrib) {
442       case __DRI_ATTRIB_RENDER_TYPE:
443          if (value & __DRI_ATTRIB_FLOAT_BIT)
444             base.ComponentType = EGL_COLOR_COMPONENT_TYPE_FLOAT_EXT;
445          if (value & __DRI_ATTRIB_RGBA_BIT)
446             value = EGL_RGB_BUFFER;
447          else if (value & __DRI_ATTRIB_LUMINANCE_BIT)
448             value = EGL_LUMINANCE_BUFFER;
449          else
450             return NULL;
451          base.ColorBufferType = value;
452          break;
453
454       case __DRI_ATTRIB_CONFIG_CAVEAT:
455          if (value & __DRI_ATTRIB_NON_CONFORMANT_CONFIG)
456             value = EGL_NON_CONFORMANT_CONFIG;
457          else if (value & __DRI_ATTRIB_SLOW_BIT)
458             value = EGL_SLOW_CONFIG;
459          else
460             value = EGL_NONE;
461          base.ConfigCaveat = value;
462          break;
463
464       case __DRI_ATTRIB_BIND_TO_TEXTURE_RGB:
465          bind_to_texture_rgb = value;
466          break;
467
468       case __DRI_ATTRIB_BIND_TO_TEXTURE_RGBA:
469          bind_to_texture_rgba = value;
470          break;
471
472       case __DRI_ATTRIB_DOUBLE_BUFFER:
473          double_buffer = value;
474          break;
475
476       case __DRI_ATTRIB_RED_SIZE:
477          dri_sizes[0] = value;
478          base.RedSize = value;
479          break;
480
481       case __DRI_ATTRIB_RED_MASK:
482          dri_shifts[0] = ffs(value) - 1;
483          break;
484
485       case __DRI_ATTRIB_RED_SHIFT:
486          dri_shifts[0] = value;
487          break;
488
489       case __DRI_ATTRIB_GREEN_SIZE:
490          dri_sizes[1] = value;
491          base.GreenSize = value;
492          break;
493
494       case __DRI_ATTRIB_GREEN_MASK:
495          dri_shifts[1] = ffs(value) - 1;
496          break;
497
498       case __DRI_ATTRIB_GREEN_SHIFT:
499          dri_shifts[1] = value;
500          break;
501
502       case __DRI_ATTRIB_BLUE_SIZE:
503          dri_sizes[2] = value;
504          base.BlueSize = value;
505          break;
506
507       case __DRI_ATTRIB_BLUE_MASK:
508          dri_shifts[2] = ffs(value) - 1;
509          break;
510
511       case __DRI_ATTRIB_BLUE_SHIFT:
512          dri_shifts[2] = value;
513          break;
514
515      case __DRI_ATTRIB_ALPHA_SIZE:
516          dri_sizes[3] = value;
517          base.AlphaSize = value;
518          break;
519
520       case __DRI_ATTRIB_ALPHA_MASK:
521          dri_shifts[3] = ffs(value) - 1;
522          break;
523
524       case __DRI_ATTRIB_ALPHA_SHIFT:
525          dri_shifts[3] = value;
526          break;
527
528       case __DRI_ATTRIB_ACCUM_RED_SIZE:
529       case __DRI_ATTRIB_ACCUM_GREEN_SIZE:
530       case __DRI_ATTRIB_ACCUM_BLUE_SIZE:
531       case __DRI_ATTRIB_ACCUM_ALPHA_SIZE:
532          /* Don't expose visuals with the accumulation buffer. */
533          if (value > 0)
534             return NULL;
535          break;
536
537       case __DRI_ATTRIB_FRAMEBUFFER_SRGB_CAPABLE:
538          srgb = value != 0;
539          if (!disp->Extensions.KHR_gl_colorspace && srgb)
540             return NULL;
541          break;
542
543       case __DRI_ATTRIB_MAX_PBUFFER_WIDTH:
544          base.MaxPbufferWidth = _EGL_MAX_PBUFFER_WIDTH;
545          break;
546       case __DRI_ATTRIB_MAX_PBUFFER_HEIGHT:
547          base.MaxPbufferHeight = _EGL_MAX_PBUFFER_HEIGHT;
548          break;
549       case __DRI_ATTRIB_MUTABLE_RENDER_BUFFER:
550          if (disp->Extensions.KHR_mutable_render_buffer)
551             surface_type |= EGL_MUTABLE_RENDER_BUFFER_BIT_KHR;
552          break;
553       default:
554          key = dri2_to_egl_attribute_map[attrib];
555          if (key != 0)
556             _eglSetConfigKey(&base, key, value);
557          break;
558       }
559    }
560
561    if (attr_list)
562       for (int i = 0; attr_list[i] != EGL_NONE; i += 2)
563          _eglSetConfigKey(&base, attr_list[i], attr_list[i+1]);
564
565    if (rgba_shifts && memcmp(rgba_shifts, dri_shifts, sizeof(dri_shifts)))
566       return NULL;
567
568    if (rgba_sizes && memcmp(rgba_sizes, dri_sizes, sizeof(dri_sizes)))
569       return NULL;
570
571    base.NativeRenderable = EGL_TRUE;
572
573    base.SurfaceType = surface_type;
574    if (surface_type & (EGL_PBUFFER_BIT |
575        (disp->Extensions.NOK_texture_from_pixmap ? EGL_PIXMAP_BIT : 0))) {
576       base.BindToTextureRGB = bind_to_texture_rgb;
577       if (base.AlphaSize > 0)
578          base.BindToTextureRGBA = bind_to_texture_rgba;
579    }
580
581    if (double_buffer) {
582       surface_type &= ~EGL_PIXMAP_BIT;
583    }
584
585    /* No support for pbuffer + MSAA for now.
586     *
587     * XXX TODO: pbuffer + MSAA does not work and causes crashes.
588     * See QT bugreport: https://bugreports.qt.io/browse/QTBUG-47509
589     */
590    if (base.Samples) {
591       surface_type &= ~EGL_PBUFFER_BIT;
592    }
593
594    if (!surface_type)
595       return NULL;
596
597    base.RenderableType = disp->ClientAPIs;
598    base.Conformant = disp->ClientAPIs;
599
600    base.MinSwapInterval = dri2_dpy->min_swap_interval;
601    base.MaxSwapInterval = dri2_dpy->max_swap_interval;
602
603    if (!_eglValidateConfig(&base, EGL_FALSE)) {
604       _eglLog(_EGL_DEBUG, "DRI2: failed to validate config %d", id);
605       return NULL;
606    }
607
608    config_id = base.ConfigID;
609    base.ConfigID    = EGL_DONT_CARE;
610    base.SurfaceType = EGL_DONT_CARE;
611    num_configs = _eglFilterArray(disp->Configs, (void **) &matching_config, 1,
612                                  (_EGLArrayForEach) dri2_match_config, &base);
613
614    if (num_configs == 1) {
615       conf = (struct dri2_egl_config *) matching_config;
616
617       if (!conf->dri_config[double_buffer][srgb])
618          conf->dri_config[double_buffer][srgb] = dri_config;
619       else
620          /* a similar config type is already added (unlikely) => discard */
621          return NULL;
622    }
623    else if (num_configs == 0) {
624       conf = calloc(1, sizeof *conf);
625       if (conf == NULL)
626          return NULL;
627
628       conf->dri_config[double_buffer][srgb] = dri_config;
629
630       memcpy(&conf->base, &base, sizeof base);
631       conf->base.SurfaceType = 0;
632       conf->base.ConfigID = config_id;
633
634       _eglLinkConfig(&conf->base);
635    }
636    else {
637       unreachable("duplicates should not be possible");
638       return NULL;
639    }
640
641    conf->base.SurfaceType |= surface_type;
642
643    return conf;
644 }
645
646 EGLBoolean
647 dri2_add_pbuffer_configs_for_visuals(_EGLDisplay *disp)
648 {
649    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
650    unsigned int format_count[ARRAY_SIZE(dri2_pbuffer_visuals)] = { 0 };
651    unsigned int config_count = 0;
652
653    for (unsigned i = 0; dri2_dpy->driver_configs[i] != NULL; i++) {
654       for (unsigned j = 0; j < ARRAY_SIZE(dri2_pbuffer_visuals); j++) {
655          struct dri2_egl_config *dri2_conf;
656
657          dri2_conf = dri2_add_config(disp, dri2_dpy->driver_configs[i],
658                config_count + 1, EGL_PBUFFER_BIT, NULL,
659                dri2_pbuffer_visuals[j].rgba_shifts, dri2_pbuffer_visuals[j].rgba_sizes);
660
661          if (dri2_conf) {
662             if (dri2_conf->base.ConfigID == config_count + 1)
663                config_count++;
664             format_count[j]++;
665          }
666       }
667    }
668
669    for (unsigned i = 0; i < ARRAY_SIZE(format_count); i++) {
670       if (!format_count[i]) {
671          _eglLog(_EGL_DEBUG, "No DRI config supports native format %s",
672                dri2_pbuffer_visuals[i].format_name);
673       }
674    }
675
676    return (config_count != 0);
677 }
678
679 __DRIimage *
680 dri2_lookup_egl_image(__DRIscreen *screen, void *image, void *data)
681 {
682    _EGLDisplay *disp = data;
683    struct dri2_egl_image *dri2_img;
684    _EGLImage *img;
685
686    (void) screen;
687
688    img = _eglLookupImage(image, disp);
689    if (img == NULL) {
690       _eglError(EGL_BAD_PARAMETER, "dri2_lookup_egl_image");
691       return NULL;
692    }
693
694    dri2_img = dri2_egl_image(image);
695
696    return dri2_img->dri_image;
697 }
698
699 const __DRIimageLookupExtension image_lookup_extension = {
700    .base = { __DRI_IMAGE_LOOKUP, 1 },
701
702    .lookupEGLImage       = dri2_lookup_egl_image
703 };
704
705 struct dri2_extension_match {
706    const char *name;
707    int version;
708    int offset;
709 };
710
711 static const struct dri2_extension_match dri3_driver_extensions[] = {
712    { __DRI_CORE, 1, offsetof(struct dri2_egl_display, core) },
713    { __DRI_IMAGE_DRIVER, 1, offsetof(struct dri2_egl_display, image_driver) },
714    { NULL, 0, 0 }
715 };
716
717 static const struct dri2_extension_match dri2_driver_extensions[] = {
718    { __DRI_CORE, 1, offsetof(struct dri2_egl_display, core) },
719    { __DRI_DRI2, 2, offsetof(struct dri2_egl_display, dri2) },
720    { NULL, 0, 0 }
721 };
722
723 static const struct dri2_extension_match dri2_core_extensions[] = {
724    { __DRI2_FLUSH, 1, offsetof(struct dri2_egl_display, flush) },
725    { __DRI_TEX_BUFFER, 2, offsetof(struct dri2_egl_display, tex_buffer) },
726    { __DRI_IMAGE, 1, offsetof(struct dri2_egl_display, image) },
727    { NULL, 0, 0 }
728 };
729
730 static const struct dri2_extension_match swrast_driver_extensions[] = {
731    { __DRI_CORE, 1, offsetof(struct dri2_egl_display, core) },
732    { __DRI_SWRAST, 2, offsetof(struct dri2_egl_display, swrast) },
733    { NULL, 0, 0 }
734 };
735
736 static const struct dri2_extension_match swrast_core_extensions[] = {
737    { __DRI_TEX_BUFFER, 2, offsetof(struct dri2_egl_display, tex_buffer) },
738    { NULL, 0, 0 }
739 };
740
741 static const struct dri2_extension_match optional_driver_extensions[] = {
742    { __DRI_CONFIG_OPTIONS, 1, offsetof(struct dri2_egl_display, configOptions) },
743    { NULL, 0, 0 }
744 };
745
746 static const struct dri2_extension_match optional_core_extensions[] = {
747    { __DRI2_ROBUSTNESS, 1, offsetof(struct dri2_egl_display, robustness) },
748    { __DRI2_NO_ERROR, 1, offsetof(struct dri2_egl_display, no_error) },
749    { __DRI2_CONFIG_QUERY, 1, offsetof(struct dri2_egl_display, config) },
750    { __DRI2_FENCE, 1, offsetof(struct dri2_egl_display, fence) },
751    { __DRI2_BUFFER_DAMAGE, 1, offsetof(struct dri2_egl_display, buffer_damage) },
752    { __DRI2_RENDERER_QUERY, 1, offsetof(struct dri2_egl_display, rendererQuery) },
753    { __DRI2_INTEROP, 1, offsetof(struct dri2_egl_display, interop) },
754    { __DRI_IMAGE, 1, offsetof(struct dri2_egl_display, image) },
755    { __DRI2_FLUSH_CONTROL, 1, offsetof(struct dri2_egl_display, flush_control) },
756    { __DRI2_BLOB, 1, offsetof(struct dri2_egl_display, blob) },
757    { __DRI_MUTABLE_RENDER_BUFFER_DRIVER, 1, offsetof(struct dri2_egl_display, mutable_render_buffer) },
758    { NULL, 0, 0 }
759 };
760
761 static EGLBoolean
762 dri2_bind_extensions(struct dri2_egl_display *dri2_dpy,
763                      const struct dri2_extension_match *matches,
764                      const __DRIextension **extensions,
765                      bool optional)
766 {
767    int ret = EGL_TRUE;
768    void *field;
769
770    for (int i = 0; extensions[i]; i++) {
771       _eglLog(_EGL_DEBUG, "found extension `%s'", extensions[i]->name);
772       for (int j = 0; matches[j].name; j++) {
773          if (strcmp(extensions[i]->name, matches[j].name) == 0 &&
774              extensions[i]->version >= matches[j].version) {
775             field = ((char *) dri2_dpy + matches[j].offset);
776             *(const __DRIextension **) field = extensions[i];
777             _eglLog(_EGL_INFO, "found extension %s version %d",
778                     extensions[i]->name, extensions[i]->version);
779             break;
780          }
781       }
782    }
783
784    for (int j = 0; matches[j].name; j++) {
785       field = ((char *) dri2_dpy + matches[j].offset);
786       if (*(const __DRIextension **) field == NULL) {
787          if (optional) {
788             _eglLog(_EGL_DEBUG, "did not find optional extension %s version %d",
789                     matches[j].name, matches[j].version);
790          } else {
791             _eglLog(_EGL_WARNING, "did not find extension %s version %d",
792                     matches[j].name, matches[j].version);
793             ret = EGL_FALSE;
794          }
795       }
796    }
797
798    return ret;
799 }
800
801 static const __DRIextension **
802 dri2_open_driver(_EGLDisplay *disp)
803 {
804    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
805    static const char *search_path_vars[] = {
806       "LIBGL_DRIVERS_PATH",
807       NULL,
808    };
809
810    return loader_open_driver(dri2_dpy->driver_name,
811                              &dri2_dpy->driver,
812                              search_path_vars);
813 }
814
815 static EGLBoolean
816 dri2_load_driver_common(_EGLDisplay *disp,
817                         const struct dri2_extension_match *driver_extensions)
818 {
819    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
820    const __DRIextension **extensions;
821
822    extensions = dri2_open_driver(disp);
823    if (!extensions)
824       return EGL_FALSE;
825
826    if (!dri2_bind_extensions(dri2_dpy, driver_extensions, extensions, false)) {
827       dlclose(dri2_dpy->driver);
828       dri2_dpy->driver = NULL;
829       return EGL_FALSE;
830    }
831    dri2_dpy->driver_extensions = extensions;
832
833    dri2_bind_extensions(dri2_dpy, optional_driver_extensions, extensions, true);
834
835    return EGL_TRUE;
836 }
837
838 EGLBoolean
839 dri2_load_driver(_EGLDisplay *disp)
840 {
841    return dri2_load_driver_common(disp, dri2_driver_extensions);
842 }
843
844 EGLBoolean
845 dri2_load_driver_dri3(_EGLDisplay *disp)
846 {
847    return dri2_load_driver_common(disp, dri3_driver_extensions);
848 }
849
850 EGLBoolean
851 dri2_load_driver_swrast(_EGLDisplay *disp)
852 {
853    return dri2_load_driver_common(disp, swrast_driver_extensions);
854 }
855
856 static unsigned
857 dri2_renderer_query_integer(struct dri2_egl_display *dri2_dpy, int param)
858 {
859    const __DRI2rendererQueryExtension *rendererQuery = dri2_dpy->rendererQuery;
860    unsigned int value = 0;
861
862    if (!rendererQuery ||
863        rendererQuery->queryInteger(dri2_dpy->dri_screen, param, &value) == -1)
864       return 0;
865
866    return value;
867 }
868
869 static const char *
870 dri2_query_driver_name(_EGLDisplay *disp)
871 {
872     struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
873     return dri2_dpy->driver_name;
874 }
875
876 static char *
877 dri2_query_driver_config(_EGLDisplay *disp)
878 {
879     struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
880     const __DRIconfigOptionsExtension *ext = dri2_dpy->configOptions;
881
882     if (ext->base.version >= 2)
883         return ext->getXml(dri2_dpy->driver_name);
884
885     return strdup(ext->xml);
886 }
887
888
889 void
890 dri2_setup_screen(_EGLDisplay *disp)
891 {
892    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
893    unsigned int api_mask;
894
895    /*
896     * EGL 1.5 specification defines the default value to 1. Moreover,
897     * eglSwapInterval() is required to clamp requested value to the supported
898     * range. Since the default value is implicitly assumed to be supported,
899     * use it as both minimum and maximum for the platforms that do not allow
900     * changing the interval. Platforms, which allow it (e.g. x11, wayland)
901     * override these values already.
902     */
903    dri2_dpy->min_swap_interval = 1;
904    dri2_dpy->max_swap_interval = 1;
905    dri2_dpy->default_swap_interval = 1;
906
907    if (dri2_dpy->image_driver) {
908       api_mask = dri2_dpy->image_driver->getAPIMask(dri2_dpy->dri_screen);
909    } else if (dri2_dpy->dri2) {
910       api_mask = dri2_dpy->dri2->getAPIMask(dri2_dpy->dri_screen);
911    } else {
912       assert(dri2_dpy->swrast);
913       api_mask = 1 << __DRI_API_OPENGL |
914                  1 << __DRI_API_GLES |
915                  1 << __DRI_API_GLES2 |
916                  1 << __DRI_API_GLES3;
917    }
918
919    disp->ClientAPIs = 0;
920    if ((api_mask & (1 <<__DRI_API_OPENGL)) && _eglIsApiValid(EGL_OPENGL_API))
921       disp->ClientAPIs |= EGL_OPENGL_BIT;
922    if ((api_mask & (1 << __DRI_API_GLES)) && _eglIsApiValid(EGL_OPENGL_ES_API))
923       disp->ClientAPIs |= EGL_OPENGL_ES_BIT;
924    if ((api_mask & (1 << __DRI_API_GLES2)) && _eglIsApiValid(EGL_OPENGL_ES_API))
925       disp->ClientAPIs |= EGL_OPENGL_ES2_BIT;
926    if ((api_mask & (1 << __DRI_API_GLES3)) && _eglIsApiValid(EGL_OPENGL_ES_API))
927       disp->ClientAPIs |= EGL_OPENGL_ES3_BIT_KHR;
928
929    assert(dri2_dpy->image_driver || dri2_dpy->dri2 || dri2_dpy->swrast);
930    disp->Extensions.KHR_no_config_context = EGL_TRUE;
931    disp->Extensions.KHR_surfaceless_context = EGL_TRUE;
932
933    if (dri2_dpy->configOptions) {
934        disp->Extensions.MESA_query_driver = EGL_TRUE;
935    }
936
937    /* Report back to EGL the bitmask of priorities supported */
938    disp->Extensions.IMG_context_priority =
939       dri2_renderer_query_integer(dri2_dpy,
940                                   __DRI2_RENDERER_HAS_CONTEXT_PRIORITY);
941
942    disp->Extensions.EXT_pixel_format_float = EGL_TRUE;
943
944    if (dri2_renderer_query_integer(dri2_dpy,
945                                    __DRI2_RENDERER_HAS_FRAMEBUFFER_SRGB))
946       disp->Extensions.KHR_gl_colorspace = EGL_TRUE;
947
948    if (dri2_dpy->image_driver ||
949        (dri2_dpy->dri2 && dri2_dpy->dri2->base.version >= 3) ||
950        (dri2_dpy->swrast && dri2_dpy->swrast->base.version >= 3)) {
951       disp->Extensions.KHR_create_context = EGL_TRUE;
952
953       if (dri2_dpy->robustness)
954          disp->Extensions.EXT_create_context_robustness = EGL_TRUE;
955    }
956
957    if (dri2_dpy->no_error)
958       disp->Extensions.KHR_create_context_no_error = EGL_TRUE;
959
960    if (dri2_dpy->fence) {
961       disp->Extensions.KHR_fence_sync = EGL_TRUE;
962       disp->Extensions.KHR_wait_sync = EGL_TRUE;
963       if (dri2_dpy->fence->get_fence_from_cl_event)
964          disp->Extensions.KHR_cl_event2 = EGL_TRUE;
965       if (dri2_dpy->fence->base.version >= 2 &&
966           dri2_dpy->fence->get_capabilities) {
967          unsigned capabilities =
968             dri2_dpy->fence->get_capabilities(dri2_dpy->dri_screen);
969          disp->Extensions.ANDROID_native_fence_sync =
970             (capabilities & __DRI_FENCE_CAP_NATIVE_FD) != 0;
971       }
972    }
973
974    if (dri2_dpy->blob)
975       disp->Extensions.ANDROID_blob_cache = EGL_TRUE;
976
977    disp->Extensions.KHR_reusable_sync = EGL_TRUE;
978
979    if (dri2_dpy->image) {
980       if (dri2_dpy->image->base.version >= 10 &&
981           dri2_dpy->image->getCapabilities != NULL) {
982          int capabilities;
983
984          capabilities = dri2_dpy->image->getCapabilities(dri2_dpy->dri_screen);
985          disp->Extensions.MESA_drm_image = (capabilities & __DRI_IMAGE_CAP_GLOBAL_NAMES) != 0;
986
987          if (dri2_dpy->image->base.version >= 11)
988             disp->Extensions.MESA_image_dma_buf_export = EGL_TRUE;
989       } else {
990          disp->Extensions.MESA_drm_image = EGL_TRUE;
991          if (dri2_dpy->image->base.version >= 11)
992             disp->Extensions.MESA_image_dma_buf_export = EGL_TRUE;
993       }
994
995       disp->Extensions.KHR_image_base = EGL_TRUE;
996       disp->Extensions.KHR_gl_renderbuffer_image = EGL_TRUE;
997       if (dri2_dpy->image->base.version >= 5 &&
998           dri2_dpy->image->createImageFromTexture) {
999          disp->Extensions.KHR_gl_texture_2D_image = EGL_TRUE;
1000          disp->Extensions.KHR_gl_texture_cubemap_image = EGL_TRUE;
1001
1002          if (dri2_renderer_query_integer(dri2_dpy,
1003                                          __DRI2_RENDERER_HAS_TEXTURE_3D))
1004              disp->Extensions.KHR_gl_texture_3D_image = EGL_TRUE;
1005       }
1006 #ifdef HAVE_LIBDRM
1007       if (dri2_dpy->image->base.version >= 8 &&
1008           dri2_dpy->image->createImageFromDmaBufs) {
1009          disp->Extensions.EXT_image_dma_buf_import = EGL_TRUE;
1010          disp->Extensions.EXT_image_dma_buf_import_modifiers = EGL_TRUE;
1011       }
1012 #endif
1013    }
1014
1015    if (dri2_dpy->flush_control)
1016       disp->Extensions.KHR_context_flush_control = EGL_TRUE;
1017
1018    if (dri2_dpy->buffer_damage && dri2_dpy->buffer_damage->set_damage_region)
1019       disp->Extensions.KHR_partial_update = EGL_TRUE;
1020 }
1021
1022 void
1023 dri2_setup_swap_interval(_EGLDisplay *disp, int max_swap_interval)
1024 {
1025    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
1026    GLint vblank_mode = DRI_CONF_VBLANK_DEF_INTERVAL_1;
1027
1028    /* Allow driconf to override applications.*/
1029    if (dri2_dpy->config)
1030       dri2_dpy->config->configQueryi(dri2_dpy->dri_screen,
1031                                      "vblank_mode", &vblank_mode);
1032    switch (vblank_mode) {
1033    case DRI_CONF_VBLANK_NEVER:
1034       dri2_dpy->min_swap_interval = 0;
1035       dri2_dpy->max_swap_interval = 0;
1036       dri2_dpy->default_swap_interval = 0;
1037       break;
1038    case DRI_CONF_VBLANK_ALWAYS_SYNC:
1039       dri2_dpy->min_swap_interval = 1;
1040       dri2_dpy->max_swap_interval = max_swap_interval;
1041       dri2_dpy->default_swap_interval = 1;
1042       break;
1043    case DRI_CONF_VBLANK_DEF_INTERVAL_0:
1044       dri2_dpy->min_swap_interval = 0;
1045       dri2_dpy->max_swap_interval = max_swap_interval;
1046       dri2_dpy->default_swap_interval = 0;
1047       break;
1048    default:
1049    case DRI_CONF_VBLANK_DEF_INTERVAL_1:
1050       dri2_dpy->min_swap_interval = 0;
1051       dri2_dpy->max_swap_interval = max_swap_interval;
1052       dri2_dpy->default_swap_interval = 1;
1053       break;
1054    }
1055 }
1056
1057 /* All platforms but DRM call this function to create the screen and populate
1058  * the driver_configs. DRM inherits that information from its display - GBM.
1059  */
1060 EGLBoolean
1061 dri2_create_screen(_EGLDisplay *disp)
1062 {
1063    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
1064
1065    if (dri2_dpy->image_driver) {
1066       dri2_dpy->dri_screen =
1067          dri2_dpy->image_driver->createNewScreen2(0, dri2_dpy->fd,
1068                                                   dri2_dpy->loader_extensions,
1069                                                   dri2_dpy->driver_extensions,
1070                                                   &dri2_dpy->driver_configs,
1071                                                   disp);
1072    } else if (dri2_dpy->dri2) {
1073       if (dri2_dpy->dri2->base.version >= 4) {
1074          dri2_dpy->dri_screen =
1075             dri2_dpy->dri2->createNewScreen2(0, dri2_dpy->fd,
1076                                              dri2_dpy->loader_extensions,
1077                                              dri2_dpy->driver_extensions,
1078                                              &dri2_dpy->driver_configs, disp);
1079       } else {
1080          dri2_dpy->dri_screen =
1081             dri2_dpy->dri2->createNewScreen(0, dri2_dpy->fd,
1082                                             dri2_dpy->loader_extensions,
1083                                             &dri2_dpy->driver_configs, disp);
1084       }
1085    } else {
1086       assert(dri2_dpy->swrast);
1087       if (dri2_dpy->swrast->base.version >= 4) {
1088          dri2_dpy->dri_screen =
1089             dri2_dpy->swrast->createNewScreen2(0, dri2_dpy->loader_extensions,
1090                                                dri2_dpy->driver_extensions,
1091                                                &dri2_dpy->driver_configs, disp);
1092       } else {
1093          dri2_dpy->dri_screen =
1094             dri2_dpy->swrast->createNewScreen(0, dri2_dpy->loader_extensions,
1095                                               &dri2_dpy->driver_configs, disp);
1096       }
1097    }
1098
1099    if (dri2_dpy->dri_screen == NULL) {
1100       _eglLog(_EGL_WARNING, "DRI2: failed to create dri screen");
1101       return EGL_FALSE;
1102    }
1103
1104    dri2_dpy->own_dri_screen = true;
1105    return EGL_TRUE;
1106 }
1107
1108 EGLBoolean
1109 dri2_setup_extensions(_EGLDisplay *disp)
1110 {
1111    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
1112    const struct dri2_extension_match *mandatory_core_extensions;
1113    const __DRIextension **extensions;
1114
1115    extensions = dri2_dpy->core->getExtensions(dri2_dpy->dri_screen);
1116
1117    if (dri2_dpy->image_driver || dri2_dpy->dri2)
1118       mandatory_core_extensions = dri2_core_extensions;
1119    else
1120       mandatory_core_extensions = swrast_core_extensions;
1121
1122    if (!dri2_bind_extensions(dri2_dpy, mandatory_core_extensions, extensions, false))
1123       return EGL_FALSE;
1124
1125 #ifdef HAVE_DRI3_MODIFIERS
1126    dri2_dpy->multibuffers_available =
1127       (dri2_dpy->dri3_major_version > 1 || (dri2_dpy->dri3_major_version == 1 &&
1128                                             dri2_dpy->dri3_minor_version >= 2)) &&
1129       (dri2_dpy->present_major_version > 1 || (dri2_dpy->present_major_version == 1 &&
1130                                                dri2_dpy->present_minor_version >= 2)) &&
1131       (dri2_dpy->image && dri2_dpy->image->base.version >= 15);
1132 #endif
1133
1134    dri2_bind_extensions(dri2_dpy, optional_core_extensions, extensions, true);
1135    return EGL_TRUE;
1136 }
1137
1138 /**
1139  * Called via eglInitialize(), drv->Initialize().
1140  *
1141  * This must be guaranteed to be called exactly once, even if eglInitialize is
1142  * called many times (without a eglTerminate in between).
1143  */
1144 static EGLBoolean
1145 dri2_initialize(_EGLDisplay *disp)
1146 {
1147    EGLBoolean ret = EGL_FALSE;
1148    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
1149
1150    /* In the case where the application calls eglMakeCurrent(context1),
1151     * eglTerminate, then eglInitialize again (without a call to eglReleaseThread
1152     * or eglMakeCurrent(NULL) before that), dri2_dpy structure is still
1153     * initialized, as we need it to be able to free context1 correctly.
1154     *
1155     * It would probably be safest to forcibly release the display with
1156     * dri2_display_release, to make sure the display is reinitialized correctly.
1157     * However, the EGL spec states that we need to keep a reference to the
1158     * current context (so we cannot call dri2_make_current(NULL)), and therefore
1159     * we would leak context1 as we would be missing the old display connection
1160     * to free it up correctly.
1161     */
1162    if (dri2_dpy) {
1163       dri2_dpy->ref_count++;
1164       return EGL_TRUE;
1165    }
1166
1167    loader_set_logger(_eglLog);
1168
1169    switch (disp->Platform) {
1170    case _EGL_PLATFORM_SURFACELESS:
1171       ret = dri2_initialize_surfaceless(disp);
1172       break;
1173    case _EGL_PLATFORM_DEVICE:
1174       ret = dri2_initialize_device(disp);
1175       break;
1176    case _EGL_PLATFORM_X11:
1177       ret = dri2_initialize_x11(disp);
1178       break;
1179    case _EGL_PLATFORM_DRM:
1180       ret = dri2_initialize_drm(disp);
1181       break;
1182    case _EGL_PLATFORM_WAYLAND:
1183       ret = dri2_initialize_wayland(disp);
1184       break;
1185    case _EGL_PLATFORM_ANDROID:
1186       ret = dri2_initialize_android(disp);
1187       break;
1188    default:
1189       unreachable("Callers ensure we cannot get here.");
1190       return EGL_FALSE;
1191    }
1192
1193    if (!ret)
1194       return EGL_FALSE;
1195
1196    dri2_dpy = dri2_egl_display(disp);
1197    dri2_dpy->ref_count++;
1198
1199    return EGL_TRUE;
1200 }
1201
1202 /**
1203  * Decrement display reference count, and free up display if necessary.
1204  */
1205 static void
1206 dri2_display_release(_EGLDisplay *disp)
1207 {
1208    struct dri2_egl_display *dri2_dpy;
1209
1210    if (!disp)
1211       return;
1212
1213    dri2_dpy = dri2_egl_display(disp);
1214
1215    assert(dri2_dpy->ref_count > 0);
1216    dri2_dpy->ref_count--;
1217
1218    if (dri2_dpy->ref_count > 0)
1219       return;
1220
1221    _eglCleanupDisplay(disp);
1222    dri2_display_destroy(disp);
1223 }
1224
1225 void
1226 dri2_display_destroy(_EGLDisplay *disp)
1227 {
1228    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
1229
1230    if (dri2_dpy->own_dri_screen) {
1231       if (dri2_dpy->vtbl && dri2_dpy->vtbl->close_screen_notify)
1232          dri2_dpy->vtbl->close_screen_notify(disp);
1233       dri2_dpy->core->destroyScreen(dri2_dpy->dri_screen);
1234    }
1235    if (dri2_dpy->fd >= 0)
1236       close(dri2_dpy->fd);
1237    if (dri2_dpy->driver)
1238       dlclose(dri2_dpy->driver);
1239    free(dri2_dpy->driver_name);
1240
1241 #ifdef HAVE_WAYLAND_PLATFORM
1242    free(dri2_dpy->device_name);
1243 #endif
1244
1245    switch (disp->Platform) {
1246    case _EGL_PLATFORM_X11:
1247       dri2_teardown_x11(dri2_dpy);
1248       break;
1249    case _EGL_PLATFORM_DRM:
1250       dri2_teardown_drm(dri2_dpy);
1251       break;
1252    case _EGL_PLATFORM_WAYLAND:
1253       dri2_teardown_wayland(dri2_dpy);
1254       break;
1255    default:
1256       /* TODO: add teardown for other platforms */
1257       break;
1258    }
1259
1260    /* The drm platform does not create the screen/driver_configs but reuses
1261     * the ones from the gbm device. As such the gbm itself is responsible
1262     * for the cleanup.
1263     */
1264    if (disp->Platform != _EGL_PLATFORM_DRM && dri2_dpy->driver_configs) {
1265       for (unsigned i = 0; dri2_dpy->driver_configs[i]; i++)
1266          free((__DRIconfig *) dri2_dpy->driver_configs[i]);
1267       free(dri2_dpy->driver_configs);
1268    }
1269    free(dri2_dpy);
1270    disp->DriverData = NULL;
1271 }
1272
1273 __DRIbuffer *
1274 dri2_egl_surface_alloc_local_buffer(struct dri2_egl_surface *dri2_surf,
1275                                     unsigned int att, unsigned int format)
1276 {
1277    struct dri2_egl_display *dri2_dpy =
1278       dri2_egl_display(dri2_surf->base.Resource.Display);
1279
1280    if (att >= ARRAY_SIZE(dri2_surf->local_buffers))
1281       return NULL;
1282
1283    if (!dri2_surf->local_buffers[att]) {
1284       dri2_surf->local_buffers[att] =
1285          dri2_dpy->dri2->allocateBuffer(dri2_dpy->dri_screen, att, format,
1286                                         dri2_surf->base.Width, dri2_surf->base.Height);
1287    }
1288
1289    return dri2_surf->local_buffers[att];
1290 }
1291
1292 void
1293 dri2_egl_surface_free_local_buffers(struct dri2_egl_surface *dri2_surf)
1294 {
1295    struct dri2_egl_display *dri2_dpy =
1296       dri2_egl_display(dri2_surf->base.Resource.Display);
1297
1298    for (int i = 0; i < ARRAY_SIZE(dri2_surf->local_buffers); i++) {
1299       if (dri2_surf->local_buffers[i]) {
1300          dri2_dpy->dri2->releaseBuffer(dri2_dpy->dri_screen,
1301                                        dri2_surf->local_buffers[i]);
1302          dri2_surf->local_buffers[i] = NULL;
1303       }
1304    }
1305 }
1306
1307 /**
1308  * Called via eglTerminate(), drv->Terminate().
1309  *
1310  * This must be guaranteed to be called exactly once, even if eglTerminate is
1311  * called many times (without a eglInitialize in between).
1312  */
1313 static EGLBoolean
1314 dri2_terminate(_EGLDisplay *disp)
1315 {
1316    /* Release all non-current Context/Surfaces. */
1317    _eglReleaseDisplayResources(disp);
1318
1319    dri2_display_release(disp);
1320
1321    return EGL_TRUE;
1322 }
1323
1324 /**
1325  * Set the error code after a call to
1326  * dri2_egl_display::dri2::createContextAttribs.
1327  */
1328 static void
1329 dri2_create_context_attribs_error(int dri_error)
1330 {
1331    EGLint egl_error;
1332
1333    switch (dri_error) {
1334    case __DRI_CTX_ERROR_SUCCESS:
1335       return;
1336
1337    case __DRI_CTX_ERROR_NO_MEMORY:
1338       egl_error = EGL_BAD_ALLOC;
1339       break;
1340
1341   /* From the EGL_KHR_create_context spec, section "Errors":
1342    *
1343    *   * If <config> does not support a client API context compatible
1344    *     with the requested API major and minor version, [...] context flags,
1345    *     and context reset notification behavior (for client API types where
1346    *     these attributes are supported), then an EGL_BAD_MATCH error is
1347    *     generated.
1348    *
1349    *   * If an OpenGL ES context is requested and the values for
1350    *     attributes EGL_CONTEXT_MAJOR_VERSION_KHR and
1351    *     EGL_CONTEXT_MINOR_VERSION_KHR specify an OpenGL ES version that
1352    *     is not defined, than an EGL_BAD_MATCH error is generated.
1353    *
1354    *   * If an OpenGL context is requested, the requested version is
1355    *     greater than 3.2, and the value for attribute
1356    *     EGL_CONTEXT_OPENGL_PROFILE_MASK_KHR has no bits set; has any
1357    *     bits set other than EGL_CONTEXT_OPENGL_CORE_PROFILE_BIT_KHR and
1358    *     EGL_CONTEXT_OPENGL_COMPATIBILITY_PROFILE_BIT_KHR; has more than
1359    *     one of these bits set; or if the implementation does not support
1360    *     the requested profile, then an EGL_BAD_MATCH error is generated.
1361    */
1362    case __DRI_CTX_ERROR_BAD_API:
1363    case __DRI_CTX_ERROR_BAD_VERSION:
1364    case __DRI_CTX_ERROR_BAD_FLAG:
1365       egl_error = EGL_BAD_MATCH;
1366       break;
1367
1368   /* From the EGL_KHR_create_context spec, section "Errors":
1369    *
1370    *   * If an attribute name or attribute value in <attrib_list> is not
1371    *     recognized (including unrecognized bits in bitmask attributes),
1372    *     then an EGL_BAD_ATTRIBUTE error is generated."
1373    */
1374    case __DRI_CTX_ERROR_UNKNOWN_ATTRIBUTE:
1375    case __DRI_CTX_ERROR_UNKNOWN_FLAG:
1376       egl_error = EGL_BAD_ATTRIBUTE;
1377       break;
1378
1379    default:
1380       assert(!"unknown dri_error code");
1381       egl_error = EGL_BAD_MATCH;
1382       break;
1383    }
1384
1385    _eglError(egl_error, "dri2_create_context");
1386 }
1387
1388 static bool
1389 dri2_fill_context_attribs(struct dri2_egl_context *dri2_ctx,
1390                           struct dri2_egl_display *dri2_dpy,
1391                           uint32_t *ctx_attribs,
1392                           unsigned *num_attribs)
1393 {
1394    int pos = 0;
1395
1396    assert(*num_attribs >= NUM_ATTRIBS);
1397
1398    ctx_attribs[pos++] = __DRI_CTX_ATTRIB_MAJOR_VERSION;
1399    ctx_attribs[pos++] = dri2_ctx->base.ClientMajorVersion;
1400    ctx_attribs[pos++] = __DRI_CTX_ATTRIB_MINOR_VERSION;
1401    ctx_attribs[pos++] = dri2_ctx->base.ClientMinorVersion;
1402
1403    if (dri2_ctx->base.Flags != 0 || dri2_ctx->base.NoError) {
1404       /* If the implementation doesn't support the __DRI2_ROBUSTNESS
1405        * extension, don't even try to send it the robust-access flag.
1406        * It may explode.  Instead, generate the required EGL error here.
1407        */
1408       if ((dri2_ctx->base.Flags & EGL_CONTEXT_OPENGL_ROBUST_ACCESS_BIT_KHR) != 0
1409             && !dri2_dpy->robustness) {
1410          _eglError(EGL_BAD_MATCH, "eglCreateContext");
1411          return false;
1412       }
1413
1414       ctx_attribs[pos++] = __DRI_CTX_ATTRIB_FLAGS;
1415       ctx_attribs[pos++] = dri2_ctx->base.Flags |
1416          (dri2_ctx->base.NoError ? __DRI_CTX_FLAG_NO_ERROR : 0);
1417    }
1418
1419    if (dri2_ctx->base.ResetNotificationStrategy != EGL_NO_RESET_NOTIFICATION_KHR) {
1420       /* If the implementation doesn't support the __DRI2_ROBUSTNESS
1421        * extension, don't even try to send it a reset strategy.  It may
1422        * explode.  Instead, generate the required EGL error here.
1423        */
1424       if (!dri2_dpy->robustness) {
1425          _eglError(EGL_BAD_CONFIG, "eglCreateContext");
1426          return false;
1427       }
1428
1429       ctx_attribs[pos++] = __DRI_CTX_ATTRIB_RESET_STRATEGY;
1430       ctx_attribs[pos++] = __DRI_CTX_RESET_LOSE_CONTEXT;
1431    }
1432
1433    if (dri2_ctx->base.ContextPriority != EGL_CONTEXT_PRIORITY_MEDIUM_IMG) {
1434       unsigned val;
1435
1436       switch (dri2_ctx->base.ContextPriority) {
1437       case EGL_CONTEXT_PRIORITY_HIGH_IMG:
1438          val = __DRI_CTX_PRIORITY_HIGH;
1439          break;
1440       case EGL_CONTEXT_PRIORITY_MEDIUM_IMG:
1441          val = __DRI_CTX_PRIORITY_MEDIUM;
1442          break;
1443       case EGL_CONTEXT_PRIORITY_LOW_IMG:
1444          val = __DRI_CTX_PRIORITY_LOW;
1445          break;
1446       default:
1447          _eglError(EGL_BAD_CONFIG, "eglCreateContext");
1448          return false;
1449       }
1450
1451       ctx_attribs[pos++] = __DRI_CTX_ATTRIB_PRIORITY;
1452       ctx_attribs[pos++] = val;
1453    }
1454
1455    if (dri2_ctx->base.ReleaseBehavior == EGL_CONTEXT_RELEASE_BEHAVIOR_NONE_KHR) {
1456       ctx_attribs[pos++] = __DRI_CTX_ATTRIB_RELEASE_BEHAVIOR;
1457       ctx_attribs[pos++] = __DRI_CTX_RELEASE_BEHAVIOR_NONE;
1458    }
1459
1460    *num_attribs = pos;
1461
1462    return true;
1463 }
1464
1465 /**
1466  * Called via eglCreateContext(), drv->CreateContext().
1467  */
1468 static _EGLContext *
1469 dri2_create_context(_EGLDisplay *disp, _EGLConfig *conf,
1470                     _EGLContext *share_list, const EGLint *attrib_list)
1471 {
1472    struct dri2_egl_context *dri2_ctx;
1473    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
1474    struct dri2_egl_context *dri2_ctx_shared = dri2_egl_context(share_list);
1475    __DRIcontext *shared =
1476       dri2_ctx_shared ? dri2_ctx_shared->dri_context : NULL;
1477    struct dri2_egl_config *dri2_config = dri2_egl_config(conf);
1478    const __DRIconfig *dri_config;
1479    int api;
1480    unsigned error;
1481    unsigned num_attribs = NUM_ATTRIBS;
1482    uint32_t ctx_attribs[NUM_ATTRIBS];
1483
1484    dri2_ctx = malloc(sizeof *dri2_ctx);
1485    if (!dri2_ctx) {
1486       _eglError(EGL_BAD_ALLOC, "eglCreateContext");
1487       return NULL;
1488    }
1489
1490    if (!_eglInitContext(&dri2_ctx->base, disp, conf, attrib_list))
1491       goto cleanup;
1492
1493    /* The EGL_EXT_create_context_robustness spec says:
1494     *
1495     *    "Add to the eglCreateContext context creation errors: [...]
1496     *
1497     *     * If the reset notification behavior of <share_context> and the
1498     *       newly created context are different then an EGL_BAD_MATCH error is
1499     *       generated."
1500     */
1501    if (share_list && share_list->ResetNotificationStrategy !=
1502                      dri2_ctx->base.ResetNotificationStrategy) {
1503       _eglError(EGL_BAD_MATCH, "eglCreateContext");
1504       goto cleanup;
1505    }
1506
1507    /* The EGL_KHR_create_context_no_error spec says:
1508     *
1509     *    "BAD_MATCH is generated if the value of EGL_CONTEXT_OPENGL_NO_ERROR_KHR
1510     *    used to create <share_context> does not match the value of
1511     *    EGL_CONTEXT_OPENGL_NO_ERROR_KHR for the context being created."
1512     */
1513    if (share_list && share_list->NoError != dri2_ctx->base.NoError) {
1514       _eglError(EGL_BAD_MATCH, "eglCreateContext");
1515       goto cleanup;
1516    }
1517
1518    switch (dri2_ctx->base.ClientAPI) {
1519    case EGL_OPENGL_ES_API:
1520       switch (dri2_ctx->base.ClientMajorVersion) {
1521       case 1:
1522          api = __DRI_API_GLES;
1523          break;
1524       case 2:
1525          api = __DRI_API_GLES2;
1526          break;
1527       case 3:
1528          api = __DRI_API_GLES3;
1529          break;
1530       default:
1531          _eglError(EGL_BAD_PARAMETER, "eglCreateContext");
1532          free(dri2_ctx);
1533          return NULL;
1534       }
1535       break;
1536    case EGL_OPENGL_API:
1537       if ((dri2_ctx->base.ClientMajorVersion >= 4
1538            || (dri2_ctx->base.ClientMajorVersion == 3
1539                && dri2_ctx->base.ClientMinorVersion >= 2))
1540           && dri2_ctx->base.Profile == EGL_CONTEXT_OPENGL_CORE_PROFILE_BIT_KHR)
1541          api = __DRI_API_OPENGL_CORE;
1542       else if (dri2_ctx->base.ClientMajorVersion == 3 &&
1543                dri2_ctx->base.ClientMinorVersion == 1)
1544          api = __DRI_API_OPENGL_CORE;
1545       else
1546          api = __DRI_API_OPENGL;
1547       break;
1548    default:
1549       _eglError(EGL_BAD_PARAMETER, "eglCreateContext");
1550       free(dri2_ctx);
1551       return NULL;
1552    }
1553
1554    if (conf != NULL) {
1555       /* The config chosen here isn't necessarily
1556        * used for surfaces later.
1557        * A pixmap surface will use the single config.
1558        * This opportunity depends on disabling the
1559        * doubleBufferMode check in
1560        * src/mesa/main/context.c:check_compatible()
1561        */
1562       if (dri2_config->dri_config[1][0])
1563          dri_config = dri2_config->dri_config[1][0];
1564       else
1565          dri_config = dri2_config->dri_config[0][0];
1566    }
1567    else
1568       dri_config = NULL;
1569
1570    if (!dri2_fill_context_attribs(dri2_ctx, dri2_dpy, ctx_attribs,
1571                                   &num_attribs))
1572       goto cleanup;
1573
1574    if (dri2_dpy->image_driver) {
1575       dri2_ctx->dri_context =
1576          dri2_dpy->image_driver->createContextAttribs(dri2_dpy->dri_screen,
1577                                                       api,
1578                                                       dri_config,
1579                                                       shared,
1580                                                       num_attribs / 2,
1581                                                       ctx_attribs,
1582                                                       & error,
1583                                                       dri2_ctx);
1584       dri2_create_context_attribs_error(error);
1585    } else if (dri2_dpy->dri2) {
1586       if (dri2_dpy->dri2->base.version >= 3) {
1587          dri2_ctx->dri_context =
1588             dri2_dpy->dri2->createContextAttribs(dri2_dpy->dri_screen,
1589                                                  api,
1590                                                  dri_config,
1591                                                  shared,
1592                                                  num_attribs / 2,
1593                                                  ctx_attribs,
1594                                                  & error,
1595                                                  dri2_ctx);
1596          dri2_create_context_attribs_error(error);
1597       } else {
1598          dri2_ctx->dri_context =
1599             dri2_dpy->dri2->createNewContextForAPI(dri2_dpy->dri_screen,
1600                                                    api,
1601                                                    dri_config,
1602                                                    shared,
1603                                                    dri2_ctx);
1604       }
1605    } else {
1606       assert(dri2_dpy->swrast);
1607       if (dri2_dpy->swrast->base.version >= 3) {
1608          dri2_ctx->dri_context =
1609             dri2_dpy->swrast->createContextAttribs(dri2_dpy->dri_screen,
1610                                                    api,
1611                                                    dri_config,
1612                                                    shared,
1613                                                    num_attribs / 2,
1614                                                    ctx_attribs,
1615                                                    & error,
1616                                                    dri2_ctx);
1617          dri2_create_context_attribs_error(error);
1618       } else {
1619          dri2_ctx->dri_context =
1620             dri2_dpy->swrast->createNewContextForAPI(dri2_dpy->dri_screen,
1621                                                      api,
1622                                                      dri_config,
1623                                                      shared,
1624                                                      dri2_ctx);
1625       }
1626    }
1627
1628    if (!dri2_ctx->dri_context)
1629       goto cleanup;
1630
1631    return &dri2_ctx->base;
1632
1633  cleanup:
1634    free(dri2_ctx);
1635    return NULL;
1636 }
1637
1638 /**
1639  * Called via eglDestroyContext(), drv->DestroyContext().
1640  */
1641 static EGLBoolean
1642 dri2_destroy_context(_EGLDisplay *disp, _EGLContext *ctx)
1643 {
1644    struct dri2_egl_context *dri2_ctx = dri2_egl_context(ctx);
1645    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
1646
1647    if (_eglPutContext(ctx)) {
1648       dri2_dpy->core->destroyContext(dri2_ctx->dri_context);
1649       free(dri2_ctx);
1650    }
1651
1652    return EGL_TRUE;
1653 }
1654
1655 EGLBoolean
1656 dri2_init_surface(_EGLSurface *surf, _EGLDisplay *disp, EGLint type,
1657         _EGLConfig *conf, const EGLint *attrib_list,
1658         EGLBoolean enable_out_fence, void *native_surface)
1659 {
1660    struct dri2_egl_surface *dri2_surf = dri2_egl_surface(surf);
1661    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
1662
1663    dri2_surf->out_fence_fd = -1;
1664    dri2_surf->enable_out_fence = false;
1665    if (dri2_dpy->fence && dri2_dpy->fence->base.version >= 2 &&
1666        dri2_dpy->fence->get_capabilities &&
1667        (dri2_dpy->fence->get_capabilities(dri2_dpy->dri_screen) &
1668         __DRI_FENCE_CAP_NATIVE_FD)) {
1669       dri2_surf->enable_out_fence = enable_out_fence;
1670    }
1671
1672    return _eglInitSurface(surf, disp, type, conf, attrib_list, native_surface);
1673 }
1674
1675 static void
1676 dri2_surface_set_out_fence_fd( _EGLSurface *surf, int fence_fd)
1677 {
1678    struct dri2_egl_surface *dri2_surf = dri2_egl_surface(surf);
1679
1680    if (dri2_surf->out_fence_fd >= 0)
1681       close(dri2_surf->out_fence_fd);
1682
1683    dri2_surf->out_fence_fd = fence_fd;
1684 }
1685
1686 void
1687 dri2_fini_surface(_EGLSurface *surf)
1688 {
1689    struct dri2_egl_surface *dri2_surf = dri2_egl_surface(surf);
1690
1691    dri2_surface_set_out_fence_fd(surf, -1);
1692    dri2_surf->enable_out_fence = false;
1693 }
1694
1695 static EGLBoolean
1696 dri2_destroy_surface(_EGLDisplay *disp, _EGLSurface *surf)
1697 {
1698    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
1699
1700    if (!_eglPutSurface(surf))
1701       return EGL_TRUE;
1702
1703    return dri2_dpy->vtbl->destroy_surface(disp, surf);
1704 }
1705
1706 static void
1707 dri2_surf_update_fence_fd(_EGLContext *ctx,
1708                           _EGLDisplay *disp, _EGLSurface *surf)
1709 {
1710    __DRIcontext *dri_ctx = dri2_egl_context(ctx)->dri_context;
1711    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
1712    struct dri2_egl_surface *dri2_surf = dri2_egl_surface(surf);
1713    int fence_fd = -1;
1714    void *fence;
1715
1716    if (!dri2_surf->enable_out_fence)
1717       return;
1718
1719    fence = dri2_dpy->fence->create_fence_fd(dri_ctx, -1);
1720    if (fence) {
1721       fence_fd = dri2_dpy->fence->get_fence_fd(dri2_dpy->dri_screen,
1722                                                fence);
1723       dri2_dpy->fence->destroy_fence(dri2_dpy->dri_screen, fence);
1724    }
1725    dri2_surface_set_out_fence_fd(surf, fence_fd);
1726 }
1727
1728 EGLBoolean
1729 dri2_create_drawable(struct dri2_egl_display *dri2_dpy,
1730                      const __DRIconfig *config,
1731                      struct dri2_egl_surface *dri2_surf,
1732                      void *loaderPrivate)
1733 {
1734    __DRIcreateNewDrawableFunc createNewDrawable;
1735
1736    if (dri2_dpy->image_driver)
1737       createNewDrawable = dri2_dpy->image_driver->createNewDrawable;
1738    else if (dri2_dpy->dri2)
1739       createNewDrawable = dri2_dpy->dri2->createNewDrawable;
1740    else if (dri2_dpy->swrast)
1741       createNewDrawable = dri2_dpy->swrast->createNewDrawable;
1742    else
1743       return _eglError(EGL_BAD_ALLOC, "no createNewDrawable");
1744
1745    dri2_surf->dri_drawable = createNewDrawable(dri2_dpy->dri_screen,
1746                                                config, loaderPrivate);
1747    if (dri2_surf->dri_drawable == NULL)
1748       return _eglError(EGL_BAD_ALLOC, "createNewDrawable");
1749
1750    return EGL_TRUE;
1751 }
1752
1753 /**
1754  * Called via eglMakeCurrent(), drv->MakeCurrent().
1755  */
1756 static EGLBoolean
1757 dri2_make_current(_EGLDisplay *disp, _EGLSurface *dsurf,
1758                   _EGLSurface *rsurf, _EGLContext *ctx)
1759 {
1760    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
1761    struct dri2_egl_context *dri2_ctx = dri2_egl_context(ctx);
1762    _EGLDisplay *old_disp = NULL;
1763    struct dri2_egl_display *old_dri2_dpy = NULL;
1764    _EGLContext *old_ctx;
1765    _EGLSurface *old_dsurf, *old_rsurf;
1766    _EGLSurface *tmp_dsurf, *tmp_rsurf;
1767    __DRIdrawable *ddraw, *rdraw;
1768    __DRIcontext *cctx;
1769    EGLint egl_error = EGL_SUCCESS;
1770
1771    if (!dri2_dpy)
1772       return _eglError(EGL_NOT_INITIALIZED, "eglMakeCurrent");
1773
1774    /* make new bindings, set the EGL error otherwise */
1775    if (!_eglBindContext(ctx, dsurf, rsurf, &old_ctx, &old_dsurf, &old_rsurf))
1776       return EGL_FALSE;
1777
1778    if (old_ctx) {
1779       __DRIcontext *old_cctx = dri2_egl_context(old_ctx)->dri_context;
1780       old_disp = old_ctx->Resource.Display;
1781       old_dri2_dpy = dri2_egl_display(old_disp);
1782
1783       /* flush before context switch */
1784       dri2_gl_flush();
1785
1786       if (old_dsurf)
1787          dri2_surf_update_fence_fd(old_ctx, disp, old_dsurf);
1788
1789       /* Disable shared buffer mode */
1790       if (old_dsurf && _eglSurfaceInSharedBufferMode(old_dsurf) &&
1791           old_dri2_dpy->vtbl->set_shared_buffer_mode) {
1792          old_dri2_dpy->vtbl->set_shared_buffer_mode(old_disp, old_dsurf, false);
1793       }
1794
1795       dri2_dpy->core->unbindContext(old_cctx);
1796    }
1797
1798    ddraw = (dsurf) ? dri2_dpy->vtbl->get_dri_drawable(dsurf) : NULL;
1799    rdraw = (rsurf) ? dri2_dpy->vtbl->get_dri_drawable(rsurf) : NULL;
1800    cctx = (dri2_ctx) ? dri2_ctx->dri_context : NULL;
1801
1802    if (cctx || ddraw || rdraw) {
1803       if (!dri2_dpy->core->bindContext(cctx, ddraw, rdraw)) {
1804          _EGLContext *tmp_ctx;
1805
1806          /* dri2_dpy->core->bindContext failed. We cannot tell for sure why, but
1807           * setting the error to EGL_BAD_MATCH is surely better than leaving it
1808           * as EGL_SUCCESS.
1809           */
1810          egl_error = EGL_BAD_MATCH;
1811
1812          /* undo the previous _eglBindContext */
1813          _eglBindContext(old_ctx, old_dsurf, old_rsurf, &ctx, &tmp_dsurf, &tmp_rsurf);
1814          assert(&dri2_ctx->base == ctx &&
1815                 tmp_dsurf == dsurf &&
1816                 tmp_rsurf == rsurf);
1817
1818          _eglPutSurface(dsurf);
1819          _eglPutSurface(rsurf);
1820          _eglPutContext(ctx);
1821
1822          _eglPutSurface(old_dsurf);
1823          _eglPutSurface(old_rsurf);
1824          _eglPutContext(old_ctx);
1825
1826          ddraw = (old_dsurf) ? dri2_dpy->vtbl->get_dri_drawable(old_dsurf) : NULL;
1827          rdraw = (old_rsurf) ? dri2_dpy->vtbl->get_dri_drawable(old_rsurf) : NULL;
1828          cctx = (old_ctx) ? dri2_egl_context(old_ctx)->dri_context : NULL;
1829
1830          /* undo the previous dri2_dpy->core->unbindContext */
1831          if (dri2_dpy->core->bindContext(cctx, ddraw, rdraw)) {
1832             if (old_dsurf && _eglSurfaceInSharedBufferMode(old_dsurf) &&
1833                 old_dri2_dpy->vtbl->set_shared_buffer_mode) {
1834                old_dri2_dpy->vtbl->set_shared_buffer_mode(old_disp, old_dsurf, true);
1835             }
1836
1837             return _eglError(egl_error, "eglMakeCurrent");
1838          }
1839
1840          /* We cannot restore the same state as it was before calling
1841           * eglMakeCurrent() and the spec isn't clear about what to do. We
1842           * can prevent EGL from calling into the DRI driver with no DRI
1843           * context bound.
1844           */
1845          dsurf = rsurf = NULL;
1846          ctx = NULL;
1847
1848          _eglBindContext(ctx, dsurf, rsurf, &tmp_ctx, &tmp_dsurf, &tmp_rsurf);
1849          assert(tmp_ctx == old_ctx && tmp_dsurf == old_dsurf &&
1850                 tmp_rsurf == old_rsurf);
1851
1852          _eglLog(_EGL_WARNING, "DRI2: failed to rebind the previous context");
1853       } else {
1854          /* dri2_dpy->core->bindContext succeeded, so take a reference on the
1855           * dri2_dpy. This prevents dri2_dpy from being reinitialized when a
1856           * EGLDisplay is terminated and then initialized again while a
1857           * context is still bound. See dri2_intitialize() for a more in depth
1858           * explanation. */
1859          dri2_dpy->ref_count++;
1860       }
1861    }
1862
1863    dri2_destroy_surface(disp, old_dsurf);
1864    dri2_destroy_surface(disp, old_rsurf);
1865
1866    if (old_ctx) {
1867       dri2_destroy_context(disp, old_ctx);
1868       dri2_display_release(old_disp);
1869    }
1870
1871    if (egl_error != EGL_SUCCESS)
1872       return _eglError(egl_error, "eglMakeCurrent");
1873
1874    if (dsurf && _eglSurfaceHasMutableRenderBuffer(dsurf) &&
1875        dri2_dpy->vtbl->set_shared_buffer_mode) {
1876       /* Always update the shared buffer mode. This is obviously needed when
1877        * the active EGL_RENDER_BUFFER is EGL_SINGLE_BUFFER. When
1878        * EGL_RENDER_BUFFER is EGL_BACK_BUFFER, the update protects us in the
1879        * case where external non-EGL API may have changed window's shared
1880        * buffer mode since we last saw it.
1881        */
1882       bool mode = (dsurf->ActiveRenderBuffer == EGL_SINGLE_BUFFER);
1883       dri2_dpy->vtbl->set_shared_buffer_mode(disp, dsurf, mode);
1884    }
1885
1886    return EGL_TRUE;
1887 }
1888
1889 __DRIdrawable *
1890 dri2_surface_get_dri_drawable(_EGLSurface *surf)
1891 {
1892    struct dri2_egl_surface *dri2_surf = dri2_egl_surface(surf);
1893
1894    return dri2_surf->dri_drawable;
1895 }
1896
1897 /*
1898  * Called from eglGetProcAddress() via drv->GetProcAddress().
1899  */
1900 static _EGLProc
1901 dri2_get_proc_address(const _EGLDriver *drv, const char *procname)
1902 {
1903    return _glapi_get_proc_address(procname);
1904 }
1905
1906 static _EGLSurface*
1907 dri2_create_window_surface(_EGLDisplay *disp, _EGLConfig *conf,
1908                            void *native_window, const EGLint *attrib_list)
1909 {
1910    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
1911    return dri2_dpy->vtbl->create_window_surface(disp, conf, native_window,
1912                                                 attrib_list);
1913 }
1914
1915 static _EGLSurface*
1916 dri2_create_pixmap_surface(_EGLDisplay *disp, _EGLConfig *conf,
1917                            void *native_pixmap, const EGLint *attrib_list)
1918 {
1919    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
1920    if (!dri2_dpy->vtbl->create_pixmap_surface)
1921       return NULL;
1922    return dri2_dpy->vtbl->create_pixmap_surface(disp, conf, native_pixmap,
1923                                                 attrib_list);
1924 }
1925
1926 static _EGLSurface*
1927 dri2_create_pbuffer_surface(_EGLDisplay *disp, _EGLConfig *conf,
1928                             const EGLint *attrib_list)
1929 {
1930    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
1931    if (!dri2_dpy->vtbl->create_pbuffer_surface)
1932       return NULL;
1933    return dri2_dpy->vtbl->create_pbuffer_surface(disp, conf, attrib_list);
1934 }
1935
1936 static EGLBoolean
1937 dri2_swap_interval(const _EGLDriver *drv, _EGLDisplay *disp, _EGLSurface *surf,
1938                    EGLint interval)
1939 {
1940    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
1941    if (!dri2_dpy->vtbl->swap_interval)
1942       return EGL_TRUE;
1943    return dri2_dpy->vtbl->swap_interval(drv, disp, surf, interval);
1944 }
1945
1946 /**
1947  * Asks the client API to flush any rendering to the drawable so that we can
1948  * do our swapbuffers.
1949  */
1950 void
1951 dri2_flush_drawable_for_swapbuffers(_EGLDisplay *disp, _EGLSurface *draw)
1952 {
1953    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
1954    __DRIdrawable *dri_drawable = dri2_dpy->vtbl->get_dri_drawable(draw);
1955
1956    if (dri2_dpy->flush) {
1957       if (dri2_dpy->flush->base.version >= 4) {
1958          /* We know there's a current context because:
1959           *
1960           *     "If surface is not bound to the calling thread’s current
1961           *      context, an EGL_BAD_SURFACE error is generated."
1962          */
1963          _EGLContext *ctx = _eglGetCurrentContext();
1964          struct dri2_egl_context *dri2_ctx = dri2_egl_context(ctx);
1965
1966          /* From the EGL 1.4 spec (page 52):
1967           *
1968           *     "The contents of ancillary buffers are always undefined
1969           *      after calling eglSwapBuffers."
1970           */
1971          dri2_dpy->flush->flush_with_flags(dri2_ctx->dri_context,
1972                                            dri_drawable,
1973                                            __DRI2_FLUSH_DRAWABLE |
1974                                            __DRI2_FLUSH_INVALIDATE_ANCILLARY,
1975                                            __DRI2_THROTTLE_SWAPBUFFER);
1976       } else {
1977          dri2_dpy->flush->flush(dri_drawable);
1978       }
1979    }
1980 }
1981
1982 static EGLBoolean
1983 dri2_swap_buffers(const _EGLDriver *drv, _EGLDisplay *disp, _EGLSurface *surf)
1984 {
1985    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
1986    __DRIdrawable *dri_drawable = dri2_dpy->vtbl->get_dri_drawable(surf);
1987    _EGLContext *ctx = _eglGetCurrentContext();
1988    EGLBoolean ret;
1989
1990    if (ctx && surf)
1991       dri2_surf_update_fence_fd(ctx, disp, surf);
1992    ret = dri2_dpy->vtbl->swap_buffers(drv, disp, surf);
1993
1994    /* SwapBuffers marks the end of the frame; reset the damage region for
1995     * use again next time.
1996     */
1997    if (ret && dri2_dpy->buffer_damage &&
1998        dri2_dpy->buffer_damage->set_damage_region)
1999       dri2_dpy->buffer_damage->set_damage_region(dri_drawable, 0, NULL);
2000
2001    return ret;
2002 }
2003
2004 static EGLBoolean
2005 dri2_swap_buffers_with_damage(const _EGLDriver *drv, _EGLDisplay *disp,
2006                               _EGLSurface *surf,
2007                               const EGLint *rects, EGLint n_rects)
2008 {
2009    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
2010    __DRIdrawable *dri_drawable = dri2_dpy->vtbl->get_dri_drawable(surf);
2011    _EGLContext *ctx = _eglGetCurrentContext();
2012    EGLBoolean ret;
2013
2014    if (ctx && surf)
2015       dri2_surf_update_fence_fd(ctx, disp, surf);
2016    if (dri2_dpy->vtbl->swap_buffers_with_damage)
2017       ret = dri2_dpy->vtbl->swap_buffers_with_damage(drv, disp, surf,
2018                                                      rects, n_rects);
2019    else
2020       ret = dri2_dpy->vtbl->swap_buffers(drv, disp, surf);
2021
2022    /* SwapBuffers marks the end of the frame; reset the damage region for
2023     * use again next time.
2024     */
2025    if (ret && dri2_dpy->buffer_damage &&
2026        dri2_dpy->buffer_damage->set_damage_region)
2027       dri2_dpy->buffer_damage->set_damage_region(dri_drawable, 0, NULL);
2028
2029    return ret;
2030 }
2031
2032 static EGLBoolean
2033 dri2_swap_buffers_region(const _EGLDriver *drv, _EGLDisplay *disp, _EGLSurface *surf,
2034                          EGLint numRects, const EGLint *rects)
2035 {
2036    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
2037    __DRIdrawable *dri_drawable = dri2_dpy->vtbl->get_dri_drawable(surf);
2038    EGLBoolean ret;
2039
2040    if (!dri2_dpy->vtbl->swap_buffers_region)
2041       return EGL_FALSE;
2042    ret = dri2_dpy->vtbl->swap_buffers_region(drv, disp, surf, numRects, rects);
2043
2044    /* SwapBuffers marks the end of the frame; reset the damage region for
2045     * use again next time.
2046     */
2047    if (ret && dri2_dpy->buffer_damage &&
2048        dri2_dpy->buffer_damage->set_damage_region)
2049       dri2_dpy->buffer_damage->set_damage_region(dri_drawable, 0, NULL);
2050
2051    return ret;
2052 }
2053
2054 static EGLBoolean
2055 dri2_set_damage_region(const _EGLDriver *drv, _EGLDisplay *disp, _EGLSurface *surf,
2056                        EGLint *rects, EGLint n_rects)
2057 {
2058    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
2059    __DRIdrawable *drawable = dri2_dpy->vtbl->get_dri_drawable(surf);
2060
2061    if (!dri2_dpy->buffer_damage || !dri2_dpy->buffer_damage->set_damage_region)
2062       return EGL_FALSE;
2063
2064    dri2_dpy->buffer_damage->set_damage_region(drawable, n_rects, rects);
2065    return EGL_TRUE;
2066 }
2067
2068 static EGLBoolean
2069 dri2_post_sub_buffer(const _EGLDriver *drv, _EGLDisplay *disp, _EGLSurface *surf,
2070                      EGLint x, EGLint y, EGLint width, EGLint height)
2071 {
2072    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
2073    if (!dri2_dpy->vtbl->post_sub_buffer)
2074       return EGL_FALSE;
2075    return dri2_dpy->vtbl->post_sub_buffer(drv, disp, surf, x, y, width, height);
2076 }
2077
2078 static EGLBoolean
2079 dri2_copy_buffers(const _EGLDriver *drv, _EGLDisplay *disp, _EGLSurface *surf,
2080                   void *native_pixmap_target)
2081 {
2082    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
2083    if (!dri2_dpy->vtbl->copy_buffers)
2084       return _eglError(EGL_BAD_NATIVE_PIXMAP, "no support for native pixmaps");
2085    return dri2_dpy->vtbl->copy_buffers(drv, disp, surf, native_pixmap_target);
2086 }
2087
2088 static EGLint
2089 dri2_query_buffer_age(const _EGLDriver *drv, _EGLDisplay *disp, _EGLSurface *surf)
2090 {
2091    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
2092    if (!dri2_dpy->vtbl->query_buffer_age)
2093       return 0;
2094    return dri2_dpy->vtbl->query_buffer_age(drv, disp, surf);
2095 }
2096
2097 static EGLBoolean
2098 dri2_wait_client(const _EGLDriver *drv, _EGLDisplay *disp, _EGLContext *ctx)
2099 {
2100    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
2101    _EGLSurface *surf = ctx->DrawSurface;
2102    __DRIdrawable *dri_drawable = dri2_dpy->vtbl->get_dri_drawable(surf);
2103
2104    (void) drv;
2105
2106    /* FIXME: If EGL allows frontbuffer rendering for window surfaces,
2107     * we need to copy fake to real here.*/
2108
2109    if (dri2_dpy->flush != NULL)
2110       dri2_dpy->flush->flush(dri_drawable);
2111
2112    return EGL_TRUE;
2113 }
2114
2115 static EGLBoolean
2116 dri2_wait_native(const _EGLDriver *drv, _EGLDisplay *disp, EGLint engine)
2117 {
2118    (void) drv;
2119    (void) disp;
2120
2121    if (engine != EGL_CORE_NATIVE_ENGINE)
2122       return _eglError(EGL_BAD_PARAMETER, "eglWaitNative");
2123    /* glXWaitX(); */
2124
2125    return EGL_TRUE;
2126 }
2127
2128 static EGLBoolean
2129 dri2_bind_tex_image(_EGLDisplay *disp, _EGLSurface *surf, EGLint buffer)
2130 {
2131    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
2132    struct dri2_egl_context *dri2_ctx;
2133    _EGLContext *ctx;
2134    GLint format, target;
2135    __DRIdrawable *dri_drawable = dri2_dpy->vtbl->get_dri_drawable(surf);
2136
2137    ctx = _eglGetCurrentContext();
2138    dri2_ctx = dri2_egl_context(ctx);
2139
2140    if (!_eglBindTexImage(disp, surf, buffer))
2141       return EGL_FALSE;
2142
2143    switch (surf->TextureFormat) {
2144    case EGL_TEXTURE_RGB:
2145       format = __DRI_TEXTURE_FORMAT_RGB;
2146       break;
2147    case EGL_TEXTURE_RGBA:
2148       format = __DRI_TEXTURE_FORMAT_RGBA;
2149       break;
2150    default:
2151       assert(!"Unexpected texture format in dri2_bind_tex_image()");
2152       format = __DRI_TEXTURE_FORMAT_RGBA;
2153    }
2154
2155    switch (surf->TextureTarget) {
2156    case EGL_TEXTURE_2D:
2157       target = GL_TEXTURE_2D;
2158       break;
2159    default:
2160       target = GL_TEXTURE_2D;
2161       assert(!"Unexpected texture target in dri2_bind_tex_image()");
2162    }
2163
2164    dri2_dpy->tex_buffer->setTexBuffer2(dri2_ctx->dri_context,
2165                                        target, format,
2166                                        dri_drawable);
2167
2168    return EGL_TRUE;
2169 }
2170
2171 static EGLBoolean
2172 dri2_release_tex_image(_EGLDisplay *disp, _EGLSurface *surf, EGLint buffer)
2173 {
2174    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
2175    struct dri2_egl_context *dri2_ctx;
2176    _EGLContext *ctx;
2177    GLint  target;
2178    __DRIdrawable *dri_drawable = dri2_dpy->vtbl->get_dri_drawable(surf);
2179
2180    ctx = _eglGetCurrentContext();
2181    dri2_ctx = dri2_egl_context(ctx);
2182
2183    if (!_eglReleaseTexImage(disp, surf, buffer))
2184       return EGL_FALSE;
2185
2186    switch (surf->TextureTarget) {
2187    case EGL_TEXTURE_2D:
2188       target = GL_TEXTURE_2D;
2189       break;
2190    default:
2191       assert(!"missing texture target");
2192    }
2193
2194    if (dri2_dpy->tex_buffer->base.version >= 3 &&
2195        dri2_dpy->tex_buffer->releaseTexBuffer != NULL) {
2196       dri2_dpy->tex_buffer->releaseTexBuffer(dri2_ctx->dri_context,
2197                                              target, dri_drawable);
2198    }
2199
2200    return EGL_TRUE;
2201 }
2202
2203 static _EGLImage*
2204 dri2_create_image(const _EGLDriver *drv, _EGLDisplay *disp, _EGLContext *ctx,
2205                   EGLenum target, EGLClientBuffer buffer,
2206                   const EGLint *attr_list)
2207 {
2208    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
2209    return dri2_dpy->vtbl->create_image(drv, disp, ctx, target, buffer,
2210                                        attr_list);
2211 }
2212
2213 static _EGLImage *
2214 dri2_create_image_from_dri(_EGLDisplay *disp, __DRIimage *dri_image)
2215 {
2216    struct dri2_egl_image *dri2_img;
2217
2218    if (dri_image == NULL) {
2219       _eglError(EGL_BAD_ALLOC, "dri2_create_image");
2220       return NULL;
2221    }
2222
2223    dri2_img = malloc(sizeof *dri2_img);
2224    if (!dri2_img) {
2225       _eglError(EGL_BAD_ALLOC, "dri2_create_image");
2226       return NULL;
2227    }
2228
2229    _eglInitImage(&dri2_img->base, disp);
2230
2231    dri2_img->dri_image = dri_image;
2232
2233    return &dri2_img->base;
2234 }
2235
2236 /**
2237  * Translate a DRI Image extension error code into an EGL error code.
2238  */
2239 static EGLint
2240 egl_error_from_dri_image_error(int dri_error)
2241 {
2242    switch (dri_error) {
2243    case __DRI_IMAGE_ERROR_SUCCESS:
2244       return EGL_SUCCESS;
2245    case __DRI_IMAGE_ERROR_BAD_ALLOC:
2246       return EGL_BAD_ALLOC;
2247    case __DRI_IMAGE_ERROR_BAD_MATCH:
2248       return EGL_BAD_MATCH;
2249    case __DRI_IMAGE_ERROR_BAD_PARAMETER:
2250       return EGL_BAD_PARAMETER;
2251    case __DRI_IMAGE_ERROR_BAD_ACCESS:
2252       return EGL_BAD_ACCESS;
2253    default:
2254       assert(!"unknown dri_error code");
2255       return EGL_BAD_ALLOC;
2256    }
2257 }
2258
2259 static _EGLImage *
2260 dri2_create_image_khr_renderbuffer(_EGLDisplay *disp, _EGLContext *ctx,
2261                                    EGLClientBuffer buffer,
2262                                    const EGLint *attr_list)
2263 {
2264    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
2265    struct dri2_egl_context *dri2_ctx = dri2_egl_context(ctx);
2266    GLuint renderbuffer = (GLuint) (uintptr_t) buffer;
2267    __DRIimage *dri_image;
2268
2269    if (renderbuffer == 0) {
2270       _eglError(EGL_BAD_PARAMETER, "dri2_create_image_khr");
2271       return EGL_NO_IMAGE_KHR;
2272    }
2273
2274    if (!disp->Extensions.KHR_gl_renderbuffer_image) {
2275       _eglError(EGL_BAD_PARAMETER, "dri2_create_image_khr");
2276       return EGL_NO_IMAGE_KHR;
2277    }
2278
2279    if (dri2_dpy->image->base.version >= 17 &&
2280        dri2_dpy->image->createImageFromRenderbuffer2) {
2281       unsigned error = ~0;
2282
2283       dri_image = dri2_dpy->image->createImageFromRenderbuffer2(
2284                dri2_ctx->dri_context, renderbuffer, NULL, &error);
2285
2286       assert(!!dri_image == (error == __DRI_IMAGE_ERROR_SUCCESS));
2287
2288       if (!dri_image) {
2289          _eglError(egl_error_from_dri_image_error(error), "dri2_create_image_khr");
2290          return EGL_NO_IMAGE_KHR;
2291       }
2292    } else {
2293       dri_image = dri2_dpy->image->createImageFromRenderbuffer(
2294                dri2_ctx->dri_context, renderbuffer, NULL);
2295       if (!dri_image) {
2296          _eglError(EGL_BAD_ALLOC, "dri2_create_image_khr");
2297          return EGL_NO_IMAGE_KHR;
2298       }
2299    }
2300
2301    return dri2_create_image_from_dri(disp, dri_image);
2302 }
2303
2304 #ifdef HAVE_WAYLAND_PLATFORM
2305
2306 /* This structure describes how a wl_buffer maps to one or more
2307  * __DRIimages.  A wl_drm_buffer stores the wl_drm format code and the
2308  * offsets and strides of the planes in the buffer.  This table maps a
2309  * wl_drm format code to a description of the planes in the buffer
2310  * that lets us create a __DRIimage for each of the planes. */
2311
2312 static const struct wl_drm_components_descriptor {
2313    uint32_t dri_components;
2314    EGLint components;
2315    int nplanes;
2316 } wl_drm_components[] = {
2317    { __DRI_IMAGE_COMPONENTS_RGB, EGL_TEXTURE_RGB, 1 },
2318    { __DRI_IMAGE_COMPONENTS_RGBA, EGL_TEXTURE_RGBA, 1 },
2319    { __DRI_IMAGE_COMPONENTS_Y_U_V, EGL_TEXTURE_Y_U_V_WL, 3 },
2320    { __DRI_IMAGE_COMPONENTS_Y_UV, EGL_TEXTURE_Y_UV_WL, 2 },
2321    { __DRI_IMAGE_COMPONENTS_Y_XUXV, EGL_TEXTURE_Y_XUXV_WL, 2 },
2322 };
2323
2324 static _EGLImage *
2325 dri2_create_image_wayland_wl_buffer(_EGLDisplay *disp, _EGLContext *ctx,
2326                                     EGLClientBuffer _buffer,
2327                                     const EGLint *attr_list)
2328 {
2329    struct wl_drm_buffer *buffer;
2330    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
2331    const struct wl_drm_components_descriptor *f;
2332    __DRIimage *dri_image;
2333    _EGLImageAttribs attrs;
2334    int32_t plane;
2335
2336    buffer = wayland_drm_buffer_get(dri2_dpy->wl_server_drm,
2337                                    (struct wl_resource *) _buffer);
2338    if (!buffer)
2339        return NULL;
2340
2341    if (!_eglParseImageAttribList(&attrs, disp, attr_list))
2342       return NULL;
2343
2344    plane = attrs.PlaneWL;
2345    f = buffer->driver_format;
2346    if (plane < 0 || plane >= f->nplanes) {
2347       _eglError(EGL_BAD_PARAMETER,
2348                 "dri2_create_image_wayland_wl_buffer (plane out of bounds)");
2349       return NULL;
2350    }
2351
2352    dri_image = dri2_dpy->image->fromPlanar(buffer->driver_buffer, plane, NULL);
2353    if (dri_image == NULL && plane == 0)
2354       dri_image = dri2_dpy->image->dupImage(buffer->driver_buffer, NULL);
2355    if (dri_image == NULL) {
2356       _eglError(EGL_BAD_PARAMETER, "dri2_create_image_wayland_wl_buffer");
2357       return NULL;
2358    }
2359
2360    return dri2_create_image_from_dri(disp, dri_image);
2361 }
2362 #endif
2363
2364 static EGLBoolean
2365 dri2_get_sync_values_chromium(_EGLDisplay *disp, _EGLSurface *surf,
2366                               EGLuint64KHR *ust, EGLuint64KHR *msc,
2367                               EGLuint64KHR *sbc)
2368 {
2369    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
2370    if (!dri2_dpy->vtbl->get_sync_values)
2371       return EGL_FALSE;
2372    return dri2_dpy->vtbl->get_sync_values(disp, surf, ust, msc, sbc);
2373 }
2374
2375 /**
2376  * Set the error code after a call to
2377  * dri2_egl_image::dri_image::createImageFromTexture.
2378  */
2379 static void
2380 dri2_create_image_khr_texture_error(int dri_error)
2381 {
2382    EGLint egl_error = egl_error_from_dri_image_error(dri_error);
2383
2384    if (egl_error != EGL_SUCCESS)
2385       _eglError(egl_error, "dri2_create_image_khr_texture");
2386 }
2387
2388 static _EGLImage *
2389 dri2_create_image_khr_texture(_EGLDisplay *disp, _EGLContext *ctx,
2390                                    EGLenum target,
2391                                    EGLClientBuffer buffer,
2392                                    const EGLint *attr_list)
2393 {
2394    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
2395    struct dri2_egl_context *dri2_ctx = dri2_egl_context(ctx);
2396    struct dri2_egl_image *dri2_img;
2397    GLuint texture = (GLuint) (uintptr_t) buffer;
2398    _EGLImageAttribs attrs;
2399    GLuint depth;
2400    GLenum gl_target;
2401    unsigned error;
2402
2403    if (texture == 0) {
2404       _eglError(EGL_BAD_PARAMETER, "dri2_create_image_khr");
2405       return EGL_NO_IMAGE_KHR;
2406    }
2407
2408    if (!_eglParseImageAttribList(&attrs, disp, attr_list))
2409       return EGL_NO_IMAGE_KHR;
2410
2411    switch (target) {
2412    case EGL_GL_TEXTURE_2D_KHR:
2413       if (!disp->Extensions.KHR_gl_texture_2D_image) {
2414          _eglError(EGL_BAD_PARAMETER, "dri2_create_image_khr");
2415          return EGL_NO_IMAGE_KHR;
2416       }
2417       depth = 0;
2418       gl_target = GL_TEXTURE_2D;
2419       break;
2420    case EGL_GL_TEXTURE_3D_KHR:
2421       if (!disp->Extensions.KHR_gl_texture_3D_image) {
2422          _eglError(EGL_BAD_PARAMETER, "dri2_create_image_khr");
2423          return EGL_NO_IMAGE_KHR;
2424       }
2425
2426       depth = attrs.GLTextureZOffset;
2427       gl_target = GL_TEXTURE_3D;
2428       break;
2429    case EGL_GL_TEXTURE_CUBE_MAP_POSITIVE_X_KHR:
2430    case EGL_GL_TEXTURE_CUBE_MAP_NEGATIVE_X_KHR:
2431    case EGL_GL_TEXTURE_CUBE_MAP_POSITIVE_Y_KHR:
2432    case EGL_GL_TEXTURE_CUBE_MAP_NEGATIVE_Y_KHR:
2433    case EGL_GL_TEXTURE_CUBE_MAP_POSITIVE_Z_KHR:
2434    case EGL_GL_TEXTURE_CUBE_MAP_NEGATIVE_Z_KHR:
2435       if (!disp->Extensions.KHR_gl_texture_cubemap_image) {
2436          _eglError(EGL_BAD_PARAMETER, "dri2_create_image_khr");
2437          return EGL_NO_IMAGE_KHR;
2438       }
2439
2440       depth = target - EGL_GL_TEXTURE_CUBE_MAP_POSITIVE_X_KHR;
2441       gl_target = GL_TEXTURE_CUBE_MAP;
2442       break;
2443    default:
2444       unreachable("Unexpected target in dri2_create_image_khr_texture()");
2445       return EGL_NO_IMAGE_KHR;
2446    }
2447
2448    dri2_img = malloc(sizeof *dri2_img);
2449    if (!dri2_img) {
2450       _eglError(EGL_BAD_ALLOC, "dri2_create_image_khr");
2451       return EGL_NO_IMAGE_KHR;
2452    }
2453
2454    _eglInitImage(&dri2_img->base, disp);
2455
2456    dri2_img->dri_image =
2457       dri2_dpy->image->createImageFromTexture(dri2_ctx->dri_context,
2458                                               gl_target,
2459                                               texture,
2460                                               depth,
2461                                               attrs.GLTextureLevel,
2462                                               &error,
2463                                               dri2_img);
2464    dri2_create_image_khr_texture_error(error);
2465
2466    if (!dri2_img->dri_image) {
2467       free(dri2_img);
2468       return EGL_NO_IMAGE_KHR;
2469    }
2470    return &dri2_img->base;
2471 }
2472
2473 static EGLBoolean
2474 dri2_query_surface(_EGLDisplay *disp, _EGLSurface *surf,
2475                    EGLint attribute, EGLint *value)
2476 {
2477    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
2478    if (!dri2_dpy->vtbl->query_surface)
2479       return _eglQuerySurface(disp, surf, attribute, value);
2480    return dri2_dpy->vtbl->query_surface(disp, surf, attribute, value);
2481 }
2482
2483 static struct wl_buffer*
2484 dri2_create_wayland_buffer_from_image(const _EGLDriver *drv, _EGLDisplay *disp,
2485                                       _EGLImage *img)
2486 {
2487    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
2488    if (!dri2_dpy->vtbl->create_wayland_buffer_from_image)
2489       return NULL;
2490    return dri2_dpy->vtbl->create_wayland_buffer_from_image(drv, disp, img);
2491 }
2492
2493 #ifdef HAVE_LIBDRM
2494 static _EGLImage *
2495 dri2_create_image_mesa_drm_buffer(_EGLDisplay *disp, _EGLContext *ctx,
2496                                   EGLClientBuffer buffer, const EGLint *attr_list)
2497 {
2498    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
2499    EGLint format, name, pitch;
2500    _EGLImageAttribs attrs;
2501    __DRIimage *dri_image;
2502
2503    name = (EGLint) (uintptr_t) buffer;
2504
2505    if (!_eglParseImageAttribList(&attrs, disp, attr_list))
2506       return NULL;
2507
2508    if (attrs.Width <= 0 || attrs.Height <= 0 ||
2509        attrs.DRMBufferStrideMESA <= 0) {
2510       _eglError(EGL_BAD_PARAMETER,
2511                 "bad width, height or stride");
2512       return NULL;
2513    }
2514
2515    switch (attrs.DRMBufferFormatMESA) {
2516    case EGL_DRM_BUFFER_FORMAT_ARGB32_MESA:
2517       format = __DRI_IMAGE_FORMAT_ARGB8888;
2518       pitch = attrs.DRMBufferStrideMESA;
2519       break;
2520    default:
2521       _eglError(EGL_BAD_PARAMETER,
2522                 "dri2_create_image_khr: unsupported pixmap depth");
2523       return NULL;
2524    }
2525
2526    dri_image =
2527       dri2_dpy->image->createImageFromName(dri2_dpy->dri_screen,
2528                                            attrs.Width,
2529                                            attrs.Height,
2530                                            format,
2531                                            name,
2532                                            pitch,
2533                                            NULL);
2534
2535    return dri2_create_image_from_dri(disp, dri_image);
2536 }
2537
2538 static EGLBoolean
2539 dri2_check_dma_buf_attribs(const _EGLImageAttribs *attrs)
2540 {
2541    /**
2542      * The spec says:
2543      *
2544      * "Required attributes and their values are as follows:
2545      *
2546      *  * EGL_WIDTH & EGL_HEIGHT: The logical dimensions of the buffer in pixels
2547      *
2548      *  * EGL_LINUX_DRM_FOURCC_EXT: The pixel format of the buffer, as specified
2549      *    by drm_fourcc.h and used as the pixel_format parameter of the
2550      *    drm_mode_fb_cmd2 ioctl."
2551      *
2552      * and
2553      *
2554      * "* If <target> is EGL_LINUX_DMA_BUF_EXT, and the list of attributes is
2555      *    incomplete, EGL_BAD_PARAMETER is generated."
2556      */
2557    if (attrs->Width <= 0 || attrs->Height <= 0 ||
2558        !attrs->DMABufFourCC.IsPresent)
2559       return _eglError(EGL_BAD_PARAMETER, "attribute(s) missing");
2560
2561    /**
2562     * Also:
2563     *
2564     * "If <target> is EGL_LINUX_DMA_BUF_EXT and one or more of the values
2565     *  specified for a plane's pitch or offset isn't supported by EGL,
2566     *  EGL_BAD_ACCESS is generated."
2567     */
2568    for (unsigned i = 0; i < ARRAY_SIZE(attrs->DMABufPlanePitches); ++i) {
2569       if (attrs->DMABufPlanePitches[i].IsPresent &&
2570           attrs->DMABufPlanePitches[i].Value <= 0)
2571          return _eglError(EGL_BAD_ACCESS, "invalid pitch");
2572    }
2573
2574    /**
2575     * If <target> is EGL_LINUX_DMA_BUF_EXT, both or neither of the following
2576     * attribute values may be given.
2577     *
2578     * This is referring to EGL_DMA_BUF_PLANE0_MODIFIER_LO_EXT and
2579     * EGL_DMA_BUF_PLANE0_MODIFIER_HI_EXT, and the same for other planes.
2580     */
2581    for (unsigned i = 0; i < DMA_BUF_MAX_PLANES; ++i) {
2582       if (attrs->DMABufPlaneModifiersLo[i].IsPresent !=
2583           attrs->DMABufPlaneModifiersHi[i].IsPresent)
2584          return _eglError(EGL_BAD_PARAMETER, "modifier attribute lo or hi missing");
2585    }
2586
2587    /* Although the EGL_EXT_image_dma_buf_import_modifiers spec doesn't
2588     * mandate it, we only accept the same modifier across all planes. */
2589    for (unsigned i = 1; i < DMA_BUF_MAX_PLANES; ++i) {
2590       if (attrs->DMABufPlaneFds[i].IsPresent) {
2591          if ((attrs->DMABufPlaneModifiersLo[0].IsPresent !=
2592                attrs->DMABufPlaneModifiersLo[i].IsPresent) ||
2593              (attrs->DMABufPlaneModifiersLo[0].Value !=
2594                attrs->DMABufPlaneModifiersLo[i].Value) ||
2595              (attrs->DMABufPlaneModifiersHi[0].Value !=
2596                attrs->DMABufPlaneModifiersHi[i].Value))
2597             return _eglError(EGL_BAD_PARAMETER, "modifier attributes not equal");
2598       }
2599    }
2600
2601    return EGL_TRUE;
2602 }
2603
2604 /* Returns the total number of planes for the format or zero if it isn't a
2605  * valid fourcc format.
2606  */
2607 static unsigned
2608 dri2_num_fourcc_format_planes(EGLint format)
2609 {
2610    switch (format) {
2611    case DRM_FORMAT_R8:
2612    case DRM_FORMAT_RG88:
2613    case DRM_FORMAT_GR88:
2614    case DRM_FORMAT_R16:
2615    case DRM_FORMAT_GR1616:
2616    case DRM_FORMAT_RGB332:
2617    case DRM_FORMAT_BGR233:
2618    case DRM_FORMAT_XRGB4444:
2619    case DRM_FORMAT_XBGR4444:
2620    case DRM_FORMAT_RGBX4444:
2621    case DRM_FORMAT_BGRX4444:
2622    case DRM_FORMAT_ARGB4444:
2623    case DRM_FORMAT_ABGR4444:
2624    case DRM_FORMAT_RGBA4444:
2625    case DRM_FORMAT_BGRA4444:
2626    case DRM_FORMAT_XRGB1555:
2627    case DRM_FORMAT_XBGR1555:
2628    case DRM_FORMAT_RGBX5551:
2629    case DRM_FORMAT_BGRX5551:
2630    case DRM_FORMAT_ARGB1555:
2631    case DRM_FORMAT_ABGR1555:
2632    case DRM_FORMAT_RGBA5551:
2633    case DRM_FORMAT_BGRA5551:
2634    case DRM_FORMAT_RGB565:
2635    case DRM_FORMAT_BGR565:
2636    case DRM_FORMAT_RGB888:
2637    case DRM_FORMAT_BGR888:
2638    case DRM_FORMAT_XRGB8888:
2639    case DRM_FORMAT_XBGR8888:
2640    case DRM_FORMAT_RGBX8888:
2641    case DRM_FORMAT_BGRX8888:
2642    case DRM_FORMAT_ARGB8888:
2643    case DRM_FORMAT_ABGR8888:
2644    case DRM_FORMAT_RGBA8888:
2645    case DRM_FORMAT_BGRA8888:
2646    case DRM_FORMAT_XRGB2101010:
2647    case DRM_FORMAT_XBGR2101010:
2648    case DRM_FORMAT_RGBX1010102:
2649    case DRM_FORMAT_BGRX1010102:
2650    case DRM_FORMAT_ARGB2101010:
2651    case DRM_FORMAT_ABGR2101010:
2652    case DRM_FORMAT_RGBA1010102:
2653    case DRM_FORMAT_BGRA1010102:
2654    case DRM_FORMAT_XBGR16161616F:
2655    case DRM_FORMAT_ABGR16161616F:
2656    case DRM_FORMAT_YUYV:
2657    case DRM_FORMAT_YVYU:
2658    case DRM_FORMAT_UYVY:
2659    case DRM_FORMAT_VYUY:
2660    case DRM_FORMAT_AYUV:
2661    case DRM_FORMAT_XYUV8888:
2662       return 1;
2663
2664    case DRM_FORMAT_NV12:
2665    case DRM_FORMAT_NV21:
2666    case DRM_FORMAT_NV16:
2667    case DRM_FORMAT_NV61:
2668    case DRM_FORMAT_P010:
2669    case DRM_FORMAT_P012:
2670    case DRM_FORMAT_P016:
2671       return 2;
2672
2673    case DRM_FORMAT_YUV410:
2674    case DRM_FORMAT_YVU410:
2675    case DRM_FORMAT_YUV411:
2676    case DRM_FORMAT_YVU411:
2677    case DRM_FORMAT_YUV420:
2678    case DRM_FORMAT_YVU420:
2679    case DRM_FORMAT_YUV422:
2680    case DRM_FORMAT_YVU422:
2681    case DRM_FORMAT_YUV444:
2682    case DRM_FORMAT_YVU444:
2683       return 3;
2684
2685    default:
2686       return 0;
2687    }
2688 }
2689
2690 /* Returns the total number of file descriptors. Zero indicates an error. */
2691 static unsigned
2692 dri2_check_dma_buf_format(const _EGLImageAttribs *attrs)
2693 {
2694    unsigned plane_n = dri2_num_fourcc_format_planes(attrs->DMABufFourCC.Value);
2695    if (plane_n == 0) {
2696       _eglError(EGL_BAD_MATCH, "unknown drm fourcc format");
2697       return 0;
2698    }
2699
2700    for (unsigned i = plane_n; i < DMA_BUF_MAX_PLANES; i++) {
2701       /**
2702        * The modifiers extension spec says:
2703        *
2704        * "Modifiers may modify any attribute of a buffer import, including
2705        *  but not limited to adding extra planes to a format which
2706        *  otherwise does not have those planes. As an example, a modifier
2707        *  may add a plane for an external compression buffer to a
2708        *  single-plane format. The exact meaning and effect of any
2709        *  modifier is canonically defined by drm_fourcc.h, not as part of
2710        *  this extension."
2711        */
2712       if (attrs->DMABufPlaneModifiersLo[i].IsPresent &&
2713           attrs->DMABufPlaneModifiersHi[i].IsPresent) {
2714          plane_n = i + 1;
2715       }
2716    }
2717
2718    /**
2719      * The spec says:
2720      *
2721      * "* If <target> is EGL_LINUX_DMA_BUF_EXT, and the list of attributes is
2722      *    incomplete, EGL_BAD_PARAMETER is generated."
2723      */
2724    for (unsigned i = 0; i < plane_n; ++i) {
2725       if (!attrs->DMABufPlaneFds[i].IsPresent ||
2726           !attrs->DMABufPlaneOffsets[i].IsPresent ||
2727           !attrs->DMABufPlanePitches[i].IsPresent) {
2728          _eglError(EGL_BAD_PARAMETER, "plane attribute(s) missing");
2729          return 0;
2730       }
2731    }
2732
2733    /**
2734     * The spec also says:
2735     *
2736     * "If <target> is EGL_LINUX_DMA_BUF_EXT, and the EGL_LINUX_DRM_FOURCC_EXT
2737     *  attribute indicates a single-plane format, EGL_BAD_ATTRIBUTE is
2738     *  generated if any of the EGL_DMA_BUF_PLANE1_* or EGL_DMA_BUF_PLANE2_*
2739     *  or EGL_DMA_BUF_PLANE3_* attributes are specified."
2740     */
2741    for (unsigned i = plane_n; i < DMA_BUF_MAX_PLANES; ++i) {
2742       if (attrs->DMABufPlaneFds[i].IsPresent ||
2743           attrs->DMABufPlaneOffsets[i].IsPresent ||
2744           attrs->DMABufPlanePitches[i].IsPresent) {
2745          _eglError(EGL_BAD_ATTRIBUTE, "too many plane attributes");
2746          return 0;
2747       }
2748    }
2749
2750    return plane_n;
2751 }
2752
2753 static EGLBoolean
2754 dri2_query_dma_buf_formats(const _EGLDriver *drv, _EGLDisplay *disp,
2755                             EGLint max, EGLint *formats, EGLint *count)
2756 {
2757    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
2758    if (max < 0 || (max > 0 && formats == NULL))
2759       return _eglError(EGL_BAD_PARAMETER, "invalid value for max count of formats");
2760
2761    if (dri2_dpy->image->base.version < 15 ||
2762        dri2_dpy->image->queryDmaBufFormats == NULL)
2763       return EGL_FALSE;
2764
2765    if (!dri2_dpy->image->queryDmaBufFormats(dri2_dpy->dri_screen, max,
2766                                             formats, count))
2767       return EGL_FALSE;
2768
2769    if (max > 0) {
2770       /* Assert that all of the formats returned are actually fourcc formats.
2771        * Some day, if we want the internal interface function to be able to
2772        * return the fake fourcc formats defined in dri_interface.h, we'll have
2773        * to do something more clever here to pair the list down to just real
2774        * fourcc formats so that we don't leak the fake internal ones.
2775        */
2776       for (int i = 0; i < *count; i++) {
2777          assert(dri2_num_fourcc_format_planes(formats[i]) > 0);
2778       }
2779    }
2780
2781    return EGL_TRUE;
2782 }
2783
2784 static EGLBoolean
2785 dri2_query_dma_buf_modifiers(const _EGLDriver *drv, _EGLDisplay *disp, EGLint format,
2786                              EGLint max, EGLuint64KHR *modifiers,
2787                              EGLBoolean *external_only, EGLint *count)
2788 {
2789    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
2790
2791    if (dri2_num_fourcc_format_planes(format) == 0)
2792       return _eglError(EGL_BAD_PARAMETER, "invalid fourcc format");
2793
2794    if (max < 0)
2795       return _eglError(EGL_BAD_PARAMETER, "invalid value for max count of formats");
2796
2797    if (max > 0 && modifiers == NULL)
2798       return _eglError(EGL_BAD_PARAMETER, "invalid modifiers array");
2799
2800    if (dri2_dpy->image->base.version < 15 ||
2801        dri2_dpy->image->queryDmaBufModifiers == NULL)
2802       return EGL_FALSE;
2803
2804    if (dri2_dpy->image->queryDmaBufModifiers(dri2_dpy->dri_screen, format,
2805                                              max, modifiers,
2806                                              (unsigned int *) external_only,
2807                                              count) == false)
2808       return _eglError(EGL_BAD_PARAMETER, "invalid format");
2809
2810    return EGL_TRUE;
2811 }
2812
2813 /**
2814  * The spec says:
2815  *
2816  * "If eglCreateImageKHR is successful for a EGL_LINUX_DMA_BUF_EXT target, the
2817  *  EGL will take a reference to the dma_buf(s) which it will release at any
2818  *  time while the EGLDisplay is initialized. It is the responsibility of the
2819  *  application to close the dma_buf file descriptors."
2820  *
2821  * Therefore we must never close or otherwise modify the file descriptors.
2822  */
2823 _EGLImage *
2824 dri2_create_image_dma_buf(_EGLDisplay *disp, _EGLContext *ctx,
2825                           EGLClientBuffer buffer, const EGLint *attr_list)
2826 {
2827    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
2828    _EGLImage *res;
2829    _EGLImageAttribs attrs;
2830    __DRIimage *dri_image;
2831    unsigned num_fds;
2832    int fds[DMA_BUF_MAX_PLANES];
2833    int pitches[DMA_BUF_MAX_PLANES];
2834    int offsets[DMA_BUF_MAX_PLANES];
2835    uint64_t modifier;
2836    bool has_modifier = false;
2837    unsigned error;
2838
2839    /**
2840     * The spec says:
2841     *
2842     * ""* If <target> is EGL_LINUX_DMA_BUF_EXT and <buffer> is not NULL, the
2843     *     error EGL_BAD_PARAMETER is generated."
2844     */
2845    if (buffer != NULL) {
2846       _eglError(EGL_BAD_PARAMETER, "buffer not NULL");
2847       return NULL;
2848    }
2849
2850    if (!_eglParseImageAttribList(&attrs, disp, attr_list))
2851       return NULL;
2852
2853    if (!dri2_check_dma_buf_attribs(&attrs))
2854       return NULL;
2855
2856    num_fds = dri2_check_dma_buf_format(&attrs);
2857    if (!num_fds)
2858       return NULL;
2859
2860    for (unsigned i = 0; i < num_fds; ++i) {
2861       fds[i] = attrs.DMABufPlaneFds[i].Value;
2862       pitches[i] = attrs.DMABufPlanePitches[i].Value;
2863       offsets[i] = attrs.DMABufPlaneOffsets[i].Value;
2864    }
2865
2866    /* dri2_check_dma_buf_attribs ensures that the modifier, if available,
2867     * will be present in attrs.DMABufPlaneModifiersLo[0] and
2868     * attrs.DMABufPlaneModifiersHi[0] */
2869    if (attrs.DMABufPlaneModifiersLo[0].IsPresent) {
2870       modifier = combine_u32_into_u64(attrs.DMABufPlaneModifiersHi[0].Value,
2871                                       attrs.DMABufPlaneModifiersLo[0].Value);
2872       has_modifier = true;
2873    }
2874
2875    if (has_modifier) {
2876       if (dri2_dpy->image->base.version < 15 ||
2877           dri2_dpy->image->createImageFromDmaBufs2 == NULL) {
2878          _eglError(EGL_BAD_MATCH, "unsupported dma_buf format modifier");
2879          return EGL_NO_IMAGE_KHR;
2880       }
2881       dri_image =
2882          dri2_dpy->image->createImageFromDmaBufs2(dri2_dpy->dri_screen,
2883             attrs.Width, attrs.Height, attrs.DMABufFourCC.Value,
2884             modifier, fds, num_fds, pitches, offsets,
2885             attrs.DMABufYuvColorSpaceHint.Value,
2886             attrs.DMABufSampleRangeHint.Value,
2887             attrs.DMABufChromaHorizontalSiting.Value,
2888             attrs.DMABufChromaVerticalSiting.Value,
2889             &error,
2890             NULL);
2891    }
2892    else {
2893       dri_image =
2894          dri2_dpy->image->createImageFromDmaBufs(dri2_dpy->dri_screen,
2895             attrs.Width, attrs.Height, attrs.DMABufFourCC.Value,
2896             fds, num_fds, pitches, offsets,
2897             attrs.DMABufYuvColorSpaceHint.Value,
2898             attrs.DMABufSampleRangeHint.Value,
2899             attrs.DMABufChromaHorizontalSiting.Value,
2900             attrs.DMABufChromaVerticalSiting.Value,
2901             &error,
2902             NULL);
2903    }
2904    dri2_create_image_khr_texture_error(error);
2905
2906    if (!dri_image)
2907       return EGL_NO_IMAGE_KHR;
2908
2909    res = dri2_create_image_from_dri(disp, dri_image);
2910
2911    return res;
2912 }
2913 static _EGLImage *
2914 dri2_create_drm_image_mesa(const _EGLDriver *drv, _EGLDisplay *disp,
2915                            const EGLint *attr_list)
2916 {
2917    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
2918    struct dri2_egl_image *dri2_img;
2919    _EGLImageAttribs attrs;
2920    unsigned int dri_use, valid_mask;
2921    int format;
2922
2923    (void) drv;
2924
2925    if (!attr_list) {
2926       _eglError(EGL_BAD_PARAMETER, __func__);
2927       return EGL_NO_IMAGE_KHR;
2928    }
2929
2930    if (!_eglParseImageAttribList(&attrs, disp, attr_list))
2931       return EGL_NO_IMAGE_KHR;
2932
2933    if (attrs.Width <= 0 || attrs.Height <= 0) {
2934       _eglError(EGL_BAD_PARAMETER, __func__);
2935       return EGL_NO_IMAGE_KHR;
2936    }
2937
2938    switch (attrs.DRMBufferFormatMESA) {
2939    case EGL_DRM_BUFFER_FORMAT_ARGB32_MESA:
2940       format = __DRI_IMAGE_FORMAT_ARGB8888;
2941       break;
2942    default:
2943       _eglError(EGL_BAD_PARAMETER, __func__);
2944       return EGL_NO_IMAGE_KHR;
2945    }
2946
2947    valid_mask =
2948       EGL_DRM_BUFFER_USE_SCANOUT_MESA |
2949       EGL_DRM_BUFFER_USE_SHARE_MESA |
2950       EGL_DRM_BUFFER_USE_CURSOR_MESA;
2951    if (attrs.DRMBufferUseMESA & ~valid_mask) {
2952       _eglError(EGL_BAD_PARAMETER, __func__);
2953       return EGL_NO_IMAGE_KHR;
2954    }
2955
2956    dri_use = 0;
2957    if (attrs.DRMBufferUseMESA & EGL_DRM_BUFFER_USE_SHARE_MESA)
2958       dri_use |= __DRI_IMAGE_USE_SHARE;
2959    if (attrs.DRMBufferUseMESA & EGL_DRM_BUFFER_USE_SCANOUT_MESA)
2960       dri_use |= __DRI_IMAGE_USE_SCANOUT;
2961    if (attrs.DRMBufferUseMESA & EGL_DRM_BUFFER_USE_CURSOR_MESA)
2962       dri_use |= __DRI_IMAGE_USE_CURSOR;
2963
2964    dri2_img = malloc(sizeof *dri2_img);
2965    if (!dri2_img) {
2966       _eglError(EGL_BAD_ALLOC, "dri2_create_image_khr");
2967       return EGL_NO_IMAGE_KHR;
2968    }
2969
2970    _eglInitImage(&dri2_img->base, disp);
2971
2972    dri2_img->dri_image =
2973       dri2_dpy->image->createImage(dri2_dpy->dri_screen,
2974                                    attrs.Width, attrs.Height,
2975                                    format, dri_use, dri2_img);
2976    if (dri2_img->dri_image == NULL) {
2977       free(dri2_img);
2978        _eglError(EGL_BAD_ALLOC, "dri2_create_drm_image_mesa");
2979       return EGL_NO_IMAGE_KHR;
2980    }
2981
2982    return &dri2_img->base;
2983 }
2984
2985 static EGLBoolean
2986 dri2_export_drm_image_mesa(const _EGLDriver *drv, _EGLDisplay *disp, _EGLImage *img,
2987                           EGLint *name, EGLint *handle, EGLint *stride)
2988 {
2989    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
2990    struct dri2_egl_image *dri2_img = dri2_egl_image(img);
2991
2992    (void) drv;
2993
2994    if (name && !dri2_dpy->image->queryImage(dri2_img->dri_image,
2995                                             __DRI_IMAGE_ATTRIB_NAME, name))
2996       return _eglError(EGL_BAD_ALLOC, "dri2_export_drm_image_mesa");
2997
2998    if (handle)
2999       dri2_dpy->image->queryImage(dri2_img->dri_image,
3000                                   __DRI_IMAGE_ATTRIB_HANDLE, handle);
3001
3002    if (stride)
3003       dri2_dpy->image->queryImage(dri2_img->dri_image,
3004                                   __DRI_IMAGE_ATTRIB_STRIDE, stride);
3005
3006    return EGL_TRUE;
3007 }
3008
3009 /**
3010  * Checks if we can support EGL_MESA_image_dma_buf_export on this image.
3011
3012  * The spec provides a boolean return for the driver to reject exporting for
3013  * basically any reason, but doesn't specify any particular error cases.  For
3014  * now, we just fail if we don't have a DRM fourcc for the format.
3015  */
3016 static bool
3017 dri2_can_export_dma_buf_image(_EGLDisplay *disp, _EGLImage *img)
3018 {
3019    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
3020    struct dri2_egl_image *dri2_img = dri2_egl_image(img);
3021    EGLint fourcc;
3022
3023    if (!dri2_dpy->image->queryImage(dri2_img->dri_image,
3024                                     __DRI_IMAGE_ATTRIB_FOURCC, &fourcc)) {
3025       return false;
3026    }
3027
3028    return true;
3029 }
3030
3031 static EGLBoolean
3032 dri2_export_dma_buf_image_query_mesa(const _EGLDriver *drv, _EGLDisplay *disp,
3033                                      _EGLImage *img,
3034                                      EGLint *fourcc, EGLint *nplanes,
3035                                      EGLuint64KHR *modifiers)
3036 {
3037    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
3038    struct dri2_egl_image *dri2_img = dri2_egl_image(img);
3039    int num_planes;
3040
3041    (void) drv;
3042
3043    if (!dri2_can_export_dma_buf_image(disp, img))
3044       return EGL_FALSE;
3045
3046    dri2_dpy->image->queryImage(dri2_img->dri_image,
3047                                __DRI_IMAGE_ATTRIB_NUM_PLANES, &num_planes);
3048    if (nplanes)
3049      *nplanes = num_planes;
3050
3051    if (fourcc)
3052       dri2_dpy->image->queryImage(dri2_img->dri_image,
3053                                   __DRI_IMAGE_ATTRIB_FOURCC, fourcc);
3054
3055    if (modifiers) {
3056       int mod_hi, mod_lo;
3057       uint64_t modifier = DRM_FORMAT_MOD_INVALID;
3058       bool query;
3059
3060       query = dri2_dpy->image->queryImage(dri2_img->dri_image,
3061                                           __DRI_IMAGE_ATTRIB_MODIFIER_UPPER,
3062                                           &mod_hi);
3063       query &= dri2_dpy->image->queryImage(dri2_img->dri_image,
3064                                            __DRI_IMAGE_ATTRIB_MODIFIER_LOWER,
3065                                            &mod_lo);
3066       if (query)
3067          modifier = combine_u32_into_u64 (mod_hi, mod_lo);
3068
3069       for (int i = 0; i < num_planes; i++)
3070         modifiers[i] = modifier;
3071    }
3072
3073    return EGL_TRUE;
3074 }
3075
3076 static EGLBoolean
3077 dri2_export_dma_buf_image_mesa(const _EGLDriver *drv, _EGLDisplay *disp, _EGLImage *img,
3078                                int *fds, EGLint *strides, EGLint *offsets)
3079 {
3080    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
3081    struct dri2_egl_image *dri2_img = dri2_egl_image(img);
3082    EGLint nplanes;
3083
3084    (void) drv;
3085
3086    if (!dri2_can_export_dma_buf_image(disp, img))
3087       return EGL_FALSE;
3088
3089    /* EGL_MESA_image_dma_buf_export spec says:
3090     *    "If the number of fds is less than the number of planes, then
3091     *    subsequent fd slots should contain -1."
3092     */
3093    if (fds) {
3094       /* Query nplanes so that we know how big the given array is. */
3095       dri2_dpy->image->queryImage(dri2_img->dri_image,
3096                                   __DRI_IMAGE_ATTRIB_NUM_PLANES, &nplanes);
3097       memset(fds, -1, nplanes * sizeof(int));
3098    }
3099
3100    /* rework later to provide multiple fds/strides/offsets */
3101    if (fds)
3102       dri2_dpy->image->queryImage(dri2_img->dri_image,
3103                                   __DRI_IMAGE_ATTRIB_FD, fds);
3104
3105    if (strides)
3106       dri2_dpy->image->queryImage(dri2_img->dri_image,
3107                                   __DRI_IMAGE_ATTRIB_STRIDE, strides);
3108
3109    if (offsets) {
3110       int img_offset;
3111       bool ret = dri2_dpy->image->queryImage(dri2_img->dri_image,
3112                      __DRI_IMAGE_ATTRIB_OFFSET, &img_offset);
3113       if (ret)
3114          offsets[0] = img_offset;
3115       else
3116          offsets[0] = 0;
3117    }
3118
3119    return EGL_TRUE;
3120 }
3121
3122 #endif
3123
3124 _EGLImage *
3125 dri2_create_image_khr(const _EGLDriver *drv, _EGLDisplay *disp,
3126                       _EGLContext *ctx, EGLenum target,
3127                       EGLClientBuffer buffer, const EGLint *attr_list)
3128 {
3129    (void) drv;
3130
3131    switch (target) {
3132    case EGL_GL_TEXTURE_2D_KHR:
3133    case EGL_GL_TEXTURE_CUBE_MAP_POSITIVE_X_KHR:
3134    case EGL_GL_TEXTURE_CUBE_MAP_NEGATIVE_X_KHR:
3135    case EGL_GL_TEXTURE_CUBE_MAP_POSITIVE_Y_KHR:
3136    case EGL_GL_TEXTURE_CUBE_MAP_NEGATIVE_Y_KHR:
3137    case EGL_GL_TEXTURE_CUBE_MAP_POSITIVE_Z_KHR:
3138    case EGL_GL_TEXTURE_CUBE_MAP_NEGATIVE_Z_KHR:
3139    case EGL_GL_TEXTURE_3D_KHR:
3140       return dri2_create_image_khr_texture(disp, ctx, target, buffer, attr_list);
3141    case EGL_GL_RENDERBUFFER_KHR:
3142       return dri2_create_image_khr_renderbuffer(disp, ctx, buffer, attr_list);
3143 #ifdef HAVE_LIBDRM
3144    case EGL_DRM_BUFFER_MESA:
3145       return dri2_create_image_mesa_drm_buffer(disp, ctx, buffer, attr_list);
3146    case EGL_LINUX_DMA_BUF_EXT:
3147       return dri2_create_image_dma_buf(disp, ctx, buffer, attr_list);
3148 #endif
3149 #ifdef HAVE_WAYLAND_PLATFORM
3150    case EGL_WAYLAND_BUFFER_WL:
3151       return dri2_create_image_wayland_wl_buffer(disp, ctx, buffer, attr_list);
3152 #endif
3153    default:
3154       _eglError(EGL_BAD_PARAMETER, "dri2_create_image_khr");
3155       return EGL_NO_IMAGE_KHR;
3156    }
3157 }
3158
3159 static EGLBoolean
3160 dri2_destroy_image_khr(const _EGLDriver *drv, _EGLDisplay *disp, _EGLImage *image)
3161 {
3162    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
3163    struct dri2_egl_image *dri2_img = dri2_egl_image(image);
3164
3165    (void) drv;
3166
3167    dri2_dpy->image->destroyImage(dri2_img->dri_image);
3168    free(dri2_img);
3169
3170    return EGL_TRUE;
3171 }
3172
3173 #ifdef HAVE_WAYLAND_PLATFORM
3174
3175 static void
3176 dri2_wl_reference_buffer(void *user_data, uint32_t name, int fd,
3177                          struct wl_drm_buffer *buffer)
3178 {
3179    _EGLDisplay *disp = user_data;
3180    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
3181    __DRIimage *img;
3182    int dri_components = 0;
3183
3184    if (fd == -1)
3185       img = dri2_dpy->image->createImageFromNames(dri2_dpy->dri_screen,
3186                                                   buffer->width,
3187                                                   buffer->height,
3188                                                   buffer->format,
3189                                                   (int*)&name, 1,
3190                                                   buffer->stride,
3191                                                   buffer->offset,
3192                                                   NULL);
3193    else
3194       img = dri2_dpy->image->createImageFromFds(dri2_dpy->dri_screen,
3195                                                 buffer->width,
3196                                                 buffer->height,
3197                                                 buffer->format,
3198                                                 &fd, 1,
3199                                                 buffer->stride,
3200                                                 buffer->offset,
3201                                                 NULL);
3202
3203    if (img == NULL)
3204       return;
3205
3206    dri2_dpy->image->queryImage(img, __DRI_IMAGE_ATTRIB_COMPONENTS, &dri_components);
3207
3208    buffer->driver_format = NULL;
3209    for (int i = 0; i < ARRAY_SIZE(wl_drm_components); i++)
3210       if (wl_drm_components[i].dri_components == dri_components)
3211          buffer->driver_format = &wl_drm_components[i];
3212
3213    if (buffer->driver_format == NULL)
3214       dri2_dpy->image->destroyImage(img);
3215    else
3216       buffer->driver_buffer = img;
3217 }
3218
3219 static void
3220 dri2_wl_release_buffer(void *user_data, struct wl_drm_buffer *buffer)
3221 {
3222    _EGLDisplay *disp = user_data;
3223    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
3224
3225    dri2_dpy->image->destroyImage(buffer->driver_buffer);
3226 }
3227
3228 static EGLBoolean
3229 dri2_bind_wayland_display_wl(const _EGLDriver *drv, _EGLDisplay *disp,
3230                              struct wl_display *wl_dpy)
3231 {
3232    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
3233    const struct wayland_drm_callbacks wl_drm_callbacks = {
3234       .authenticate = (int(*)(void *, uint32_t)) dri2_dpy->vtbl->authenticate,
3235       .reference_buffer = dri2_wl_reference_buffer,
3236       .release_buffer = dri2_wl_release_buffer,
3237       .is_format_supported = dri2_wl_is_format_supported
3238    };
3239    int flags = 0;
3240    uint64_t cap;
3241
3242    (void) drv;
3243
3244    if (dri2_dpy->wl_server_drm)
3245            return EGL_FALSE;
3246
3247    if (drmGetCap(dri2_dpy->fd, DRM_CAP_PRIME, &cap) == 0 &&
3248        cap == (DRM_PRIME_CAP_IMPORT | DRM_PRIME_CAP_EXPORT) &&
3249        dri2_dpy->image->base.version >= 7 &&
3250        dri2_dpy->image->createImageFromFds != NULL)
3251       flags |= WAYLAND_DRM_PRIME;
3252
3253    dri2_dpy->wl_server_drm =
3254            wayland_drm_init(wl_dpy, dri2_dpy->device_name,
3255                             &wl_drm_callbacks, disp, flags);
3256
3257    if (!dri2_dpy->wl_server_drm)
3258            return EGL_FALSE;
3259
3260 #ifdef HAVE_DRM_PLATFORM
3261    /* We have to share the wl_drm instance with gbm, so gbm can convert
3262     * wl_buffers to gbm bos. */
3263    if (dri2_dpy->gbm_dri)
3264       dri2_dpy->gbm_dri->wl_drm = dri2_dpy->wl_server_drm;
3265 #endif
3266
3267    return EGL_TRUE;
3268 }
3269
3270 static EGLBoolean
3271 dri2_unbind_wayland_display_wl(const _EGLDriver *drv, _EGLDisplay *disp,
3272                                struct wl_display *wl_dpy)
3273 {
3274    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
3275
3276    (void) drv;
3277
3278    if (!dri2_dpy->wl_server_drm)
3279            return EGL_FALSE;
3280
3281    wayland_drm_uninit(dri2_dpy->wl_server_drm);
3282    dri2_dpy->wl_server_drm = NULL;
3283
3284    return EGL_TRUE;
3285 }
3286
3287 static EGLBoolean
3288 dri2_query_wayland_buffer_wl(const _EGLDriver *drv, _EGLDisplay *disp,
3289                              struct wl_resource *buffer_resource,
3290                              EGLint attribute, EGLint *value)
3291 {
3292    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
3293    struct wl_drm_buffer *buffer;
3294    const struct wl_drm_components_descriptor *format;
3295
3296    buffer = wayland_drm_buffer_get(dri2_dpy->wl_server_drm, buffer_resource);
3297    if (!buffer)
3298       return EGL_FALSE;
3299
3300    format = buffer->driver_format;
3301    switch (attribute) {
3302    case EGL_TEXTURE_FORMAT:
3303       *value = format->components;
3304       return EGL_TRUE;
3305    case EGL_WIDTH:
3306       *value = buffer->width;
3307       return EGL_TRUE;
3308    case EGL_HEIGHT:
3309       *value = buffer->height;
3310       return EGL_TRUE;
3311    }
3312
3313    return EGL_FALSE;
3314 }
3315 #endif
3316
3317 static void
3318 dri2_egl_ref_sync(struct dri2_egl_sync *sync)
3319 {
3320    p_atomic_inc(&sync->refcount);
3321 }
3322
3323 static void
3324 dri2_egl_unref_sync(struct dri2_egl_display *dri2_dpy,
3325                     struct dri2_egl_sync *dri2_sync)
3326 {
3327    if (p_atomic_dec_zero(&dri2_sync->refcount)) {
3328       switch (dri2_sync->base.Type) {
3329       case EGL_SYNC_REUSABLE_KHR:
3330          cnd_destroy(&dri2_sync->cond);
3331          break;
3332       case EGL_SYNC_NATIVE_FENCE_ANDROID:
3333          if (dri2_sync->base.SyncFd != EGL_NO_NATIVE_FENCE_FD_ANDROID)
3334             close(dri2_sync->base.SyncFd);
3335          break;
3336       default:
3337          break;
3338       }
3339
3340       if (dri2_sync->fence)
3341          dri2_dpy->fence->destroy_fence(dri2_dpy->dri_screen, dri2_sync->fence);
3342
3343       free(dri2_sync);
3344    }
3345 }
3346
3347 static _EGLSync *
3348 dri2_create_sync(const _EGLDriver *drv, _EGLDisplay *disp,
3349                  EGLenum type, const EGLAttrib *attrib_list)
3350 {
3351    _EGLContext *ctx = _eglGetCurrentContext();
3352    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
3353    struct dri2_egl_context *dri2_ctx = dri2_egl_context(ctx);
3354    struct dri2_egl_sync *dri2_sync;
3355    EGLint ret;
3356    pthread_condattr_t attr;
3357
3358    dri2_sync = calloc(1, sizeof(struct dri2_egl_sync));
3359    if (!dri2_sync) {
3360       _eglError(EGL_BAD_ALLOC, "eglCreateSyncKHR");
3361       return NULL;
3362    }
3363
3364    if (!_eglInitSync(&dri2_sync->base, disp, type, attrib_list)) {
3365       free(dri2_sync);
3366       return NULL;
3367    }
3368
3369    switch (type) {
3370    case EGL_SYNC_FENCE_KHR:
3371       dri2_sync->fence = dri2_dpy->fence->create_fence(dri2_ctx->dri_context);
3372       if (!dri2_sync->fence) {
3373          /* Why did it fail? DRI doesn't return an error code, so we emit
3374           * a generic EGL error that doesn't communicate user error.
3375           */
3376          _eglError(EGL_BAD_ALLOC, "eglCreateSyncKHR");
3377          free(dri2_sync);
3378          return NULL;
3379       }
3380       break;
3381
3382    case EGL_SYNC_CL_EVENT_KHR:
3383       dri2_sync->fence = dri2_dpy->fence->get_fence_from_cl_event(
3384                                  dri2_dpy->dri_screen,
3385                                  dri2_sync->base.CLEvent);
3386       /* this can only happen if the cl_event passed in is invalid. */
3387       if (!dri2_sync->fence) {
3388          _eglError(EGL_BAD_ATTRIBUTE, "eglCreateSyncKHR");
3389          free(dri2_sync);
3390          return NULL;
3391       }
3392
3393       /* the initial status must be "signaled" if the cl_event is signaled */
3394       if (dri2_dpy->fence->client_wait_sync(dri2_ctx->dri_context,
3395                                             dri2_sync->fence, 0, 0))
3396          dri2_sync->base.SyncStatus = EGL_SIGNALED_KHR;
3397       break;
3398
3399    case EGL_SYNC_REUSABLE_KHR:
3400       /* intialize attr */
3401       ret = pthread_condattr_init(&attr);
3402
3403       if (ret) {
3404          _eglError(EGL_BAD_ACCESS, "eglCreateSyncKHR");
3405          free(dri2_sync);
3406          return NULL;
3407       }
3408
3409       /* change clock attribute to CLOCK_MONOTONIC */
3410       ret = pthread_condattr_setclock(&attr, CLOCK_MONOTONIC);
3411
3412       if (ret) {
3413          _eglError(EGL_BAD_ACCESS, "eglCreateSyncKHR");
3414          free(dri2_sync);
3415          return NULL;
3416       }
3417
3418       ret = pthread_cond_init(&dri2_sync->cond, &attr);
3419
3420       if (ret) {
3421          _eglError(EGL_BAD_ACCESS, "eglCreateSyncKHR");
3422          free(dri2_sync);
3423          return NULL;
3424       }
3425
3426       /* initial status of reusable sync must be "unsignaled" */
3427       dri2_sync->base.SyncStatus = EGL_UNSIGNALED_KHR;
3428       break;
3429
3430    case EGL_SYNC_NATIVE_FENCE_ANDROID:
3431       if (dri2_dpy->fence->create_fence_fd) {
3432          dri2_sync->fence = dri2_dpy->fence->create_fence_fd(
3433                                     dri2_ctx->dri_context,
3434                                     dri2_sync->base.SyncFd);
3435       }
3436       if (!dri2_sync->fence) {
3437          _eglError(EGL_BAD_ATTRIBUTE, "eglCreateSyncKHR");
3438          free(dri2_sync);
3439          return NULL;
3440       }
3441       break;
3442    }
3443
3444    p_atomic_set(&dri2_sync->refcount, 1);
3445    return &dri2_sync->base;
3446 }
3447
3448 static EGLBoolean
3449 dri2_destroy_sync(const _EGLDriver *drv, _EGLDisplay *disp, _EGLSync *sync)
3450 {
3451    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
3452    struct dri2_egl_sync *dri2_sync = dri2_egl_sync(sync);
3453    EGLint ret = EGL_TRUE;
3454    EGLint err;
3455
3456    /* if type of sync is EGL_SYNC_REUSABLE_KHR and it is not signaled yet,
3457     * then unlock all threads possibly blocked by the reusable sync before
3458     * destroying it.
3459     */
3460    if (dri2_sync->base.Type == EGL_SYNC_REUSABLE_KHR &&
3461        dri2_sync->base.SyncStatus == EGL_UNSIGNALED_KHR) {
3462       dri2_sync->base.SyncStatus = EGL_SIGNALED_KHR;
3463       /* unblock all threads currently blocked by sync */
3464       err = cnd_broadcast(&dri2_sync->cond);
3465
3466       if (err) {
3467          _eglError(EGL_BAD_ACCESS, "eglDestroySyncKHR");
3468          ret = EGL_FALSE;
3469       }
3470    }
3471
3472    dri2_egl_unref_sync(dri2_dpy, dri2_sync);
3473
3474    return ret;
3475 }
3476
3477 static EGLint
3478 dri2_dup_native_fence_fd(const _EGLDriver *drv, _EGLDisplay *disp, _EGLSync *sync)
3479 {
3480    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
3481    struct dri2_egl_sync *dri2_sync = dri2_egl_sync(sync);
3482
3483    assert(sync->Type == EGL_SYNC_NATIVE_FENCE_ANDROID);
3484
3485    if (sync->SyncFd == EGL_NO_NATIVE_FENCE_FD_ANDROID) {
3486       /* try to retrieve the actual native fence fd.. if rendering is
3487        * not flushed this will just return -1, aka NO_NATIVE_FENCE_FD:
3488        */
3489       sync->SyncFd = dri2_dpy->fence->get_fence_fd(dri2_dpy->dri_screen,
3490                                                    dri2_sync->fence);
3491    }
3492
3493    if (sync->SyncFd == EGL_NO_NATIVE_FENCE_FD_ANDROID) {
3494       /* if native fence fd still not created, return an error: */
3495       _eglError(EGL_BAD_PARAMETER, "eglDupNativeFenceFDANDROID");
3496       return EGL_NO_NATIVE_FENCE_FD_ANDROID;
3497    }
3498
3499    return os_dupfd_cloexec(sync->SyncFd);
3500 }
3501
3502 static void
3503 dri2_set_blob_cache_funcs(const _EGLDriver *drv, _EGLDisplay *disp,
3504                           EGLSetBlobFuncANDROID set,
3505                           EGLGetBlobFuncANDROID get)
3506 {
3507    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
3508    dri2_dpy->blob->set_cache_funcs(dri2_dpy->dri_screen,
3509                                    disp->BlobCacheSet,
3510                                    disp->BlobCacheGet);
3511 }
3512
3513 static EGLint
3514 dri2_client_wait_sync(const _EGLDriver *drv, _EGLDisplay *disp, _EGLSync *sync,
3515                       EGLint flags, EGLTime timeout)
3516 {
3517    _EGLContext *ctx = _eglGetCurrentContext();
3518    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
3519    struct dri2_egl_context *dri2_ctx = dri2_egl_context(ctx);
3520    struct dri2_egl_sync *dri2_sync = dri2_egl_sync(sync);
3521    unsigned wait_flags = 0;
3522
3523    EGLint ret = EGL_CONDITION_SATISFIED_KHR;
3524
3525    /* The EGL_KHR_fence_sync spec states:
3526     *
3527     *    "If no context is current for the bound API,
3528     *     the EGL_SYNC_FLUSH_COMMANDS_BIT_KHR bit is ignored.
3529     */
3530    if (dri2_ctx && flags & EGL_SYNC_FLUSH_COMMANDS_BIT_KHR)
3531       wait_flags |= __DRI2_FENCE_FLAG_FLUSH_COMMANDS;
3532
3533    /* the sync object should take a reference while waiting */
3534    dri2_egl_ref_sync(dri2_sync);
3535
3536    switch (sync->Type) {
3537    case EGL_SYNC_FENCE_KHR:
3538    case EGL_SYNC_NATIVE_FENCE_ANDROID:
3539    case EGL_SYNC_CL_EVENT_KHR:
3540       if (dri2_dpy->fence->client_wait_sync(dri2_ctx ? dri2_ctx->dri_context : NULL,
3541                                          dri2_sync->fence, wait_flags,
3542                                          timeout))
3543          dri2_sync->base.SyncStatus = EGL_SIGNALED_KHR;
3544       else
3545          ret = EGL_TIMEOUT_EXPIRED_KHR;
3546       break;
3547
3548    case EGL_SYNC_REUSABLE_KHR:
3549       if (dri2_ctx && dri2_sync->base.SyncStatus == EGL_UNSIGNALED_KHR &&
3550           (flags & EGL_SYNC_FLUSH_COMMANDS_BIT_KHR)) {
3551          /* flush context if EGL_SYNC_FLUSH_COMMANDS_BIT_KHR is set */
3552          dri2_gl_flush();
3553       }
3554
3555       /* if timeout is EGL_FOREVER_KHR, it should wait without any timeout.*/
3556       if (timeout == EGL_FOREVER_KHR) {
3557          mtx_lock(&dri2_sync->mutex);
3558          cnd_wait(&dri2_sync->cond, &dri2_sync->mutex);
3559          mtx_unlock(&dri2_sync->mutex);
3560       } else {
3561          /* if reusable sync has not been yet signaled */
3562          if (dri2_sync->base.SyncStatus != EGL_SIGNALED_KHR) {
3563             /* timespecs for cnd_timedwait */
3564             struct timespec current;
3565             struct timespec expire;
3566
3567             /* We override the clock to monotonic when creating the condition
3568              * variable. */
3569             clock_gettime(CLOCK_MONOTONIC, &current);
3570
3571             /* calculating when to expire */
3572             expire.tv_nsec = timeout % 1000000000L;
3573             expire.tv_sec = timeout / 1000000000L;
3574
3575             expire.tv_nsec += current.tv_nsec;
3576             expire.tv_sec += current.tv_sec;
3577
3578             /* expire.nsec now is a number between 0 and 1999999998 */
3579             if (expire.tv_nsec > 999999999L) {
3580                expire.tv_sec++;
3581                expire.tv_nsec -= 1000000000L;
3582             }
3583
3584             mtx_lock(&dri2_sync->mutex);
3585             ret = cnd_timedwait(&dri2_sync->cond, &dri2_sync->mutex, &expire);
3586             mtx_unlock(&dri2_sync->mutex);
3587
3588             if (ret == thrd_busy) {
3589                if (dri2_sync->base.SyncStatus == EGL_UNSIGNALED_KHR) {
3590                   ret = EGL_TIMEOUT_EXPIRED_KHR;
3591                } else {
3592                   _eglError(EGL_BAD_ACCESS, "eglClientWaitSyncKHR");
3593                   ret = EGL_FALSE;
3594                }
3595             }
3596          }
3597       }
3598       break;
3599   }
3600   dri2_egl_unref_sync(dri2_dpy, dri2_sync);
3601
3602   return ret;
3603 }
3604
3605 static EGLBoolean
3606 dri2_signal_sync(const _EGLDriver *drv, _EGLDisplay *disp, _EGLSync *sync,
3607                       EGLenum mode)
3608 {
3609    struct dri2_egl_sync *dri2_sync = dri2_egl_sync(sync);
3610    EGLint ret;
3611
3612    if (sync->Type != EGL_SYNC_REUSABLE_KHR)
3613       return _eglError(EGL_BAD_MATCH, "eglSignalSyncKHR");
3614
3615    if (mode != EGL_SIGNALED_KHR && mode != EGL_UNSIGNALED_KHR)
3616       return _eglError(EGL_BAD_ATTRIBUTE, "eglSignalSyncKHR");
3617
3618    dri2_sync->base.SyncStatus = mode;
3619
3620    if (mode == EGL_SIGNALED_KHR) {
3621       ret = cnd_broadcast(&dri2_sync->cond);
3622
3623       /* fail to broadcast */
3624       if (ret)
3625          return _eglError(EGL_BAD_ACCESS, "eglSignalSyncKHR");
3626    }
3627
3628    return EGL_TRUE;
3629 }
3630
3631 static EGLint
3632 dri2_server_wait_sync(const _EGLDriver *drv, _EGLDisplay *disp, _EGLSync *sync)
3633 {
3634    _EGLContext *ctx = _eglGetCurrentContext();
3635    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
3636    struct dri2_egl_context *dri2_ctx = dri2_egl_context(ctx);
3637    struct dri2_egl_sync *dri2_sync = dri2_egl_sync(sync);
3638
3639    dri2_dpy->fence->server_wait_sync(dri2_ctx->dri_context,
3640                                      dri2_sync->fence, 0);
3641    return EGL_TRUE;
3642 }
3643
3644 static int
3645 dri2_interop_query_device_info(_EGLDisplay *disp, _EGLContext *ctx,
3646                                struct mesa_glinterop_device_info *out)
3647 {
3648    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
3649    struct dri2_egl_context *dri2_ctx = dri2_egl_context(ctx);
3650
3651    if (!dri2_dpy->interop)
3652       return MESA_GLINTEROP_UNSUPPORTED;
3653
3654    return dri2_dpy->interop->query_device_info(dri2_ctx->dri_context, out);
3655 }
3656
3657 static int
3658 dri2_interop_export_object(_EGLDisplay *disp, _EGLContext *ctx,
3659                            struct mesa_glinterop_export_in *in,
3660                            struct mesa_glinterop_export_out *out)
3661 {
3662    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
3663    struct dri2_egl_context *dri2_ctx = dri2_egl_context(ctx);
3664
3665    if (!dri2_dpy->interop)
3666       return MESA_GLINTEROP_UNSUPPORTED;
3667
3668    return dri2_dpy->interop->export_object(dri2_ctx->dri_context, in, out);
3669 }
3670
3671 const _EGLDriver _eglDriver = {
3672    .Initialize = dri2_initialize,
3673    .Terminate = dri2_terminate,
3674    .CreateContext = dri2_create_context,
3675    .DestroyContext = dri2_destroy_context,
3676    .MakeCurrent = dri2_make_current,
3677    .CreateWindowSurface = dri2_create_window_surface,
3678    .CreatePixmapSurface = dri2_create_pixmap_surface,
3679    .CreatePbufferSurface = dri2_create_pbuffer_surface,
3680    .DestroySurface = dri2_destroy_surface,
3681    .GetProcAddress = dri2_get_proc_address,
3682    .WaitClient = dri2_wait_client,
3683    .WaitNative = dri2_wait_native,
3684    .BindTexImage = dri2_bind_tex_image,
3685    .ReleaseTexImage = dri2_release_tex_image,
3686    .SwapInterval = dri2_swap_interval,
3687    .SwapBuffers = dri2_swap_buffers,
3688    .SwapBuffersWithDamageEXT = dri2_swap_buffers_with_damage,
3689    .SwapBuffersRegionNOK = dri2_swap_buffers_region,
3690    .SetDamageRegion = dri2_set_damage_region,
3691    .PostSubBufferNV = dri2_post_sub_buffer,
3692    .CopyBuffers = dri2_copy_buffers,
3693    .QueryBufferAge = dri2_query_buffer_age,
3694    .CreateImageKHR = dri2_create_image,
3695    .DestroyImageKHR = dri2_destroy_image_khr,
3696    .CreateWaylandBufferFromImageWL = dri2_create_wayland_buffer_from_image,
3697    .QuerySurface = dri2_query_surface,
3698    .QueryDriverName = dri2_query_driver_name,
3699    .QueryDriverConfig = dri2_query_driver_config,
3700 #ifdef HAVE_LIBDRM
3701    .CreateDRMImageMESA = dri2_create_drm_image_mesa,
3702    .ExportDRMImageMESA = dri2_export_drm_image_mesa,
3703    .ExportDMABUFImageQueryMESA = dri2_export_dma_buf_image_query_mesa,
3704    .ExportDMABUFImageMESA = dri2_export_dma_buf_image_mesa,
3705    .QueryDmaBufFormatsEXT = dri2_query_dma_buf_formats,
3706    .QueryDmaBufModifiersEXT = dri2_query_dma_buf_modifiers,
3707 #endif
3708 #ifdef HAVE_WAYLAND_PLATFORM
3709    .BindWaylandDisplayWL = dri2_bind_wayland_display_wl,
3710    .UnbindWaylandDisplayWL = dri2_unbind_wayland_display_wl,
3711    .QueryWaylandBufferWL = dri2_query_wayland_buffer_wl,
3712 #endif
3713    .GetSyncValuesCHROMIUM = dri2_get_sync_values_chromium,
3714    .CreateSyncKHR = dri2_create_sync,
3715    .ClientWaitSyncKHR = dri2_client_wait_sync,
3716    .SignalSyncKHR = dri2_signal_sync,
3717    .WaitSyncKHR = dri2_server_wait_sync,
3718    .DestroySyncKHR = dri2_destroy_sync,
3719    .GLInteropQueryDeviceInfo = dri2_interop_query_device_info,
3720    .GLInteropExportObject = dri2_interop_export_object,
3721    .DupNativeFenceFDANDROID = dri2_dup_native_fence_fd,
3722    .SetBlobCacheFuncsANDROID = dri2_set_blob_cache_funcs,
3723 };