1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
|
/* $OpenBSD: SYS.h,v 1.11 2016/05/07 19:05:21 guenther Exp $ */
/*
* Copyright (c) 1998-2002 Michael Shalayeff
* All rights reserved.
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions
* are met:
* 1. Redistributions of source code must retain the above copyright
* notice, this list of conditions and the following disclaimer.
* 2. Redistributions in binary form must reproduce the above copyright
* notice, this list of conditions and the following disclaimer in the
* documentation and/or other materials provided with the distribution.
*
* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
* IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF MIND
* USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
* THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
* THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
*/
#include <sys/syscall.h>
#include <machine/asm.h>
#undef _LOCORE
#define _LOCORE
#include <machine/frame.h>
#include <machine/vmparam.h>
#undef _LOCORE
/* offsetof(struct tib, tib_errno) - offsetof(struct tib, __tib_tcb) */
#define TCB_OFFSET_ERRNO -12
/*
* We define a hidden alias with the prefix "_libc_" for each global symbol
* that may be used internally. By referencing _libc_x instead of x, other
* parts of libc prevent overriding by the application and avoid unnecessary
* relocations.
*/
#define _HIDDEN(x) _libc_##x
#define _HIDDEN_ALIAS(x,y) \
STRONG_ALIAS(_HIDDEN(x),y) !\
.hidden _HIDDEN(x)
#define _HIDDEN_FALIAS(x,y) \
_HIDDEN_ALIAS(x,y) !\
.type _HIDDEN(x),@function
/*
* For functions implemented in ASM that aren't syscalls.
* EXIT_STRONG(x) Like DEF_STRONG() in C; for standard/reserved C names
* EXIT_WEAK(x) Like DEF_WEAK() in C; for non-ISO C names
* ALTEXIT_STRONG(x) and ALTEXIT_WEAK()
* Matching macros for ALTENTRY functions
*/
#define ALTEXIT_STRONG(x) \
_HIDDEN_FALIAS(x,x) !\
.size _HIDDEN(x), . - _HIDDEN(x)
#define ALTEXIT_WEAK(x) ALTEXIT_STRONG(x) !\
.weak x
#define EXIT_STRONG(x) EXIT(x) !\
ALTEXIT_STRONG(x)
#define EXIT_WEAK(x) EXIT_STRONG(x) !\
.weak x
#define SYSENTRY(x) !\
LEAF_ENTRY(__CONCAT(_thread_sys_,x)) !\
WEAK_ALIAS(x,__CONCAT(_thread_sys_,x))
#define SYSENTRY_HIDDEN(x) !\
LEAF_ENTRY(__CONCAT(_thread_sys_,x))
#define SYSEXIT(x) !\
SYSEXIT_HIDDEN(x) !\
.size x, . - x
#define SYSEXIT_HIDDEN(x) !\
EXIT(__CONCAT(_thread_sys_,x))
_HIDDEN_FALIAS(x,_thread_sys_##x) !\
.size _HIDDEN(x), . - _HIDDEN(x)
#define SYSCALL(x) !\
std %rp, HPPA_FRAME_RP(%sr0,%sp) !\
ldil L%SYSCALLGATE, %r1 !\
depd %r0, 31, 32, %r1 !\
ble 4(%sr7, %r1) !\
ldi __CONCAT(SYS_,x), %r1 !\
comb,==,tr %r0, %ret0, 1f !\
ldd HPPA_FRAME_RP(%sr0,%sp), %rp !\
/* set errno */ \
mfctl %cr27, %r1 !\
stw %t1, TCB_OFFSET_ERRNO(%r1) !\
bv %r0(%rp) !\
ldi -1, %ret0 !\
1:
#define PSEUDO(x,y) !\
SYSENTRY(x) !\
SYSCALL(y) !\
bv %r0(%rp) !\
nop !\
SYSEXIT(x)
#define PSEUDO_HIDDEN(x,y) !\
SYSENTRY_HIDDEN(x) !\
SYSCALL(y) !\
bv %r0(%rp) !\
nop !\
SYSEXIT_HIDDEN(x)
#define PSEUDO_NOERROR(x,y) !\
SYSENTRY(x) !\
std %rp, HPPA_FRAME_RP(%sr0,%sp) !\
ldil L%SYSCALLGATE, %r1 !\
depd %r0, 31, 32, %r1 !\
ble 4(%sr7, %r1) !\
ldi __CONCAT(SYS_,y), %r1 !\
ldd HPPA_FRAME_RP(%sr0,%sp), %rp !\
bv %r0(%rp) !\
nop !\
SYSEXIT(x)
#define RSYSCALL(x) PSEUDO(x,x)
#define RSYSCALL_HIDDEN(x) PSEUDO_HIDDEN(x,x)
|
