arch/s390/include/asm/string.h

   1 /*
   2  *  S390 version
   3  *    Copyright IBM Corp. 1999
   4  *    Author(s): Martin Schwidefsky (schwidefsky@de.ibm.com),
   5  */
   6
   7 #ifndef _S390_STRING_H_
   8 #define _S390_STRING_H_
   9
  10 #ifndef _LINUX_TYPES_H
  11 #include <linux/types.h>
  12 #endif
  13
  14 #define __HAVE_ARCH_MEMCHR      /* inline & arch function */
  15 #define __HAVE_ARCH_MEMCMP      /* arch function */
  16 #define __HAVE_ARCH_MEMCPY      /* gcc builtin & arch function */
  17 #define __HAVE_ARCH_MEMSCAN     /* inline & arch function */
  18 #define __HAVE_ARCH_MEMSET      /* gcc builtin & arch function */
  19 #define __HAVE_ARCH_STRCAT      /* inline & arch function */
  20 #define __HAVE_ARCH_STRCMP      /* arch function */
  21 #define __HAVE_ARCH_STRCPY      /* inline & arch function */
  22 #define __HAVE_ARCH_STRLCAT     /* arch function */
  23 #define __HAVE_ARCH_STRLCPY     /* arch function */
  24 #define __HAVE_ARCH_STRLEN      /* inline & arch function */
  25 #define __HAVE_ARCH_STRNCAT     /* arch function */
  26 #define __HAVE_ARCH_STRNCPY     /* arch function */
  27 #define __HAVE_ARCH_STRNLEN     /* inline & arch function */
  28 #define __HAVE_ARCH_STRRCHR     /* arch function */
  29 #define __HAVE_ARCH_STRSTR      /* arch function */
  30
  31 /* Prototypes for non-inlined arch strings functions. */
  32 extern int memcmp(const void *, const void *, size_t);
  33 extern void *memcpy(void *, const void *, size_t);
  34 extern void *memset(void *, int, size_t);
  35 extern int strcmp(const char *,const char *);
  36 extern size_t strlcat(char *, const char *, size_t);
  37 extern size_t strlcpy(char *, const char *, size_t);
  38 extern char *strncat(char *, const char *, size_t);
  39 extern char *strncpy(char *, const char *, size_t);
  40 extern char *strrchr(const char *, int);
  41 extern char *strstr(const char *, const char *);
  42
  43 #undef __HAVE_ARCH_MEMMOVE
  44 #undef __HAVE_ARCH_STRCHR
  45 #undef __HAVE_ARCH_STRNCHR
  46 #undef __HAVE_ARCH_STRNCMP
  47 #undef __HAVE_ARCH_STRNICMP
  48 #undef __HAVE_ARCH_STRPBRK
  49 #undef __HAVE_ARCH_STRSEP
  50 #undef __HAVE_ARCH_STRSPN
  51
  52 #if !defined(IN_ARCH_STRING_C)
  53
  54 static inline void *memchr(const void * s, int c, size_t n)
  55 {
  56         register int r0 asm("0") = (char) c;
  57         const void *ret = s + n;
  58
  59         asm volatile(
  60                 "0:     srst    %0,%1\n"
  61                 "       jo      0b\n"
  62                 "       jl      1f\n"
  63                 "       la      %0,0\n"
  64                 "1:"
  65                 : "+a" (ret), "+&a" (s) : "d" (r0) : "cc");
  66         return (void *) ret;
  67 }
  68
  69 static inline void *memscan(void *s, int c, size_t n)
  70 {
  71         register int r0 asm("0") = (char) c;
  72         const void *ret = s + n;
  73
  74         asm volatile(
  75                 "0:     srst    %0,%1\n"
  76                 "       jo      0b\n"
  77                 : "+a" (ret), "+&a" (s) : "d" (r0) : "cc");
  78         return (void *) ret;
  79 }
  80
  81 static inline char *strcat(char *dst, const char *src)
  82 {
  83         register int r0 asm("0") = 0;
  84         unsigned long dummy;
  85         char *ret = dst;
  86
  87         asm volatile(
  88                 "0:     srst    %0,%1\n"
  89                 "       jo      0b\n"
  90                 "1:     mvst    %0,%2\n"
  91                 "       jo      1b"
  92                 : "=&a" (dummy), "+a" (dst), "+a" (src)
  93                 : "d" (r0), "0" (0) : "cc", "memory" );
  94         return ret;
  95 }
  96
  97 static inline char *strcpy(char *dst, const char *src)
  98 {
  99 #if __GNUC__ < 4
 100         register int r0 asm("0") = 0;
 101         char *ret = dst;
 102
 103         asm volatile(
 104                 "0:     mvst    %0,%1\n"
 105                 "       jo      0b"
 106                 : "+&a" (dst), "+&a" (src) : "d" (r0)
 107                 : "cc", "memory");
 108         return ret;
 109 #else
 110         return __builtin_strcpy(dst, src);
 111 #endif
 112 }
 113
 114 static inline size_t strlen(const char *s)
 115 {
 116 #if __GNUC__ < 4
 117         register unsigned long r0 asm("0") = 0;
 118         const char *tmp = s;
 119
 120         asm volatile(
 121                 "0:     srst    %0,%1\n"
 122                 "       jo      0b"
 123                 : "+d" (r0), "+a" (tmp) :  : "cc");
 124         return r0 - (unsigned long) s;
 125 #else
 126         return __builtin_strlen(s);
 127 #endif
 128 }
 129
 130 static inline size_t strnlen(const char * s, size_t n)
 131 {
 132         register int r0 asm("0") = 0;
 133         const char *tmp = s;
 134         const char *end = s + n;
 135
 136         asm volatile(
 137                 "0:     srst    %0,%1\n"
 138                 "       jo      0b"
 139                 : "+a" (end), "+a" (tmp) : "d" (r0)  : "cc");
 140         return end - s;
 141 }
 142 #else /* IN_ARCH_STRING_C */
 143 void *memchr(const void * s, int c, size_t n);
 144 void *memscan(void *s, int c, size_t n);
 145 char *strcat(char *dst, const char *src);
 146 char *strcpy(char *dst, const char *src);
 147 size_t strlen(const char *s);
 148 size_t strnlen(const char * s, size_t n);
 149 #endif /* !IN_ARCH_STRING_C */
 150
 151 #endif /* __S390_STRING_H_ */