src/core.c

Mon, 30 Oct 2023 17:40:34 +0100

author
Mike Becker <universe@uap-core.de>
date
Mon, 30 Oct 2023 17:40:34 +0100
changeset 1
e3113d4e2fc0
parent 0
593b60458157
child 2
bb2bfff31f1d
permissions
-rw-r--r--

update uwproj files

universe@0 1 /*
universe@0 2 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS HEADER.
universe@0 3 * Copyright 2023 Mike Becker. All rights reserved.
universe@0 4 *
universe@0 5 * Redistribution and use in source and binary forms, with or without
universe@0 6 * modification, are permitted provided that the following conditions are met:
universe@0 7 *
universe@0 8 * 1. Redistributions of source code must retain the above copyright
universe@0 9 * notice, this list of conditions and the following disclaimer.
universe@0 10 *
universe@0 11 * 2. Redistributions in binary form must reproduce the above copyright
universe@0 12 * notice, this list of conditions and the following disclaimer in the
universe@0 13 * documentation and/or other materials provided with the distribution.
universe@0 14 *
universe@0 15 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
universe@0 16 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
universe@0 17 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
universe@0 18 * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE
universe@0 19 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
universe@0 20 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
universe@0 21 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
universe@0 22 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
universe@0 23 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
universe@0 24 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
universe@0 25 * POSSIBILITY OF SUCH DAMAGE.
universe@0 26 */
universe@0 27
universe@0 28 #include "ascension/core.h"
universe@0 29 #include "ascension/utils.h"
universe@0 30
universe@0 31 #include <cx/linked_list.h>
universe@0 32 #include <cx/printf.h>
universe@0 33
universe@0 34 static void asc_gl_debug_callback(
universe@0 35 GLenum source, GLenum type, GLuint id, GLenum severity,
universe@0 36 GLsizei length, const GLchar* message,
universe@0 37 const void* userParam
universe@0 38 ) {
universe@0 39 cxmutstr buf = cx_asprintf(
universe@0 40 "source = %d, id = %u, type = %d, severity= %d, message = %.*s",
universe@0 41 source, id, type, severity, length, message);
universe@0 42 if (type == GL_DEBUG_TYPE_ERROR) {
universe@0 43 asc_error(buf.ptr);
universe@0 44 } else {
universe@0 45 asc_dprintf("GL debug: %*.s", (int)buf.length, buf.ptr);
universe@0 46 }
universe@0 47 cx_strfree(&buf);
universe@0 48 }
universe@0 49
universe@0 50 AscContext asc_context;
universe@0 51
universe@0 52 // forward declarations
universe@0 53 static void asc_window_destroy_impl(AscWindow* window);
universe@0 54
universe@0 55 void asc_context_initialize(void) {
universe@0 56 if (asc_test_flag(asc_context.flags, ASC_FLAG_INITILIZED))
universe@0 57 return;
universe@0 58 asc_clear_flag(&asc_context.flags, ASC_FLAG_HAS_ERROR);
universe@0 59
universe@0 60 // initialize error buffer
universe@0 61 cxBufferInit(
universe@0 62 &asc_context.error_buffer,
universe@0 63 NULL,
universe@0 64 256,
universe@0 65 NULL,
universe@0 66 CX_BUFFER_AUTO_EXTEND
universe@0 67 );
universe@0 68
universe@0 69 // initialize lists
universe@0 70 asc_context.windows = cxLinkedListCreateSimple(CX_STORE_POINTERS);
universe@0 71 asc_context.windows->simple_destructor =
universe@0 72 (cx_destructor_func)asc_window_destroy_impl;
universe@0 73
universe@0 74 // initialize SDL
universe@0 75 if (SDL_Init(SDL_INIT_VIDEO) < 0) {
universe@0 76 asc_error(SDL_GetError());
universe@0 77 } else {
universe@0 78 if (TTF_Init() < 0) {
universe@0 79 asc_error(TTF_GetError());
universe@0 80 }
universe@0 81 }
universe@0 82 SDL_ClearError();
universe@0 83 asc_set_flag(&asc_context.flags, ASC_FLAG_INITILIZED);
universe@0 84 asc_dprintf("Ascension context initialized.");
universe@0 85 }
universe@0 86
universe@0 87 void asc_context_destroy(void) {
universe@0 88 // destroy lists
universe@0 89 cxListDestroy(asc_context.windows);
universe@0 90
universe@0 91 // quit SDL
universe@0 92 if (TTF_WasInit())
universe@0 93 TTF_Quit();
universe@0 94 SDL_Quit();
universe@0 95
universe@0 96 // destroy the error buffer
universe@0 97 cxBufferDestroy(&asc_context.error_buffer);
universe@0 98 asc_context.flags = 0;
universe@0 99 asc_dprintf("Ascension context destroyed.");
universe@0 100 }
universe@0 101
universe@0 102 void asc_error_cchar(char const* text) {
universe@0 103 asc_error_cxstr(cx_str(text));
universe@0 104 }
universe@0 105
universe@0 106 void asc_error_cuchar(unsigned char const* text) {
universe@0 107 asc_error_cxstr(cx_str((char const*)text));
universe@0 108 }
universe@0 109
universe@0 110 void asc_error_cxstr(cxstring text) {
universe@0 111 if (text.length == 0) return;
universe@0 112
universe@0 113 // write error to debug output
universe@0 114 asc_dprintf("ERROR: %*.s", (int)text.length, text.ptr);
universe@0 115
universe@0 116 // write error to buffer
universe@0 117 CxBuffer* buf = &asc_context.error_buffer;
universe@0 118 cxBufferWrite(text.ptr, 1, text.length, buf);
universe@0 119 cxBufferPut(buf, '\n');
universe@0 120
universe@0 121 asc_set_flag(&asc_context.flags, ASC_FLAG_HAS_ERROR);
universe@0 122 }
universe@0 123
universe@0 124 bool asc_has_error(void) {
universe@0 125 return asc_test_flag(asc_context.flags, ASC_FLAG_HAS_ERROR);
universe@0 126 }
universe@0 127
universe@0 128 char const* asc_get_error(void) {
universe@0 129 // we zero-terminate the current buffer contents before providing them
universe@0 130 cxBufferPut(&asc_context.error_buffer, 0);
universe@0 131 --asc_context.error_buffer.pos;
universe@0 132 --asc_context.error_buffer.size;
universe@0 133 return asc_context.error_buffer.space;
universe@0 134 }
universe@0 135
universe@0 136 void asc_clear_error(void) {
universe@0 137 cxBufferClear(&asc_context.error_buffer);
universe@0 138 asc_clear_flag(&asc_context.flags, ASC_FLAG_HAS_ERROR);
universe@0 139 }
universe@0 140
universe@0 141 static void asc_event_window_resized(Uint32 id, Sint32 width, Sint32 height) {
universe@0 142 CxIterator iter = cxListIterator(asc_context.windows);
universe@0 143 cx_foreach(AscWindow*, w, iter) {
universe@0 144 if (w->id == id) {
universe@0 145 w->width = width;
universe@0 146 w->height = height;
universe@0 147 return;
universe@0 148 }
universe@0 149 }
universe@0 150 }
universe@0 151
universe@0 152 bool asc_loop_next(void) {
universe@0 153 // dispatch SDL events
universe@0 154 SDL_Event event;
universe@0 155 while (SDL_PollEvent(&event)) {
universe@0 156 switch (event.type) {
universe@0 157 case SDL_QUIT:return false;
universe@0 158 case SDL_WINDOWEVENT: {
universe@0 159 if (event.window.type == SDL_WINDOWEVENT_RESIZED)
universe@0 160 asc_event_window_resized(
universe@0 161 event.window.windowID,
universe@0 162 event.window.data1,
universe@0 163 event.window.data2
universe@0 164 );
universe@0 165 break;
universe@0 166 }
universe@0 167 case SDL_KEYDOWN:
universe@0 168 // TODO: remove this code and implement key press map instead
universe@0 169 if (event.key.keysym.sym == SDLK_ESCAPE)
universe@0 170 return false;
universe@0 171 break;
universe@0 172 case SDL_KEYUP:
universe@0 173 // TODO: implement key press map
universe@0 174 break;
universe@0 175 }
universe@0 176 }
universe@0 177
universe@0 178 // sync the windows
universe@0 179 CxMutIterator windows = cxListMutIterator(asc_context.windows);
universe@0 180 cx_foreach(AscWindow*, w, windows) {
universe@0 181 asc_window_sync(w);
universe@0 182 }
universe@0 183 return true;
universe@0 184 }
universe@0 185
universe@0 186 void asc_window_settings_init_defaults(AscWindowSettings* settings) {
universe@0 187 settings->depth_size = 24;
universe@0 188 settings->vsync = 1;
universe@0 189 settings->width = 800;
universe@0 190 settings->height = 600;
universe@0 191 settings->fullscreen = 0;
universe@0 192 settings->gl_major_version = 3;
universe@0 193 settings->gl_minor_version = 3;
universe@0 194 settings->title = "Ascended Window";
universe@0 195 }
universe@0 196
universe@0 197 void asc_window_initialize(AscWindow* window, AscWindowSettings const* settings) {
universe@0 198 Uint32 flags = SDL_WINDOW_OPENGL | SDL_WINDOW_SHOWN;
universe@0 199 flags |= settings->fullscreen ? SDL_WINDOW_FULLSCREEN_DESKTOP : SDL_WINDOW_RESIZABLE;
universe@0 200
universe@0 201 window->window = SDL_CreateWindow(
universe@0 202 settings->title,
universe@0 203 SDL_WINDOWPOS_CENTERED,
universe@0 204 SDL_WINDOWPOS_CENTERED,
universe@0 205 settings->width,
universe@0 206 settings->height,
universe@0 207 flags
universe@0 208 );
universe@0 209 if (window->window == NULL) {
universe@0 210 asc_error(SDL_GetError());
universe@0 211 return;
universe@0 212 }
universe@0 213
universe@0 214 window->id = SDL_GetWindowID(window->window);
universe@0 215 SDL_GetWindowSize(window->window, &window->width, &window->height);
universe@0 216
universe@0 217 SDL_GL_SetAttribute(SDL_GL_CONTEXT_PROFILE_MASK, SDL_GL_CONTEXT_PROFILE_CORE);
universe@0 218 SDL_GL_SetAttribute(SDL_GL_CONTEXT_MAJOR_VERSION, settings->gl_major_version);
universe@0 219 SDL_GL_SetAttribute(SDL_GL_CONTEXT_MINOR_VERSION, settings->gl_minor_version);
universe@0 220 SDL_GL_SetAttribute(SDL_GL_DEPTH_SIZE, settings->depth_size);
universe@0 221 SDL_GL_SetAttribute(SDL_GL_DOUBLEBUFFER, 1);
universe@0 222 window->glctx = SDL_GL_CreateContext(window->window);
universe@0 223 if (window->glctx == NULL) {
universe@0 224 asc_dprintf("Creating GL context failed for window %u", window->id);
universe@0 225 } else {
universe@0 226 glewExperimental = GL_TRUE;
universe@0 227 GLenum err = glewInit();
universe@0 228 if (err == GLEW_OK) {
universe@0 229 SDL_GL_SetSwapInterval(settings->vsync);
universe@0 230 glEnable(GL_DEPTH_TEST);
universe@0 231 glEnable(GL_BLEND);
universe@0 232 glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
universe@0 233 glEnable(GL_DEBUG_OUTPUT);
universe@0 234 glDebugMessageCallback(asc_gl_debug_callback, NULL);
universe@0 235 asc_dprintf("Window %u initialized", window->id);
universe@0 236 cxListAdd(asc_context.windows, window);
universe@0 237 return;
universe@0 238 } else {
universe@0 239 asc_error(glewGetErrorString(err));
universe@0 240 }
universe@0 241 }
universe@0 242
universe@0 243 // cleanup on error
universe@0 244 if (window->glctx != NULL) {
universe@0 245 SDL_GL_DeleteContext(window->glctx);
universe@0 246 }
universe@0 247 window->glctx = NULL;
universe@0 248 SDL_DestroyWindow(window->window);
universe@0 249 window->window = NULL;
universe@0 250 window->id = 0;
universe@0 251 }
universe@0 252
universe@0 253 void asc_window_destroy_impl(AscWindow* window) {
universe@0 254 // destory the GL context and the window
universe@0 255 if (window->glctx != NULL) {
universe@0 256 SDL_GL_DeleteContext(window->glctx);
universe@0 257 }
universe@0 258 if (window->window != NULL) {
universe@0 259 SDL_DestroyWindow(window->window);
universe@0 260 }
universe@0 261
universe@0 262 // clean the data
universe@0 263 asc_dprintf("Window %u and its OpenGL context destroyed.", window->id);
universe@0 264 memset(window, 0, sizeof(AscWindow));
universe@0 265 }
universe@0 266
universe@0 267 void asc_window_destroy(AscWindow* window) {
universe@0 268 // find the window in the context and remove it
universe@0 269 CxMutIterator iter = cxListMutIterator(asc_context.windows);
universe@0 270 cx_foreach(AscWindow*, w, iter) {
universe@0 271 if (w == window) {
universe@0 272 asc_dprintf("Window %u removed from context.", window->id);
universe@0 273 cxIteratorFlagRemoval(iter);
universe@0 274 }
universe@0 275 }
universe@0 276 asc_window_destroy_impl(window);
universe@0 277 }
universe@0 278
universe@0 279 void asc_window_sync(AscWindow const* window) {
universe@0 280 SDL_GL_MakeCurrent(window->window, window->glctx);
universe@0 281 SDL_GL_SwapWindow(window->window);
universe@0 282 glViewport(0, 0, window->width, window->height);
universe@0 283 glClearColor(0.0f, 0.0f, 0.0f, 1.0f);
universe@0 284 glClear(GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT);
universe@0 285 }

mercurial