Commit FS#9174: Lua scripting language by Dan Everton

git-svn-id: svn://svn.rockbox.org/rockbox/trunk@21020 a1c6a512-1295-4272-9138-f99709370657

1 files changed, 16 insertions, 0 deletions

diff --git a/apps/plugins/lua/strcspn.c b/apps/plugins/lua/strcspn.c
new file mode 100644
index 0000000000..7af6f693eb
--- /dev/null
+++ b/apps/plugins/lua/strcspn.c
@@ -0,0 +1,16 @@
+#include "rocklibc.h"
+
+size_t strcspn(const char *s, const char *reject)
+{
+  size_t l=0;
+  int a=1,i,al=strlen(reject);
+
+  while((a)&&(*s))
+  {
+    for(i=0;(a)&&(i<al);i++)
+      if (*s==reject[i]) a=0;
+    if (a) l++;
+    s++;
+  }
+  return l;
+}