strrchr.c 1.8 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859
  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. /* Experimentally off - libc_hidden_proto(strrchr) */
  32. char *strrchr(const char *s, int c)
  33. {
  34. char *eax;
  35. __asm__ __volatile__(
  36. " movb %%cl, %%ch\n"
  37. "1: movb (%1), %%cl\n" /* load char */
  38. " cmpb %%cl, %%ch\n" /* char == c? */
  39. " jne 2f\n"
  40. " movl %1, %%eax\n"
  41. "2: incl %1\n"
  42. " testb %%cl, %%cl\n" /* char == NUL? */
  43. " jnz 1b\n"
  44. /* "=c": use ecx, not ebx (-fpic uses it). */
  45. : "=a" (eax), "=r" (s), "=c" (c)
  46. : "0" (0), "1" (s), "2" (c)
  47. /* : no clobbers */
  48. );
  49. return eax;
  50. }
  51. libc_hidden_def(strrchr)
  52. #ifdef __UCLIBC_SUSV3_LEGACY__
  53. strong_alias(strrchr,rindex)
  54. #endif