src/waffle/wgl/wgl_display.c

   1 // SPDX-FileCopyrightText: Copyright 2014 Emil Velikov
   2 // SPDX-License-Identifier: BSD-2-Clause
   3
   4 #include "c99_compat.h"
   5 #include <assert.h>
   6 #include <stdlib.h>
   7 #include <windows.h>
   8
   9 #include "wcore_error.h"
  10
  11 #include "win_platform.h"
  12
  13 #include "wgl_display.h"
  14 #include "wgl_platform.h"
  15
  16 bool
  17 wgl_display_destroy(struct wcore_display *wc_self)
  18 {
  19     struct wgl_display *self = wgl_display(wc_self);
  20     bool ok = true;
  21
  22     if (self->hWnd) {
  23         if (self->hglrc) {
  24             ok &= wglDeleteContext(self->hglrc);
  25         }
  26
  27         if (self->hDC)
  28             ok &= ReleaseDC(self->hWnd, self->hDC);
  29
  30         ok &= DestroyWindow(self->hWnd);
  31     }
  32
  33     free(self);
  34     return ok;
  35 }
  36
  37 static bool
  38 wgl_display_create_window(struct wgl_platform *plat, struct wgl_display *dpy)
  39 {
  40     dpy->hWnd = CreateWindow(plat->class_name, NULL,
  41                              WS_POPUPWINDOW|WS_DISABLED,
  42                              0, 0, 0, 0, NULL, NULL, NULL, NULL);
  43     if (!dpy->hWnd)
  44         return false;
  45
  46     dpy->hDC = GetDC(dpy->hWnd);
  47     if (!dpy->hDC)
  48         return false;
  49
  50     return true;
  51 }
  52
  53 static bool
  54 wgl_display_choose_config(struct wgl_display *dpy)
  55 {
  56     // XXX: Is there a move common/appropriate pixelformat ?
  57     PIXELFORMATDESCRIPTOR pfd = {0};
  58     bool ok;
  59
  60     pfd.nSize = sizeof(PIXELFORMATDESCRIPTOR);
  61     pfd.nVersion = 1;
  62
  63     pfd.dwFlags = PFD_SUPPORT_OPENGL | PFD_DRAW_TO_WINDOW | PFD_DOUBLEBUFFER;
  64
  65     pfd.iPixelType = PFD_TYPE_RGBA;
  66     pfd.iLayerType = PFD_MAIN_PLANE;
  67     pfd.cColorBits = 32;
  68     pfd.cDepthBits = 16;
  69
  70     dpy->pixel_format = ChoosePixelFormat(dpy->hDC, &pfd);
  71     if (!dpy->pixel_format)
  72         return false;
  73
  74     ok = SetPixelFormat(dpy->hDC, dpy->pixel_format, &pfd);
  75     if (!ok)
  76         return false;
  77
  78     return true;
  79 }
  80
  81 static bool
  82 wgl_display_hardware_render(struct wgl_display *dpy)
  83 {
  84 #ifndef GL_RENDERER
  85 #define GL_RENDERER 0x1F01
  86 #endif
  87     typedef unsigned int GLenum;
  88     typedef unsigned char GLubyte;
  89     typedef const GLubyte * (__stdcall *PFNGLGETSTRINGPROC)(GLenum name);
  90
  91     PFNGLGETSTRINGPROC glGetString_func;
  92     const GLubyte *gl_renderer;
  93
  94     glGetString_func = win_platform_dlsym(dpy->wcore.platform, WAFFLE_DL_OPENGL,
  95                                           "glGetString");
  96     if (!glGetString_func)
  97         return false;
  98
  99     gl_renderer = glGetString_func(GL_RENDERER);
 100
 101     // Bail out if we cannot retrieve the renderer string or if we're using GDI
 102     if (!gl_renderer || strcasecmp((const char *)gl_renderer, "GDI Generic") == 0)
 103         return false;
 104
 105     return true;
 106 }
 107
 108 static bool
 109 wgl_display_set_extensions(struct wgl_display *dpy)
 110 {
 111     typedef const char * (__stdcall *PFNWGLGETEXTENSIONSSTRINGARBPROC)(HDC hdc);
 112     PFNWGLGETEXTENSIONSSTRINGARBPROC wglGetExtensionsStringARB_func;
 113     const char *extensions;
 114
 115     wglGetExtensionsStringARB_func = (void *)wglGetProcAddress("wglGetExtensionsStringARB");
 116     if (!wglGetExtensionsStringARB_func) {
 117         wcore_errorf(WAFFLE_ERROR_UNKNOWN,
 118                      "wglGetProcAddress(\"wglGetExtensionsStringARB\") failed");
 119         return false;
 120     }
 121
 122     extensions = wglGetExtensionsStringARB_func(dpy->hDC);
 123
 124     if (!extensions) {
 125         wcore_errorf(WAFFLE_ERROR_UNKNOWN,
 126                      "wglGetExtensionsStringARB failed");
 127         return false;
 128     }
 129
 130     dpy->ARB_create_context                     = waffle_is_extension_in_string(extensions, "WGL_ARB_create_context");
 131     dpy->ARB_create_context_profile             = waffle_is_extension_in_string(extensions, "WGL_ARB_create_context_profile");
 132     dpy->ARB_create_context_robustness          = waffle_is_extension_in_string(extensions, "WGL_ARB_create_context_robustness");
 133     dpy->EXT_create_context_es_profile          = waffle_is_extension_in_string(extensions, "WGL_EXT_create_context_es_profile");
 134
 135     // The WGL_EXT_create_context_es2_profile spec, version 5 2012/04/06,
 136     // states that WGL_EXT_create_context_es_profile is an alias of
 137     // WGL_EXT_create_context_es2_profile and requires that both names must be
 138     // exported together for backwards compatibility with clients that expect
 139     // the es2_profile name.
 140     if (dpy->EXT_create_context_es_profile) {
 141         dpy->EXT_create_context_es2_profile = true;
 142     }
 143     else {
 144         // Assume that WGL does not implement version 3 of the extension, in
 145         // which case the ES contexts WGL is capable of creating is ES2.
 146         dpy->EXT_create_context_es2_profile = waffle_is_extension_in_string(extensions, "WGL_EXT_create_context_es2_profile");
 147     }
 148
 149     dpy->ARB_pixel_format = waffle_is_extension_in_string(extensions, "WGL_ARB_pixel_format");
 150
 151     return true;
 152 }
 153
 154 static bool
 155 wgl_display_set_func_ptrs(struct wgl_display *dpy)
 156 {
 157     if (dpy->ARB_create_context) {
 158         dpy->wglCreateContextAttribsARB = (void *)wglGetProcAddress("wglCreateContextAttribsARB");
 159         if (!dpy->wglCreateContextAttribsARB) {
 160             wcore_errorf(WAFFLE_ERROR_UNKNOWN,
 161                          "wglGetProcAddress(\"wglCreateContextAttribsARB\") failed");
 162             return false;
 163         }
 164     }
 165
 166     if (dpy->ARB_pixel_format) {
 167         dpy->wglChoosePixelFormatARB = (void *)wglGetProcAddress("wglChoosePixelFormatARB");
 168         if (!dpy->wglChoosePixelFormatARB) {
 169             wcore_errorf(WAFFLE_ERROR_UNKNOWN,
 170                          "wglGetProcAddress(\"wglChoosePixelFormatARB\") failed");
 171             return false;
 172         }
 173     }
 174
 175     return true;
 176 }
 177
 178 struct wcore_display*
 179 wgl_display_connect(struct wcore_platform *wc_plat,
 180                     const char *name)
 181 {
 182     struct wgl_display *self;
 183     bool ok;
 184
 185     self = wcore_calloc(sizeof(*self));
 186     if (!self)
 187         return NULL;
 188
 189     wcore_display_init(&self->wcore, wc_plat);
 190
 191     ok = wgl_display_create_window(wgl_platform(wc_plat), self);
 192     if (!ok)
 193         goto error;
 194
 195     ok = wgl_display_choose_config(self);
 196     if (!ok)
 197         goto error;
 198
 199     self->hglrc = wglCreateContext(self->hDC);
 200     if (!self->hglrc)
 201         goto error;
 202
 203     ok = wglMakeCurrent(self->hDC, self->hglrc);
 204     if (!ok)
 205         goto error;
 206
 207     ok = wgl_display_hardware_render(self);
 208     if (!ok)
 209         goto error;
 210
 211     ok = wgl_display_set_extensions(self);
 212     if (!ok)
 213         goto error;
 214
 215     ok = wgl_display_set_func_ptrs(self);
 216     if (!ok)
 217         goto error;
 218
 219     ok = wglMakeCurrent(NULL, NULL);
 220     if (!ok)
 221         goto error;
 222
 223     return &self->wcore;
 224
 225 error:
 226     wgl_display_destroy(&self->wcore);
 227     return NULL;
 228 }
 229
 230 bool
 231 wgl_display_supports_context_api(struct wcore_display *wc_self,
 232                                  int32_t context_api)
 233 {
 234     struct wgl_display *self = wgl_display(wc_self);
 235
 236     switch (context_api) {
 237         case WAFFLE_CONTEXT_OPENGL:
 238             return true;
 239         case WAFFLE_CONTEXT_OPENGL_ES1:
 240             return self->EXT_create_context_es_profile;
 241         case WAFFLE_CONTEXT_OPENGL_ES2:
 242             return self->EXT_create_context_es2_profile;
 243         case WAFFLE_CONTEXT_OPENGL_ES3:
 244             return self->EXT_create_context_es_profile;
 245         default:
 246             assert(false);
 247             return false;
 248     }
 249 }