at v3.6 151 lines 3.9 kB view raw
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. */ 32extern int memcmp(const void *, const void *, size_t); 33extern void *memcpy(void *, const void *, size_t); 34extern void *memset(void *, int, size_t); 35extern int strcmp(const char *,const char *); 36extern size_t strlcat(char *, const char *, size_t); 37extern size_t strlcpy(char *, const char *, size_t); 38extern char *strncat(char *, const char *, size_t); 39extern char *strncpy(char *, const char *, size_t); 40extern char *strrchr(const char *, int); 41extern 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 54static 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 69static 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 81static 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 97static 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 114static 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 130static 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 */ 143void *memchr(const void * s, int c, size_t n); 144void *memscan(void *s, int c, size_t n); 145char *strcat(char *dst, const char *src); 146char *strcpy(char *dst, const char *src); 147size_t strlen(const char *s); 148size_t strnlen(const char * s, size_t n); 149#endif /* !IN_ARCH_STRING_C */ 150 151#endif /* __S390_STRING_H_ */