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_STRPBRK 48 #undef __HAVE_ARCH_STRSEP 49 #undef __HAVE_ARCH_STRSPN 50 51 #if !defined(IN_ARCH_STRING_C) 52 53 static inline void *memchr(const void * s, int c, size_t n) 54 { 55 register int r0 asm("0") = (char) c; 56 const void *ret = s + n; 57 58 asm volatile( 59 "0: srst %0,%1\n" 60 " jo 0b\n" 61 " jl 1f\n" 62 " la %0,0\n" 63 "1:" 64 : "+a" (ret), "+&a" (s) : "d" (r0) : "cc"); 65 return (void *) ret; 66 } 67 68 static inline void *memscan(void *s, int c, size_t n) 69 { 70 register int r0 asm("0") = (char) c; 71 const void *ret = s + n; 72 73 asm volatile( 74 "0: srst %0,%1\n" 75 " jo 0b\n" 76 : "+a" (ret), "+&a" (s) : "d" (r0) : "cc"); 77 return (void *) ret; 78 } 79 80 static inline char *strcat(char *dst, const char *src) 81 { 82 register int r0 asm("0") = 0; 83 unsigned long dummy; 84 char *ret = dst; 85 86 asm volatile( 87 "0: srst %0,%1\n" 88 " jo 0b\n" 89 "1: mvst %0,%2\n" 90 " jo 1b" 91 : "=&a" (dummy), "+a" (dst), "+a" (src) 92 : "d" (r0), "0" (0) : "cc", "memory" ); 93 return ret; 94 } 95 96 static inline char *strcpy(char *dst, const char *src) 97 { 98 register int r0 asm("0") = 0; 99 char *ret = dst; 100 101 asm volatile( 102 "0: mvst %0,%1\n" 103 " jo 0b" 104 : "+&a" (dst), "+&a" (src) : "d" (r0) 105 : "cc", "memory"); 106 return ret; 107 } 108 109 static inline size_t strlen(const char *s) 110 { 111 register unsigned long r0 asm("0") = 0; 112 const char *tmp = s; 113 114 asm volatile( 115 "0: srst %0,%1\n" 116 " jo 0b" 117 : "+d" (r0), "+a" (tmp) : : "cc"); 118 return r0 - (unsigned long) s; 119 } 120 121 static inline size_t strnlen(const char * s, size_t n) 122 { 123 register int r0 asm("0") = 0; 124 const char *tmp = s; 125 const char *end = s + n; 126 127 asm volatile( 128 "0: srst %0,%1\n" 129 " jo 0b" 130 : "+a" (end), "+a" (tmp) : "d" (r0) : "cc"); 131 return end - s; 132 } 133 #else /* IN_ARCH_STRING_C */ 134 void *memchr(const void * s, int c, size_t n); 135 void *memscan(void *s, int c, size_t n); 136 char *strcat(char *dst, const char *src); 137 char *strcpy(char *dst, const char *src); 138 size_t strlen(const char *s); 139 size_t strnlen(const char * s, size_t n); 140 #endif /* !IN_ARCH_STRING_C */ 141 142 #endif /* __S390_STRING_H_ */ 143