summaryrefslogtreecommitdiff
path: root/apps/plugins/lua/rocklib_aux.pl
diff options
context:
space:
mode:
Diffstat (limited to 'apps/plugins/lua/rocklib_aux.pl')
-rwxr-xr-xapps/plugins/lua/rocklib_aux.pl15
1 files changed, 14 insertions, 1 deletions
diff --git a/apps/plugins/lua/rocklib_aux.pl b/apps/plugins/lua/rocklib_aux.pl
index b63aaee18a..77fd08b119 100755
--- a/apps/plugins/lua/rocklib_aux.pl
+++ b/apps/plugins/lua/rocklib_aux.pl
@@ -18,6 +18,13 @@
18# 18#
19############################################################################ 19############################################################################
20 20
21
22# The purpose of this script is to automatically generate Lua wrappers for
23# (easily) portable C functions used in the Rockbox plugin API.
24# It doesn't contain support for enums, structs or pointers (apart from char*).
25#
26# The output will be written to <build_dir>/apps/plugins/lua/rocklib_aux.c
27
21sub trim 28sub trim
22{ 29{
23 my $text = $_[0]; 30 my $text = $_[0];
@@ -40,6 +47,9 @@ sub rand_string
40 47
41my @functions; 48my @functions;
42my @ported_functions; 49my @ported_functions;
50# These functions are excluded from automatically wrapping. This is useful if
51# you want to manually port them to Lua. The format is a standard Perl regular
52# expression.
43my @forbidden_functions = ('^open$', 53my @forbidden_functions = ('^open$',
44 '^close$', 54 '^close$',
45 '^read$', 55 '^read$',
@@ -111,7 +121,10 @@ my $svnrev = '$Revision$';
111 121
112# Print the header 122# Print the header
113print <<EOF 123print <<EOF
114/* Automatically generated of $svnrev from rocklib.c & plugin.h */ 124/* Automatically generated from rocklib.c & plugin.h ($svnrev)
125 *
126 * See apps/plugins/lua/rocklib_aux.pl for the generator.
127 */
115 128
116#define lrocklib_c 129#define lrocklib_c
117#define LUA_LIB 130#define LUA_LIB