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.
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"
20 b2cfc4e2 2003-09-30 devnull utfrrune(char *s, long c)
24 b2cfc4e2 2003-09-30 devnull char *s1;
26 b2cfc4e2 2003-09-30 devnull if(c < Runesync) /* not part of utf sequence */
27 b2cfc4e2 2003-09-30 devnull return strrchr(s, c);
30 b2cfc4e2 2003-09-30 devnull for(;;) {
31 b2cfc4e2 2003-09-30 devnull c1 = *(uchar*)s;
32 b2cfc4e2 2003-09-30 devnull if(c1 < Runeself) { /* one byte rune */
33 b2cfc4e2 2003-09-30 devnull if(c1 == 0)
34 b2cfc4e2 2003-09-30 devnull return s1;
35 b2cfc4e2 2003-09-30 devnull if(c1 == c)
38 b2cfc4e2 2003-09-30 devnull continue;
40 b2cfc4e2 2003-09-30 devnull c1 = chartorune(&r, s);
41 b2cfc4e2 2003-09-30 devnull if(r == c)
45 b2cfc4e2 2003-09-30 devnull return 0;