xref: /plan9-contrib/sys/src/cmd/rc/utfutf.c (revision c6df144405f586b73992827d584728dc975dff14)
1 #include "rc.h"
2 
3 /*
4  * Return pointer to first occurrence of s2 in s1,
5  * 0 if none
6  */
7 char*
utfutf(char * s1,char * s2)8 utfutf(char *s1, char *s2)
9 {
10 	char *p;
11 	long f, n1, n2;
12 	Rune r;
13 
14 	n1 = chartorune(&r, s2);
15 	f = r;
16 	if(f <= Runesync)		/* represents self */
17 		return strstr(s1, s2);
18 
19 	n2 = strlen(s2);
20 	for(p=s1; p=utfrune(p, f); p+=n1)
21 		if(strncmp(p, s2, n2) == 0)
22 			return p;
23 	return 0;
24 }
25