Commit | Line | Data |
---|---|---|
1da177e4 LT |
1 | /* |
2 | * User Space Access Routines | |
3 | * | |
4 | * Copyright (C) 2000-2002 Hewlett-Packard (John Marvin) | |
5 | * Copyright (C) 2000 Richard Hirst <rhirst with parisc-linux.org> | |
6 | * Copyright (C) 2001 Matthieu Delahaye <delahaym at esiee.fr> | |
7 | * Copyright (C) 2003 Randolph Chung <tausq with parisc-linux.org> | |
8 | * | |
9 | * | |
10 | * This program is free software; you can redistribute it and/or modify | |
11 | * it under the terms of the GNU General Public License as published by | |
12 | * the Free Software Foundation; either version 2, or (at your option) | |
13 | * any later version. | |
14 | * | |
15 | * This program is distributed in the hope that it will be useful, | |
16 | * but WITHOUT ANY WARRANTY; without even the implied warranty of | |
17 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
18 | * GNU General Public License for more details. | |
19 | * | |
20 | * You should have received a copy of the GNU General Public License | |
21 | * along with this program; if not, write to the Free Software | |
22 | * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA | |
23 | */ | |
24 | ||
25 | /* | |
26 | * These routines still have plenty of room for optimization | |
27 | * (word & doubleword load/store, dual issue, store hints, etc.). | |
28 | */ | |
29 | ||
30 | /* | |
31 | * The following routines assume that space register 3 (sr3) contains | |
32 | * the space id associated with the current users address space. | |
33 | */ | |
34 | ||
35 | ||
36 | .text | |
37 | ||
38 | #include <asm/assembly.h> | |
39 | #include <asm/errno.h> | |
40 | ||
41 | /* | |
42 | * get_sr gets the appropriate space value into | |
43 | * sr1 for kernel/user space access, depending | |
44 | * on the flag stored in the task structure. | |
45 | */ | |
46 | ||
47 | .macro get_sr | |
48 | mfctl %cr30,%r1 | |
49 | ldw TI_SEGMENT(%r1),%r22 | |
50 | mfsp %sr3,%r1 | |
51 | or,<> %r22,%r0,%r0 | |
52 | copy %r0,%r1 | |
53 | mtsp %r1,%sr1 | |
54 | .endm | |
55 | ||
56 | .macro fixup_branch lbl | |
57 | ldil L%\lbl, %r1 | |
58 | ldo R%\lbl(%r1), %r1 | |
59 | bv %r0(%r1) | |
60 | .endm | |
61 | ||
62 | /* | |
63 | * long lstrncpy_from_user(char *dst, const char *src, long n) | |
64 | * | |
65 | * Returns -EFAULT if exception before terminator, | |
66 | * N if the entire buffer filled, | |
67 | * otherwise strlen (i.e. excludes zero byte) | |
68 | */ | |
69 | ||
70 | .export lstrncpy_from_user,code | |
71 | lstrncpy_from_user: | |
72 | .proc | |
73 | .callinfo NO_CALLS | |
74 | .entry | |
75 | comib,= 0,%r24,$lsfu_done | |
76 | copy %r24,%r23 | |
77 | get_sr | |
78 | 1: ldbs,ma 1(%sr1,%r25),%r1 | |
79 | $lsfu_loop: | |
80 | stbs,ma %r1,1(%r26) | |
81 | comib,=,n 0,%r1,$lsfu_done | |
82 | addib,<>,n -1,%r24,$lsfu_loop | |
83 | 2: ldbs,ma 1(%sr1,%r25),%r1 | |
84 | $lsfu_done: | |
85 | sub %r23,%r24,%r28 | |
86 | $lsfu_exit: | |
87 | bv %r0(%r2) | |
88 | nop | |
89 | .exit | |
90 | ||
91 | .section .fixup,"ax" | |
92 | 3: fixup_branch $lsfu_exit | |
93 | ldi -EFAULT,%r28 | |
94 | .previous | |
95 | ||
96 | .section __ex_table,"aw" | |
97 | #ifdef __LP64__ | |
98 | .dword 1b,3b | |
99 | .dword 2b,3b | |
100 | #else | |
101 | .word 1b,3b | |
102 | .word 2b,3b | |
103 | #endif | |
104 | .previous | |
105 | ||
106 | .procend | |
107 | ||
108 | /* | |
109 | * unsigned long lclear_user(void *to, unsigned long n) | |
110 | * | |
111 | * Returns 0 for success. | |
112 | * otherwise, returns number of bytes not transferred. | |
113 | */ | |
114 | ||
115 | .export lclear_user,code | |
116 | lclear_user: | |
117 | .proc | |
118 | .callinfo NO_CALLS | |
119 | .entry | |
120 | comib,=,n 0,%r25,$lclu_done | |
121 | get_sr | |
122 | $lclu_loop: | |
123 | addib,<> -1,%r25,$lclu_loop | |
124 | 1: stbs,ma %r0,1(%sr1,%r26) | |
125 | ||
126 | $lclu_done: | |
127 | bv %r0(%r2) | |
128 | copy %r25,%r28 | |
129 | .exit | |
130 | ||
131 | .section .fixup,"ax" | |
132 | 2: fixup_branch $lclu_done | |
133 | ldo 1(%r25),%r25 | |
134 | .previous | |
135 | ||
136 | .section __ex_table,"aw" | |
137 | #ifdef __LP64__ | |
138 | .dword 1b,2b | |
139 | #else | |
140 | .word 1b,2b | |
141 | #endif | |
142 | .previous | |
143 | ||
144 | .procend | |
145 | ||
146 | /* | |
147 | * long lstrnlen_user(char *s, long n) | |
148 | * | |
149 | * Returns 0 if exception before zero byte or reaching N, | |
150 | * N+1 if N would be exceeded, | |
151 | * else strlen + 1 (i.e. includes zero byte). | |
152 | */ | |
153 | ||
154 | .export lstrnlen_user,code | |
155 | lstrnlen_user: | |
156 | .proc | |
157 | .callinfo NO_CALLS | |
158 | .entry | |
159 | comib,= 0,%r25,$lslen_nzero | |
160 | copy %r26,%r24 | |
161 | get_sr | |
162 | 1: ldbs,ma 1(%sr1,%r26),%r1 | |
163 | $lslen_loop: | |
164 | comib,=,n 0,%r1,$lslen_done | |
165 | addib,<> -1,%r25,$lslen_loop | |
166 | 2: ldbs,ma 1(%sr1,%r26),%r1 | |
167 | $lslen_done: | |
168 | bv %r0(%r2) | |
169 | sub %r26,%r24,%r28 | |
170 | .exit | |
171 | ||
172 | $lslen_nzero: | |
173 | b $lslen_done | |
174 | ldo 1(%r26),%r26 /* special case for N == 0 */ | |
175 | ||
176 | .section .fixup,"ax" | |
177 | 3: fixup_branch $lslen_done | |
178 | copy %r24,%r26 /* reset r26 so 0 is returned on fault */ | |
179 | .previous | |
180 | ||
181 | .section __ex_table,"aw" | |
182 | #ifdef __LP64__ | |
183 | .dword 1b,3b | |
184 | .dword 2b,3b | |
185 | #else | |
186 | .word 1b,3b | |
187 | .word 2b,3b | |
188 | #endif | |
189 | .previous | |
190 | ||
191 | .procend | |
192 | ||
193 | .end |