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         register int r0 asm("0") = 0;
 100         char *ret = dst;
 101
 102         asm volatile(
 103                 "0:     mvst    %0,%1\n"
 104                 "       jo      0b"
 105                 : "+&a" (dst), "+&a" (src) : "d" (r0)
 106                 : "cc", "memory");
 107         return ret;
 108 }
 109
 110 static inline size_t strlen(const char *s)
 111 {
 112         register unsigned long r0 asm("0") = 0;
 113         const char *tmp = s;
 114
 115         asm volatile(
 116                 "0:     srst    %0,%1\n"
 117                 "       jo      0b"
 118                 : "+d" (r0), "+a" (tmp) :  : "cc");
 119         return r0 - (unsigned long) s;
 120 }
 121
 122 static inline size_t strnlen(const char * s, size_t n)
 123 {
 124         register int r0 asm("0") = 0;
 125         const char *tmp = s;
 126         const char *end = s + n;
 127
 128         asm volatile(
 129                 "0:     srst    %0,%1\n"
 130                 "       jo      0b"
 131                 : "+a" (end), "+a" (tmp) : "d" (r0)  : "cc");
 132         return end - s;
 133 }
 134 #else /* IN_ARCH_STRING_C */
 135 void *memchr(const void * s, int c, size_t n);
 136 void *memscan(void *s, int c, size_t n);
 137 char *strcat(char *dst, const char *src);
 138 char *strcpy(char *dst, const char *src);
 139 size_t strlen(const char *s);
 140 size_t strnlen(const char * s, size_t n);
 141 #endif /* !IN_ARCH_STRING_C */
 142
 143 #endif /* __S390_STRING_H_ */