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
memchr(const void * s,int c,size_t n)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
memscan(void * s,int c,size_t n)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
strcat(char * dst,const char * src)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
strcpy(char * dst,const char * src)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
strlen(const char * s)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
strnlen(const char * s,size_t n)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_ */
144