src/error.c

/*
 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS HEADER.
 * Copyright 2023 Mike Becker. All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions are met:
 *
 *   1. Redistributions of source code must retain the above copyright
 *      notice, this list of conditions and the following disclaimer.
 *
 *   2. Redistributions in binary form must reproduce the above copyright
 *      notice, this list of conditions and the following disclaimer in the
 *      documentation and/or other materials provided with the distribution.
 *
 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
 * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE
 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
 * POSSIBILITY OF SUCH DAMAGE.
 */

#include "ascension/context.h"
#include "ascension/error.h"
#include "ascension/utils.h"

#include <cx/buffer.h>
#include <GL/gl.h>

void asc_error_cchar(char const* text) {
    asc_error_cxstr(cx_str(text));
}

void asc_error_cuchar(unsigned char const* text) {
    asc_error_cxstr(cx_str((char const*)text));
}

void asc_error_cxstr(cxstring text) {
    if (text.length == 0) return;

    // write error to debug output
    asc_dprintf("ERROR: %.*s", (int)text.length, text.ptr);

    // write error to buffer
    CxBuffer* buf = &asc_context.error_buffer;
    cxBufferWrite(text.ptr, 1, text.length, buf);
    cxBufferPut(buf, '\n');

    asc_set_flag(asc_context.flags, ASC_FLAG_HAS_ERROR);
}

bool asc_has_error(void) {
    return asc_test_flag(asc_context.flags, ASC_FLAG_HAS_ERROR);
}

char const* asc_get_error(void) {
    // we zero-terminate the current buffer contents before providing them
    cxBufferPut(&asc_context.error_buffer, 0);
    --asc_context.error_buffer.pos;
    --asc_context.error_buffer.size;
    return asc_context.error_buffer.space;
}

void asc_clear_error(void) {
    cxBufferClear(&asc_context.error_buffer);
    asc_clear_flag(asc_context.flags, ASC_FLAG_HAS_ERROR);
}

void asc_error_gl(unsigned code, cxstring message) {
    const char *glerr;
    switch(code) {
        case GL_NO_ERROR:
            return;
        case GL_INVALID_ENUM:
            glerr = "invalid enum";
            break;
        case GL_INVALID_VALUE:
            glerr = "invalid value";
            break;
        case GL_INVALID_OPERATION:
            glerr = "invalid operation";
            break;
        case GL_INVALID_FRAMEBUFFER_OPERATION:
            glerr = "invalid framebuffer operation";
            break;
        case GL_OUT_OF_MEMORY:
            glerr = "out of memory";
            break;
        case GL_STACK_UNDERFLOW:
            glerr = "stack underflow";
            break;
        case GL_STACK_OVERFLOW:
            glerr = "stack overflow";
            break;
        default:
            glerr = "unknown GL error";
    }
    cxmutstr msg = cx_strcat(3, message, CX_STR(" GL Error: "), cx_str(glerr));
    asc_error_cxstr(cx_strcast(msg));
    cx_strfree(&msg);
}