From cf87597226f5d6b269f1f2c4d6f402aa1eccb852 Mon Sep 17 00:00:00 2001
From: Maurus Cuelenaere <mcuelenaere@gmail.com>
Date: Thu, 21 May 2009 19:01:41 +0000
Subject: Commit FS#9174: Lua scripting language by Dan Everton

git-svn-id: svn://svn.rockbox.org/rockbox/trunk@21020 a1c6a512-1295-4272-9138-f99709370657
---
 apps/plugins/lua/strcspn.c | 16 ++++++++++++++++
 1 file changed, 16 insertions(+)
 create mode 100644 apps/plugins/lua/strcspn.c

(limited to 'apps/plugins/lua/strcspn.c')

diff --git a/apps/plugins/lua/strcspn.c b/apps/plugins/lua/strcspn.c
new file mode 100644
index 0000000..7af6f69
--- /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;
+}
-- 
cgit v1.1