3 files changed, 384 insertions, 111 deletions

diff --git a/src/libraries/SledjHamr.c b/src/libraries/SledjHamr.c
index 871b294..3445e52 100644
--- a/src/libraries/SledjHamr.c
+++ b/src/libraries/SledjHamr.c
@@ -1,6 +1,7 @@
 // This might become nails, since at the moment it's only got comms stuff in it.
 
 #include <unistd.h>
+#include "LumbrJack.h"
 #include "SledjHamr.h"
 
 
@@ -62,35 +63,6 @@ static Eina_Bool _del(void *data, int type, Ecore_Con_Event_Server_Del *ev)
   return ECORE_CALLBACK_CANCEL;
 }
 
-Ecore_Con_Server *reachOut(char *address, int port, void *data, Ecore_Event_Handler_Cb _addCb, Ecore_Event_Handler_Cb _dataCb, Ecore_Event_Handler_Cb _delCb)
-{
-  Ecore_Con_Server *server = NULL;
-  struct _conct *this = malloc(sizeof(struct _conct));
-  int count = 0;
-
-  this->address = address;
-  this->port = port;
-  this->pointer = data;
-  this->addCb = _addCb;
-  this->dataCb = _dataCb;
-  this->delCb = _delCb;
-  // This loop is overkill I think.
-  while ((!server) && (10 > count))
-  {
-    if ((server = ecore_con_server_connect(ECORE_CON_REMOTE_TCP, address, port, this->pointer)))
-    {
-      this->add = ecore_event_handler_add(ECORE_CON_EVENT_SERVER_ADD, (Ecore_Event_Handler_Cb) _add, this);
-      this->del = ecore_event_handler_add(ECORE_CON_EVENT_SERVER_DEL, (Ecore_Event_Handler_Cb) _del, this);
-    }
-    count++;
-  }
-
-  if (!server)
-    printf("Failed to connect to server %s:%d!\n", this->address, this->port);
-
-  return server;
-}
-
 void *addMessage(Eina_Clist *list, size_t size, const char *message, ...)
 {
     va_list args;
@@ -123,6 +95,7 @@ void sendBack(Ecore_Con_Client *client, const char *SID, const char *message, ..
     va_end(args);
     buf[length++] = '\n';
     buf[length] = '\0';
+//    printf("sendBack(%s)", buf);
     ecore_con_client_send(client, buf, length);
     ecore_con_client_flush(client);
 }
@@ -140,6 +113,302 @@ void sendForth(Ecore_Con_Server	*server, const char *SID, const char *message, .
     va_end(args);
     buf[length++] = '\n';
     buf[length] = '\0';
+//    printf("sendForth(%s)", buf);
     ecore_con_server_send(server, buf, length);
     ecore_con_server_flush(server);
 }
+
+
+
+
+static Eina_Bool parseStream(void *data, int type, void *evData, int evSize, void *ev)
+{
+    Connection *connection = data;
+    char SID[PATH_MAX];
+    const char *command;
+    char *ext;
+
+    if (NULL == connection->stream)
+      connection->stream = eina_strbuf_new();
+
+    eina_strbuf_append_length(connection->stream, evData, evSize);
+    command = eina_strbuf_string_get(connection->stream);
+    while ((ext = index(command, '\n')))
+    {
+        int length = ext - command;
+
+        strncpy(SID, command, length + 1);
+        SID[length] = '\0';
+        eina_strbuf_remove(connection->stream, 0, length + 1);
+        ext = index(SID, '.');
+        if (ext)
+        {
+            ext[0] = '\0';
+            command = ext + 1;
+            ext = index(SID, '(');
+            if (ext)
+            {
+                streamParser func = eina_hash_find(connection->commands, command);
+//PW("COMMAND - %s", command);
+
+                ext[0] = '\0';
+
+                // Need a callback if we can't find the command.
+                if (NULL == func)
+                    func = connection->unknownCommand;
+                if (func)
+                    func(data, connection, SID, (char *) command, ext + 1);
+            }
+        }
+
+        // Get the next blob to check it.
+        command = eina_strbuf_string_get(connection->stream);
+    }
+
+    if (connection->_data)
+      connection->_data(data, type, ev);
+
+    return ECORE_CALLBACK_RENEW;
+}
+
+Eina_Bool parseClientStream(void *data, int type, Ecore_Con_Event_Client_Data *ev)
+{
+  // data is the server connection, but we want the client one.
+  return parseStream(ecore_con_client_data_get(ev->client), type, ev->data, ev->size, ev);
+}
+
+Eina_Bool parseServerStream(void *data, int type, Ecore_Con_Event_Server_Data *ev)
+{
+    return parseStream(data, type, ev->data, ev->size, ev);
+}
+
+
+Eina_Bool clientAdd(void *data, int type, Ecore_Con_Event_Client_Add *ev)
+{
+    Connection *conn, *connection = data;
+
+    ecore_con_client_timeout_set(ev->client, 0);
+    conn = calloc(1, sizeof(Connection));
+    conn->type = CT_CLIENT;
+    conn->conn.client.client = ev->client;
+    conn->conn.client.myServer = connection;
+    conn->name = strdup(connection->name);
+    conn->address = strdup(connection->address);
+    conn->port = connection->port;
+    conn->pointer = connection->pointer;
+    conn->commands = eina_hash_string_superfast_new(NULL);
+    ecore_con_client_data_set(ev->client, conn);
+
+    if (connection->_add)
+      return connection->_add(connection->pointer, type, ev);
+
+    return ECORE_CALLBACK_RENEW;
+}
+
+Eina_Bool clientDel(void *data, int type, Ecore_Con_Event_Client_Del *ev)
+{
+    Connection *connection = data;
+
+    if (ev->client)
+    {
+        Eina_List const *clients;
+
+        // This is only really for testing, normally it just runs 24/7, or until told not to.
+        clients = ecore_con_server_clients_get(connection->conn.server.server);
+        if (0 == eina_list_count(clients))
+            printf("No more clients, exiting.");
+        else
+            printf("Some %d more clients, exiting anyway.", eina_list_count(clients));
+
+// TODO - Probably should just keep running, both servers, and go away when all clients are gone for testing.
+
+        if (connection->_del)
+            connection->_del(connection->pointer, type, ev);
+
+        ecore_con_client_del(ev->client);
+        ecore_main_loop_quit();
+    }
+
+    return ECORE_CALLBACK_RENEW;
+}
+
+Connection *openArms(char *name, const char *address, int port, void *data, Ecore_Event_Handler_Cb _add, Ecore_Event_Handler_Cb _data, Ecore_Event_Handler_Cb _del, streamParser _parser)
+{
+    Connection *conn = calloc(1, sizeof(Connection));
+    Ecore_Con_Server *server;
+
+    conn->type = CT_SERVER;
+//    conn->conn.server.serverCommand = ;
+    conn->name = strdup(name);
+    conn->address = strdup(address);
+    conn->port = port;
+
+    conn->pointer = data;
+    conn->_add = _add;
+    conn->_data = _data;
+    conn->_del = _del;
+    conn->unknownCommand = _parser;
+    conn->commands = eina_hash_string_superfast_new(NULL);
+
+    if ((server = ecore_con_server_add(ECORE_CON_REMOTE_TCP, address, port, data)))
+    {
+      conn->conn.server.server = server;
+
+        conn->add  = ecore_event_handler_add(ECORE_CON_EVENT_CLIENT_ADD,  (Ecore_Event_Handler_Cb) clientAdd,   conn);
+        conn->add  = ecore_event_handler_add(ECORE_CON_EVENT_CLIENT_DATA, (Ecore_Event_Handler_Cb) parseClientStream, conn);
+        conn->add  = ecore_event_handler_add(ECORE_CON_EVENT_CLIENT_DEL,  (Ecore_Event_Handler_Cb) clientDel,   conn);
+        ecore_con_server_timeout_set(server, 0);
+        ecore_con_server_client_limit_set(server, -1, 0);
+        ecore_con_server_data_set(server, conn);
+//      ecore_con_server_timeout_set(server, 10);
+//      ecore_con_server_client_limit_set(server, 3, 0);
+    }
+    else
+    {
+      free(conn->address);
+      free(conn);
+      conn = NULL;
+    }
+
+    return conn;
+}
+
+Eina_Bool serverAdd(void *data, int type, Ecore_Con_Event_Server_Add *ev)
+{
+  Connection *connection = data;
+
+  connection->conn.server.hackyCount++;
+
+  // Alledgedly this checks for real conections, but given that the first time it's called, there's no real connection, this is failing somehow.
+  //if (ecore_con_server_connected_get(ev->server))
+  if (connection->conn.server.hackyCount <= 1)
+    printf("Bogus server ignored.");
+  else
+  {
+    printf("Connected to %s server.", connection->name);
+    connection->conn.server.server = ev->server;
+    // In case the server crashed, clear out any waiting data.
+    if (connection->stream)
+      eina_strbuf_reset(connection->stream);
+
+    if (connection->_add)
+      connection->_add(data, type, ev);
+  }
+
+  return ECORE_CALLBACK_RENEW;
+}
+
+Eina_Bool serverDel(void *data, int type, Ecore_Con_Event_Server_Del *ev)
+{
+  Connection *connection = data;
+
+  connection->conn.server.server = NULL;
+
+//  connection->server.hackyCount--;
+  // Let it fail a couple of times during startup, then try to start our own script server.
+  connection->conn.server.count++;
+  if (1 < connection->conn.server.count)
+  {
+    char buf[PATH_MAX];
+
+    printf("Failed to connect to a %s server, starting our own.", connection->name);
+    // TODO - Should use Ecore_Exe for this sort of thing.
+    sprintf(buf, "%s/%s &", prefix_bin_get(), connection->conn.server.serverCommand);
+    system(buf);
+    connection->conn.server.count = 0;
+    // TODO - There's also the question of what to do if the connection failed.
+    //        Did the server crash, or was it just the connection?
+    //        Probably gonna need some smarts, for now we just restart all the scripts.
+    //        Which I think gets done on server add.
+  }
+
+  if (connection->_del)
+    connection->_del(data, type, ev);
+
+
+  // TODO - May want to renew even if it's not running the GUI, but then we still need some sort of "shut down" signal, which we don't need during testing.
+//  if (ourGlobals->ui)
+    return ECORE_CALLBACK_RENEW;
+
+//  ecore_main_loop_quit();
+
+//  return ECORE_CALLBACK_CANCEL;
+
+
+
+/* Extantz does this instead of the above returns -
+
+  if (ourGlobals->running)
+    return ECORE_CALLBACK_RENEW;
+  return ECORE_CALLBACK_CANCEL;
+*/
+}
+
+
+
+#if 1
+Ecore_Con_Server *reachOut(char *address, int port, void *data, Ecore_Event_Handler_Cb _addCb, Ecore_Event_Handler_Cb _dataCb, Ecore_Event_Handler_Cb _delCb)
+{
+  Ecore_Con_Server *server = NULL;
+  struct _conct *this = malloc(sizeof(struct _conct));
+  int count = 0;
+
+  this->address = address;
+  this->port = port;
+  this->pointer = data;
+  this->addCb = _addCb;
+  this->dataCb = _dataCb;
+  this->delCb = _delCb;
+  // This loop is overkill I think.
+  while ((!server) && (10 > count))
+  {
+    if ((server = ecore_con_server_connect(ECORE_CON_REMOTE_TCP, address, port, this->pointer)))
+    {
+      this->add = ecore_event_handler_add(ECORE_CON_EVENT_SERVER_ADD, (Ecore_Event_Handler_Cb) _add, this);
+      this->del = ecore_event_handler_add(ECORE_CON_EVENT_SERVER_DEL, (Ecore_Event_Handler_Cb) _del, this);
+    }
+    count++;
+  }
+
+  if (!server)
+    printf("Failed to connect to server %s:%d!\n", this->address, this->port);
+
+  return server;
+}
+#else
+Connection *reachOut(char *name, char *command, char *address, int port, void *data, Ecore_Event_Handler_Cb _add, Ecore_Event_Handler_Cb _data, Ecore_Event_Handler_Cb _del)
+{
+  Connection *conn = calloc(1, sizeof(Connection));
+  Ecore_Con_Server *server = NULL;
+  int count = 0;
+
+  conn->type = CT_SERVER;
+  conn->conn.server.serverCommand = strdup(command);
+  conn->name = strdup(name);
+  conn->address = strdup(address);
+  conn->port = port;
+  conn->pointer = data;
+  conn-> = _add;
+  conn-> = _data;
+  conn-> = _del;
+  conn->commands = eina_hash_string_superfast_new(NULL);
+
+  // This loop is overkill I think.
+  while ((!server) && (10 > count))
+  {
+    if ((server = ecore_con_server_connect(ECORE_CON_REMOTE_TCP, address, port, data)))
+    {
+      conn->add  = ecore_event_handler_add(ECORE_CON_EVENT_SERVER_ADD,  (Ecore_Event_Handler_Cb) serverAdd,   conn);
+      conn->data = ecore_event_handler_add(ECORE_CON_EVENT_SERVER_DATA, (Ecore_Event_Handler_Cb) parseServerStream, conn);
+      conn->del  = ecore_event_handler_add(ECORE_CON_EVENT_SERVER_DEL,  (Ecore_Event_Handler_Cb) serverDel,   conn);
+      ecore_con_server_data_set(server, conn);
+    }
+    count++;
+  }
+
+  if (!server)
+    printf("Failed to connect to the %s server %s:%d!\n", name, address, port);
+
+  return conn;
+}
+#endif
diff --git a/src/libraries/SledjHamr.h b/src/libraries/SledjHamr.h
index 07018a1..467fcc6 100644
--- a/src/libraries/SledjHamr.h
+++ b/src/libraries/SledjHamr.h
@@ -8,9 +8,56 @@
 #include <Ecore_Con.h>
 
 
+typedef struct _Connection      Connection;
+
+typedef Eina_Bool (* streamParser)(void *data, Connection *connection, char *SID, char *command, char *arguments);
+
+typedef enum
+{
+  CT_CLIENT,
+  CT_SERVER
+} connType;
+
+struct _ConnServer
+{
+  Ecore_Con_Server *server;
+  char *serverCommand;
+  int count, hackyCount;
+};
+
+struct _ConnClient
+{
+  Ecore_Con_Client *client;
+  Connection *myServer;
+};
+
+struct _Connection
+{
+  connType type;
+  union
+  {
+    struct _ConnServer          server;
+    struct _ConnClient          client;
+  } conn;
+  char          *name; // For log entries and such.
+  char          *address;
+  int           port;
+  Eina_Strbuf   *stream;
+  Eina_Hash     *commands;
+//                  streamParser *func;
+  //  Callbacks.
+  void *pointer;
+  Ecore_Event_Handler_Cb _add, _data, _del;
+  Ecore_Event_Handler *add, *data, *del;
+  streamParser unknownCommand;
+};
+
+
 Ecore_Con_Server *reachOut(char *address, int port, void *data, Ecore_Event_Handler_Cb _add, Ecore_Event_Handler_Cb _data, Ecore_Event_Handler_Cb _del);
 void *addMessage(Eina_Clist *list, size_t size, const char *message, ...);
 void sendBack(Ecore_Con_Client *client, const char *SID, const char *message, ...);
 void sendForth(Ecore_Con_Server *server, const char *SID, const char *message, ...);
 
+Connection *openArms(char *name, const char *address, int port, void *data, Ecore_Event_Handler_Cb _add, Ecore_Event_Handler_Cb _data, Ecore_Event_Handler_Cb _del, streamParser _parser);
+
 #endif
diff --git a/src/love/love.c b/src/love/love.c
index e90278a..0465ee5 100644
--- a/src/love/love.c
+++ b/src/love/love.c
@@ -53,7 +53,6 @@ typedef struct _Lscript
 
 int logDom = -1;        // Our logging domain.
 static Eina_Strbuf *LuaSLStream;
-static Eina_Strbuf *clientStream;
 static int scriptCount = 0;
 static int compiledCount = 0;
 static struct timeval startTime;
@@ -507,6 +506,10 @@ static Eina_Bool _delLuaSL(void *data, int type, Ecore_Con_Event_Server_Del *ev)
     sprintf(buf, "%s/LuaSL &", prefix_bin_get());
     system(buf);
     count = 0;
+    // TODO - There's also the question of what to do if the connection failed.
+    //        Did the server crash, or was it just the connection?
+    //        Probably gonna need some smarts, for now we just restart all the scripts.
+    //        Which I think gets done on server add.
   }
 
   // TODO - May want to renew even if it's not running the GUI, but then we still need some sort of "shut down" signal, which we don't need during testing.
