From e5888a1ffdae813d7575f5fb02275c6bb07e5199 Mon Sep 17 00:00:00 2001 From: Taru Karttunen Date: Wed, 30 Mar 2011 15:46:40 +0300 Subject: Import sources from 2011-03-30 iso image --- sys/src/libc/port/utfutf.c | 26 ++++++++++++++++++++++++++ 1 file changed, 26 insertions(+) create mode 100755 sys/src/libc/port/utfutf.c (limited to 'sys/src/libc/port/utfutf.c') diff --git a/sys/src/libc/port/utfutf.c b/sys/src/libc/port/utfutf.c new file mode 100755 index 000000000..48d1ee831 --- /dev/null +++ b/sys/src/libc/port/utfutf.c @@ -0,0 +1,26 @@ +#include +#include + + +/* + * Return pointer to first occurrence of s2 in s1, + * 0 if none + */ +char* +utfutf(char *s1, char *s2) +{ + char *p; + long f, n1, n2; + Rune r; + + n1 = chartorune(&r, s2); + f = r; + if(f <= Runesync) /* represents self */ + return strstr(s1, s2); + + n2 = strlen(s2); + for(p=s1; p=utfrune(p, f); p+=n1) + if(strncmp(p, s2, n2) == 0) + return p; + return 0; +} -- cgit v1.2.3