a2542fbb0910dfacefb364cba70319d40466953b
[kopensolaris-gnu/glibc.git] / sysdeps / unix / sysv / linux / sh / sysdep.h
1 /* Copyright (C) 1992, 1993, 1995, 1996, 1997, 1998, 1999, 2000, 2002, 2003 Free Software Foundation, Inc.
2    This file is part of the GNU C Library.
3    Contributed by Ulrich Drepper, <drepper@gnu.ai.mit.edu>, August 1995.
4    Changed by Kaz Kojima, <kkojima@rr.iij4u.or.jp>.
5
6    The GNU C Library is free software; you can redistribute it and/or
7    modify it under the terms of the GNU Lesser General Public
8    License as published by the Free Software Foundation; either
9    version 2.1 of the License, or (at your option) any later version.
10
11    The GNU C Library is distributed in the hope that it will be useful,
12    but WITHOUT ANY WARRANTY; without even the implied warranty of
13    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14    Lesser General Public License for more details.
15
16    You should have received a copy of the GNU Lesser General Public
17    License along with the GNU C Library; if not, write to the Free
18    Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
19    02111-1307 USA.  */
20
21 #ifndef _LINUX_SH_SYSDEP_H
22 #define _LINUX_SH_SYSDEP_H 1
23
24 /* There is some commonality.  */
25 #include <sysdeps/unix/sh/sysdep.h>
26
27 /* For Linux we can use the system call table in the header file
28         /usr/include/asm/unistd.h
29    of the kernel.  But these symbols do not follow the SYS_* syntax
30    so we have to redefine the `SYS_ify' macro here.  */
31 #undef SYS_ify
32 #define SYS_ify(syscall_name)   (__NR_##syscall_name)
33
34
35 #ifdef __ASSEMBLER__
36
37 /* Linux uses a negative return value to indicate syscall errors,
38    unlike most Unices, which use the condition codes' carry flag.
39
40    Since version 2.1 the return value of a system call might be
41    negative even if the call succeeded.  E.g., the `lseek' system call
42    might return a large offset.  Therefore we must not anymore test
43    for < 0, but test for a real error by making sure the value in R0
44    is a real error number.  Linus said he will make sure the no syscall
45    returns a value in -1 .. -4095 as a valid result so we can savely
46    test with -4095.  */
47
48 #define _IMM1 #-1
49 #define _IMM12 #-12
50 #undef  PSEUDO
51 #define PSEUDO(name, syscall_name, args) \
52  .text; \
53  ENTRY (name); \
54     DO_CALL (syscall_name, args); \
55     mov r0,r1; \
56     mov _IMM12,r2; \
57     shad r2,r1; \
58     not r1,r1; \
59     tst r1,r1; \
60     bf .Lpseudo_end; \
61     SYSCALL_ERROR_HANDLER; \
62  .Lpseudo_end:
63
64 #undef  PSEUDO_END
65 #define PSEUDO_END(name) \
66   END (name)
67
68 #undef  PSEUDO_NOERRNO
69 #define PSEUDO_NOERRNO(name, syscall_name, args) \
70  .text; \
71  ENTRY (name); \
72     DO_CALL (syscall_name, args)
73
74 #undef  PSEUDO_END_NOERRNO
75 #define PSEUDO_END_NOERRNO(name) \
76   END (name)
77
78 #define ret_NOERRNO ret
79
80 #ifndef PIC
81 # define SYSCALL_ERROR_HANDLER  \
82         mov.l 0f,r1; \
83         jmp @r1; \
84          mov r0,r4; \
85         .align 2; \
86      0: .long __syscall_error
87 #else
88 # if RTLD_PRIVATE_ERRNO
89 #  define SYSCALL_ERROR_HANDLER \
90         neg r0,r1; \
91         mov.l 0f,r12; \
92         mova 0f,r0; \
93         add r0,r12; \
94         mov.l 1f,r0; \
95         mov.l r1,@(r0,r12)
96         bra .Lpseudo_end; \
97          mov _IMM1,r0; \
98         .align 2; \
99      0: .long _GLOBAL_OFFSET_TABLE_; \
100      1: .long errno@GOTOFF
101
102 # elif defined _LIBC_REENTRANT
103
104 #  if USE___THREAD
105 #   ifndef NOT_IN_libc
106 #    define SYSCALL_ERROR_ERRNO __libc_errno
107 #   else
108 #    define SYSCALL_ERROR_ERRNO errno
109 #   endif
110 #   define SYSCALL_ERROR_HANDLER \
111         neg r0,r1; \
112         mov r12,r2; \
113         mov.l 0f,r12; \
114         mova 0f,r0; \
115         add r0,r12; \
116         mov.l 1f,r0; \
117         stc gbr, r4; \
118         mov.l @(r0,r12),r0; \
119         mov r2,r12; \
120         add r4,r0; \
121         mov.l r1,@r0; \
122         bra .Lpseudo_end; \
123          mov _IMM1,r0; \
124         .align 2; \
125      0: .long _GLOBAL_OFFSET_TABLE_; \
126      1: .long SYSCALL_ERROR_ERRNO@GOTTPOFF
127 #  else
128 #   define SYSCALL_ERROR_HANDLER \
129         neg r0,r1; \
130         mov.l r14,@-r15; \
131         mov.l r12,@-r15; \
132         mov.l r1,@-r15; \
133         mov.l 0f,r12; \
134         mova 0f,r0; \
135         add r0,r12; \
136         sts.l pr,@-r15; \
137         mov r15,r14; \
138         mov.l 1f,r1; \
139         bsrf r1; \
140          nop; \
141      2: mov r14,r15; \
142         lds.l @r15+,pr; \
143         mov.l @r15+,r1; \
144         mov.l r1,@r0; \
145         mov.l @r15+,r12; \
146         mov.l @r15+,r14; \
147         bra .Lpseudo_end; \
148          mov _IMM1,r0; \
149         .align 2; \
150      0: .long _GLOBAL_OFFSET_TABLE_; \
151      1: .long PLTJMP(C_SYMBOL_NAME(__errno_location))-(2b+2-.)
152 /* A quick note: it is assumed that the call to `__errno_location' does
153    not modify the stack!  */
154 #  endif
155 # else
156 /* Store (-r0) into errno through the GOT.  */
157 #  define SYSCALL_ERROR_HANDLER                                               \
158         neg r0,r1; \
159         mov r12,r2; \
160         mov.l 0f,r12; \
161         mova 0f,r0; \
162         add r0,r12; \
163         mov.l 1f,r0; \
164         mov.l @(r0,r12),r0; \
165         mov r2,r12; \
166         mov.l r1,@r0; \
167         bra .Lpseudo_end; \
168          mov _IMM1,r0; \
169         .align 2; \
170      0: .long _GLOBAL_OFFSET_TABLE_; \
171      1: .long errno@GOT
172 # endif /* _LIBC_REENTRANT */
173 #endif  /* PIC */
174
175 #define SYSCALL_INST0   trapa #0x10
176 #define SYSCALL_INST1   trapa #0x11
177 #define SYSCALL_INST2   trapa #0x12
178 #define SYSCALL_INST3   trapa #0x13
179 #define SYSCALL_INST4   trapa #0x14
180 #define SYSCALL_INST5   mov.l @(0,r15),r0; trapa #0x15
181 #define SYSCALL_INST6   mov.l @(0,r15),r0; mov.l @(4,r15),r1; trapa #0x16
182
183 #undef  DO_CALL
184 #define DO_CALL(syscall_name, args)     \
185     mov.l 1f,r3;                        \
186     SYSCALL_INST##args;                 \
187     bra 2f;                             \
188      nop;                               \
189     .align 2;                           \
190  1: .long SYS_ify (syscall_name);       \
191  2:
192
193 # ifdef NEED_SYSCALL_INST_PAD
194 #  define SYSCALL_INST_PAD \
195         or r0,r0; or r0,r0; or r0,r0; or r0,r0; or r0,r0
196 # else
197 #  define SYSCALL_INST_PAD
198 # endif
199
200 #else /* not __ASSEMBLER__ */
201
202 #define SYSCALL_INST_STR0       "trapa #0x10\n\t"
203 #define SYSCALL_INST_STR1       "trapa #0x11\n\t"
204 #define SYSCALL_INST_STR2       "trapa #0x12\n\t"
205 #define SYSCALL_INST_STR3       "trapa #0x13\n\t"
206 #define SYSCALL_INST_STR4       "trapa #0x14\n\t"
207 #define SYSCALL_INST_STR5       "trapa #0x15\n\t"
208 #define SYSCALL_INST_STR6       "trapa #0x16\n\t"
209
210 # ifdef NEED_SYSCALL_INST_PAD
211 #  define SYSCALL_INST_PAD "\
212         or r0,r0; or r0,r0; or r0,r0; or r0,r0; or r0,r0"
213 # else
214 #  define SYSCALL_INST_PAD
215 # endif
216
217 #define ASMFMT_0
218 #define ASMFMT_1 \
219         , "r" (r4)
220 #define ASMFMT_2 \
221         , "r" (r4), "r" (r5)
222 #define ASMFMT_3 \
223         , "r" (r4), "r" (r5), "r" (r6)
224 #define ASMFMT_4 \
225         , "r" (r4), "r" (r5), "r" (r6), "r" (r7)
226 #define ASMFMT_5 \
227         , "r" (r4), "r" (r5), "r" (r6), "r" (r7), "0" (r0)
228 #define ASMFMT_6 \
229         , "r" (r4), "r" (r5), "r" (r6), "r" (r7), "0" (r0), "r" (r1)
230 #define ASMFMT_7 \
231         , "r" (r4), "r" (r5), "r" (r6), "r" (r7), "0" (r0), "r" (r1), "r" (r2)
232
233 #define SUBSTITUTE_ARGS_0()
234 #define SUBSTITUTE_ARGS_1(arg1)                                 \
235         register long r4 asm ("%r4") = (long)(arg1)
236 #define SUBSTITUTE_ARGS_2(arg1, arg2)                           \
237         register long r4 asm ("%r4") = (long)(arg1);            \
238         register long r5 asm ("%r5") = (long)(arg2)
239 #define SUBSTITUTE_ARGS_3(arg1, arg2, arg3)                     \
240         register long r4 asm ("%r4") = (long)(arg1);            \
241         register long r5 asm ("%r5") = (long)(arg2);            \
242         register long r6 asm ("%r6") = (long)(arg3)
243 #define SUBSTITUTE_ARGS_4(arg1, arg2, arg3, arg4)               \
244         register long r4 asm ("%r4") = (long)(arg1);            \
245         register long r5 asm ("%r5") = (long)(arg2);            \
246         register long r6 asm ("%r6") = (long)(arg3);            \
247         register long r7 asm ("%r7") = (long)(arg4)
248 #define SUBSTITUTE_ARGS_5(arg1, arg2, arg3, arg4, arg5)         \
249         register long r4 asm ("%r4") = (long)(arg1);            \
250         register long r5 asm ("%r5") = (long)(arg2);            \
251         register long r6 asm ("%r6") = (long)(arg3);            \
252         register long r7 asm ("%r7") = (long)(arg4);            \
253         register long r0 asm ("%r0") = (long)(arg5)
254 #define SUBSTITUTE_ARGS_6(arg1, arg2, arg3, arg4, arg5, arg6)           \
255         register long r4 asm ("%r4") = (long)(arg1);                    \
256         register long r5 asm ("%r5") = (long)(arg2);                    \
257         register long r6 asm ("%r6") = (long)(arg3);                    \
258         register long r7 asm ("%r7") = (long)(arg4);                    \
259         register long r0 asm ("%r0") = (long)(arg5);                    \
260         register long r1 asm ("%r1") = (long)(arg6)
261 #define SUBSTITUTE_ARGS_7(arg1, arg2, arg3, arg4, arg5, arg6, arg7)     \
262         register long r4 asm ("%r4") = (long)(arg1);                    \
263         register long r5 asm ("%r5") = (long)(arg2);                    \
264         register long r6 asm ("%r6") = (long)(arg3);                    \
265         register long r7 asm ("%r7") = (long)(arg4);                    \
266         register long r0 asm ("%r0") = (long)(arg5)                     \
267         register long r1 asm ("%r1") = (long)(arg6);                    \
268         register long r2 asm ("%r2") = (long)(arg7)
269
270 #undef INLINE_SYSCALL
271 #define INLINE_SYSCALL(name, nr, args...) \
272   ({                                                                          \
273     unsigned int resultvar = INTERNAL_SYSCALL (name, , nr, args);             \
274     if (__builtin_expect (INTERNAL_SYSCALL_ERROR_P (resultvar, ), 0))         \
275       {                                                                       \
276         __set_errno (INTERNAL_SYSCALL_ERRNO (resultvar, ));                   \
277         resultvar = 0xffffffff;                                               \
278       }                                                                       \
279     (int) resultvar; })
280
281 #undef INTERNAL_SYSCALL
282 #define INTERNAL_SYSCALL(name, err, nr, args...) \
283   ({                                                            \
284     unsigned long resultvar;                                    \
285     register long r3 asm ("%r3") = SYS_ify (name);              \
286     SUBSTITUTE_ARGS_##nr(args);                                 \
287                                                                 \
288     asm volatile (SYSCALL_INST_STR##nr SYSCALL_INST_PAD         \
289                   : "=z" (resultvar)                            \
290                   : "r" (r3) ASMFMT_##nr                        \
291                   : "memory");                                  \
292                                                                 \
293     (int) resultvar; })
294
295 #undef INTERNAL_SYSCALL_DECL
296 #define INTERNAL_SYSCALL_DECL(err) do { } while (0)
297
298 #undef INTERNAL_SYSCALL_ERROR_P
299 #define INTERNAL_SYSCALL_ERROR_P(val, err) \
300   ((unsigned int) (val) >= 0xfffff001u)
301
302 #undef INTERNAL_SYSCALL_ERRNO
303 #define INTERNAL_SYSCALL_ERRNO(val, err)        (-(val))
304
305 #endif  /* __ASSEMBLER__ */
306
307 #endif /* linux/sh/sysdep.h */