apps/plugins/lua/strcspn.c


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
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;
}