From ddf612c84b558bc3343d413c04cdddf59b23a2ed Mon Sep 17 00:00:00 2001
From: William Wilgus <me.theuser@yahoo.com>
Date: Sun, 28 Jul 2019 07:26:20 -0500
Subject: lua remove unneeded plugin functions

Change-Id: I04bc38d03b7f0ca65a815685eb6ab0f5ff825c45
---
 apps/plugins/lua/rocklib.c      | 12 +++++++++++-
 apps/plugins/lua/rocklib_aux.pl |  7 +++++++
 2 files changed, 18 insertions(+), 1 deletion(-)

diff --git a/apps/plugins/lua/rocklib.c b/apps/plugins/lua/rocklib.c
index b37f5245dc..d1ef3adaaf 100644
--- a/apps/plugins/lua/rocklib.c
+++ b/apps/plugins/lua/rocklib.c
@@ -77,6 +77,15 @@ RB_WRAP(schedule_cpu_boost)
 }
 #endif
 
+RB_WRAP(thread_set_priority)
+{
+    unsigned int thread_id = rb->thread_self();
+    int priority = (int) luaL_checkint(L, 1);
+    int result = rb->thread_set_priority(thread_id, priority);
+    lua_pushinteger(L, result);
+    return 1;
+}
+
 RB_WRAP(current_path)
 {
     return get_current_path(L, 1);
@@ -769,6 +778,7 @@ static const luaL_Reg rocklib[] =
 #ifdef HAVE_SCHEDULER_BOOSTCTRL
     RB_FUNC(schedule_cpu_boost),
 #endif
+    RB_FUNC(thread_set_priority),
 
     RB_FUNC(current_path),
 
@@ -846,7 +856,7 @@ LUALIB_API int luaopen_rock(lua_State *L)
     lua_pushstring(L, "rb_defines");
     if (lua_pcall (L, 1, 0, 0))
         lua_pop(L, 1);
-#if 0
+#if 0 /* see rb_defines.lua */
     static const struct lua_int_reg rlib_const_int[] =
     {
         /* useful integer constants */
diff --git a/apps/plugins/lua/rocklib_aux.pl b/apps/plugins/lua/rocklib_aux.pl
index c059801b8b..542a928a12 100755
--- a/apps/plugins/lua/rocklib_aux.pl
+++ b/apps/plugins/lua/rocklib_aux.pl
@@ -53,6 +53,7 @@ my @ported_functions;
 my @forbidden_functions = ('^open$',
                            '^open_utf8$',
                            '^close$',
+                           'dcache',
                            '^read$',
                            '^write$',
                            '^mkdir$',
@@ -101,7 +102,13 @@ my @forbidden_functions = ('^open$',
                            '^pcm_(set_frequency|calculate_peaks)$',
                            '^sound_(set|current|default|min|max|unit|pitch|val2phys)$',
                            '^mixer_(set|get)_frequency$',
+                           '^rock_plugin_get_current_filename$',
+                           '^plugin_release_audio_buffer$',
+                           '^reload_directory$',
+                           '^set_current_file$',
+                           '^set_dirfilter$',
                            '^(trigger|cancel)_cpu_boost$',
+                           '^thread_',
                            '^round_value_to_list32$');
 
 my $rocklib = sprintf("%s/rocklib.c", $ARGV[0]);
-- 
cgit v1.2.3