utfrrune.c 1.2 KB

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