summaryrefslogtreecommitdiffstats
path: root/apps
diff options
context:
space:
mode:
authorWilliam Wilgus <me.theuser@yahoo.com>2020-05-29 10:44:24 -0500
committerWilliam Wilgus <me.theuser@yahoo.com>2020-06-01 13:23:38 -0500
commite4ee5980c6490c6e4c5cedb8b1b4c37443b1c35a (patch)
tree150b6a3cd8707962552929ca1b02e71a63858e26 /apps
parentfba4df5d6d4317e02f1baf25b54c2c051eec5d1d (diff)
downloadrockbox-e4ee5980c6490c6e4c5cedb8b1b4c37443b1c35a.tar.gz
rockbox-e4ee5980c6490c6e4c5cedb8b1b4c37443b1c35a.tar.bz2
rockbox-e4ee5980c6490c6e4c5cedb8b1b4c37443b1c35a.zip
lua add _fullpath and argument parsing
WIP for passing arguments to lua scripts args are recognized by adding ?arg to the end of the script path The easiest way to do this currently is to use the function rb.restart_lua local sfile = rawget(_G, "_fullpath") or "" local sArgs = rawget(_G, "_arguments") if not sArgs then rb.restart_lua(sfile .. "?my arguments") else rb.splash(1000, sfile .. "?" .. sArgs) end I'd eventually like to figure out a sensible way to do this from a shortcut / quick list Change-Id: I2b60fe3b8f1d04b57361fe532510bd6afee59fbf
Diffstat (limited to 'apps')
-rw-r--r--apps/plugins/lua/rocklua.c54
1 files changed, 47 insertions, 7 deletions
diff --git a/apps/plugins/lua/rocklua.c b/apps/plugins/lua/rocklua.c
index ace73ee449..79f6bae953 100644
--- a/apps/plugins/lua/rocklua.c
+++ b/apps/plugins/lua/rocklua.c
@@ -146,12 +146,28 @@ static int docall (lua_State *L) {
}
static void lua_atexit(void);
+static int lua_split_arguments(lua_State *L, const char *filename);
+
static int loadfile_newstate(lua_State **L, const char *filename)
{
- *L = luaL_newstate();
- rb_atexit(lua_atexit);
- rocklua_openlibs(*L);
- return luaL_loadfile(*L, filename);
+ const char *file;
+ int ret;
+
+ *L = luaL_newstate();
+ rb_atexit(lua_atexit);
+
+ lua_gc(*L, LUA_GCSTOP, 0); /* stop collector during initialization */
+ rocklua_openlibs(*L);
+
+ lua_split_arguments(*L, filename);
+ lua_setglobal (*L, "_arguments");
+ file = lua_tostring (*L, -1);
+ lua_setglobal (*L, "_fullpath");
+ /* lua manual -> no guarantee pointer valid after value is removed from stack */
+ ret = luaL_loadfile(*L, file);
+ lua_gc(*L, LUA_GCRESTART, 0);
+
+ return ret;
}
static void lua_atexit(void)
@@ -162,10 +178,14 @@ static void lua_atexit(void)
{
if (Ls == lua_touserdata(Ls, -1)) /* signal from restart_lua */
{
- filename = (char *) malloc(MAX_PATH);
+ filename = (char *) malloc((MAX_PATH * 2) + 1);
- if (filename) /* out of memory? */
- rb->strlcpy(filename, lua_tostring(Ls, -2), MAX_PATH);
+ if (filename) {/* out of memory? */
+ filename[MAX_PATH * 2] = '\0';
+ rb->strlcpy(filename, lua_tostring(Ls, -2), MAX_PATH * 2);
+ } else {
+ goto ERR_RUN;
+ }
lua_close(Ls); /* close old state */
lu_status = loadfile_newstate(&Ls, filename);
@@ -175,6 +195,7 @@ static void lua_atexit(void)
}
else if (lua_tointeger(Ls, -1) != 0) /* os.exit */
{
+ERR_RUN:
lu_status = LUA_ERRRUN;
lua_pop(Ls, 1); /* put exit string on top of stack */
plugin_start(NULL);
@@ -185,6 +206,25 @@ static void lua_atexit(void)
_exit(0); /* don't call exit handler */
}
+/* split filename at argchar
+ * remainder of filename pushed on stack (-1)
+* argument string pushed on stack or nil if doesn't exist (-2)
+ */
+static int lua_split_arguments(lua_State *L, const char *filename)
+{
+ const char argchar = '?';
+ const char* arguments = strchr(filename, argchar);
+ if(arguments) {
+ lua_pushstring(L, (arguments + 1));
+ } else {
+ arguments = strlen(filename) + filename;
+ lua_pushnil(L);
+ }
+ lua_pushlstring(L, filename, arguments - filename);
+ lua_insert(L, -2); /* swap filename and argument */
+ return 2;
+}
+
/***************** Plugin Entry Point *****************/
enum plugin_status plugin_start(const void* parameter)
{