strrchr.c 1.8 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758
  1. /*
  2. * This string-include defines all string functions as inline
  3. * functions. Use gcc. It also assumes ds=es=data space, this should be
  4. * normal. Most of the string-functions are rather heavily hand-optimized,
  5. * see especially strtok,strstr,str[c]spn. They should work, but are not
  6. * very easy to understand. Everything is done entirely within the register
  7. * set, making the functions fast and clean. String instructions have been
  8. * used through-out, making for "slightly" unclear code :-)
  9. *
  10. * NO Copyright (C) 1991, 1992 Linus Torvalds,
  11. * consider these trivial functions to be PD.
  12. */
  13. /*
  14. * Copyright (C) 2000-2005 Erik Andersen <andersen@uclibc.org>
  15. *
  16. * Licensed under the LGPL v2.1, see the file COPYING.LIB in this tarball.
  17. */
  18. /*
  19. * Modified for uClibc by Erik Andersen <andersen@codepoet.org>
  20. * These make no attempt to use nifty things like mmx/3dnow/etc.
  21. * These are not inline, and will therefore not be as fast as
  22. * modifying the headers to use inlines (and cannot therefore
  23. * do tricky things when dealing with const memory). But they
  24. * should (I hope!) be faster than their generic equivalents....
  25. *
  26. * More importantly, these should provide a good example for
  27. * others to follow when adding arch specific optimizations.
  28. * -Erik
  29. */
  30. #include <string.h>
  31. char *strrchr(const char *s, int c)
  32. {
  33. char *eax;
  34. __asm__ __volatile__(
  35. " movb %%cl, %%ch\n"
  36. "1: movb (%1), %%cl\n" /* load char */
  37. " cmpb %%cl, %%ch\n" /* char == c? */
  38. " jne 2f\n"
  39. " movl %1, %%eax\n"
  40. "2: incl %1\n"
  41. " testb %%cl, %%cl\n" /* char == NUL? */
  42. " jnz 1b\n"
  43. /* "=c": use ecx, not ebx (-fpic uses it). */
  44. : "=a" (eax), "=r" (s), "=c" (c)
  45. : "0" (0), "1" (s), "2" (c)
  46. /* : no clobbers */
  47. );
  48. return eax;
  49. }
  50. libc_hidden_def(strrchr)
  51. #ifdef __UCLIBC_SUSV3_LEGACY__
  52. strong_alias(strrchr,rindex)
  53. #endif