1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
|
/** @file */
#ifndef HONEY_COMMON_H
#define HONEY_COMMON_H
// standard c libraries
#include <stdio.h>
#include <stdlib.h>
#include <stdbool.h>
#include <string.h>
// POSIX options
#include <unistd.h>
// lua interpreter
#include <lua.h>
#include <lualib.h>
#include <lauxlib.h>
// glad
#include "glad/glad.h"
#include <GLFW/glfw3.h>
// c opengl mathematics function
#define CGLM_ALL_UNALIGNED
#include <cglm/cglm.h>
#include <cglm/call.h>
// assimp
#include <assimp/cimport.h>
#include <assimp/scene.h>
#include <assimp/postprocess.h>
// stb image
#include "stb_image/stb_image.h"
typedef GLFWwindow* honey_window;
typedef struct {
honey_window window;
int width;
int height;
bool fullscreen;
} honey_window_information;
extern int honey_window_info_ref;
extern int honey_window_resize_callback_ref;
extern int honey_window_resize_callback_data_ref;
extern int honey_window_focus_callback_ref;
extern int honey_window_focus_callback_data_ref;
/* ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ */
typedef enum {
/* generic results */
HONEY_OK,
HONEY_MEMORY_ALLOCATION_ERROR,
HONEY_FILE_READ_ERROR,
/* shader errors */
HONEY_VERTEX_SHADER_COMPILATION_ERROR,
HONEY_FRAGMENT_SHADER_COMPILATION_ERROR,
HONEY_SHADER_LINK_ERROR,
/* mesh errors */
HONEY_MESH_BAD_VERTEX_DATA,
HONEY_MESH_BAD_INDEX_DATA,
/* model errors */
HONEY_MODEL_LOAD_ERROR,
HONEY_N_ERRORS
} honey_result;
honey_result honey_format_string(char** string,
char* format_string,
...);
/** @brief Throw an error with a string generated by a printf format string.
*
* This function attempts to create a string from the given format string;
* if an error should occur, it will instead throw a lua error with the appropriate
* message.
*
* @param[in] L The Lua state to throw an error from.
* @param[in] format_string The format string used to generate the error message.
* @param[in] ... The arguments for the format string.
*
* @returns Nothing.
*/
void honey_lua_throw_error(lua_State* L,
char* format_string,
...);
/* lua binding functions */
typedef enum {
HONEY_BOOLEAN,
HONEY_INTEGER,
HONEY_NUMBER,
HONEY_STRING,
HONEY_FUNCTION,
HONEY_TABLE,
HONEY_NIL,
HONEY_USERDATA,
HONEY_LIGHTUSERDATA,
HONEY_ANY
} honey_lua_type;
typedef struct {
honey_lua_type type;
void* ptr;
} honey_lua_argument_pair;
/** @brief Get arguments from a function, checking to ensure the types match.
*
* Each argument type should be specified as [# of args], type, ptr, type, ptr...,
* e.g.
* ```
* honey_lua_parse_arguments(L, 3,
* // option 0
* 2, HONEY_INTEGER, &a, HONEY_INTEGER, &b,
* // option 1
* 1, HONEY_INTEGER, &a,
* // option 2
* 0);
* ```
*
* Note that this function will check for correct types of HONEY_TABLE, HONEY_NIL, and
* HONEY_FUNCTION, but does not expect a pointer to them. It performs no check for
* HONEY_ANY, and also does not expect a pointer.
*
* @param[in] L The lua state to parse arguments from.
* @param[in] n The number of argument options to parse.
* @param[in] ... Variadic list of argument options.
*
* @returns The zero-indexed index of the actual argument option used. Throws an
* error if no options matched the provided arguments.
*/
int honey_lua_parse_arguments(lua_State* L, int n, ...);
/** @brief Wrap C objects for lua. */
typedef struct honey_lua_element {
char* name;
honey_lua_type type;
union {
int integer;
double number;
char* string;
int (*function)(lua_State*);
struct {
int n_elements;
struct honey_lua_element* elements;
} table;
void* pointer;
} data;
} honey_lua_element;
/** @brief Push an element to the lua stack.
*
* @param[in] L The lua state to push the element to.
* @param[in] element The honey_lua_element to push to the stack.
*
* @returns Nothing.
*/
void honey_lua_push_element(lua_State* L,
honey_lua_element element);
/** @brief Create a lua table populated with various elements.
*
* @param[in] L The lua state to push the table to.
* @param[in] elements Array of elements to populate the table.
* @param[in] n_elements The number of elements in the array.
*
* @returns Nothing.
*/
void honey_lua_create_table(lua_State* L,
honey_lua_element* elements,
unsigned int n_elements);
/** @brief Get the traceback for use after an error.
*/
int honey_lua_traceback(lua_State* L);
/** @brief Wrapper for lua_pcall that uses a honey_lua_traceback as an error handler.
*/
int honey_lua_pcall(lua_State* L, int nargs, int nret);
/** @brief Trigger honey to exit.
*
* @returns Nothing.
*/
int honey_exit(lua_State* L);
#endif
|
