Update to support Defold 1.4.0 new JSON API

Author: aglitchman

README.md

@@ -12,7 +12,7 @@ You can check [here](https://radar.yandex.ru/yandex) the size of Yandex.Games au
 
 You can use it in your own project by adding this project as a [Defold library dependency](http://www.defold.com/manuals/libraries/). Open your `game.project` file and in the dependencies field add **a link to the ZIP file of a [specific release](https://github.com/indiesoftby/defold-yagames/tags).**
 
-**Note:** Use [version 0.2.0](https://github.com/indiesoftby/defold-yagames/archive/0.2.0.zip) for the old Defold 1.2.177 or lower.
+**Note:** Use [version 0.8.1](https://github.com/indiesoftby/defold-yagames/releases/tag/0.8.1) for Defold 1.3.7 and older.
 
 ## Getting Started
 

game.project

@@ -12,7 +12,7 @@ vsync = 0
 
 [project]
 title = yagames
-version = 0.8.0
+version = 0.9.0
 developer = Indiesoft LLC
 bundle_resources = example/bundle/
 dependencies#0 = https://github.com/subsoap/defos/archive/v2.5.0.zip

yagames/lib/web/lib_yagames.js

@@ -44,14 +44,16 @@ var LibYaGamesPrivate = {
                         {{{ makeDynCall("viif", "YaGamesPrivate._callback_number") }}}(cb_id, cmsg_id, message);
                         break;
                     case "string":
-                        var msg = allocate(intArrayFromString(message), "i8", ALLOC_NORMAL);
-                        {{{ makeDynCall("viii", "YaGamesPrivate._callback_string") }}}(cb_id, cmsg_id, msg);
+                        var msg_arr = intArrayFromString(message, false);
+                        var msg = allocate(msg_arr, "i8", ALLOC_NORMAL);
+                        {{{ makeDynCall("viii", "YaGamesPrivate._callback_string") }}}(cb_id, cmsg_id, msg, msg_arr.length);
                         Module._free(msg);
                         break;
                     case "object":
                         var msg = JSON.stringify(message);
-                        msg = allocate(intArrayFromString(msg), "i8", ALLOC_NORMAL);
-                        {{{ makeDynCall("viii", "YaGamesPrivate._callback_object") }}}(cb_id, cmsg_id, msg);
+                        var msg_arr = intArrayFromString(msg, false);
+                        msg = allocate(msg_arr, "i8", ALLOC_NORMAL);
+                        {{{ makeDynCall("viii", "YaGamesPrivate._callback_object") }}}(cb_id, cmsg_id, msg, msg_arr.length);
                         Module._free(msg);
                         break;
                     case "boolean":

yagames/src/main.cpp

@@ -6,7 +6,7 @@
 
 #if defined(DM_PLATFORM_HTML5)
 
-typedef void (*ObjectMessage)(const int cb_id, const char* message_id, const char* message);
+typedef void (*ObjectMessage)(const int cb_id, const char* message_id, const char* message, const int length);
 typedef void (*NoMessage)(const int cb_id, const char* message_id);
 typedef void (*NumberMessage)(const int cb_id, const char* message_id, float message);
 typedef void (*BooleanMessage)(const int cb_id, const char* message_id, int message);
@@ -131,7 +131,7 @@ static bool CheckCallbackAndInstance(YaGamesPrivateListener* cbk)
     return true;
 }
 
-static void SendObjectMessage(const int cb_id, const char* message_id, const char* message)
+static void SendObjectMessage(const int cb_id, const char* message_id, const char* message, const int length)
 {
     for (int i = m_Listeners.Size() - 1; i >= 0; --i)
     {
@@ -150,37 +150,15 @@ static void SendObjectMessage(const int cb_id, const char* message_id, const cha
             {
                 lua_pushnil(L);
             }
+            dmScript::JsonToLua(L, message, length); // throws lua error if it fails
 
-            dmJson::Document doc;
-            dmJson::Result r = dmJson::Parse(message, &doc);
-            if (r == dmJson::RESULT_OK && doc.m_NodeCount > 0)
-            {
-                char error_str_out[128];
-                if (dmScript::JsonToLua(L, &doc, 0, error_str_out, sizeof(error_str_out)) < 0)
-                {
-                    dmLogError("Failed converting object JSON to Lua; %s", error_str_out);
-                    is_fail = true;
-                }
-            }
-            else
-            {
-                dmLogError("Failed to parse JS object(%d): (%s)", r, message);
-                is_fail = true;
-            }
-            dmJson::Free(&doc);
-            if (is_fail)
-            {
-                lua_pop(L, 3);
-                assert(top == lua_gettop(L));
-                return;
-            }
             dmScript::PCall(L, 4, 0);
         }
         assert(top == lua_gettop(L));
     }
 }
 
-static void SendStringMessage(const int cb_id, const char* message_id, const char* message)
+static void SendStringMessage(const int cb_id, const char* message_id, const char* message, const int length)
 {
     for (int i = m_Listeners.Size() - 1; i >= 0; --i)
     {
@@ -202,7 +180,7 @@ static void SendStringMessage(const int cb_id, const char* message_id, const cha
             {
                 lua_pushnil(L);
             }
-            lua_pushstring(L, message);
+            lua_pushlstring(L, message, length);
 
             dmScript::PCall(L, 4, 0);
         }