egl: const _eglDriver
[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(const _EGLDriver *drv, _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(const _EGLDriver *drv, _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(drv, disp);
1172       break;
1173    case _EGL_PLATFORM_DEVICE:
1174       ret = dri2_initialize_device(drv, disp);
1175       break;
1176    case _EGL_PLATFORM_X11:
1177       ret = dri2_initialize_x11(drv, disp);
1178       break;
1179    case _EGL_PLATFORM_DRM:
1180       ret = dri2_initialize_drm(drv, disp);
1181       break;
1182    case _EGL_PLATFORM_WAYLAND:
1183       ret = dri2_initialize_wayland(drv, disp);
1184       break;
1185    case _EGL_PLATFORM_ANDROID:
1186       ret = dri2_initialize_android(drv, 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(const _EGLDriver *drv, _EGLDisplay *disp)
1315 {
1316    /* Release all non-current Context/Surfaces. */
1317    _eglReleaseDisplayResources(drv, 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(const _EGLDriver *drv, _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    (void) drv;
1485
1486    dri2_ctx = malloc(sizeof *dri2_ctx);
1487    if (!dri2_ctx) {
1488       _eglError(EGL_BAD_ALLOC, "eglCreateContext");
1489       return NULL;
1490    }
1491
1492    if (!_eglInitContext(&dri2_ctx->base, disp, conf, attrib_list))
1493       goto cleanup;
1494
1495    /* The EGL_EXT_create_context_robustness spec says:
1496     *
1497     *    "Add to the eglCreateContext context creation errors: [...]
1498     *
1499     *     * If the reset notification behavior of <share_context> and the
1500     *       newly created context are different then an EGL_BAD_MATCH error is
1501     *       generated."
1502     */
1503    if (share_list && share_list->ResetNotificationStrategy !=
1504                      dri2_ctx->base.ResetNotificationStrategy) {
1505       _eglError(EGL_BAD_MATCH, "eglCreateContext");
1506       goto cleanup;
1507    }
1508
1509    /* The EGL_KHR_create_context_no_error spec says:
1510     *
1511     *    "BAD_MATCH is generated if the value of EGL_CONTEXT_OPENGL_NO_ERROR_KHR
1512     *    used to create <share_context> does not match the value of
1513     *    EGL_CONTEXT_OPENGL_NO_ERROR_KHR for the context being created."
1514     */
1515    if (share_list && share_list->NoError != dri2_ctx->base.NoError) {
1516       _eglError(EGL_BAD_MATCH, "eglCreateContext");
1517       goto cleanup;
1518    }
1519
1520    switch (dri2_ctx->base.ClientAPI) {
1521    case EGL_OPENGL_ES_API:
1522       switch (dri2_ctx->base.ClientMajorVersion) {
1523       case 1:
1524          api = __DRI_API_GLES;
1525          break;
1526       case 2:
1527          api = __DRI_API_GLES2;
1528          break;
1529       case 3:
1530          api = __DRI_API_GLES3;
1531          break;
1532       default:
1533          _eglError(EGL_BAD_PARAMETER, "eglCreateContext");
1534          free(dri2_ctx);
1535          return NULL;
1536       }
1537       break;
1538    case EGL_OPENGL_API:
1539       if ((dri2_ctx->base.ClientMajorVersion >= 4
1540            || (dri2_ctx->base.ClientMajorVersion == 3
1541                && dri2_ctx->base.ClientMinorVersion >= 2))
1542           && dri2_ctx->base.Profile == EGL_CONTEXT_OPENGL_CORE_PROFILE_BIT_KHR)
1543          api = __DRI_API_OPENGL_CORE;
1544       else if (dri2_ctx->base.ClientMajorVersion == 3 &&
1545                dri2_ctx->base.ClientMinorVersion == 1)
1546          api = __DRI_API_OPENGL_CORE;
1547       else
1548          api = __DRI_API_OPENGL;
1549       break;
1550    default:
1551       _eglError(EGL_BAD_PARAMETER, "eglCreateContext");
1552       free(dri2_ctx);
1553       return NULL;
1554    }
1555
1556    if (conf != NULL) {
1557       /* The config chosen here isn't necessarily
1558        * used for surfaces later.
1559        * A pixmap surface will use the single config.
1560        * This opportunity depends on disabling the
1561        * doubleBufferMode check in
1562        * src/mesa/main/context.c:check_compatible()
1563        */
1564       if (dri2_config->dri_config[1][0])
1565          dri_config = dri2_config->dri_config[1][0];
1566       else
1567          dri_config = dri2_config->dri_config[0][0];
1568    }
1569    else
1570       dri_config = NULL;
1571
1572    if (!dri2_fill_context_attribs(dri2_ctx, dri2_dpy, ctx_attribs,
1573                                   &num_attribs))
1574       goto cleanup;
1575
1576    if (dri2_dpy->image_driver) {
1577       dri2_ctx->dri_context =
1578          dri2_dpy->image_driver->createContextAttribs(dri2_dpy->dri_screen,
1579                                                       api,
1580                                                       dri_config,
1581                                                       shared,
1582                                                       num_attribs / 2,
1583                                                       ctx_attribs,
1584                                                       & error,
1585                                                       dri2_ctx);
1586       dri2_create_context_attribs_error(error);
1587    } else if (dri2_dpy->dri2) {
1588       if (dri2_dpy->dri2->base.version >= 3) {
1589          dri2_ctx->dri_context =
1590             dri2_dpy->dri2->createContextAttribs(dri2_dpy->dri_screen,
1591                                                  api,
1592                                                  dri_config,
1593                                                  shared,
1594                                                  num_attribs / 2,
1595                                                  ctx_attribs,
1596                                                  & error,
1597                                                  dri2_ctx);
1598          dri2_create_context_attribs_error(error);
1599       } else {
1600          dri2_ctx->dri_context =
1601             dri2_dpy->dri2->createNewContextForAPI(dri2_dpy->dri_screen,
1602                                                    api,
1603                                                    dri_config,
1604                                                    shared,
1605                                                    dri2_ctx);
1606       }
1607    } else {
1608       assert(dri2_dpy->swrast);
1609       if (dri2_dpy->swrast->base.version >= 3) {
1610          dri2_ctx->dri_context =
1611             dri2_dpy->swrast->createContextAttribs(dri2_dpy->dri_screen,
1612                                                    api,
1613                                                    dri_config,
1614                                                    shared,
1615                                                    num_attribs / 2,
1616                                                    ctx_attribs,
1617                                                    & error,
1618                                                    dri2_ctx);
1619          dri2_create_context_attribs_error(error);
1620       } else {
1621          dri2_ctx->dri_context =
1622             dri2_dpy->swrast->createNewContextForAPI(dri2_dpy->dri_screen,
1623                                                      api,
1624                                                      dri_config,
1625                                                      shared,
1626                                                      dri2_ctx);
1627       }
1628    }
1629
1630    if (!dri2_ctx->dri_context)
1631       goto cleanup;
1632
1633    return &dri2_ctx->base;
1634
1635  cleanup:
1636    free(dri2_ctx);
1637    return NULL;
1638 }
1639
1640 /**
1641  * Called via eglDestroyContext(), drv->DestroyContext().
1642  */
1643 static EGLBoolean
1644 dri2_destroy_context(const _EGLDriver *drv, _EGLDisplay *disp, _EGLContext *ctx)
1645 {
1646    struct dri2_egl_context *dri2_ctx = dri2_egl_context(ctx);
1647    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
1648
1649    if (_eglPutContext(ctx)) {
1650       dri2_dpy->core->destroyContext(dri2_ctx->dri_context);
1651       free(dri2_ctx);
1652    }
1653
1654    return EGL_TRUE;
1655 }
1656
1657 EGLBoolean
1658 dri2_init_surface(_EGLSurface *surf, _EGLDisplay *disp, EGLint type,
1659         _EGLConfig *conf, const EGLint *attrib_list,
1660         EGLBoolean enable_out_fence, void *native_surface)
1661 {
1662    struct dri2_egl_surface *dri2_surf = dri2_egl_surface(surf);
1663    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
1664
1665    dri2_surf->out_fence_fd = -1;
1666    dri2_surf->enable_out_fence = false;
1667    if (dri2_dpy->fence && dri2_dpy->fence->base.version >= 2 &&
1668        dri2_dpy->fence->get_capabilities &&
1669        (dri2_dpy->fence->get_capabilities(dri2_dpy->dri_screen) &
1670         __DRI_FENCE_CAP_NATIVE_FD)) {
1671       dri2_surf->enable_out_fence = enable_out_fence;
1672    }
1673
1674    return _eglInitSurface(surf, disp, type, conf, attrib_list, native_surface);
1675 }
1676
1677 static void
1678 dri2_surface_set_out_fence_fd( _EGLSurface *surf, int fence_fd)
1679 {
1680    struct dri2_egl_surface *dri2_surf = dri2_egl_surface(surf);
1681
1682    if (dri2_surf->out_fence_fd >= 0)
1683       close(dri2_surf->out_fence_fd);
1684
1685    dri2_surf->out_fence_fd = fence_fd;
1686 }
1687
1688 void
1689 dri2_fini_surface(_EGLSurface *surf)
1690 {
1691    struct dri2_egl_surface *dri2_surf = dri2_egl_surface(surf);
1692
1693    dri2_surface_set_out_fence_fd(surf, -1);
1694    dri2_surf->enable_out_fence = false;
1695 }
1696
1697 static EGLBoolean
1698 dri2_destroy_surface(const _EGLDriver *drv, _EGLDisplay *disp, _EGLSurface *surf)
1699 {
1700    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
1701
1702    if (!_eglPutSurface(surf))
1703       return EGL_TRUE;
1704
1705    return dri2_dpy->vtbl->destroy_surface(drv, disp, surf);
1706 }
1707
1708 static void
1709 dri2_surf_update_fence_fd(_EGLContext *ctx,
1710                           _EGLDisplay *disp, _EGLSurface *surf)
1711 {
1712    __DRIcontext *dri_ctx = dri2_egl_context(ctx)->dri_context;
1713    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
1714    struct dri2_egl_surface *dri2_surf = dri2_egl_surface(surf);
1715    int fence_fd = -1;
1716    void *fence;
1717
1718    if (!dri2_surf->enable_out_fence)
1719       return;
1720
1721    fence = dri2_dpy->fence->create_fence_fd(dri_ctx, -1);
1722    if (fence) {
1723       fence_fd = dri2_dpy->fence->get_fence_fd(dri2_dpy->dri_screen,
1724                                                fence);
1725       dri2_dpy->fence->destroy_fence(dri2_dpy->dri_screen, fence);
1726    }
1727    dri2_surface_set_out_fence_fd(surf, fence_fd);
1728 }
1729
1730 EGLBoolean
1731 dri2_create_drawable(struct dri2_egl_display *dri2_dpy,
1732                      const __DRIconfig *config,
1733                      struct dri2_egl_surface *dri2_surf,
1734                      void *loaderPrivate)
1735 {
1736    __DRIcreateNewDrawableFunc createNewDrawable;
1737
1738    if (dri2_dpy->image_driver)
1739       createNewDrawable = dri2_dpy->image_driver->createNewDrawable;
1740    else if (dri2_dpy->dri2)
1741       createNewDrawable = dri2_dpy->dri2->createNewDrawable;
1742    else if (dri2_dpy->swrast)
1743       createNewDrawable = dri2_dpy->swrast->createNewDrawable;
1744    else
1745       return _eglError(EGL_BAD_ALLOC, "no createNewDrawable");
1746
1747    dri2_surf->dri_drawable = createNewDrawable(dri2_dpy->dri_screen,
1748                                                config, loaderPrivate);
1749    if (dri2_surf->dri_drawable == NULL)
1750       return _eglError(EGL_BAD_ALLOC, "createNewDrawable");
1751
1752    return EGL_TRUE;
1753 }
1754
1755 /**
1756  * Called via eglMakeCurrent(), drv->MakeCurrent().
1757  */
1758 static EGLBoolean
1759 dri2_make_current(const _EGLDriver *drv, _EGLDisplay *disp, _EGLSurface *dsurf,
1760                   _EGLSurface *rsurf, _EGLContext *ctx)
1761 {
1762    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
1763    struct dri2_egl_context *dri2_ctx = dri2_egl_context(ctx);
1764    _EGLDisplay *old_disp = NULL;
1765    struct dri2_egl_display *old_dri2_dpy = NULL;
1766    _EGLContext *old_ctx;
1767    _EGLSurface *old_dsurf, *old_rsurf;
1768    _EGLSurface *tmp_dsurf, *tmp_rsurf;
1769    __DRIdrawable *ddraw, *rdraw;
1770    __DRIcontext *cctx;
1771    EGLint egl_error = EGL_SUCCESS;
1772
1773    if (!dri2_dpy)
1774       return _eglError(EGL_NOT_INITIALIZED, "eglMakeCurrent");
1775
1776    /* make new bindings, set the EGL error otherwise */
1777    if (!_eglBindContext(ctx, dsurf, rsurf, &old_ctx, &old_dsurf, &old_rsurf))
1778       return EGL_FALSE;
1779
1780    if (old_ctx) {
1781       __DRIcontext *old_cctx = dri2_egl_context(old_ctx)->dri_context;
1782       old_disp = old_ctx->Resource.Display;
1783       old_dri2_dpy = dri2_egl_display(old_disp);
1784
1785       /* flush before context switch */
1786       dri2_gl_flush();
1787
1788       if (old_dsurf)
1789          dri2_surf_update_fence_fd(old_ctx, disp, old_dsurf);
1790
1791       /* Disable shared buffer mode */
1792       if (old_dsurf && _eglSurfaceInSharedBufferMode(old_dsurf) &&
1793           old_dri2_dpy->vtbl->set_shared_buffer_mode) {
1794          old_dri2_dpy->vtbl->set_shared_buffer_mode(old_disp, old_dsurf, false);
1795       }
1796
1797       dri2_dpy->core->unbindContext(old_cctx);
1798    }
1799
1800    ddraw = (dsurf) ? dri2_dpy->vtbl->get_dri_drawable(dsurf) : NULL;
1801    rdraw = (rsurf) ? dri2_dpy->vtbl->get_dri_drawable(rsurf) : NULL;
1802    cctx = (dri2_ctx) ? dri2_ctx->dri_context : NULL;
1803
1804    if (cctx || ddraw || rdraw) {
1805       if (!dri2_dpy->core->bindContext(cctx, ddraw, rdraw)) {
1806          _EGLContext *tmp_ctx;
1807
1808          /* dri2_dpy->core->bindContext failed. We cannot tell for sure why, but
1809           * setting the error to EGL_BAD_MATCH is surely better than leaving it
1810           * as EGL_SUCCESS.
1811           */
1812          egl_error = EGL_BAD_MATCH;
1813
1814          /* undo the previous _eglBindContext */
1815          _eglBindContext(old_ctx, old_dsurf, old_rsurf, &ctx, &tmp_dsurf, &tmp_rsurf);
1816          assert(&dri2_ctx->base == ctx &&
1817                 tmp_dsurf == dsurf &&
1818                 tmp_rsurf == rsurf);
1819
1820          _eglPutSurface(dsurf);
1821          _eglPutSurface(rsurf);
1822          _eglPutContext(ctx);
1823
1824          _eglPutSurface(old_dsurf);
1825          _eglPutSurface(old_rsurf);
1826          _eglPutContext(old_ctx);
1827
1828          ddraw = (old_dsurf) ? dri2_dpy->vtbl->get_dri_drawable(old_dsurf) : NULL;
1829          rdraw = (old_rsurf) ? dri2_dpy->vtbl->get_dri_drawable(old_rsurf) : NULL;
1830          cctx = (old_ctx) ? dri2_egl_context(old_ctx)->dri_context : NULL;
1831
1832          /* undo the previous dri2_dpy->core->unbindContext */
1833          if (dri2_dpy->core->bindContext(cctx, ddraw, rdraw)) {
1834             if (old_dsurf && _eglSurfaceInSharedBufferMode(old_dsurf) &&
1835                 old_dri2_dpy->vtbl->set_shared_buffer_mode) {
1836                old_dri2_dpy->vtbl->set_shared_buffer_mode(old_disp, old_dsurf, true);
1837             }
1838
1839             return _eglError(egl_error, "eglMakeCurrent");
1840          }
1841
1842          /* We cannot restore the same state as it was before calling
1843           * eglMakeCurrent() and the spec isn't clear about what to do. We
1844           * can prevent EGL from calling into the DRI driver with no DRI
1845           * context bound.
1846           */
1847          dsurf = rsurf = NULL;
1848          ctx = NULL;
1849
1850          _eglBindContext(ctx, dsurf, rsurf, &tmp_ctx, &tmp_dsurf, &tmp_rsurf);
1851          assert(tmp_ctx == old_ctx && tmp_dsurf == old_dsurf &&
1852                 tmp_rsurf == old_rsurf);
1853
1854          _eglLog(_EGL_WARNING, "DRI2: failed to rebind the previous context");
1855       } else {
1856          /* dri2_dpy->core->bindContext succeeded, so take a reference on the
1857           * dri2_dpy. This prevents dri2_dpy from being reinitialized when a
1858           * EGLDisplay is terminated and then initialized again while a
1859           * context is still bound. See dri2_intitialize() for a more in depth
1860           * explanation. */
1861          dri2_dpy->ref_count++;
1862       }
1863    }
1864
1865    dri2_destroy_surface(drv, disp, old_dsurf);
1866    dri2_destroy_surface(drv, disp, old_rsurf);
1867
1868    if (old_ctx) {
1869       dri2_destroy_context(drv, disp, old_ctx);
1870       dri2_display_release(old_disp);
1871    }
1872
1873    if (egl_error != EGL_SUCCESS)
1874       return _eglError(egl_error, "eglMakeCurrent");
1875
1876    if (dsurf && _eglSurfaceHasMutableRenderBuffer(dsurf) &&
1877        dri2_dpy->vtbl->set_shared_buffer_mode) {
1878       /* Always update the shared buffer mode. This is obviously needed when
1879        * the active EGL_RENDER_BUFFER is EGL_SINGLE_BUFFER. When
1880        * EGL_RENDER_BUFFER is EGL_BACK_BUFFER, the update protects us in the
1881        * case where external non-EGL API may have changed window's shared
1882        * buffer mode since we last saw it.
1883        */
1884       bool mode = (dsurf->ActiveRenderBuffer == EGL_SINGLE_BUFFER);
1885       dri2_dpy->vtbl->set_shared_buffer_mode(disp, dsurf, mode);
1886    }
1887
1888    return EGL_TRUE;
1889 }
1890
1891 __DRIdrawable *
1892 dri2_surface_get_dri_drawable(_EGLSurface *surf)
1893 {
1894    struct dri2_egl_surface *dri2_surf = dri2_egl_surface(surf);
1895
1896    return dri2_surf->dri_drawable;
1897 }
1898
1899 /*
1900  * Called from eglGetProcAddress() via drv->GetProcAddress().
1901  */
1902 static _EGLProc
1903 dri2_get_proc_address(const _EGLDriver *drv, const char *procname)
1904 {
1905    return _glapi_get_proc_address(procname);
1906 }
1907
1908 static _EGLSurface*
1909 dri2_create_window_surface(const _EGLDriver *drv, _EGLDisplay *disp,
1910                            _EGLConfig *conf, void *native_window,
1911                            const EGLint *attrib_list)
1912 {
1913    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
1914    return dri2_dpy->vtbl->create_window_surface(drv, disp, conf, native_window,
1915                                                 attrib_list);
1916 }
1917
1918 static _EGLSurface*
1919 dri2_create_pixmap_surface(const _EGLDriver *drv, _EGLDisplay *disp,
1920                            _EGLConfig *conf, void *native_pixmap,
1921                            const EGLint *attrib_list)
1922 {
1923    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
1924    if (!dri2_dpy->vtbl->create_pixmap_surface)
1925       return NULL;
1926    return dri2_dpy->vtbl->create_pixmap_surface(drv, disp, conf, native_pixmap,
1927                                                 attrib_list);
1928 }
1929
1930 static _EGLSurface*
1931 dri2_create_pbuffer_surface(const _EGLDriver *drv, _EGLDisplay *disp,
1932                            _EGLConfig *conf, const EGLint *attrib_list)
1933 {
1934    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
1935    if (!dri2_dpy->vtbl->create_pbuffer_surface)
1936       return NULL;
1937    return dri2_dpy->vtbl->create_pbuffer_surface(drv, disp, conf, attrib_list);
1938 }
1939
1940 static EGLBoolean
1941 dri2_swap_interval(const _EGLDriver *drv, _EGLDisplay *disp, _EGLSurface *surf,
1942                    EGLint interval)
1943 {
1944    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
1945    if (!dri2_dpy->vtbl->swap_interval)
1946       return EGL_TRUE;
1947    return dri2_dpy->vtbl->swap_interval(drv, disp, surf, interval);
1948 }
1949
1950 /**
1951  * Asks the client API to flush any rendering to the drawable so that we can
1952  * do our swapbuffers.
1953  */
1954 void
1955 dri2_flush_drawable_for_swapbuffers(_EGLDisplay *disp, _EGLSurface *draw)
1956 {
1957    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
1958    __DRIdrawable *dri_drawable = dri2_dpy->vtbl->get_dri_drawable(draw);
1959
1960    if (dri2_dpy->flush) {
1961       if (dri2_dpy->flush->base.version >= 4) {
1962          /* We know there's a current context because:
1963           *
1964           *     "If surface is not bound to the calling thread’s current
1965           *      context, an EGL_BAD_SURFACE error is generated."
1966          */
1967          _EGLContext *ctx = _eglGetCurrentContext();
1968          struct dri2_egl_context *dri2_ctx = dri2_egl_context(ctx);
1969
1970          /* From the EGL 1.4 spec (page 52):
1971           *
1972           *     "The contents of ancillary buffers are always undefined
1973           *      after calling eglSwapBuffers."
1974           */
1975          dri2_dpy->flush->flush_with_flags(dri2_ctx->dri_context,
1976                                            dri_drawable,
1977                                            __DRI2_FLUSH_DRAWABLE |
1978                                            __DRI2_FLUSH_INVALIDATE_ANCILLARY,
1979                                            __DRI2_THROTTLE_SWAPBUFFER);
1980       } else {
1981          dri2_dpy->flush->flush(dri_drawable);
1982       }
1983    }
1984 }
1985
1986 static EGLBoolean
1987 dri2_swap_buffers(const _EGLDriver *drv, _EGLDisplay *disp, _EGLSurface *surf)
1988 {
1989    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
1990    __DRIdrawable *dri_drawable = dri2_dpy->vtbl->get_dri_drawable(surf);
1991    _EGLContext *ctx = _eglGetCurrentContext();
1992    EGLBoolean ret;
1993
1994    if (ctx && surf)
1995       dri2_surf_update_fence_fd(ctx, disp, surf);
1996    ret = dri2_dpy->vtbl->swap_buffers(drv, disp, surf);
1997
1998    /* SwapBuffers marks the end of the frame; reset the damage region for
1999     * use again next time.
2000     */
2001    if (ret && dri2_dpy->buffer_damage &&
2002        dri2_dpy->buffer_damage->set_damage_region)
2003       dri2_dpy->buffer_damage->set_damage_region(dri_drawable, 0, NULL);
2004
2005    return ret;
2006 }
2007
2008 static EGLBoolean
2009 dri2_swap_buffers_with_damage(const _EGLDriver *drv, _EGLDisplay *disp,
2010                               _EGLSurface *surf,
2011                               const EGLint *rects, EGLint n_rects)
2012 {
2013    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
2014    __DRIdrawable *dri_drawable = dri2_dpy->vtbl->get_dri_drawable(surf);
2015    _EGLContext *ctx = _eglGetCurrentContext();
2016    EGLBoolean ret;
2017
2018    if (ctx && surf)
2019       dri2_surf_update_fence_fd(ctx, disp, surf);
2020    if (dri2_dpy->vtbl->swap_buffers_with_damage)
2021       ret = dri2_dpy->vtbl->swap_buffers_with_damage(drv, disp, surf,
2022                                                      rects, n_rects);
2023    else
2024       ret = dri2_dpy->vtbl->swap_buffers(drv, disp, surf);
2025
2026    /* SwapBuffers marks the end of the frame; reset the damage region for
2027     * use again next time.
2028     */
2029    if (ret && dri2_dpy->buffer_damage &&
2030        dri2_dpy->buffer_damage->set_damage_region)
2031       dri2_dpy->buffer_damage->set_damage_region(dri_drawable, 0, NULL);
2032
2033    return ret;
2034 }
2035
2036 static EGLBoolean
2037 dri2_swap_buffers_region(const _EGLDriver *drv, _EGLDisplay *disp, _EGLSurface *surf,
2038                          EGLint numRects, const EGLint *rects)
2039 {
2040    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
2041    __DRIdrawable *dri_drawable = dri2_dpy->vtbl->get_dri_drawable(surf);
2042    EGLBoolean ret;
2043
2044    if (!dri2_dpy->vtbl->swap_buffers_region)
2045       return EGL_FALSE;
2046    ret = dri2_dpy->vtbl->swap_buffers_region(drv, disp, surf, numRects, rects);
2047
2048    /* SwapBuffers marks the end of the frame; reset the damage region for
2049     * use again next time.
2050     */
2051    if (ret && dri2_dpy->buffer_damage &&
2052        dri2_dpy->buffer_damage->set_damage_region)
2053       dri2_dpy->buffer_damage->set_damage_region(dri_drawable, 0, NULL);
2054
2055    return ret;
2056 }
2057
2058 static EGLBoolean
2059 dri2_set_damage_region(const _EGLDriver *drv, _EGLDisplay *disp, _EGLSurface *surf,
2060                        EGLint *rects, EGLint n_rects)
2061 {
2062    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
2063    __DRIdrawable *drawable = dri2_dpy->vtbl->get_dri_drawable(surf);
2064
2065    if (!dri2_dpy->buffer_damage || !dri2_dpy->buffer_damage->set_damage_region)
2066       return EGL_FALSE;
2067
2068    dri2_dpy->buffer_damage->set_damage_region(drawable, n_rects, rects);
2069    return EGL_TRUE;
2070 }
2071
2072 static EGLBoolean
2073 dri2_post_sub_buffer(const _EGLDriver *drv, _EGLDisplay *disp, _EGLSurface *surf,
2074                      EGLint x, EGLint y, EGLint width, EGLint height)
2075 {
2076    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
2077    if (!dri2_dpy->vtbl->post_sub_buffer)
2078       return EGL_FALSE;
2079    return dri2_dpy->vtbl->post_sub_buffer(drv, disp, surf, x, y, width, height);
2080 }
2081
2082 static EGLBoolean
2083 dri2_copy_buffers(const _EGLDriver *drv, _EGLDisplay *disp, _EGLSurface *surf,
2084                   void *native_pixmap_target)
2085 {
2086    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
2087    if (!dri2_dpy->vtbl->copy_buffers)
2088       return _eglError(EGL_BAD_NATIVE_PIXMAP, "no support for native pixmaps");
2089    return dri2_dpy->vtbl->copy_buffers(drv, disp, surf, native_pixmap_target);
2090 }
2091
2092 static EGLint
2093 dri2_query_buffer_age(const _EGLDriver *drv, _EGLDisplay *disp, _EGLSurface *surf)
2094 {
2095    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
2096    if (!dri2_dpy->vtbl->query_buffer_age)
2097       return 0;
2098    return dri2_dpy->vtbl->query_buffer_age(drv, disp, surf);
2099 }
2100
2101 static EGLBoolean
2102 dri2_wait_client(const _EGLDriver *drv, _EGLDisplay *disp, _EGLContext *ctx)
2103 {
2104    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
2105    _EGLSurface *surf = ctx->DrawSurface;
2106    __DRIdrawable *dri_drawable = dri2_dpy->vtbl->get_dri_drawable(surf);
2107
2108    (void) drv;
2109
2110    /* FIXME: If EGL allows frontbuffer rendering for window surfaces,
2111     * we need to copy fake to real here.*/
2112
2113    if (dri2_dpy->flush != NULL)
2114       dri2_dpy->flush->flush(dri_drawable);
2115
2116    return EGL_TRUE;
2117 }
2118
2119 static EGLBoolean
2120 dri2_wait_native(const _EGLDriver *drv, _EGLDisplay *disp, EGLint engine)
2121 {
2122    (void) drv;
2123    (void) disp;
2124
2125    if (engine != EGL_CORE_NATIVE_ENGINE)
2126       return _eglError(EGL_BAD_PARAMETER, "eglWaitNative");
2127    /* glXWaitX(); */
2128
2129    return EGL_TRUE;
2130 }
2131
2132 static EGLBoolean
2133 dri2_bind_tex_image(const _EGLDriver *drv,
2134                     _EGLDisplay *disp, _EGLSurface *surf, EGLint buffer)
2135 {
2136    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
2137    struct dri2_egl_context *dri2_ctx;
2138    _EGLContext *ctx;
2139    GLint format, target;
2140    __DRIdrawable *dri_drawable = dri2_dpy->vtbl->get_dri_drawable(surf);
2141
2142    ctx = _eglGetCurrentContext();
2143    dri2_ctx = dri2_egl_context(ctx);
2144
2145    if (!_eglBindTexImage(drv, disp, surf, buffer))
2146       return EGL_FALSE;
2147
2148    switch (surf->TextureFormat) {
2149    case EGL_TEXTURE_RGB:
2150       format = __DRI_TEXTURE_FORMAT_RGB;
2151       break;
2152    case EGL_TEXTURE_RGBA:
2153       format = __DRI_TEXTURE_FORMAT_RGBA;
2154       break;
2155    default:
2156       assert(!"Unexpected texture format in dri2_bind_tex_image()");
2157       format = __DRI_TEXTURE_FORMAT_RGBA;
2158    }
2159
2160    switch (surf->TextureTarget) {
2161    case EGL_TEXTURE_2D:
2162       target = GL_TEXTURE_2D;
2163       break;
2164    default:
2165       target = GL_TEXTURE_2D;
2166       assert(!"Unexpected texture target in dri2_bind_tex_image()");
2167    }
2168
2169    dri2_dpy->tex_buffer->setTexBuffer2(dri2_ctx->dri_context,
2170                                        target, format,
2171                                        dri_drawable);
2172
2173    return EGL_TRUE;
2174 }
2175
2176 static EGLBoolean
2177 dri2_release_tex_image(const _EGLDriver *drv,
2178                        _EGLDisplay *disp, _EGLSurface *surf, EGLint buffer)
2179 {
2180    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
2181    struct dri2_egl_context *dri2_ctx;
2182    _EGLContext *ctx;
2183    GLint  target;
2184    __DRIdrawable *dri_drawable = dri2_dpy->vtbl->get_dri_drawable(surf);
2185
2186    ctx = _eglGetCurrentContext();
2187    dri2_ctx = dri2_egl_context(ctx);
2188
2189    if (!_eglReleaseTexImage(drv, disp, surf, buffer))
2190       return EGL_FALSE;
2191
2192    switch (surf->TextureTarget) {
2193    case EGL_TEXTURE_2D:
2194       target = GL_TEXTURE_2D;
2195       break;
2196    default:
2197       assert(!"missing texture target");
2198    }
2199
2200    if (dri2_dpy->tex_buffer->base.version >= 3 &&
2201        dri2_dpy->tex_buffer->releaseTexBuffer != NULL) {
2202       dri2_dpy->tex_buffer->releaseTexBuffer(dri2_ctx->dri_context,
2203                                              target, dri_drawable);
2204    }
2205
2206    return EGL_TRUE;
2207 }
2208
2209 static _EGLImage*
2210 dri2_create_image(const _EGLDriver *drv, _EGLDisplay *disp, _EGLContext *ctx,
2211                   EGLenum target, EGLClientBuffer buffer,
2212                   const EGLint *attr_list)
2213 {
2214    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
2215    return dri2_dpy->vtbl->create_image(drv, disp, ctx, target, buffer,
2216                                        attr_list);
2217 }
2218
2219 static _EGLImage *
2220 dri2_create_image_from_dri(_EGLDisplay *disp, __DRIimage *dri_image)
2221 {
2222    struct dri2_egl_image *dri2_img;
2223
2224    if (dri_image == NULL) {
2225       _eglError(EGL_BAD_ALLOC, "dri2_create_image");
2226       return NULL;
2227    }
2228
2229    dri2_img = malloc(sizeof *dri2_img);
2230    if (!dri2_img) {
2231       _eglError(EGL_BAD_ALLOC, "dri2_create_image");
2232       return NULL;
2233    }
2234
2235    _eglInitImage(&dri2_img->base, disp);
2236
2237    dri2_img->dri_image = dri_image;
2238
2239    return &dri2_img->base;
2240 }
2241
2242 /**
2243  * Translate a DRI Image extension error code into an EGL error code.
2244  */
2245 static EGLint
2246 egl_error_from_dri_image_error(int dri_error)
2247 {
2248    switch (dri_error) {
2249    case __DRI_IMAGE_ERROR_SUCCESS:
2250       return EGL_SUCCESS;
2251    case __DRI_IMAGE_ERROR_BAD_ALLOC:
2252       return EGL_BAD_ALLOC;
2253    case __DRI_IMAGE_ERROR_BAD_MATCH:
2254       return EGL_BAD_MATCH;
2255    case __DRI_IMAGE_ERROR_BAD_PARAMETER:
2256       return EGL_BAD_PARAMETER;
2257    case __DRI_IMAGE_ERROR_BAD_ACCESS:
2258       return EGL_BAD_ACCESS;
2259    default:
2260       assert(!"unknown dri_error code");
2261       return EGL_BAD_ALLOC;
2262    }
2263 }
2264
2265 static _EGLImage *
2266 dri2_create_image_khr_renderbuffer(_EGLDisplay *disp, _EGLContext *ctx,
2267                                    EGLClientBuffer buffer,
2268                                    const EGLint *attr_list)
2269 {
2270    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
2271    struct dri2_egl_context *dri2_ctx = dri2_egl_context(ctx);
2272    GLuint renderbuffer = (GLuint) (uintptr_t) buffer;
2273    __DRIimage *dri_image;
2274
2275    if (renderbuffer == 0) {
2276       _eglError(EGL_BAD_PARAMETER, "dri2_create_image_khr");
2277       return EGL_NO_IMAGE_KHR;
2278    }
2279
2280    if (!disp->Extensions.KHR_gl_renderbuffer_image) {
2281       _eglError(EGL_BAD_PARAMETER, "dri2_create_image_khr");
2282       return EGL_NO_IMAGE_KHR;
2283    }
2284
2285    if (dri2_dpy->image->base.version >= 17 &&
2286        dri2_dpy->image->createImageFromRenderbuffer2) {
2287       unsigned error = ~0;
2288
2289       dri_image = dri2_dpy->image->createImageFromRenderbuffer2(
2290                dri2_ctx->dri_context, renderbuffer, NULL, &error);
2291
2292       assert(!!dri_image == (error == __DRI_IMAGE_ERROR_SUCCESS));
2293
2294       if (!dri_image) {
2295          _eglError(egl_error_from_dri_image_error(error), "dri2_create_image_khr");
2296          return EGL_NO_IMAGE_KHR;
2297       }
2298    } else {
2299       dri_image = dri2_dpy->image->createImageFromRenderbuffer(
2300                dri2_ctx->dri_context, renderbuffer, NULL);
2301       if (!dri_image) {
2302          _eglError(EGL_BAD_ALLOC, "dri2_create_image_khr");
2303          return EGL_NO_IMAGE_KHR;
2304       }
2305    }
2306
2307    return dri2_create_image_from_dri(disp, dri_image);
2308 }
2309
2310 #ifdef HAVE_WAYLAND_PLATFORM
2311
2312 /* This structure describes how a wl_buffer maps to one or more
2313  * __DRIimages.  A wl_drm_buffer stores the wl_drm format code and the
2314  * offsets and strides of the planes in the buffer.  This table maps a
2315  * wl_drm format code to a description of the planes in the buffer
2316  * that lets us create a __DRIimage for each of the planes. */
2317
2318 static const struct wl_drm_components_descriptor {
2319    uint32_t dri_components;
2320    EGLint components;
2321    int nplanes;
2322 } wl_drm_components[] = {
2323    { __DRI_IMAGE_COMPONENTS_RGB, EGL_TEXTURE_RGB, 1 },
2324    { __DRI_IMAGE_COMPONENTS_RGBA, EGL_TEXTURE_RGBA, 1 },
2325    { __DRI_IMAGE_COMPONENTS_Y_U_V, EGL_TEXTURE_Y_U_V_WL, 3 },
2326    { __DRI_IMAGE_COMPONENTS_Y_UV, EGL_TEXTURE_Y_UV_WL, 2 },
2327    { __DRI_IMAGE_COMPONENTS_Y_XUXV, EGL_TEXTURE_Y_XUXV_WL, 2 },
2328 };
2329
2330 static _EGLImage *
2331 dri2_create_image_wayland_wl_buffer(_EGLDisplay *disp, _EGLContext *ctx,
2332                                     EGLClientBuffer _buffer,
2333                                     const EGLint *attr_list)
2334 {
2335    struct wl_drm_buffer *buffer;
2336    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
2337    const struct wl_drm_components_descriptor *f;
2338    __DRIimage *dri_image;
2339    _EGLImageAttribs attrs;
2340    int32_t plane;
2341
2342    buffer = wayland_drm_buffer_get(dri2_dpy->wl_server_drm,
2343                                    (struct wl_resource *) _buffer);
2344    if (!buffer)
2345        return NULL;
2346
2347    if (!_eglParseImageAttribList(&attrs, disp, attr_list))
2348       return NULL;
2349
2350    plane = attrs.PlaneWL;
2351    f = buffer->driver_format;
2352    if (plane < 0 || plane >= f->nplanes) {
2353       _eglError(EGL_BAD_PARAMETER,
2354                 "dri2_create_image_wayland_wl_buffer (plane out of bounds)");
2355       return NULL;
2356    }
2357
2358    dri_image = dri2_dpy->image->fromPlanar(buffer->driver_buffer, plane, NULL);
2359    if (dri_image == NULL && plane == 0)
2360       dri_image = dri2_dpy->image->dupImage(buffer->driver_buffer, NULL);
2361    if (dri_image == NULL) {
2362       _eglError(EGL_BAD_PARAMETER, "dri2_create_image_wayland_wl_buffer");
2363       return NULL;
2364    }
2365
2366    return dri2_create_image_from_dri(disp, dri_image);
2367 }
2368 #endif
2369
2370 static EGLBoolean
2371 dri2_get_sync_values_chromium(_EGLDisplay *disp, _EGLSurface *surf,
2372                               EGLuint64KHR *ust, EGLuint64KHR *msc,
2373                               EGLuint64KHR *sbc)
2374 {
2375    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
2376    if (!dri2_dpy->vtbl->get_sync_values)
2377       return EGL_FALSE;
2378    return dri2_dpy->vtbl->get_sync_values(disp, surf, ust, msc, sbc);
2379 }
2380
2381 /**
2382  * Set the error code after a call to
2383  * dri2_egl_image::dri_image::createImageFromTexture.
2384  */
2385 static void
2386 dri2_create_image_khr_texture_error(int dri_error)
2387 {
2388    EGLint egl_error = egl_error_from_dri_image_error(dri_error);
2389
2390    if (egl_error != EGL_SUCCESS)
2391       _eglError(egl_error, "dri2_create_image_khr_texture");
2392 }
2393
2394 static _EGLImage *
2395 dri2_create_image_khr_texture(_EGLDisplay *disp, _EGLContext *ctx,
2396                                    EGLenum target,
2397                                    EGLClientBuffer buffer,
2398                                    const EGLint *attr_list)
2399 {
2400    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
2401    struct dri2_egl_context *dri2_ctx = dri2_egl_context(ctx);
2402    struct dri2_egl_image *dri2_img;
2403    GLuint texture = (GLuint) (uintptr_t) buffer;
2404    _EGLImageAttribs attrs;
2405    GLuint depth;
2406    GLenum gl_target;
2407    unsigned error;
2408
2409    if (texture == 0) {
2410       _eglError(EGL_BAD_PARAMETER, "dri2_create_image_khr");
2411       return EGL_NO_IMAGE_KHR;
2412    }
2413
2414    if (!_eglParseImageAttribList(&attrs, disp, attr_list))
2415       return EGL_NO_IMAGE_KHR;
2416
2417    switch (target) {
2418    case EGL_GL_TEXTURE_2D_KHR:
2419       if (!disp->Extensions.KHR_gl_texture_2D_image) {
2420          _eglError(EGL_BAD_PARAMETER, "dri2_create_image_khr");
2421          return EGL_NO_IMAGE_KHR;
2422       }
2423       depth = 0;
2424       gl_target = GL_TEXTURE_2D;
2425       break;
2426    case EGL_GL_TEXTURE_3D_KHR:
2427       if (!disp->Extensions.KHR_gl_texture_3D_image) {
2428          _eglError(EGL_BAD_PARAMETER, "dri2_create_image_khr");
2429          return EGL_NO_IMAGE_KHR;
2430       }
2431
2432       depth = attrs.GLTextureZOffset;
2433       gl_target = GL_TEXTURE_3D;
2434       break;
2435    case EGL_GL_TEXTURE_CUBE_MAP_POSITIVE_X_KHR:
2436    case EGL_GL_TEXTURE_CUBE_MAP_NEGATIVE_X_KHR:
2437    case EGL_GL_TEXTURE_CUBE_MAP_POSITIVE_Y_KHR:
2438    case EGL_GL_TEXTURE_CUBE_MAP_NEGATIVE_Y_KHR:
2439    case EGL_GL_TEXTURE_CUBE_MAP_POSITIVE_Z_KHR:
2440    case EGL_GL_TEXTURE_CUBE_MAP_NEGATIVE_Z_KHR:
2441       if (!disp->Extensions.KHR_gl_texture_cubemap_image) {
2442          _eglError(EGL_BAD_PARAMETER, "dri2_create_image_khr");
2443          return EGL_NO_IMAGE_KHR;
2444       }
2445
2446       depth = target - EGL_GL_TEXTURE_CUBE_MAP_POSITIVE_X_KHR;
2447       gl_target = GL_TEXTURE_CUBE_MAP;
2448       break;
2449    default:
2450       unreachable("Unexpected target in dri2_create_image_khr_texture()");
2451       return EGL_NO_IMAGE_KHR;
2452    }
2453
2454    dri2_img = malloc(sizeof *dri2_img);
2455    if (!dri2_img) {
2456       _eglError(EGL_BAD_ALLOC, "dri2_create_image_khr");
2457       return EGL_NO_IMAGE_KHR;
2458    }
2459
2460    _eglInitImage(&dri2_img->base, disp);
2461
2462    dri2_img->dri_image =
2463       dri2_dpy->image->createImageFromTexture(dri2_ctx->dri_context,
2464                                               gl_target,
2465                                               texture,
2466                                               depth,
2467                                               attrs.GLTextureLevel,
2468                                               &error,
2469                                               dri2_img);
2470    dri2_create_image_khr_texture_error(error);
2471
2472    if (!dri2_img->dri_image) {
2473       free(dri2_img);
2474       return EGL_NO_IMAGE_KHR;
2475    }
2476    return &dri2_img->base;
2477 }
2478
2479 static EGLBoolean
2480 dri2_query_surface(const _EGLDriver *drv, _EGLDisplay *disp, _EGLSurface *surf,
2481                    EGLint attribute, EGLint *value)
2482 {
2483    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
2484    if (!dri2_dpy->vtbl->query_surface)
2485       return _eglQuerySurface(drv, disp, surf, attribute, value);
2486    return dri2_dpy->vtbl->query_surface(drv, disp, surf, attribute, value);
2487 }
2488
2489 static struct wl_buffer*
2490 dri2_create_wayland_buffer_from_image(const _EGLDriver *drv, _EGLDisplay *disp,
2491                                       _EGLImage *img)
2492 {
2493    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
2494    if (!dri2_dpy->vtbl->create_wayland_buffer_from_image)
2495       return NULL;
2496    return dri2_dpy->vtbl->create_wayland_buffer_from_image(drv, disp, img);
2497 }
2498
2499 #ifdef HAVE_LIBDRM
2500 static _EGLImage *
2501 dri2_create_image_mesa_drm_buffer(_EGLDisplay *disp, _EGLContext *ctx,
2502                                   EGLClientBuffer buffer, const EGLint *attr_list)
2503 {
2504    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
2505    EGLint format, name, pitch;
2506    _EGLImageAttribs attrs;
2507    __DRIimage *dri_image;
2508
2509    name = (EGLint) (uintptr_t) buffer;
2510
2511    if (!_eglParseImageAttribList(&attrs, disp, attr_list))
2512       return NULL;
2513
2514    if (attrs.Width <= 0 || attrs.Height <= 0 ||
2515        attrs.DRMBufferStrideMESA <= 0) {
2516       _eglError(EGL_BAD_PARAMETER,
2517                 "bad width, height or stride");
2518       return NULL;
2519    }
2520
2521    switch (attrs.DRMBufferFormatMESA) {
2522    case EGL_DRM_BUFFER_FORMAT_ARGB32_MESA:
2523       format = __DRI_IMAGE_FORMAT_ARGB8888;
2524       pitch = attrs.DRMBufferStrideMESA;
2525       break;
2526    default:
2527       _eglError(EGL_BAD_PARAMETER,
2528                 "dri2_create_image_khr: unsupported pixmap depth");
2529       return NULL;
2530    }
2531
2532    dri_image =
2533       dri2_dpy->image->createImageFromName(dri2_dpy->dri_screen,
2534                                            attrs.Width,
2535                                            attrs.Height,
2536                                            format,
2537                                            name,
2538                                            pitch,
2539                                            NULL);
2540
2541    return dri2_create_image_from_dri(disp, dri_image);
2542 }
2543
2544 static EGLBoolean
2545 dri2_check_dma_buf_attribs(const _EGLImageAttribs *attrs)
2546 {
2547    /**
2548      * The spec says:
2549      *
2550      * "Required attributes and their values are as follows:
2551      *
2552      *  * EGL_WIDTH & EGL_HEIGHT: The logical dimensions of the buffer in pixels
2553      *
2554      *  * EGL_LINUX_DRM_FOURCC_EXT: The pixel format of the buffer, as specified
2555      *    by drm_fourcc.h and used as the pixel_format parameter of the
2556      *    drm_mode_fb_cmd2 ioctl."
2557      *
2558      * and
2559      *
2560      * "* If <target> is EGL_LINUX_DMA_BUF_EXT, and the list of attributes is
2561      *    incomplete, EGL_BAD_PARAMETER is generated."
2562      */
2563    if (attrs->Width <= 0 || attrs->Height <= 0 ||
2564        !attrs->DMABufFourCC.IsPresent)
2565       return _eglError(EGL_BAD_PARAMETER, "attribute(s) missing");
2566
2567    /**
2568     * Also:
2569     *
2570     * "If <target> is EGL_LINUX_DMA_BUF_EXT and one or more of the values
2571     *  specified for a plane's pitch or offset isn't supported by EGL,
2572     *  EGL_BAD_ACCESS is generated."
2573     */
2574    for (unsigned i = 0; i < ARRAY_SIZE(attrs->DMABufPlanePitches); ++i) {
2575       if (attrs->DMABufPlanePitches[i].IsPresent &&
2576           attrs->DMABufPlanePitches[i].Value <= 0)
2577          return _eglError(EGL_BAD_ACCESS, "invalid pitch");
2578    }
2579
2580    /**
2581     * If <target> is EGL_LINUX_DMA_BUF_EXT, both or neither of the following
2582     * attribute values may be given.
2583     *
2584     * This is referring to EGL_DMA_BUF_PLANE0_MODIFIER_LO_EXT and
2585     * EGL_DMA_BUF_PLANE0_MODIFIER_HI_EXT, and the same for other planes.
2586     */
2587    for (unsigned i = 0; i < DMA_BUF_MAX_PLANES; ++i) {
2588       if (attrs->DMABufPlaneModifiersLo[i].IsPresent !=
2589           attrs->DMABufPlaneModifiersHi[i].IsPresent)
2590          return _eglError(EGL_BAD_PARAMETER, "modifier attribute lo or hi missing");
2591    }
2592
2593    /* Although the EGL_EXT_image_dma_buf_import_modifiers spec doesn't
2594     * mandate it, we only accept the same modifier across all planes. */
2595    for (unsigned i = 1; i < DMA_BUF_MAX_PLANES; ++i) {
2596       if (attrs->DMABufPlaneFds[i].IsPresent) {
2597          if ((attrs->DMABufPlaneModifiersLo[0].IsPresent !=
2598                attrs->DMABufPlaneModifiersLo[i].IsPresent) ||
2599              (attrs->DMABufPlaneModifiersLo[0].Value !=
2600                attrs->DMABufPlaneModifiersLo[i].Value) ||
2601              (attrs->DMABufPlaneModifiersHi[0].Value !=
2602                attrs->DMABufPlaneModifiersHi[i].Value))
2603             return _eglError(EGL_BAD_PARAMETER, "modifier attributes not equal");
2604       }
2605    }
2606
2607    return EGL_TRUE;
2608 }
2609
2610 /* Returns the total number of planes for the format or zero if it isn't a
2611  * valid fourcc format.
2612  */
2613 static unsigned
2614 dri2_num_fourcc_format_planes(EGLint format)
2615 {
2616    switch (format) {
2617    case DRM_FORMAT_R8:
2618    case DRM_FORMAT_RG88:
2619    case DRM_FORMAT_GR88:
2620    case DRM_FORMAT_R16:
2621    case DRM_FORMAT_GR1616:
2622    case DRM_FORMAT_RGB332:
2623    case DRM_FORMAT_BGR233:
2624    case DRM_FORMAT_XRGB4444:
2625    case DRM_FORMAT_XBGR4444:
2626    case DRM_FORMAT_RGBX4444:
2627    case DRM_FORMAT_BGRX4444:
2628    case DRM_FORMAT_ARGB4444:
2629    case DRM_FORMAT_ABGR4444:
2630    case DRM_FORMAT_RGBA4444:
2631    case DRM_FORMAT_BGRA4444:
2632    case DRM_FORMAT_XRGB1555:
2633    case DRM_FORMAT_XBGR1555:
2634    case DRM_FORMAT_RGBX5551:
2635    case DRM_FORMAT_BGRX5551:
2636    case DRM_FORMAT_ARGB1555:
2637    case DRM_FORMAT_ABGR1555:
2638    case DRM_FORMAT_RGBA5551:
2639    case DRM_FORMAT_BGRA5551:
2640    case DRM_FORMAT_RGB565:
2641    case DRM_FORMAT_BGR565:
2642    case DRM_FORMAT_RGB888:
2643    case DRM_FORMAT_BGR888:
2644    case DRM_FORMAT_XRGB8888:
2645    case DRM_FORMAT_XBGR8888:
2646    case DRM_FORMAT_RGBX8888:
2647    case DRM_FORMAT_BGRX8888:
2648    case DRM_FORMAT_ARGB8888:
2649    case DRM_FORMAT_ABGR8888:
2650    case DRM_FORMAT_RGBA8888:
2651    case DRM_FORMAT_BGRA8888:
2652    case DRM_FORMAT_XRGB2101010:
2653    case DRM_FORMAT_XBGR2101010:
2654    case DRM_FORMAT_RGBX1010102:
2655    case DRM_FORMAT_BGRX1010102:
2656    case DRM_FORMAT_ARGB2101010:
2657    case DRM_FORMAT_ABGR2101010:
2658    case DRM_FORMAT_RGBA1010102:
2659    case DRM_FORMAT_BGRA1010102:
2660    case DRM_FORMAT_XBGR16161616F:
2661    case DRM_FORMAT_ABGR16161616F:
2662    case DRM_FORMAT_YUYV:
2663    case DRM_FORMAT_YVYU:
2664    case DRM_FORMAT_UYVY:
2665    case DRM_FORMAT_VYUY:
2666    case DRM_FORMAT_AYUV:
2667    case DRM_FORMAT_XYUV8888:
2668       return 1;
2669
2670    case DRM_FORMAT_NV12:
2671    case DRM_FORMAT_NV21:
2672    case DRM_FORMAT_NV16:
2673    case DRM_FORMAT_NV61:
2674    case DRM_FORMAT_P010:
2675    case DRM_FORMAT_P012:
2676    case DRM_FORMAT_P016:
2677       return 2;
2678
2679    case DRM_FORMAT_YUV410:
2680    case DRM_FORMAT_YVU410:
2681    case DRM_FORMAT_YUV411:
2682    case DRM_FORMAT_YVU411:
2683    case DRM_FORMAT_YUV420:
2684    case DRM_FORMAT_YVU420:
2685    case DRM_FORMAT_YUV422:
2686    case DRM_FORMAT_YVU422:
2687    case DRM_FORMAT_YUV444:
2688    case DRM_FORMAT_YVU444:
2689       return 3;
2690
2691    default:
2692       return 0;
2693    }
2694 }
2695
2696 /* Returns the total number of file descriptors. Zero indicates an error. */
2697 static unsigned
2698 dri2_check_dma_buf_format(const _EGLImageAttribs *attrs)
2699 {
2700    unsigned plane_n = dri2_num_fourcc_format_planes(attrs->DMABufFourCC.Value);
2701    if (plane_n == 0) {
2702       _eglError(EGL_BAD_MATCH, "unknown drm fourcc format");
2703       return 0;
2704    }
2705
2706    for (unsigned i = plane_n; i < DMA_BUF_MAX_PLANES; i++) {
2707       /**
2708        * The modifiers extension spec says:
2709        *
2710        * "Modifiers may modify any attribute of a buffer import, including
2711        *  but not limited to adding extra planes to a format which
2712        *  otherwise does not have those planes. As an example, a modifier
2713        *  may add a plane for an external compression buffer to a
2714        *  single-plane format. The exact meaning and effect of any
2715        *  modifier is canonically defined by drm_fourcc.h, not as part of
2716        *  this extension."
2717        */
2718       if (attrs->DMABufPlaneModifiersLo[i].IsPresent &&
2719           attrs->DMABufPlaneModifiersHi[i].IsPresent) {
2720          plane_n = i + 1;
2721       }
2722    }
2723
2724    /**
2725      * The spec says:
2726      *
2727      * "* If <target> is EGL_LINUX_DMA_BUF_EXT, and the list of attributes is
2728      *    incomplete, EGL_BAD_PARAMETER is generated."
2729      */
2730    for (unsigned i = 0; i < plane_n; ++i) {
2731       if (!attrs->DMABufPlaneFds[i].IsPresent ||
2732           !attrs->DMABufPlaneOffsets[i].IsPresent ||
2733           !attrs->DMABufPlanePitches[i].IsPresent) {
2734          _eglError(EGL_BAD_PARAMETER, "plane attribute(s) missing");
2735          return 0;
2736       }
2737    }
2738
2739    /**
2740     * The spec also says:
2741     *
2742     * "If <target> is EGL_LINUX_DMA_BUF_EXT, and the EGL_LINUX_DRM_FOURCC_EXT
2743     *  attribute indicates a single-plane format, EGL_BAD_ATTRIBUTE is
2744     *  generated if any of the EGL_DMA_BUF_PLANE1_* or EGL_DMA_BUF_PLANE2_*
2745     *  or EGL_DMA_BUF_PLANE3_* attributes are specified."
2746     */
2747    for (unsigned i = plane_n; i < DMA_BUF_MAX_PLANES; ++i) {
2748       if (attrs->DMABufPlaneFds[i].IsPresent ||
2749           attrs->DMABufPlaneOffsets[i].IsPresent ||
2750           attrs->DMABufPlanePitches[i].IsPresent) {
2751          _eglError(EGL_BAD_ATTRIBUTE, "too many plane attributes");
2752          return 0;
2753       }
2754    }
2755
2756    return plane_n;
2757 }
2758
2759 static EGLBoolean
2760 dri2_query_dma_buf_formats(const _EGLDriver *drv, _EGLDisplay *disp,
2761                             EGLint max, EGLint *formats, EGLint *count)
2762 {
2763    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
2764    if (max < 0 || (max > 0 && formats == NULL))
2765       return _eglError(EGL_BAD_PARAMETER, "invalid value for max count of formats");
2766
2767    if (dri2_dpy->image->base.version < 15 ||
2768        dri2_dpy->image->queryDmaBufFormats == NULL)
2769       return EGL_FALSE;
2770
2771    if (!dri2_dpy->image->queryDmaBufFormats(dri2_dpy->dri_screen, max,
2772                                             formats, count))
2773       return EGL_FALSE;
2774
2775    if (max > 0) {
2776       /* Assert that all of the formats returned are actually fourcc formats.
2777        * Some day, if we want the internal interface function to be able to
2778        * return the fake fourcc formats defined in dri_interface.h, we'll have
2779        * to do something more clever here to pair the list down to just real
2780        * fourcc formats so that we don't leak the fake internal ones.
2781        */
2782       for (int i = 0; i < *count; i++) {
2783          assert(dri2_num_fourcc_format_planes(formats[i]) > 0);
2784       }
2785    }
2786
2787    return EGL_TRUE;
2788 }
2789
2790 static EGLBoolean
2791 dri2_query_dma_buf_modifiers(const _EGLDriver *drv, _EGLDisplay *disp, EGLint format,
2792                              EGLint max, EGLuint64KHR *modifiers,
2793                              EGLBoolean *external_only, EGLint *count)
2794 {
2795    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
2796
2797    if (dri2_num_fourcc_format_planes(format) == 0)
2798       return _eglError(EGL_BAD_PARAMETER, "invalid fourcc format");
2799
2800    if (max < 0)
2801       return _eglError(EGL_BAD_PARAMETER, "invalid value for max count of formats");
2802
2803    if (max > 0 && modifiers == NULL)
2804       return _eglError(EGL_BAD_PARAMETER, "invalid modifiers array");
2805
2806    if (dri2_dpy->image->base.version < 15 ||
2807        dri2_dpy->image->queryDmaBufModifiers == NULL)
2808       return EGL_FALSE;
2809
2810    if (dri2_dpy->image->queryDmaBufModifiers(dri2_dpy->dri_screen, format,
2811                                              max, modifiers,
2812                                              (unsigned int *) external_only,
2813                                              count) == false)
2814       return _eglError(EGL_BAD_PARAMETER, "invalid format");
2815
2816    return EGL_TRUE;
2817 }
2818
2819 /**
2820  * The spec says:
2821  *
2822  * "If eglCreateImageKHR is successful for a EGL_LINUX_DMA_BUF_EXT target, the
2823  *  EGL will take a reference to the dma_buf(s) which it will release at any
2824  *  time while the EGLDisplay is initialized. It is the responsibility of the
2825  *  application to close the dma_buf file descriptors."
2826  *
2827  * Therefore we must never close or otherwise modify the file descriptors.
2828  */
2829 _EGLImage *
2830 dri2_create_image_dma_buf(_EGLDisplay *disp, _EGLContext *ctx,
2831                           EGLClientBuffer buffer, const EGLint *attr_list)
2832 {
2833    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
2834    _EGLImage *res;
2835    _EGLImageAttribs attrs;
2836    __DRIimage *dri_image;
2837    unsigned num_fds;
2838    int fds[DMA_BUF_MAX_PLANES];
2839    int pitches[DMA_BUF_MAX_PLANES];
2840    int offsets[DMA_BUF_MAX_PLANES];
2841    uint64_t modifier;
2842    bool has_modifier = false;
2843    unsigned error;
2844
2845    /**
2846     * The spec says:
2847     *
2848     * ""* If <target> is EGL_LINUX_DMA_BUF_EXT and <buffer> is not NULL, the
2849     *     error EGL_BAD_PARAMETER is generated."
2850     */
2851    if (buffer != NULL) {
2852       _eglError(EGL_BAD_PARAMETER, "buffer not NULL");
2853       return NULL;
2854    }
2855
2856    if (!_eglParseImageAttribList(&attrs, disp, attr_list))
2857       return NULL;
2858
2859    if (!dri2_check_dma_buf_attribs(&attrs))
2860       return NULL;
2861
2862    num_fds = dri2_check_dma_buf_format(&attrs);
2863    if (!num_fds)
2864       return NULL;
2865
2866    for (unsigned i = 0; i < num_fds; ++i) {
2867       fds[i] = attrs.DMABufPlaneFds[i].Value;
2868       pitches[i] = attrs.DMABufPlanePitches[i].Value;
2869       offsets[i] = attrs.DMABufPlaneOffsets[i].Value;
2870    }
2871
2872    /* dri2_check_dma_buf_attribs ensures that the modifier, if available,
2873     * will be present in attrs.DMABufPlaneModifiersLo[0] and
2874     * attrs.DMABufPlaneModifiersHi[0] */
2875    if (attrs.DMABufPlaneModifiersLo[0].IsPresent) {
2876       modifier = combine_u32_into_u64(attrs.DMABufPlaneModifiersHi[0].Value,
2877                                       attrs.DMABufPlaneModifiersLo[0].Value);
2878       has_modifier = true;
2879    }
2880
2881    if (has_modifier) {
2882       if (dri2_dpy->image->base.version < 15 ||
2883           dri2_dpy->image->createImageFromDmaBufs2 == NULL) {
2884          _eglError(EGL_BAD_MATCH, "unsupported dma_buf format modifier");
2885          return EGL_NO_IMAGE_KHR;
2886       }
2887       dri_image =
2888          dri2_dpy->image->createImageFromDmaBufs2(dri2_dpy->dri_screen,
2889             attrs.Width, attrs.Height, attrs.DMABufFourCC.Value,
2890             modifier, fds, num_fds, pitches, offsets,
2891             attrs.DMABufYuvColorSpaceHint.Value,
2892             attrs.DMABufSampleRangeHint.Value,
2893             attrs.DMABufChromaHorizontalSiting.Value,
2894             attrs.DMABufChromaVerticalSiting.Value,
2895             &error,
2896             NULL);
2897    }
2898    else {
2899       dri_image =
2900          dri2_dpy->image->createImageFromDmaBufs(dri2_dpy->dri_screen,
2901             attrs.Width, attrs.Height, attrs.DMABufFourCC.Value,
2902             fds, num_fds, pitches, offsets,
2903             attrs.DMABufYuvColorSpaceHint.Value,
2904             attrs.DMABufSampleRangeHint.Value,
2905             attrs.DMABufChromaHorizontalSiting.Value,
2906             attrs.DMABufChromaVerticalSiting.Value,
2907             &error,
2908             NULL);
2909    }
2910    dri2_create_image_khr_texture_error(error);
2911
2912    if (!dri_image)
2913       return EGL_NO_IMAGE_KHR;
2914
2915    res = dri2_create_image_from_dri(disp, dri_image);
2916
2917    return res;
2918 }
2919 static _EGLImage *
2920 dri2_create_drm_image_mesa(const _EGLDriver *drv, _EGLDisplay *disp,
2921                            const EGLint *attr_list)
2922 {
2923    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
2924    struct dri2_egl_image *dri2_img;
2925    _EGLImageAttribs attrs;
2926    unsigned int dri_use, valid_mask;
2927    int format;
2928
2929    (void) drv;
2930
2931    if (!attr_list) {
2932       _eglError(EGL_BAD_PARAMETER, __func__);
2933       return EGL_NO_IMAGE_KHR;
2934    }
2935
2936    if (!_eglParseImageAttribList(&attrs, disp, attr_list))
2937       return EGL_NO_IMAGE_KHR;
2938
2939    if (attrs.Width <= 0 || attrs.Height <= 0) {
2940       _eglError(EGL_BAD_PARAMETER, __func__);
2941       return EGL_NO_IMAGE_KHR;
2942    }
2943
2944    switch (attrs.DRMBufferFormatMESA) {
2945    case EGL_DRM_BUFFER_FORMAT_ARGB32_MESA:
2946       format = __DRI_IMAGE_FORMAT_ARGB8888;
2947       break;
2948    default:
2949       _eglError(EGL_BAD_PARAMETER, __func__);
2950       return EGL_NO_IMAGE_KHR;
2951    }
2952
2953    valid_mask =
2954       EGL_DRM_BUFFER_USE_SCANOUT_MESA |
2955       EGL_DRM_BUFFER_USE_SHARE_MESA |
2956       EGL_DRM_BUFFER_USE_CURSOR_MESA;
2957    if (attrs.DRMBufferUseMESA & ~valid_mask) {
2958       _eglError(EGL_BAD_PARAMETER, __func__);
2959       return EGL_NO_IMAGE_KHR;
2960    }
2961
2962    dri_use = 0;
2963    if (attrs.DRMBufferUseMESA & EGL_DRM_BUFFER_USE_SHARE_MESA)
2964       dri_use |= __DRI_IMAGE_USE_SHARE;
2965    if (attrs.DRMBufferUseMESA & EGL_DRM_BUFFER_USE_SCANOUT_MESA)
2966       dri_use |= __DRI_IMAGE_USE_SCANOUT;
2967    if (attrs.DRMBufferUseMESA & EGL_DRM_BUFFER_USE_CURSOR_MESA)
2968       dri_use |= __DRI_IMAGE_USE_CURSOR;
2969
2970    dri2_img = malloc(sizeof *dri2_img);
2971    if (!dri2_img) {
2972       _eglError(EGL_BAD_ALLOC, "dri2_create_image_khr");
2973       return EGL_NO_IMAGE_KHR;
2974    }
2975
2976    _eglInitImage(&dri2_img->base, disp);
2977
2978    dri2_img->dri_image =
2979       dri2_dpy->image->createImage(dri2_dpy->dri_screen,
2980                                    attrs.Width, attrs.Height,
2981                                    format, dri_use, dri2_img);
2982    if (dri2_img->dri_image == NULL) {
2983       free(dri2_img);
2984        _eglError(EGL_BAD_ALLOC, "dri2_create_drm_image_mesa");
2985       return EGL_NO_IMAGE_KHR;
2986    }
2987
2988    return &dri2_img->base;
2989 }
2990
2991 static EGLBoolean
2992 dri2_export_drm_image_mesa(const _EGLDriver *drv, _EGLDisplay *disp, _EGLImage *img,
2993                           EGLint *name, EGLint *handle, EGLint *stride)
2994 {
2995    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
2996    struct dri2_egl_image *dri2_img = dri2_egl_image(img);
2997
2998    (void) drv;
2999
3000    if (name && !dri2_dpy->image->queryImage(dri2_img->dri_image,
3001                                             __DRI_IMAGE_ATTRIB_NAME, name))
3002       return _eglError(EGL_BAD_ALLOC, "dri2_export_drm_image_mesa");
3003
3004    if (handle)
3005       dri2_dpy->image->queryImage(dri2_img->dri_image,
3006                                   __DRI_IMAGE_ATTRIB_HANDLE, handle);
3007
3008    if (stride)
3009       dri2_dpy->image->queryImage(dri2_img->dri_image,
3010                                   __DRI_IMAGE_ATTRIB_STRIDE, stride);
3011
3012    return EGL_TRUE;
3013 }
3014
3015 /**
3016  * Checks if we can support EGL_MESA_image_dma_buf_export on this image.
3017
3018  * The spec provides a boolean return for the driver to reject exporting for
3019  * basically any reason, but doesn't specify any particular error cases.  For
3020  * now, we just fail if we don't have a DRM fourcc for the format.
3021  */
3022 static bool
3023 dri2_can_export_dma_buf_image(_EGLDisplay *disp, _EGLImage *img)
3024 {
3025    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
3026    struct dri2_egl_image *dri2_img = dri2_egl_image(img);
3027    EGLint fourcc;
3028
3029    if (!dri2_dpy->image->queryImage(dri2_img->dri_image,
3030                                     __DRI_IMAGE_ATTRIB_FOURCC, &fourcc)) {
3031       return false;
3032    }
3033
3034    return true;
3035 }
3036
3037 static EGLBoolean
3038 dri2_export_dma_buf_image_query_mesa(const _EGLDriver *drv, _EGLDisplay *disp,
3039                                      _EGLImage *img,
3040                                      EGLint *fourcc, EGLint *nplanes,
3041                                      EGLuint64KHR *modifiers)
3042 {
3043    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
3044    struct dri2_egl_image *dri2_img = dri2_egl_image(img);
3045    int num_planes;
3046
3047    (void) drv;
3048
3049    if (!dri2_can_export_dma_buf_image(disp, img))
3050       return EGL_FALSE;
3051
3052    dri2_dpy->image->queryImage(dri2_img->dri_image,
3053                                __DRI_IMAGE_ATTRIB_NUM_PLANES, &num_planes);
3054    if (nplanes)
3055      *nplanes = num_planes;
3056
3057    if (fourcc)
3058       dri2_dpy->image->queryImage(dri2_img->dri_image,
3059                                   __DRI_IMAGE_ATTRIB_FOURCC, fourcc);
3060
3061    if (modifiers) {
3062       int mod_hi, mod_lo;
3063       uint64_t modifier = DRM_FORMAT_MOD_INVALID;
3064       bool query;
3065
3066       query = dri2_dpy->image->queryImage(dri2_img->dri_image,
3067                                           __DRI_IMAGE_ATTRIB_MODIFIER_UPPER,
3068                                           &mod_hi);
3069       query &= dri2_dpy->image->queryImage(dri2_img->dri_image,
3070                                            __DRI_IMAGE_ATTRIB_MODIFIER_LOWER,
3071                                            &mod_lo);
3072       if (query)
3073          modifier = combine_u32_into_u64 (mod_hi, mod_lo);
3074
3075       for (int i = 0; i < num_planes; i++)
3076         modifiers[i] = modifier;
3077    }
3078
3079    return EGL_TRUE;
3080 }
3081
3082 static EGLBoolean
3083 dri2_export_dma_buf_image_mesa(const _EGLDriver *drv, _EGLDisplay *disp, _EGLImage *img,
3084                                int *fds, EGLint *strides, EGLint *offsets)
3085 {
3086    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
3087    struct dri2_egl_image *dri2_img = dri2_egl_image(img);
3088    EGLint nplanes;
3089
3090    (void) drv;
3091
3092    if (!dri2_can_export_dma_buf_image(disp, img))
3093       return EGL_FALSE;
3094
3095    /* EGL_MESA_image_dma_buf_export spec says:
3096     *    "If the number of fds is less than the number of planes, then
3097     *    subsequent fd slots should contain -1."
3098     */
3099    if (fds) {
3100       /* Query nplanes so that we know how big the given array is. */
3101       dri2_dpy->image->queryImage(dri2_img->dri_image,
3102                                   __DRI_IMAGE_ATTRIB_NUM_PLANES, &nplanes);
3103       memset(fds, -1, nplanes * sizeof(int));
3104    }
3105
3106    /* rework later to provide multiple fds/strides/offsets */
3107    if (fds)
3108       dri2_dpy->image->queryImage(dri2_img->dri_image,
3109                                   __DRI_IMAGE_ATTRIB_FD, fds);
3110
3111    if (strides)
3112       dri2_dpy->image->queryImage(dri2_img->dri_image,
3113                                   __DRI_IMAGE_ATTRIB_STRIDE, strides);
3114
3115    if (offsets) {
3116       int img_offset;
3117       bool ret = dri2_dpy->image->queryImage(dri2_img->dri_image,
3118                      __DRI_IMAGE_ATTRIB_OFFSET, &img_offset);
3119       if (ret)
3120          offsets[0] = img_offset;
3121       else
3122          offsets[0] = 0;
3123    }
3124
3125    return EGL_TRUE;
3126 }
3127
3128 #endif
3129
3130 _EGLImage *
3131 dri2_create_image_khr(const _EGLDriver *drv, _EGLDisplay *disp,
3132                       _EGLContext *ctx, EGLenum target,
3133                       EGLClientBuffer buffer, const EGLint *attr_list)
3134 {
3135    (void) drv;
3136
3137    switch (target) {
3138    case EGL_GL_TEXTURE_2D_KHR:
3139    case EGL_GL_TEXTURE_CUBE_MAP_POSITIVE_X_KHR:
3140    case EGL_GL_TEXTURE_CUBE_MAP_NEGATIVE_X_KHR:
3141    case EGL_GL_TEXTURE_CUBE_MAP_POSITIVE_Y_KHR:
3142    case EGL_GL_TEXTURE_CUBE_MAP_NEGATIVE_Y_KHR:
3143    case EGL_GL_TEXTURE_CUBE_MAP_POSITIVE_Z_KHR:
3144    case EGL_GL_TEXTURE_CUBE_MAP_NEGATIVE_Z_KHR:
3145    case EGL_GL_TEXTURE_3D_KHR:
3146       return dri2_create_image_khr_texture(disp, ctx, target, buffer, attr_list);
3147    case EGL_GL_RENDERBUFFER_KHR:
3148       return dri2_create_image_khr_renderbuffer(disp, ctx, buffer, attr_list);
3149 #ifdef HAVE_LIBDRM
3150    case EGL_DRM_BUFFER_MESA:
3151       return dri2_create_image_mesa_drm_buffer(disp, ctx, buffer, attr_list);
3152    case EGL_LINUX_DMA_BUF_EXT:
3153       return dri2_create_image_dma_buf(disp, ctx, buffer, attr_list);
3154 #endif
3155 #ifdef HAVE_WAYLAND_PLATFORM
3156    case EGL_WAYLAND_BUFFER_WL:
3157       return dri2_create_image_wayland_wl_buffer(disp, ctx, buffer, attr_list);
3158 #endif
3159    default:
3160       _eglError(EGL_BAD_PARAMETER, "dri2_create_image_khr");
3161       return EGL_NO_IMAGE_KHR;
3162    }
3163 }
3164
3165 static EGLBoolean
3166 dri2_destroy_image_khr(const _EGLDriver *drv, _EGLDisplay *disp, _EGLImage *image)
3167 {
3168    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
3169    struct dri2_egl_image *dri2_img = dri2_egl_image(image);
3170
3171    (void) drv;
3172
3173    dri2_dpy->image->destroyImage(dri2_img->dri_image);
3174    free(dri2_img);
3175
3176    return EGL_TRUE;
3177 }
3178
3179 #ifdef HAVE_WAYLAND_PLATFORM
3180
3181 static void
3182 dri2_wl_reference_buffer(void *user_data, uint32_t name, int fd,
3183                          struct wl_drm_buffer *buffer)
3184 {
3185    _EGLDisplay *disp = user_data;
3186    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
3187    __DRIimage *img;
3188    int dri_components = 0;
3189
3190    if (fd == -1)
3191       img = dri2_dpy->image->createImageFromNames(dri2_dpy->dri_screen,
3192                                                   buffer->width,
3193                                                   buffer->height,
3194                                                   buffer->format,
3195                                                   (int*)&name, 1,
3196                                                   buffer->stride,
3197                                                   buffer->offset,
3198                                                   NULL);
3199    else
3200       img = dri2_dpy->image->createImageFromFds(dri2_dpy->dri_screen,
3201                                                 buffer->width,
3202                                                 buffer->height,
3203                                                 buffer->format,
3204                                                 &fd, 1,
3205                                                 buffer->stride,
3206                                                 buffer->offset,
3207                                                 NULL);
3208
3209    if (img == NULL)
3210       return;
3211
3212    dri2_dpy->image->queryImage(img, __DRI_IMAGE_ATTRIB_COMPONENTS, &dri_components);
3213
3214    buffer->driver_format = NULL;
3215    for (int i = 0; i < ARRAY_SIZE(wl_drm_components); i++)
3216       if (wl_drm_components[i].dri_components == dri_components)
3217          buffer->driver_format = &wl_drm_components[i];
3218
3219    if (buffer->driver_format == NULL)
3220       dri2_dpy->image->destroyImage(img);
3221    else
3222       buffer->driver_buffer = img;
3223 }
3224
3225 static void
3226 dri2_wl_release_buffer(void *user_data, struct wl_drm_buffer *buffer)
3227 {
3228    _EGLDisplay *disp = user_data;
3229    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
3230
3231    dri2_dpy->image->destroyImage(buffer->driver_buffer);
3232 }
3233
3234 static EGLBoolean
3235 dri2_bind_wayland_display_wl(const _EGLDriver *drv, _EGLDisplay *disp,
3236                              struct wl_display *wl_dpy)
3237 {
3238    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
3239    const struct wayland_drm_callbacks wl_drm_callbacks = {
3240       .authenticate = (int(*)(void *, uint32_t)) dri2_dpy->vtbl->authenticate,
3241       .reference_buffer = dri2_wl_reference_buffer,
3242       .release_buffer = dri2_wl_release_buffer,
3243       .is_format_supported = dri2_wl_is_format_supported
3244    };
3245    int flags = 0;
3246    uint64_t cap;
3247
3248    (void) drv;
3249
3250    if (dri2_dpy->wl_server_drm)
3251            return EGL_FALSE;
3252
3253    if (drmGetCap(dri2_dpy->fd, DRM_CAP_PRIME, &cap) == 0 &&
3254        cap == (DRM_PRIME_CAP_IMPORT | DRM_PRIME_CAP_EXPORT) &&
3255        dri2_dpy->image->base.version >= 7 &&
3256        dri2_dpy->image->createImageFromFds != NULL)
3257       flags |= WAYLAND_DRM_PRIME;
3258
3259    dri2_dpy->wl_server_drm =
3260            wayland_drm_init(wl_dpy, dri2_dpy->device_name,
3261                             &wl_drm_callbacks, disp, flags);
3262
3263    if (!dri2_dpy->wl_server_drm)
3264            return EGL_FALSE;
3265
3266 #ifdef HAVE_DRM_PLATFORM
3267    /* We have to share the wl_drm instance with gbm, so gbm can convert
3268     * wl_buffers to gbm bos. */
3269    if (dri2_dpy->gbm_dri)
3270       dri2_dpy->gbm_dri->wl_drm = dri2_dpy->wl_server_drm;
3271 #endif
3272
3273    return EGL_TRUE;
3274 }
3275
3276 static EGLBoolean
3277 dri2_unbind_wayland_display_wl(const _EGLDriver *drv, _EGLDisplay *disp,
3278                                struct wl_display *wl_dpy)
3279 {
3280    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
3281
3282    (void) drv;
3283
3284    if (!dri2_dpy->wl_server_drm)
3285            return EGL_FALSE;
3286
3287    wayland_drm_uninit(dri2_dpy->wl_server_drm);
3288    dri2_dpy->wl_server_drm = NULL;
3289
3290    return EGL_TRUE;
3291 }
3292
3293 static EGLBoolean
3294 dri2_query_wayland_buffer_wl(const _EGLDriver *drv, _EGLDisplay *disp,
3295                              struct wl_resource *buffer_resource,
3296                              EGLint attribute, EGLint *value)
3297 {
3298    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
3299    struct wl_drm_buffer *buffer;
3300    const struct wl_drm_components_descriptor *format;
3301
3302    buffer = wayland_drm_buffer_get(dri2_dpy->wl_server_drm, buffer_resource);
3303    if (!buffer)
3304       return EGL_FALSE;
3305
3306    format = buffer->driver_format;
3307    switch (attribute) {
3308    case EGL_TEXTURE_FORMAT:
3309       *value = format->components;
3310       return EGL_TRUE;
3311    case EGL_WIDTH:
3312       *value = buffer->width;
3313       return EGL_TRUE;
3314    case EGL_HEIGHT:
3315       *value = buffer->height;
3316       return EGL_TRUE;
3317    }
3318
3319    return EGL_FALSE;
3320 }
3321 #endif
3322
3323 static void
3324 dri2_egl_ref_sync(struct dri2_egl_sync *sync)
3325 {
3326    p_atomic_inc(&sync->refcount);
3327 }
3328
3329 static void
3330 dri2_egl_unref_sync(struct dri2_egl_display *dri2_dpy,
3331                     struct dri2_egl_sync *dri2_sync)
3332 {
3333    if (p_atomic_dec_zero(&dri2_sync->refcount)) {
3334       switch (dri2_sync->base.Type) {
3335       case EGL_SYNC_REUSABLE_KHR:
3336          cnd_destroy(&dri2_sync->cond);
3337          break;
3338       case EGL_SYNC_NATIVE_FENCE_ANDROID:
3339          if (dri2_sync->base.SyncFd != EGL_NO_NATIVE_FENCE_FD_ANDROID)
3340             close(dri2_sync->base.SyncFd);
3341          break;
3342       default:
3343          break;
3344       }
3345
3346       if (dri2_sync->fence)
3347          dri2_dpy->fence->destroy_fence(dri2_dpy->dri_screen, dri2_sync->fence);
3348
3349       free(dri2_sync);
3350    }
3351 }
3352
3353 static _EGLSync *
3354 dri2_create_sync(const _EGLDriver *drv, _EGLDisplay *disp,
3355                  EGLenum type, const EGLAttrib *attrib_list)
3356 {
3357    _EGLContext *ctx = _eglGetCurrentContext();
3358    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
3359    struct dri2_egl_context *dri2_ctx = dri2_egl_context(ctx);
3360    struct dri2_egl_sync *dri2_sync;
3361    EGLint ret;
3362    pthread_condattr_t attr;
3363
3364    dri2_sync = calloc(1, sizeof(struct dri2_egl_sync));
3365    if (!dri2_sync) {
3366       _eglError(EGL_BAD_ALLOC, "eglCreateSyncKHR");
3367       return NULL;
3368    }
3369
3370    if (!_eglInitSync(&dri2_sync->base, disp, type, attrib_list)) {
3371       free(dri2_sync);
3372       return NULL;
3373    }
3374
3375    switch (type) {
3376    case EGL_SYNC_FENCE_KHR:
3377       dri2_sync->fence = dri2_dpy->fence->create_fence(dri2_ctx->dri_context);
3378       if (!dri2_sync->fence) {
3379          /* Why did it fail? DRI doesn't return an error code, so we emit
3380           * a generic EGL error that doesn't communicate user error.
3381           */
3382          _eglError(EGL_BAD_ALLOC, "eglCreateSyncKHR");
3383          free(dri2_sync);
3384          return NULL;
3385       }
3386       break;
3387
3388    case EGL_SYNC_CL_EVENT_KHR:
3389       dri2_sync->fence = dri2_dpy->fence->get_fence_from_cl_event(
3390                                  dri2_dpy->dri_screen,
3391                                  dri2_sync->base.CLEvent);
3392       /* this can only happen if the cl_event passed in is invalid. */
3393       if (!dri2_sync->fence) {
3394          _eglError(EGL_BAD_ATTRIBUTE, "eglCreateSyncKHR");
3395          free(dri2_sync);
3396          return NULL;
3397       }
3398
3399       /* the initial status must be "signaled" if the cl_event is signaled */
3400       if (dri2_dpy->fence->client_wait_sync(dri2_ctx->dri_context,
3401                                             dri2_sync->fence, 0, 0))
3402          dri2_sync->base.SyncStatus = EGL_SIGNALED_KHR;
3403       break;
3404
3405    case EGL_SYNC_REUSABLE_KHR:
3406       /* intialize attr */
3407       ret = pthread_condattr_init(&attr);
3408
3409       if (ret) {
3410          _eglError(EGL_BAD_ACCESS, "eglCreateSyncKHR");
3411          free(dri2_sync);
3412          return NULL;
3413       }
3414
3415       /* change clock attribute to CLOCK_MONOTONIC */
3416       ret = pthread_condattr_setclock(&attr, CLOCK_MONOTONIC);
3417
3418       if (ret) {
3419          _eglError(EGL_BAD_ACCESS, "eglCreateSyncKHR");
3420          free(dri2_sync);
3421          return NULL;
3422       }
3423
3424       ret = pthread_cond_init(&dri2_sync->cond, &attr);
3425
3426       if (ret) {
3427          _eglError(EGL_BAD_ACCESS, "eglCreateSyncKHR");
3428          free(dri2_sync);
3429          return NULL;
3430       }
3431
3432       /* initial status of reusable sync must be "unsignaled" */
3433       dri2_sync->base.SyncStatus = EGL_UNSIGNALED_KHR;
3434       break;
3435
3436    case EGL_SYNC_NATIVE_FENCE_ANDROID:
3437       if (dri2_dpy->fence->create_fence_fd) {
3438          dri2_sync->fence = dri2_dpy->fence->create_fence_fd(
3439                                     dri2_ctx->dri_context,
3440                                     dri2_sync->base.SyncFd);
3441       }
3442       if (!dri2_sync->fence) {
3443          _eglError(EGL_BAD_ATTRIBUTE, "eglCreateSyncKHR");
3444          free(dri2_sync);
3445          return NULL;
3446       }
3447       break;
3448    }
3449
3450    p_atomic_set(&dri2_sync->refcount, 1);
3451    return &dri2_sync->base;
3452 }
3453
3454 static EGLBoolean
3455 dri2_destroy_sync(const _EGLDriver *drv, _EGLDisplay *disp, _EGLSync *sync)
3456 {
3457    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
3458    struct dri2_egl_sync *dri2_sync = dri2_egl_sync(sync);
3459    EGLint ret = EGL_TRUE;
3460    EGLint err;
3461
3462    /* if type of sync is EGL_SYNC_REUSABLE_KHR and it is not signaled yet,
3463     * then unlock all threads possibly blocked by the reusable sync before
3464     * destroying it.
3465     */
3466    if (dri2_sync->base.Type == EGL_SYNC_REUSABLE_KHR &&
3467        dri2_sync->base.SyncStatus == EGL_UNSIGNALED_KHR) {
3468       dri2_sync->base.SyncStatus = EGL_SIGNALED_KHR;
3469       /* unblock all threads currently blocked by sync */
3470       err = cnd_broadcast(&dri2_sync->cond);
3471
3472       if (err) {
3473          _eglError(EGL_BAD_ACCESS, "eglDestroySyncKHR");
3474          ret = EGL_FALSE;
3475       }
3476    }
3477
3478    dri2_egl_unref_sync(dri2_dpy, dri2_sync);
3479
3480    return ret;
3481 }
3482
3483 static EGLint
3484 dri2_dup_native_fence_fd(const _EGLDriver *drv, _EGLDisplay *disp, _EGLSync *sync)
3485 {
3486    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
3487    struct dri2_egl_sync *dri2_sync = dri2_egl_sync(sync);
3488
3489    assert(sync->Type == EGL_SYNC_NATIVE_FENCE_ANDROID);
3490
3491    if (sync->SyncFd == EGL_NO_NATIVE_FENCE_FD_ANDROID) {
3492       /* try to retrieve the actual native fence fd.. if rendering is
3493        * not flushed this will just return -1, aka NO_NATIVE_FENCE_FD:
3494        */
3495       sync->SyncFd = dri2_dpy->fence->get_fence_fd(dri2_dpy->dri_screen,
3496                                                    dri2_sync->fence);
3497    }
3498
3499    if (sync->SyncFd == EGL_NO_NATIVE_FENCE_FD_ANDROID) {
3500       /* if native fence fd still not created, return an error: */
3501       _eglError(EGL_BAD_PARAMETER, "eglDupNativeFenceFDANDROID");
3502       return EGL_NO_NATIVE_FENCE_FD_ANDROID;
3503    }
3504
3505    return os_dupfd_cloexec(sync->SyncFd);
3506 }
3507
3508 static void
3509 dri2_set_blob_cache_funcs(const _EGLDriver *drv, _EGLDisplay *disp,
3510                           EGLSetBlobFuncANDROID set,
3511                           EGLGetBlobFuncANDROID get)
3512 {
3513    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
3514    dri2_dpy->blob->set_cache_funcs(dri2_dpy->dri_screen,
3515                                    disp->BlobCacheSet,
3516                                    disp->BlobCacheGet);
3517 }
3518
3519 static EGLint
3520 dri2_client_wait_sync(const _EGLDriver *drv, _EGLDisplay *disp, _EGLSync *sync,
3521                       EGLint flags, EGLTime timeout)
3522 {
3523    _EGLContext *ctx = _eglGetCurrentContext();
3524    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
3525    struct dri2_egl_context *dri2_ctx = dri2_egl_context(ctx);
3526    struct dri2_egl_sync *dri2_sync = dri2_egl_sync(sync);
3527    unsigned wait_flags = 0;
3528
3529    EGLint ret = EGL_CONDITION_SATISFIED_KHR;
3530
3531    /* The EGL_KHR_fence_sync spec states:
3532     *
3533     *    "If no context is current for the bound API,
3534     *     the EGL_SYNC_FLUSH_COMMANDS_BIT_KHR bit is ignored.
3535     */
3536    if (dri2_ctx && flags & EGL_SYNC_FLUSH_COMMANDS_BIT_KHR)
3537       wait_flags |= __DRI2_FENCE_FLAG_FLUSH_COMMANDS;
3538
3539    /* the sync object should take a reference while waiting */
3540    dri2_egl_ref_sync(dri2_sync);
3541
3542    switch (sync->Type) {
3543    case EGL_SYNC_FENCE_KHR:
3544    case EGL_SYNC_NATIVE_FENCE_ANDROID:
3545    case EGL_SYNC_CL_EVENT_KHR:
3546       if (dri2_dpy->fence->client_wait_sync(dri2_ctx ? dri2_ctx->dri_context : NULL,
3547                                          dri2_sync->fence, wait_flags,
3548                                          timeout))
3549          dri2_sync->base.SyncStatus = EGL_SIGNALED_KHR;
3550       else
3551          ret = EGL_TIMEOUT_EXPIRED_KHR;
3552       break;
3553
3554    case EGL_SYNC_REUSABLE_KHR:
3555       if (dri2_ctx && dri2_sync->base.SyncStatus == EGL_UNSIGNALED_KHR &&
3556           (flags & EGL_SYNC_FLUSH_COMMANDS_BIT_KHR)) {
3557          /* flush context if EGL_SYNC_FLUSH_COMMANDS_BIT_KHR is set */
3558          dri2_gl_flush();
3559       }
3560
3561       /* if timeout is EGL_FOREVER_KHR, it should wait without any timeout.*/
3562       if (timeout == EGL_FOREVER_KHR) {
3563          mtx_lock(&dri2_sync->mutex);
3564          cnd_wait(&dri2_sync->cond, &dri2_sync->mutex);
3565          mtx_unlock(&dri2_sync->mutex);
3566       } else {
3567          /* if reusable sync has not been yet signaled */
3568          if (dri2_sync->base.SyncStatus != EGL_SIGNALED_KHR) {
3569             /* timespecs for cnd_timedwait */
3570             struct timespec current;
3571             struct timespec expire;
3572
3573             /* We override the clock to monotonic when creating the condition
3574              * variable. */
3575             clock_gettime(CLOCK_MONOTONIC, &current);
3576
3577             /* calculating when to expire */
3578             expire.tv_nsec = timeout % 1000000000L;
3579             expire.tv_sec = timeout / 1000000000L;
3580
3581             expire.tv_nsec += current.tv_nsec;
3582             expire.tv_sec += current.tv_sec;
3583
3584             /* expire.nsec now is a number between 0 and 1999999998 */
3585             if (expire.tv_nsec > 999999999L) {
3586                expire.tv_sec++;
3587                expire.tv_nsec -= 1000000000L;
3588             }
3589
3590             mtx_lock(&dri2_sync->mutex);
3591             ret = cnd_timedwait(&dri2_sync->cond, &dri2_sync->mutex, &expire);
3592             mtx_unlock(&dri2_sync->mutex);
3593
3594             if (ret == thrd_busy) {
3595                if (dri2_sync->base.SyncStatus == EGL_UNSIGNALED_KHR) {
3596                   ret = EGL_TIMEOUT_EXPIRED_KHR;
3597                } else {
3598                   _eglError(EGL_BAD_ACCESS, "eglClientWaitSyncKHR");
3599                   ret = EGL_FALSE;
3600                }
3601             }
3602          }
3603       }
3604       break;
3605   }
3606   dri2_egl_unref_sync(dri2_dpy, dri2_sync);
3607
3608   return ret;
3609 }
3610
3611 static EGLBoolean
3612 dri2_signal_sync(const _EGLDriver *drv, _EGLDisplay *disp, _EGLSync *sync,
3613                       EGLenum mode)
3614 {
3615    struct dri2_egl_sync *dri2_sync = dri2_egl_sync(sync);
3616    EGLint ret;
3617
3618    if (sync->Type != EGL_SYNC_REUSABLE_KHR)
3619       return _eglError(EGL_BAD_MATCH, "eglSignalSyncKHR");
3620
3621    if (mode != EGL_SIGNALED_KHR && mode != EGL_UNSIGNALED_KHR)
3622       return _eglError(EGL_BAD_ATTRIBUTE, "eglSignalSyncKHR");
3623
3624    dri2_sync->base.SyncStatus = mode;
3625
3626    if (mode == EGL_SIGNALED_KHR) {
3627       ret = cnd_broadcast(&dri2_sync->cond);
3628
3629       /* fail to broadcast */
3630       if (ret)
3631          return _eglError(EGL_BAD_ACCESS, "eglSignalSyncKHR");
3632    }
3633
3634    return EGL_TRUE;
3635 }
3636
3637 static EGLint
3638 dri2_server_wait_sync(const _EGLDriver *drv, _EGLDisplay *disp, _EGLSync *sync)
3639 {
3640    _EGLContext *ctx = _eglGetCurrentContext();
3641    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
3642    struct dri2_egl_context *dri2_ctx = dri2_egl_context(ctx);
3643    struct dri2_egl_sync *dri2_sync = dri2_egl_sync(sync);
3644
3645    dri2_dpy->fence->server_wait_sync(dri2_ctx->dri_context,
3646                                      dri2_sync->fence, 0);
3647    return EGL_TRUE;
3648 }
3649
3650 static int
3651 dri2_interop_query_device_info(_EGLDisplay *disp, _EGLContext *ctx,
3652                                struct mesa_glinterop_device_info *out)
3653 {
3654    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
3655    struct dri2_egl_context *dri2_ctx = dri2_egl_context(ctx);
3656
3657    if (!dri2_dpy->interop)
3658       return MESA_GLINTEROP_UNSUPPORTED;
3659
3660    return dri2_dpy->interop->query_device_info(dri2_ctx->dri_context, out);
3661 }
3662
3663 static int
3664 dri2_interop_export_object(_EGLDisplay *disp, _EGLContext *ctx,
3665                            struct mesa_glinterop_export_in *in,
3666                            struct mesa_glinterop_export_out *out)
3667 {
3668    struct dri2_egl_display *dri2_dpy = dri2_egl_display(disp);
3669    struct dri2_egl_context *dri2_ctx = dri2_egl_context(ctx);
3670
3671    if (!dri2_dpy->interop)
3672       return MESA_GLINTEROP_UNSUPPORTED;
3673
3674    return dri2_dpy->interop->export_object(dri2_ctx->dri_context, in, out);
3675 }
3676
3677 const _EGLDriver _eglDriver = {
3678    .Initialize = dri2_initialize,
3679    .Terminate = dri2_terminate,
3680    .CreateContext = dri2_create_context,
3681    .DestroyContext = dri2_destroy_context,
3682    .MakeCurrent = dri2_make_current,
3683    .CreateWindowSurface = dri2_create_window_surface,
3684    .CreatePixmapSurface = dri2_create_pixmap_surface,
3685    .CreatePbufferSurface = dri2_create_pbuffer_surface,
3686    .DestroySurface = dri2_destroy_surface,
3687    .GetProcAddress = dri2_get_proc_address,
3688    .WaitClient = dri2_wait_client,
3689    .WaitNative = dri2_wait_native,
3690    .BindTexImage = dri2_bind_tex_image,
3691    .ReleaseTexImage = dri2_release_tex_image,
3692    .SwapInterval = dri2_swap_interval,
3693    .SwapBuffers = dri2_swap_buffers,
3694    .SwapBuffersWithDamageEXT = dri2_swap_buffers_with_damage,
3695    .SwapBuffersRegionNOK = dri2_swap_buffers_region,
3696    .SetDamageRegion = dri2_set_damage_region,
3697    .PostSubBufferNV = dri2_post_sub_buffer,
3698    .CopyBuffers = dri2_copy_buffers,
3699    .QueryBufferAge = dri2_query_buffer_age,
3700    .CreateImageKHR = dri2_create_image,
3701    .DestroyImageKHR = dri2_destroy_image_khr,
3702    .CreateWaylandBufferFromImageWL = dri2_create_wayland_buffer_from_image,
3703    .QuerySurface = dri2_query_surface,
3704    .QueryDriverName = dri2_query_driver_name,
3705    .QueryDriverConfig = dri2_query_driver_config,
3706 #ifdef HAVE_LIBDRM
3707    .CreateDRMImageMESA = dri2_create_drm_image_mesa,
3708    .ExportDRMImageMESA = dri2_export_drm_image_mesa,
3709    .ExportDMABUFImageQueryMESA = dri2_export_dma_buf_image_query_mesa,
3710    .ExportDMABUFImageMESA = dri2_export_dma_buf_image_mesa,
3711    .QueryDmaBufFormatsEXT = dri2_query_dma_buf_formats,
3712    .QueryDmaBufModifiersEXT = dri2_query_dma_buf_modifiers,
3713 #endif
3714 #ifdef HAVE_WAYLAND_PLATFORM
3715    .BindWaylandDisplayWL = dri2_bind_wayland_display_wl,
3716    .UnbindWaylandDisplayWL = dri2_unbind_wayland_display_wl,
3717    .QueryWaylandBufferWL = dri2_query_wayland_buffer_wl,
3718 #endif
3719    .GetSyncValuesCHROMIUM = dri2_get_sync_values_chromium,
3720    .CreateSyncKHR = dri2_create_sync,
3721    .ClientWaitSyncKHR = dri2_client_wait_sync,
3722    .SignalSyncKHR = dri2_signal_sync,
3723    .WaitSyncKHR = dri2_server_wait_sync,
3724    .DestroySyncKHR = dri2_destroy_sync,
3725    .GLInteropQueryDeviceInfo = dri2_interop_query_device_info,
3726    .GLInteropExportObject = dri2_interop_export_object,
3727    .DupNativeFenceFDANDROID = dri2_dup_native_fence_fd,
3728    .SetBlobCacheFuncsANDROID = dri2_set_blob_cache_funcs,
3729 };