lua: add mp.get_env_list() function

Because Lua is too stupid to provide this directly, and I sort of need
it.

1 files changed, 13 insertions, 0 deletions

diff --git a/player/lua.c b/player/lua.c
index b37a6cd84f..668552741c 100644
--- a/player/lua.c
+++ b/player/lua.c
@@ -53,6 +53,8 @@
 #include "client.h"
 #include "libmpv/client.h"
 
+extern char **environ;
+
 // List of builtin modules and their contents as strings.
 // All these are generated from player/lua/*.lua
 static const char * const builtin_lua_scripts[][2] = {
@@ -1185,6 +1187,16 @@ static int script_format_json(lua_State *L, void *tmp)
     return 2;
 }
 
+static int script_get_env_list(lua_State *L)
+{
+    lua_newtable(L); // table
+    for (int n = 0; environ && environ[n]; n++) {
+        lua_pushstring(L, environ[n]); // table str
+        lua_rawseti(L, -2, n + 1); // table
+    }
+    return 1;
+}
+
 #define FN_ENTRY(name) {#name, script_ ## name, 0}
 #define AF_ENTRY(name) {#name, 0, script_ ## name}
 struct fn_entry {
@@ -1226,6 +1238,7 @@ static const struct fn_entry main_fns[] = {
     FN_ENTRY(get_wakeup_pipe),
     FN_ENTRY(raw_hook_add),
     FN_ENTRY(raw_hook_continue),
+    FN_ENTRY(get_env_list),
     {0}
 };