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