From a5fd60e79923c7c752a57e047150eaa3cdc8d229 Mon Sep 17 00:00:00 2001
From: Mitja Felicijan <mitja.felicijan@gmail.com>
Date: Mon, 11 Aug 2025 20:40:10 +0200
Subject: Added proper cleanup of images and sounds to avoid segfaults

---
 main.c | 48 ++++++++++++++++++++++++++++++++++++++----------
 1 file changed, 38 insertions(+), 10 deletions(-)

diff --git a/main.c b/main.c
index 7c05a6a..56c91e0 100644
--- a/main.c
+++ b/main.c
@@ -84,6 +84,30 @@ void init_sound_list(SoundList *list) {
 	list->count = 0;
 }
 
+void free_image_list(ImageList *list) {
+	ExternalImage *curr = list->head;
+	while (curr) {
+		ExternalImage *next = curr->next;
+		UnloadTexture(curr->texture);
+		free(curr);
+		curr = next;
+	}
+	list->head = list->tail = NULL;
+	list->count = 0;
+}
+
+void free_sound_list(SoundList *list) {
+	ExternalSound *curr = list->head;
+	while (curr) {
+		ExternalSound *next = curr->next;
+		UnloadSound(curr->sound);
+		free(curr);
+		curr = next;
+	}
+	list->head = list->tail = NULL;
+	list->count = 0;
+}
+
 static int lua_getfield_int(lua_State *L, int index, const char *key) {
 	lua_getfield(L, index, key);
 	int val = (int)luaL_checknumber(L, -1);
@@ -129,10 +153,22 @@ static int l_open_window(lua_State *L) {
 
 	InitAudioDevice();
 
+	init_image_list(&ctx.images);
+	init_sound_list(&ctx.sounds);
+
+	return 0;
+}
+
+static int l_close_window(lua_State *L) {
+	free_image_list(&ctx.images);
+	free_sound_list(&ctx.sounds);
+	UnloadFont(ctx.font);
+	CloseAudioDevice();
+	CloseWindow();
 	return 0;
 }
 
-// TODO: This function name is still a bit sus. Revisit the name later.
+// XXX: This function name is still a bit sus. Revisit the name later.
 static int l_window_running(lua_State *L) {
 	lua_pushboolean(L, !WindowShouldClose());
 	return 1;
@@ -164,11 +200,6 @@ static int l_get_height(lua_State *L) {
 	return 1;
 }
 
-static int l_close_window(lua_State *L) {
-	CloseWindow();
-	return 0;
-}
-
 static int l_start_drawing(lua_State *L) {
 	BeginDrawing();
 	return 0;
@@ -544,8 +575,6 @@ static void version(const char *argv0) {
 
 int main(int argc, char *argv[]) {
 	srand(time(NULL));
-	init_image_list(&ctx.images);
-	init_sound_list(&ctx.sounds);
 
 	TraceLogLevel debug_level = LOG_WARNING;
 	const char *run_file = NULL;
@@ -626,7 +655,7 @@ int main(int argc, char *argv[]) {
 		lua_register(L, "draw_circle", l_draw_circle);
 		lua_register(L, "draw_ellipse", l_draw_ellipse);
 		lua_register(L, "draw_triangle", l_draw_triangle);
-		
+
 		lua_register(L, "load_image", l_load_image);
 		lua_register(L, "draw_image", l_draw_image);
 
@@ -640,7 +669,6 @@ int main(int argc, char *argv[]) {
 			return 1;
 		}
 
-		UnloadFont(ctx.font);
 		lua_close(L);
 	}
 
-- 
cgit v1.2.3