1 b2cfc4e2 2003-09-30 devnull /*
 2 b2cfc4e2 2003-09-30 devnull  * The authors of this software are Rob Pike and Ken Thompson.
 3 b2cfc4e2 2003-09-30 devnull  *              Copyright (c) 2002 by Lucent Technologies.
 4 b2cfc4e2 2003-09-30 devnull  * Permission to use, copy, modify, and distribute this software for any
 5 b2cfc4e2 2003-09-30 devnull  * purpose without fee is hereby granted, provided that this entire notice
 6 b2cfc4e2 2003-09-30 devnull  * is included in all copies of any software which is or includes a copy
 7 b2cfc4e2 2003-09-30 devnull  * or modification of this software and in all copies of the supporting
 8 b2cfc4e2 2003-09-30 devnull  * documentation for such software.
 9 b2cfc4e2 2003-09-30 devnull  * THIS SOFTWARE IS BEING PROVIDED "AS IS", WITHOUT ANY EXPRESS OR IMPLIED
10 b2cfc4e2 2003-09-30 devnull  * WARRANTY.  IN PARTICULAR, NEITHER THE AUTHORS NOR LUCENT TECHNOLOGIES MAKE ANY
11 b2cfc4e2 2003-09-30 devnull  * REPRESENTATION OR WARRANTY OF ANY KIND CONCERNING THE MERCHANTABILITY
12 b2cfc4e2 2003-09-30 devnull  * OF THIS SOFTWARE OR ITS FITNESS FOR ANY PARTICULAR PURPOSE.
13 b2cfc4e2 2003-09-30 devnull  */
14 b2cfc4e2 2003-09-30 devnull #include <stdarg.h>
15 b2cfc4e2 2003-09-30 devnull #include <string.h>
16 b2cfc4e2 2003-09-30 devnull #include "utf.h"
17 b2cfc4e2 2003-09-30 devnull #include "utfdef.h"
18 b2cfc4e2 2003-09-30 devnull 
19 b2cfc4e2 2003-09-30 devnull char*
20 b2cfc4e2 2003-09-30 devnull utfrune(char *s, long c)
21 b2cfc4e2 2003-09-30 devnull {
22 b2cfc4e2 2003-09-30 devnull 	long c1;
23 b2cfc4e2 2003-09-30 devnull 	Rune r;
24 b2cfc4e2 2003-09-30 devnull 	int n;
25 b2cfc4e2 2003-09-30 devnull 
26 b2cfc4e2 2003-09-30 devnull 	if(c < Runesync)		/* not part of utf sequence */
27 b2cfc4e2 2003-09-30 devnull 		return strchr(s, c);
28 b2cfc4e2 2003-09-30 devnull 
29 b2cfc4e2 2003-09-30 devnull 	for(;;) {
30 b2cfc4e2 2003-09-30 devnull 		c1 = *(uchar*)s;
31 b2cfc4e2 2003-09-30 devnull 		if(c1 < Runeself) {	/* one byte rune */
32 b2cfc4e2 2003-09-30 devnull 			if(c1 == 0)
33 b2cfc4e2 2003-09-30 devnull 				return 0;
34 b2cfc4e2 2003-09-30 devnull 			if(c1 == c)
35 b2cfc4e2 2003-09-30 devnull 				return s;
36 b2cfc4e2 2003-09-30 devnull 			s++;
37 b2cfc4e2 2003-09-30 devnull 			continue;
38 b2cfc4e2 2003-09-30 devnull 		}
39 b2cfc4e2 2003-09-30 devnull 		n = chartorune(&r, s);
40 b2cfc4e2 2003-09-30 devnull 		if(r == c)
41 b2cfc4e2 2003-09-30 devnull 			return s;
42 b2cfc4e2 2003-09-30 devnull 		s += n;
43 b2cfc4e2 2003-09-30 devnull 	}
44 b2cfc4e2 2003-09-30 devnull 	return 0;
45 b2cfc4e2 2003-09-30 devnull }