From 2a943546b7a3c86a2d0a68e64b99fad72caa5e61 Mon Sep 17 00:00:00 2001
From: David Walter Seikel
Date: Wed, 14 May 2014 18:25:51 +1000
Subject: Implement llGetNotecardLine().

Plus another fudge of the MLP scripts to get it to work.
---
 src/love/love.c | 82 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 82 insertions(+)

(limited to 'src')

diff --git a/src/love/love.c b/src/love/love.c
index dc524d8..db4c557 100644
--- a/src/love/love.c
+++ b/src/love/love.c
@@ -12,6 +12,9 @@ Dedicated to my girl Boots, coz she means the world to me.
 #include <Edje.h>
 
 #include <unistd.h>
+#include <sys/types.h>
+#include <sys/stat.h>
+#include <fcntl.h>
 
 #include "LumbrJack.h"
 #include "Runnr.h"
@@ -196,6 +199,26 @@ static Eina_Bool _addLuaSL(void *data, int type, Ecore_Con_Event_Server_Add *ev)
     return ECORE_CALLBACK_RENEW;
 }
 
+
+// Borrowed from toybox, though it's real slow.
+// TODO - Replace this quick and dirty llGetNotecardLine() with something using mmap and cached files that assumes more lines will be read soon.
+char *get_rawline(int fd, long *plen, char end)
+{
+  char c, *buf = NULL;
+  long len = 0;
+
+  for (;;) {
+    if (1>read(fd, &c, 1)) break;
+    if (!(len & 63)) buf=realloc(buf, len+65);
+    if ((buf[len++]=c) == end) break;
+  }
+  if (buf) buf[len]=0;
+  if (plen) *plen = len;
+
+  return buf;
+}
+
+
 static Eina_Bool _dataLuaSL(void *data, int type, Ecore_Con_Event_Server_Data *ev)
 {
     gameGlobals *ourGlobals = data;
@@ -361,6 +384,65 @@ static Eina_Bool _dataLuaSL(void *data, int type, Ecore_Con_Event_Server_Data *e
 			sendForth(ourGlobals->serverLuaSL, me->SID, "events.link_message%s", &command[15]);
 		    }
 		}
+		else if (0 == strncmp(command, "llGetNotecardLine(", 18))
+		{
+		    char *notecard, *temp, *line, key[PATH_MAX];
+		    int  lineNo, fd;
+
+		    strcpy(buf, &command[19]);
+		    notecard = buf;
+		    temp = notecard;
+		    while ('"' != temp[0])
+			temp++;
+		    temp[0] = '\0';
+		    while (',' != temp[0])
+			temp++;
+		    while (' ' != temp[0])
+			temp++;
+		    line = temp;
+		    while (')' != temp[0])
+			temp++;
+		    temp[0] = '\0';
+		    lineNo = atoi(line);
+		    snprintf(key, sizeof(key), "%s/Test sim/objects/onefang%%27s%%20test%%20bed.5cb927d5-1304-4f1a-9947-308251ef2df0/%s", PACKAGE_DATA_DIR, notecard);
+
+		    fd = open(key, O_RDONLY);
+		    if (-1 != fd)
+		    {
+			Eina_Iterator *scripts;
+			script *me;
+			long len;
+
+			temp = NULL;
+			do
+			{
+			    temp = get_rawline(fd, &len, '\n');
+			    if (temp)
+			    {
+				if (temp[len - 1] == '\n')
+				    temp[--len] = '\0';
+			    }
+			} while (temp && (0 < lineNo--));
+
+			sprintf(key, "%08lx-%04lx-%04lx-%04lx-%012lx", random(), random() % 0xFFFF, random() % 0xFFFF, random() % 0xFFFF, random());
+			sendForth(ourGlobals->serverLuaSL, SID, "return \"%s\"", key);
+
+			// TODO - For now, just send it to everyone.
+			scripts = eina_hash_iterator_data_new(ourGlobals->scripts);
+			while(eina_iterator_next(scripts, (void **) &me))
+			{
+			    if (temp)
+			    {
+				sendForth(ourGlobals->serverLuaSL, me->SID, "events.dataserver(\"%s\", \"%s\")", key, temp);
+			    }
+			    else
+				sendForth(ourGlobals->serverLuaSL, me->SID, "events.dataserver(\"%s\", [[\\n\\n\\n]])", key);
+			}
+
+			close(fd);
+		    }
+
+		}
 		else
 		    PI("Script %s sent command %s", SID, command);
 	    }
-- 
cgit v1.1