@@ -523,7 +526,6 @@ static Eina_Bool _addClient(void *data, int type, Ecore_Con_Event_Client_Add *ev
   gameGlobals *ourGlobals = data;
 
   ourGlobals->client = ev->client;
-  ecore_con_client_timeout_set(ev->client, 0);
 
   if (ourGlobals->client)
   {
@@ -534,91 +536,54 @@ static Eina_Bool _addClient(void *data, int type, Ecore_Con_Event_Client_Add *ev
   return ECORE_CALLBACK_RENEW;
 }
 
-static Eina_Bool _dataClient(void *data, int type, Ecore_Con_Event_Client_Data *ev)
+
+Eina_Bool clientParser(void *data, Connection *connection, char *SID, char *command, char *arguments)
 {
     gameGlobals *ourGlobals = data;
-//    char buf[PATH_MAX];
-    char SID[PATH_MAX];
-    const char *command;
-    char *ext;
 
-    eina_strbuf_append_length(clientStream, ev->data, ev->size);
-    command = eina_strbuf_string_get(clientStream);
-    while ((ext = index(command, '\n')))
+    if (0 == strncmp(command, "events.touch_start", 18))
     {
-        int length = ext - command;
+        Eina_Iterator *scripts;
+        LoveScript *me;
 
-        strncpy(SID, command, length + 1);
-        SID[length] = '\0';
-        eina_strbuf_remove(clientStream, 0, length + 1);
-        ext = index(SID, '.');
-        if (ext)
+        // TODO - For now, just send it to everyone.
+        scripts = eina_hash_iterator_data_new(ourGlobals->scripts);
+        while(eina_iterator_next(scripts, (void **) &me))
         {
-            ext[0] = '\0';
-            command = ext + 1;
-
-            if (0 == strncmp(command, "events.touch_start(", 19))
-            {
-                Eina_Iterator *scripts;
-                LoveScript *me;
-
-                // TODO - For now, just send it to everyone.
-                scripts = eina_hash_iterator_data_new(ourGlobals->scripts);
-                while(eina_iterator_next(scripts, (void **) &me))
-                {
-                    sendForth(ourGlobals->serverLuaSL, me->SID, "events.detectedKeys({\"%s\"})", ownerKey);
-                    sendForth(ourGlobals->serverLuaSL, me->SID, "events.detectedNames({\"%s\"})", ownerName);
-                    sendForth(ourGlobals->serverLuaSL, me->SID, "events.touch_start(1)");
-                }
-                eina_iterator_free(scripts);
-            }
-            else if (0 == strncmp(command, "events.listen(", 14))
-            {
-                Eina_Iterator *scripts;
-                LoveScript *me;
-
-                // TODO - For now, just send it to everyone.
-                scripts = eina_hash_iterator_data_new(ourGlobals->scripts);
-                while(eina_iterator_next(scripts, (void **) &me))
-                {
-                    sendForth(ourGlobals->serverLuaSL, me->SID, command);
-                }
-                eina_iterator_free(scripts);
-            }
-            else
-              PW("Unknown command from client - %s", command);
+            sendForth(ourGlobals->serverLuaSL, me->SID, "events.detectedKeys({\"%s\"})", ownerKey);
+            sendForth(ourGlobals->serverLuaSL, me->SID, "events.detectedNames({\"%s\"})", ownerName);
+            sendForth(ourGlobals->serverLuaSL, me->SID, "events.touch_start(1)");
         }
-
-        // Get the next blob to check it.
-        command = eina_strbuf_string_get(clientStream);
+        eina_iterator_free(scripts);
     }
+    else if (0 == strncmp(command, "events.listen", 13))
+    {
+        Eina_Iterator *scripts;
+        LoveScript *me;
+        char buf[PATH_MAX];
+
+        // TODO - For now, just send it to everyone.
+        sprintf(buf, "%s(%s", command, arguments);
+        scripts = eina_hash_iterator_data_new(ourGlobals->scripts);
+        while(eina_iterator_next(scripts, (void **) &me))
+        {
+            sendForth(ourGlobals->serverLuaSL, me->SID, buf);
+        }
+        eina_iterator_free(scripts);
+    }
+    else
+        PW("Unknown command from client - %s(%s", command, arguments);
 
-   return ECORE_CALLBACK_RENEW;
+    return ECORE_CALLBACK_RENEW;
 }
 
 static Eina_Bool _delClient(void *data, int type, Ecore_Con_Event_Client_Del *ev)
 {
     gameGlobals *ourGlobals = data;
 
-    if (ev->client)
-    {
-        Eina_List const *clients;
-
-        // This is only really for testing, normally it just runs 24/7, or until told not to.
-        clients = ecore_con_server_clients_get(ourGlobals->server);
-        if (0 == eina_list_count(clients))
-        {
-            PD("No more clients, exiting.");
-            sendForth(ourGlobals->serverLuaSL, ownerKey, "exit()");
-            ecore_main_loop_quit();
-        }
-        else
-        {
-            PD("Some %d more clients, exiting anyway.", eina_list_count(clients));
-            sendForth(ourGlobals->serverLuaSL, ownerKey, "exit()");
-            ecore_main_loop_quit();
-        }
-    }
+// TODO - I could coax this into something generic, maybe.
+    sendForth(ourGlobals->serverLuaSL, ownerKey, "exit()");
+
     return ECORE_CALLBACK_RENEW;
 }
 
@@ -641,18 +606,10 @@ int main(int argc, char **argv)
         if (ecore_con_init())
         {
             LuaSLStream = eina_strbuf_new();
-            clientStream = eina_strbuf_new();
             reachOut("127.0.0.1", 8211, &ourGlobals, (Ecore_Event_Handler_Cb) _addLuaSL, (Ecore_Event_Handler_Cb) _dataLuaSL, (Ecore_Event_Handler_Cb) _delLuaSL);
 
-                if ((ourGlobals.server = ecore_con_server_add(ECORE_CON_REMOTE_TCP, ourGlobals.address, ourGlobals.port + 1, &ourGlobals)))
-                {
-                    ecore_event_handler_add(ECORE_CON_EVENT_CLIENT_ADD,  (Ecore_Event_Handler_Cb) _addClient,  &ourGlobals);
-                    ecore_event_handler_add(ECORE_CON_EVENT_CLIENT_DATA, (Ecore_Event_Handler_Cb) _dataClient, &ourGlobals);
-                    ecore_event_handler_add(ECORE_CON_EVENT_CLIENT_DEL,  (Ecore_Event_Handler_Cb) _delClient,  &ourGlobals);
-                    ecore_con_server_timeout_set(ourGlobals.server, 0);
-                    ecore_con_server_client_limit_set(ourGlobals.server, -1, 0);
-
-
+            if (openArms("love", ourGlobals.address, ourGlobals.port + 1, &ourGlobals, (Ecore_Event_Handler_Cb) _addClient, NULL, (Ecore_Event_Handler_Cb) _delClient, clientParser))
+            {
                 if (ecore_evas_init())
                 {
                     if (edje_init())