lua inbinary strings

Allows saving of ram by reusing strings already stored in the binary
and storing a pointer instead of malloc and copy to get them inside
the lua state

Saves about 1.5K overall

Derivative of work by bogdanm
RAM optimizations: pseudo RO strings, functions in Flash
https://github.com/elua/elua/commit/d54659b5723bcd2b1e3900362398c72c18a9aa0b

Change-Id: I21d6dcfa32523877efd9f70fb0f88f2a02872649

1 files changed, 15 insertions, 0 deletions

diff --git a/apps/plugins/lua/lobject.c b/apps/plugins/lua/lobject.c
index a351ff41da..65a23cf938 100644
--- a/apps/plugins/lua/lobject.c
+++ b/apps/plugins/lua/lobject.c
@@ -107,6 +107,21 @@ static void pushstr (lua_State *L, const char *str) {
 }
 
 
+/* ROCKLUA ADDED -- Retrieves C string from TString */
+const char *luaO_getstring(const TString * ts){
+  const char *string;
+#ifdef INBINARYSTRINGS
+  if (testbits((ts)->tsv.type, TSTR_INBIN))
+    string = *(cast(const char **, (ts) + 1));
+  else
+#else
+  if (true)
+#endif
+    string = cast(const char *, (ts) + 1);
+  return string;
+}
+
+
 /* this function handles only `%d', `%c', %f, %p, and `%s' formats */
 const char *luaO_pushvfstring (lua_State *L, const char *fmt, va_list argp) {
   int n = 1;