| /* |
| * Copyright © 2011 Intel Corporation |
| * |
| * Permission is hereby granted, free of charge, to any person obtaining a |
| * copy of this software and associated documentation files (the "Software"), |
| * to deal in the Software without restriction, including without limitation |
| * the rights to use, copy, modify, merge, publish, distribute, sublicense, |
| * and/or sell copies of the Software, and to permit persons to whom the |
| * Software is furnished to do so, subject to the following conditions: |
| * |
| * The above copyright notice and this permission notice (including the next |
| * paragraph) shall be included in all copies or substantial portions of the |
| * Software. |
| * |
| * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, |
| * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF |
| * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND |
| * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT |
| * HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, |
| * WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, |
| * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER |
| * DEALINGS IN THE SOFTWARE. |
| * |
| * Authors: |
| * Benjamin Franzke <benjaminfranzke@googlemail.com> |
| */ |
| |
| #include <stdio.h> |
| #include <stdlib.h> |
| #include <stddef.h> |
| #include <stdint.h> |
| #include <string.h> |
| #include <limits.h> |
| |
| #include <sys/types.h> |
| #include <sys/mman.h> |
| #include <unistd.h> |
| #include <dlfcn.h> |
| #include <xf86drm.h> |
| |
| #include <GL/gl.h> /* dri_interface needs GL types */ |
| #include <GL/internal/dri_interface.h> |
| |
| #include "gbm_driint.h" |
| |
| #include "gbmint.h" |
| |
| /* For importing wl_buffer */ |
| #if HAVE_WAYLAND_PLATFORM |
| #include "../../../egl/wayland/wayland-drm/wayland-drm.h" |
| #endif |
| |
| static __DRIimage * |
| dri_lookup_egl_image(__DRIscreen *screen, void *image, void *data) |
| { |
| struct gbm_dri_device *dri = data; |
| |
| if (dri->lookup_image == NULL) |
| return NULL; |
| |
| return dri->lookup_image(screen, image, dri->lookup_user_data); |
| } |
| |
| static __DRIbuffer * |
| dri_get_buffers(__DRIdrawable * driDrawable, |
| int *width, int *height, |
| unsigned int *attachments, int count, |
| int *out_count, void *data) |
| { |
| struct gbm_dri_surface *surf = data; |
| struct gbm_dri_device *dri = gbm_dri_device(surf->base.gbm); |
| |
| if (dri->get_buffers == NULL) |
| return NULL; |
| |
| return dri->get_buffers(driDrawable, width, height, attachments, |
| count, out_count, surf->dri_private); |
| } |
| |
| static void |
| dri_flush_front_buffer(__DRIdrawable * driDrawable, void *data) |
| { |
| struct gbm_dri_surface *surf = data; |
| struct gbm_dri_device *dri = gbm_dri_device(surf->base.gbm); |
| |
| if (dri->flush_front_buffer != NULL) |
| dri->flush_front_buffer(driDrawable, surf->dri_private); |
| } |
| |
| static __DRIbuffer * |
| dri_get_buffers_with_format(__DRIdrawable * driDrawable, |
| int *width, int *height, |
| unsigned int *attachments, int count, |
| int *out_count, void *data) |
| { |
| struct gbm_dri_surface *surf = data; |
| struct gbm_dri_device *dri = gbm_dri_device(surf->base.gbm); |
| |
| if (dri->get_buffers_with_format == NULL) |
| return NULL; |
| |
| return |
| dri->get_buffers_with_format(driDrawable, width, height, attachments, |
| count, out_count, surf->dri_private); |
| } |
| |
| static const __DRIuseInvalidateExtension use_invalidate = { |
| { __DRI_USE_INVALIDATE, 1 } |
| }; |
| |
| static const __DRIimageLookupExtension image_lookup_extension = { |
| { __DRI_IMAGE_LOOKUP, 1 }, |
| dri_lookup_egl_image |
| }; |
| |
| const __DRIdri2LoaderExtension dri2_loader_extension = { |
| { __DRI_DRI2_LOADER, 3 }, |
| dri_get_buffers, |
| dri_flush_front_buffer, |
| dri_get_buffers_with_format, |
| }; |
| |
| struct dri_extension_match { |
| const char *name; |
| int version; |
| int offset; |
| }; |
| |
| static struct dri_extension_match dri_core_extensions[] = { |
| { __DRI2_FLUSH, 1, offsetof(struct gbm_dri_device, flush) }, |
| { __DRI_IMAGE, 1, offsetof(struct gbm_dri_device, image) }, |
| { NULL, 0, 0 } |
| }; |
| |
| static struct dri_extension_match gbm_dri_device_extensions[] = { |
| { __DRI_CORE, 1, offsetof(struct gbm_dri_device, core) }, |
| { __DRI_DRI2, 1, offsetof(struct gbm_dri_device, dri2) }, |
| { NULL, 0, 0 } |
| }; |
| |
| static int |
| dri_bind_extensions(struct gbm_dri_device *dri, |
| struct dri_extension_match *matches, |
| const __DRIextension **extensions) |
| { |
| int i, j, ret = 0; |
| void *field; |
| |
| for (i = 0; extensions[i]; i++) { |
| for (j = 0; matches[j].name; j++) { |
| if (strcmp(extensions[i]->name, matches[j].name) == 0 && |
| extensions[i]->version >= matches[j].version) { |
| field = ((char *) dri + matches[j].offset); |
| *(const __DRIextension **) field = extensions[i]; |
| } |
| } |
| } |
| |
| for (j = 0; matches[j].name; j++) { |
| field = ((char *) dri + matches[j].offset); |
| if (*(const __DRIextension **) field == NULL) { |
| ret = -1; |
| } |
| } |
| |
| return ret; |
| } |
| |
| static int |
| dri_load_driver(struct gbm_dri_device *dri) |
| { |
| const __DRIextension **extensions; |
| char path[PATH_MAX], *search_paths, *p, *next, *end; |
| |
| search_paths = NULL; |
| if (geteuid() == getuid()) { |
| /* don't allow setuid apps to use GBM_DRIVERS_PATH */ |
| search_paths = getenv("GBM_DRIVERS_PATH"); |
| } |
| if (search_paths == NULL) |
| search_paths = DEFAULT_DRIVER_DIR; |
| |
| dri->driver = NULL; |
| end = search_paths + strlen(search_paths); |
| for (p = search_paths; p < end && dri->driver == NULL; p = next + 1) { |
| int len; |
| next = strchr(p, ':'); |
| if (next == NULL) |
| next = end; |
| |
| len = next - p; |
| #if GLX_USE_TLS |
| snprintf(path, sizeof path, |
| "%.*s/tls/%s_dri.so", len, p, dri->base.driver_name); |
| dri->driver = dlopen(path, RTLD_NOW | RTLD_GLOBAL); |
| #endif |
| if (dri->driver == NULL) { |
| snprintf(path, sizeof path, |
| "%.*s/%s_dri.so", len, p, dri->base.driver_name); |
| dri->driver = dlopen(path, RTLD_NOW | RTLD_GLOBAL); |
| if (dri->driver == NULL) |
| fprintf(stderr, "failed to open %s: %s\n", path, dlerror()); |
| } |
| } |
| |
| if (dri->driver == NULL) { |
| fprintf(stderr, "gbm: failed to open any driver (search paths %s)", |
| search_paths); |
| return -1; |
| } |
| |
| extensions = dlsym(dri->driver, __DRI_DRIVER_EXTENSIONS); |
| if (extensions == NULL) { |
| fprintf(stderr, "gbm: driver exports no extensions (%s)", dlerror()); |
| dlclose(dri->driver); |
| return -1; |
| } |
| |
| |
| if (dri_bind_extensions(dri, gbm_dri_device_extensions, extensions) < 0) { |
| dlclose(dri->driver); |
| fprintf(stderr, "failed to bind extensions\n"); |
| return -1; |
| } |
| |
| return 0; |
| } |
| |
| static int |
| dri_screen_create(struct gbm_dri_device *dri) |
| { |
| const __DRIextension **extensions; |
| int ret = 0; |
| |
| dri->base.driver_name = dri_fd_get_driver_name(dri->base.base.fd); |
| if (dri->base.driver_name == NULL) |
| return -1; |
| |
| ret = dri_load_driver(dri); |
| if (ret) { |
| fprintf(stderr, "failed to load driver: %s\n", dri->base.driver_name); |
| return ret; |
| }; |
| |
| dri->extensions[0] = &image_lookup_extension.base; |
| dri->extensions[1] = &use_invalidate.base; |
| dri->extensions[2] = &dri2_loader_extension.base; |
| dri->extensions[3] = NULL; |
| |
| if (dri->dri2 == NULL) |
| return -1; |
| |
| dri->screen = dri->dri2->createNewScreen(0, dri->base.base.fd, |
| dri->extensions, |
| &dri->driver_configs, dri); |
| if (dri->screen == NULL) |
| return -1; |
| |
| extensions = dri->core->getExtensions(dri->screen); |
| if (dri_bind_extensions(dri, dri_core_extensions, extensions) < 0) { |
| ret = -1; |
| goto free_screen; |
| } |
| |
| dri->lookup_image = NULL; |
| dri->lookup_user_data = NULL; |
| |
| return 0; |
| |
| free_screen: |
| dri->core->destroyScreen(dri->screen); |
| |
| return ret; |
| } |
| |
| static int |
| gbm_dri_is_format_supported(struct gbm_device *gbm, |
| uint32_t format, |
| uint32_t usage) |
| { |
| switch (format) { |
| case GBM_BO_FORMAT_XRGB8888: |
| case GBM_FORMAT_XRGB8888: |
| break; |
| case GBM_BO_FORMAT_ARGB8888: |
| case GBM_FORMAT_ARGB8888: |
| if (usage & GBM_BO_USE_SCANOUT) |
| return 0; |
| break; |
| default: |
| return 0; |
| } |
| |
| if (usage & GBM_BO_USE_CURSOR_64X64 && |
| usage & GBM_BO_USE_RENDERING) |
| return 0; |
| |
| return 1; |
| } |
| |
| static int |
| gbm_dri_bo_write(struct gbm_bo *_bo, const void *buf, size_t count) |
| { |
| struct gbm_dri_bo *bo = gbm_dri_bo(_bo); |
| |
| if (bo->image != NULL) |
| return -1; |
| |
| memcpy(bo->map, buf, count); |
| |
| return 0; |
| } |
| |
| static void |
| gbm_dri_bo_destroy(struct gbm_bo *_bo) |
| { |
| struct gbm_dri_device *dri = gbm_dri_device(_bo->gbm); |
| struct gbm_dri_bo *bo = gbm_dri_bo(_bo); |
| struct drm_mode_destroy_dumb arg; |
| |
| if (bo->image != NULL) { |
| dri->image->destroyImage(bo->image); |
| } else { |
| munmap(bo->map, bo->size); |
| memset(&arg, 0, sizeof(arg)); |
| arg.handle = bo->handle; |
| drmIoctl(dri->base.base.fd, DRM_IOCTL_MODE_DESTROY_DUMB, &arg); |
| } |
| |
| free(bo); |
| } |
| |
| static uint32_t |
| gbm_dri_to_gbm_format(uint32_t dri_format) |
| { |
| uint32_t ret = 0; |
| |
| switch (dri_format) { |
| case __DRI_IMAGE_FORMAT_RGB565: |
| ret = GBM_FORMAT_RGB565; |
| break; |
| case __DRI_IMAGE_FORMAT_XRGB8888: |
| ret = GBM_FORMAT_XRGB8888; |
| break; |
| case __DRI_IMAGE_FORMAT_ARGB8888: |
| ret = GBM_FORMAT_ARGB8888; |
| break; |
| case __DRI_IMAGE_FORMAT_ABGR8888: |
| ret = GBM_FORMAT_ABGR8888; |
| break; |
| default: |
| ret = 0; |
| break; |
| } |
| |
| return ret; |
| } |
| |
| static struct gbm_bo * |
| gbm_dri_bo_import(struct gbm_device *gbm, |
| uint32_t type, void *buffer, uint32_t usage) |
| { |
| struct gbm_dri_device *dri = gbm_dri_device(gbm); |
| struct gbm_dri_bo *bo; |
| __DRIimage *image; |
| unsigned dri_use = 0; |
| int gbm_format; |
| |
| /* Required for query image WIDTH & HEIGHT */ |
| if (dri->image->base.version < 4) |
| return NULL; |
| |
| switch (type) { |
| #if HAVE_WAYLAND_PLATFORM |
| case GBM_BO_IMPORT_WL_BUFFER: |
| { |
| struct wl_drm_buffer *wb = (struct wl_drm_buffer *) buffer; |
| |
| if (!wayland_buffer_is_drm(buffer)) |
| return NULL; |
| |
| image = wb->driver_buffer; |
| |
| switch (wb->format) { |
| case WL_DRM_FORMAT_XRGB8888: |
| gbm_format = GBM_FORMAT_XRGB8888; |
| break; |
| case WL_DRM_FORMAT_ARGB8888: |
| gbm_format = GBM_FORMAT_ARGB8888; |
| break; |
| case WL_DRM_FORMAT_YUYV: |
| gbm_format = GBM_FORMAT_YUYV; |
| break; |
| default: |
| return NULL; |
| } |
| break; |
| } |
| #endif |
| |
| case GBM_BO_IMPORT_EGL_IMAGE: |
| { |
| int dri_format; |
| if (dri->lookup_image == NULL) |
| return NULL; |
| |
| image = dri->lookup_image(dri->screen, buffer, dri->lookup_user_data); |
| dri->image->queryImage(image, __DRI_IMAGE_ATTRIB_FORMAT, &dri_format); |
| gbm_format = gbm_dri_to_gbm_format(dri_format); |
| if (gbm_format == 0) |
| return NULL; |
| break; |
| } |
| |
| default: |
| return NULL; |
| } |
| |
| |
| bo = calloc(1, sizeof *bo); |
| if (bo == NULL) |
| return NULL; |
| |
| bo->image = dri->image->dupImage(image, NULL); |
| |
| if (usage & GBM_BO_USE_SCANOUT) |
| dri_use |= __DRI_IMAGE_USE_SCANOUT; |
| if (usage & GBM_BO_USE_CURSOR_64X64) |
| dri_use |= __DRI_IMAGE_USE_CURSOR; |
| if (dri->image->base.version >= 2 && |
| !dri->image->validateUsage(bo->image, dri_use)) { |
| free(bo); |
| return NULL; |
| } |
| |
| bo->base.base.gbm = gbm; |
| bo->base.base.format = gbm_format; |
| |
| dri->image->queryImage(bo->image, __DRI_IMAGE_ATTRIB_WIDTH, |
| (int*)&bo->base.base.width); |
| dri->image->queryImage(bo->image, __DRI_IMAGE_ATTRIB_HEIGHT, |
| (int*)&bo->base.base.height); |
| dri->image->queryImage(bo->image, __DRI_IMAGE_ATTRIB_STRIDE, |
| (int*)&bo->base.base.stride); |
| dri->image->queryImage(bo->image, __DRI_IMAGE_ATTRIB_HANDLE, |
| &bo->base.base.handle.s32); |
| |
| return &bo->base.base; |
| } |
| |
| static struct gbm_bo * |
| create_dumb(struct gbm_device *gbm, |
| uint32_t width, uint32_t height, |
| uint32_t format, uint32_t usage) |
| { |
| struct gbm_dri_device *dri = gbm_dri_device(gbm); |
| struct drm_mode_create_dumb create_arg; |
| struct drm_mode_map_dumb map_arg; |
| struct gbm_dri_bo *bo; |
| struct drm_mode_destroy_dumb destroy_arg; |
| int ret; |
| |
| if (!(usage & GBM_BO_USE_CURSOR_64X64)) |
| return NULL; |
| if (format != GBM_FORMAT_ARGB8888) |
| return NULL; |
| |
| bo = calloc(1, sizeof *bo); |
| if (bo == NULL) |
| return NULL; |
| |
| create_arg.bpp = 32; |
| create_arg.width = width; |
| create_arg.height = height; |
| |
| ret = drmIoctl(dri->base.base.fd, DRM_IOCTL_MODE_CREATE_DUMB, &create_arg); |
| if (ret) |
| goto free_bo; |
| |
| bo->base.base.gbm = gbm; |
| bo->base.base.width = width; |
| bo->base.base.height = height; |
| bo->base.base.stride = create_arg.pitch; |
| bo->base.base.handle.u32 = create_arg.handle; |
| bo->handle = create_arg.handle; |
| bo->size = create_arg.size; |
| |
| memset(&map_arg, 0, sizeof(map_arg)); |
| map_arg.handle = bo->handle; |
| |
| ret = drmIoctl(dri->base.base.fd, DRM_IOCTL_MODE_MAP_DUMB, &map_arg); |
| if (ret) |
| goto destroy_dumb; |
| |
| bo->map = mmap(0, bo->size, PROT_WRITE, |
| MAP_SHARED, dri->base.base.fd, map_arg.offset); |
| if (bo->map == MAP_FAILED) |
| goto destroy_dumb; |
| |
| return &bo->base.base; |
| |
| destroy_dumb: |
| memset(&destroy_arg, 0, sizeof destroy_arg); |
| destroy_arg.handle = create_arg.handle; |
| drmIoctl(dri->base.base.fd, DRM_IOCTL_MODE_DESTROY_DUMB, &destroy_arg); |
| free_bo: |
| free(bo); |
| |
| return NULL; |
| } |
| |
| static struct gbm_bo * |
| gbm_dri_bo_create(struct gbm_device *gbm, |
| uint32_t width, uint32_t height, |
| uint32_t format, uint32_t usage) |
| { |
| struct gbm_dri_device *dri = gbm_dri_device(gbm); |
| struct gbm_dri_bo *bo; |
| int dri_format; |
| unsigned dri_use = 0; |
| |
| if (usage & GBM_BO_USE_WRITE) |
| return create_dumb(gbm, width, height, format, usage); |
| |
| bo = calloc(1, sizeof *bo); |
| if (bo == NULL) |
| return NULL; |
| |
| bo->base.base.gbm = gbm; |
| bo->base.base.width = width; |
| bo->base.base.height = height; |
| |
| switch (format) { |
| case GBM_FORMAT_RGB565: |
| dri_format =__DRI_IMAGE_FORMAT_RGB565; |
| break; |
| case GBM_FORMAT_XRGB8888: |
| case GBM_BO_FORMAT_XRGB8888: |
| dri_format = __DRI_IMAGE_FORMAT_XRGB8888; |
| break; |
| case GBM_FORMAT_ARGB8888: |
| case GBM_BO_FORMAT_ARGB8888: |
| dri_format = __DRI_IMAGE_FORMAT_ARGB8888; |
| break; |
| case GBM_FORMAT_ABGR8888: |
| dri_format = __DRI_IMAGE_FORMAT_ABGR8888; |
| break; |
| default: |
| return NULL; |
| } |
| |
| if (usage & GBM_BO_USE_SCANOUT) |
| dri_use |= __DRI_IMAGE_USE_SCANOUT; |
| if (usage & GBM_BO_USE_CURSOR_64X64) |
| dri_use |= __DRI_IMAGE_USE_CURSOR; |
| |
| /* Gallium drivers requires shared in order to get the handle/stride */ |
| dri_use |= __DRI_IMAGE_USE_SHARE; |
| |
| bo->image = |
| dri->image->createImage(dri->screen, |
| width, height, |
| dri_format, dri_use, |
| bo); |
| if (bo->image == NULL) |
| return NULL; |
| |
| dri->image->queryImage(bo->image, __DRI_IMAGE_ATTRIB_HANDLE, |
| &bo->base.base.handle.s32); |
| dri->image->queryImage(bo->image, __DRI_IMAGE_ATTRIB_STRIDE, |
| (int *) &bo->base.base.stride); |
| |
| return &bo->base.base; |
| } |
| |
| static struct gbm_surface * |
| gbm_dri_surface_create(struct gbm_device *gbm, |
| uint32_t width, uint32_t height, |
| uint32_t format, uint32_t flags) |
| { |
| struct gbm_dri_surface *surf; |
| |
| surf = calloc(1, sizeof *surf); |
| if (surf == NULL) |
| return NULL; |
| |
| surf->base.gbm = gbm; |
| surf->base.width = width; |
| surf->base.height = height; |
| surf->base.format = format; |
| surf->base.flags = flags; |
| |
| return &surf->base; |
| } |
| |
| static void |
| gbm_dri_surface_destroy(struct gbm_surface *_surf) |
| { |
| struct gbm_dri_surface *surf = gbm_dri_surface(_surf); |
| |
| free(surf); |
| } |
| |
| static void |
| dri_destroy(struct gbm_device *gbm) |
| { |
| struct gbm_dri_device *dri = gbm_dri_device(gbm); |
| |
| dri->core->destroyScreen(dri->screen); |
| free(dri->driver_configs); |
| dlclose(dri->driver); |
| free(dri->base.driver_name); |
| |
| free(dri); |
| } |
| |
| static struct gbm_device * |
| dri_device_create(int fd) |
| { |
| struct gbm_dri_device *dri; |
| int ret; |
| |
| dri = calloc(1, sizeof *dri); |
| |
| dri->base.base.fd = fd; |
| dri->base.base.bo_create = gbm_dri_bo_create; |
| dri->base.base.bo_import = gbm_dri_bo_import; |
| dri->base.base.is_format_supported = gbm_dri_is_format_supported; |
| dri->base.base.bo_write = gbm_dri_bo_write; |
| dri->base.base.bo_destroy = gbm_dri_bo_destroy; |
| dri->base.base.destroy = dri_destroy; |
| dri->base.base.surface_create = gbm_dri_surface_create; |
| dri->base.base.surface_destroy = gbm_dri_surface_destroy; |
| |
| dri->base.type = GBM_DRM_DRIVER_TYPE_DRI; |
| dri->base.base.name = "drm"; |
| |
| ret = dri_screen_create(dri); |
| if (ret) |
| goto err_dri; |
| |
| return &dri->base.base; |
| |
| err_dri: |
| free(dri); |
| |
| return NULL; |
| } |
| |
| struct gbm_backend gbm_dri_backend = { |
| .backend_name = "dri", |
| .create_device = dri_device_create, |
| }; |