Map exec

src/asset/assettype.h

@@ -89,5 +89,5 @@ static const assettypedef_t ASSET_TYPE_DEFINITIONS[ASSET_TYPE_COUNT] = {
     .header = "DSF",
     .loadStrategy = ASSET_LOAD_STRAT_CUSTOM,
     .custom = assetScriptHandler
-  } 
+  },
 };

src/rpg/world/map.c

@@ -11,6 +11,7 @@
 #include "asset/asset.h"
 #include "rpg/entity/entity.h"
 #include "util/string.h"
+#include "script/scriptcontext.h"
 
 map_t MAP;
 
@@ -44,6 +45,19 @@ errorret_t mapLoad(const char_t *path, const chunkpos_t position) {
   // Store the map file path
   stringCopy(MAP.filePath, path, MAP_FILE_PATH_MAX);
 
+  // Determine directory path (it is dirname)
+  stringCopy(MAP.dirPath, path, MAP_FILE_PATH_MAX);
+  char_t *last = stringFindLastChar(MAP.dirPath, '/');
+  if(last == NULL) errorThrow("Invalid map file path");
+
+  // Store filename, sans extension
+  stringCopy(MAP.fileName, last + 1, MAP_FILE_PATH_MAX);
+  *last = '\0'; // Terminate to get directory path
+
+  last = stringFindLastChar(MAP.fileName, '.');
+  if(last == NULL) errorThrow("Map file name has no extension");
+  *last = '\0'; // Terminate to remove extension
+
   // Reset map position
   MAP.chunkPosition = position;
 
@@ -64,6 +78,18 @@ errorret_t mapLoad(const char_t *path, const chunkpos_t position) {
   }
 
   // Execute map script.
+  char_t scriptPath[MAP_FILE_PATH_MAX + 16];
+  stringFormat(
+    scriptPath, sizeof(scriptPath), "%s/%s.dsf",
+    MAP.dirPath, MAP.fileName
+  );
+  if(assetFileExists(scriptPath)) {
+    scriptcontext_t ctx;
+    errorChain(scriptContextInit(&ctx));
+    errorChain(scriptContextExecFile(&ctx, scriptPath));
+    scriptContextDispose(&ctx);
+  }
+
   errorOk();
 }
 
@@ -183,8 +209,8 @@ errorret_t mapChunkLoad(chunk_t* chunk) {
   memorySet(chunk->entities, 0xFF, sizeof(chunk->entities));
 
   // Get chunk filepath.
-  snprintf(buffer, sizeof(buffer), "%s/%d_%d_%d.dcf",
-    MAP.filePath,
+  snprintf(buffer, sizeof(buffer), "%s/chunks/%d_%d_%d.dcf",
+    MAP.dirPath,
     chunk->position.x,
     chunk->position.y,
     chunk->position.z

src/rpg/world/map.h

@@ -12,6 +12,9 @@
 
 typedef struct map_s {
   char_t filePath[MAP_FILE_PATH_MAX];
+  char_t dirPath[MAP_FILE_PATH_MAX];
+  char_t fileName[MAP_FILE_PATH_MAX];
+
   chunk_t chunks[MAP_CHUNK_COUNT];
   chunk_t *chunkOrder[MAP_CHUNK_COUNT];
   chunkpos_t chunkPosition;

src/script/module/modulemap.h

@@ -0,0 +1,49 @@
+/**
+ * Copyright (c) 2025 Dominic Masters
+ * 
+ * This software is released under the MIT License.
+ * https://opensource.org/licenses/MIT
+ */
+
+#pragma once
+#include "script/scriptcontext.h"
+#include "debug/debug.h"
+#include "assert/assert.h"
+#include "rpg/world/map.h"
+
+int32_t moduleMapLoad(lua_State *L) {
+  assertNotNull(L, "Lua state cannot be NULL");
+
+  if(!lua_isstring(L, 1)) {
+    luaL_error(L, "Expected string map filename");
+    return 0;
+  }
+
+  // Potentially provide up to 3 params
+  chunkpos_t initial = { .x = 0, .y = 0, .z = 0 };
+  if(lua_isnumber(L, 2)) {
+    initial.x = (chunkunit_t)luaL_checkinteger(L, 2);
+  }
+  if(lua_isnumber(L, 3)) {
+    initial.y = (chunkunit_t)luaL_checkinteger(L, 3);
+  }
+  if(lua_isnumber(L, 4)) {
+    initial.z = (chunkunit_t)luaL_checkinteger(L, 4);
+  }
+
+  // Load the map.
+  errorret_t ret = mapLoad(luaL_checkstring(L, 1), initial);
+  if(ret.code != ERROR_OK) {
+    luaL_error(L, "Failed to load map");
+    errorCatch(errorPrint(ret));
+    return 0;
+  }
+
+  return 0;
+}
+
+void moduleMapSystem(scriptcontext_t *context) {
+  assertNotNull(context, "Script context cannot be NULL");
+
+  scriptContextRegFunc(context, "mapLoad", moduleMapLoad);
+}

src/script/scriptmodule.c

@@ -10,12 +10,14 @@
 #include "script/module/moduleinput.h"
 #include "script/module/moduleplatform.h"
 #include "script/module/modulescene.h"
+#include "script/module/modulemap.h"
 
 const scriptmodule_t SCRIPT_MODULE_LIST[] = {
   { .name = "system", .callback = moduleSystem },
   { .name = "input", .callback = moduleInput },
   { .name = "platform", .callback = modulePlatform },
   { .name = "scene", .callback = moduleScene },
+  { .name = "map", .callback = moduleMapSystem },
 };
 
 #define SCRIPT_MODULE_COUNT ( \

src/util/string.c

@@ -57,6 +57,17 @@ char_t * stringToken(char_t *str, const char_t *delim) {
   return strtok(str, delim);
 }
 
+char_t * stringFindLastChar(const char_t *str, const char_t c) {
+  assertNotNull(str, "str must not be NULL");
+  char_t *last = NULL;
+  for(const char_t *p = str; *p != '\0'; p++) {
+    if(*p == c) {
+      last = (char_t *)p;
+    }
+  }
+  return last;
+}
+
 int32_t stringFormat(
   char_t *dest,
   const size_t destSize,

src/util/string.h

@@ -64,6 +64,16 @@ void stringTrim(char_t *str);
  */
 char_t * stringToken(char_t *str, const char_t *delim);
 
+/**
+ * Finds the last occurrence of a character in a string.
+ * 
+ * @param str The string to search.
+ * @param c The character to find.
+ * @return A pointer to the last occurrence of the character in the string, or
+ * NULL if not found.
+ */
+char_t * stringFindLastChar(const char_t *str, const char_t c);
+
 /**
  * Formats a string.
  *