home *** CD-ROM | disk | FTP | other *** search
/ The Datafile PD-CD 2 / DATAFILE_PDCD2.iso / utilities2 / unixlib36d / UnixLib36d / src / c / strichr < prev    next >
Encoding:
Text File  |  1994-03-08  |  1.0 KB  |  68 lines
  1. #ifdef __STDC__
  2. static char sccs_id[] = "@(#) strichr.c 1.0 " __DATE__ " HJR";
  3. #else
  4. static char sccs_id[] = "@(#) strichr.c 1.0 23/9/91 HJR";
  5. #endif
  6.  
  7. /* strichr.c (c) Copyright 1990 H.Rogers */
  8.  
  9. #ifndef __STDC__
  10. #include "sys/types.h"
  11. #endif
  12. #include <string.h>
  13. #include <ctype.h>
  14.  
  15. #ifdef __STDC__
  16. char *
  17. strichr (register const char *s, register int c)
  18. #else
  19. char *
  20. strichr (s, c)
  21.      register const char *s;
  22.      register int c;
  23. #endif
  24. {
  25.   register int i;
  26.  
  27.   c = isupper (c) ? _tolower (c) : c;
  28.  
  29.   do
  30.     {
  31.       i = *s;
  32.       i = isupper (i) ? _tolower (i) : i;
  33.       if (i == c)
  34.     return ((char *) s);
  35.     }
  36.   while (*s++);
  37.  
  38.   return (0);
  39. }
  40.  
  41. #ifdef __STDC__
  42. char *
  43. strrichr (register const char *s, register int c)
  44. #else
  45. char *
  46. strrichr (s, c)
  47.      register const char *s;
  48.      register int c;
  49. #endif
  50. {
  51.   register int i;
  52.   register const char *_s;
  53.  
  54.   c = isupper (c) ? _tolower (c) : c;
  55.  
  56.   _s = 0;
  57.   do
  58.     {
  59.       i = *s;
  60.       i = isupper (i) ? _tolower (i) : i;
  61.       if (i == c)
  62.     _s = s;
  63.     }
  64.   while (s++, i);
  65.  
  66.   return ((char *) _s);
  67. }
  68.