Split mkfifo().
[dragonfly.git] / sys / emulation / linux / linux_uid16.c
1 /*-
2  * Copyright (c) 2001  The FreeBSD Project
3  * All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions
7  * are met:
8  * 1. Redistributions of source code must retain the above copyright
9  *    notice, this list of conditions and the following disclaimer.
10  * 2. Redistributions in binary form must reproduce the above copyright
11  *    notice, this list of conditions and the following disclaimer in the
12  *    documentation and/or other materials provided with the distribution.
13  *
14  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
15  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
18  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
24  * SUCH DAMAGE.
25  *
26  * $FreeBSD: src/sys/compat/linux/linux_uid16.c,v 1.4.2.1 2001/10/21 03:57:35 marcel Exp $
27  * $DragonFly: src/sys/emulation/linux/linux_uid16.c,v 1.9 2003/11/13 04:04:42 daver Exp $
28  */
29
30 #include "opt_compat.h"
31
32 #include <sys/param.h>
33 #include <sys/systm.h>
34 #include <sys/kern_syscall.h>
35 #include <sys/namei.h>
36 #include <sys/proc.h>
37 #include <sys/sysproto.h>
38 #include <sys/thread.h>
39
40 #include <arch_linux/linux.h>
41 #include <arch_linux/linux_proto.h>
42 #include "linux_util.h"
43
44 DUMMY(setfsuid16);
45 DUMMY(setfsgid16);
46 DUMMY(getresuid16);
47 DUMMY(getresgid16);
48
49 #define CAST_NOCHG(x)   ((x == 0xFFFF) ? -1 : x)
50
51 int
52 linux_chown16(struct linux_chown16_args *args)
53 {
54         struct thread *td = curthread;
55         struct nameidata nd;
56         char *path;
57         int error;
58
59         error = linux_copyin_path(args->path, &path, LINUX_PATH_EXISTS);
60         if (error)
61                 return (error);
62 #ifdef DEBUG
63         if (ldebug(chown16))
64                 printf(ARGS(chown16, "%s, %d, %d"), path, args->uid,
65                     args->gid);
66 #endif
67         NDINIT(&nd, NAMEI_LOOKUP, CNP_FOLLOW, UIO_SYSSPACE, path, td);
68
69         error = kern_chown(&nd, CAST_NOCHG(args->uid), CAST_NOCHG(args->gid));
70
71         linux_free_path(&path);
72         return(error);
73 }
74
75 int
76 linux_lchown16(struct linux_lchown16_args *args)
77 {
78         struct thread *td = curthread;
79         struct nameidata nd;
80         char *path;
81         int error;
82
83         error = linux_copyin_path(args->path, &path, LINUX_PATH_EXISTS);
84         if (error)
85                 return (error);
86 #ifdef DEBUG
87         if (ldebug(lchown16))
88                 printf(ARGS(lchown16, "%s, %d, %d"), path, args->uid,
89                     args->gid);
90 #endif
91         NDINIT(&nd, NAMEI_LOOKUP, 0, UIO_SYSSPACE, path, td);
92
93         error = kern_chown(&nd, CAST_NOCHG(args->uid), CAST_NOCHG(args->gid));
94
95         linux_free_path(&path);
96         return(error);
97 }
98
99 int
100 linux_setgroups16(struct linux_setgroups16_args *args)
101 {
102         struct proc *p = curproc;
103         struct ucred *newcred, *oldcred;
104         l_gid16_t linux_gidset[NGROUPS];
105         gid_t *bsd_gidset;
106         int ngrp, error;
107
108 #ifdef DEBUG
109         if (ldebug(setgroups16))
110                 printf(ARGS(setgroups16, "%d, *"), args->gidsetsize);
111 #endif
112
113         ngrp = args->gidsetsize;
114         oldcred = p->p_ucred;
115
116         /*
117          * cr_groups[0] holds egid. Setting the whole set from
118          * the supplied set will cause egid to be changed too.
119          * Keep cr_groups[0] unchanged to prevent that.
120          */
121
122         if ((error = suser_cred(oldcred, PRISON_ROOT)) != 0)
123                 return (error);
124
125         if (ngrp >= NGROUPS)
126                 return (EINVAL);
127
128         newcred = crdup(oldcred);
129         if (ngrp > 0) {
130                 error = copyin((caddr_t)args->gidset, linux_gidset,
131                     ngrp * sizeof(l_gid16_t));
132                 if (error)
133                         return (error);
134
135                 newcred->cr_ngroups = ngrp + 1;
136
137                 bsd_gidset = newcred->cr_groups;
138                 ngrp--;
139                 while (ngrp >= 0) {
140                         bsd_gidset[ngrp + 1] = linux_gidset[ngrp];
141                         ngrp--;
142                 }
143         }
144         else
145                 newcred->cr_ngroups = 1;
146
147         setsugid();
148         p->p_ucred = newcred;
149         crfree(oldcred);
150         return (0);
151 }
152
153 int
154 linux_getgroups16(struct linux_getgroups16_args *args)
155 {
156         struct proc *p = curproc;
157         struct ucred *cred;
158         l_gid16_t linux_gidset[NGROUPS];
159         gid_t *bsd_gidset;
160         int bsd_gidsetsz, ngrp, error;
161
162 #ifdef DEBUG
163         if (ldebug(getgroups16))
164                 printf(ARGS(getgroups16, "%d, *"), args->gidsetsize);
165 #endif
166
167         cred = p->p_ucred;
168         bsd_gidset = cred->cr_groups;
169         bsd_gidsetsz = cred->cr_ngroups - 1;
170
171         /*
172          * cr_groups[0] holds egid. Returning the whole set
173          * here will cause a duplicate. Exclude cr_groups[0]
174          * to prevent that.
175          */
176
177         if ((ngrp = args->gidsetsize) == 0) {
178                 args->sysmsg_result = bsd_gidsetsz;
179                 return (0);
180         }
181
182         if (ngrp < bsd_gidsetsz)
183                 return (EINVAL);
184
185         ngrp = 0;
186         while (ngrp < bsd_gidsetsz) {
187                 linux_gidset[ngrp] = bsd_gidset[ngrp + 1];
188                 ngrp++;
189         }
190
191         error = copyout(linux_gidset, (caddr_t)args->gidset,
192             ngrp * sizeof(l_gid16_t));
193         if (error)
194                 return (error);
195
196         args->sysmsg_result = ngrp;
197         return (0);
198 }
199
200 /*
201  * The FreeBSD native getgid(2) and getuid(2) also modify p->p_retval[1]
202  * when COMPAT_43 or COMPAT_SUNOS is defined. This globbers registers that
203  * are assumed to be preserved. The following lightweight syscalls fixes
204  * this. See also linux_getpid(2), linux_getgid(2) and linux_getuid(2) in
205  * linux_misc.c
206  *
207  * linux_getgid16() - MP SAFE
208  * linux_getuid16() - MP SAFE
209  */
210
211 int
212 linux_getgid16(struct linux_getgid16_args *args)
213 {
214         struct proc *p = curproc;
215
216         args->sysmsg_result = p->p_ucred->cr_rgid;
217         return (0);
218 }
219
220 int
221 linux_getuid16(struct linux_getuid16_args *args)
222 {
223         struct proc *p = curproc;
224
225         args->sysmsg_result = p->p_ucred->cr_ruid;
226         return (0);
227 }
228
229 int
230 linux_getegid16(struct linux_getegid16_args *args)
231 {
232         struct getegid_args bsd;
233         int error;
234
235         bsd.sysmsg_result = 0;
236
237         error = getegid(&bsd);
238         args->sysmsg_result = bsd.sysmsg_result;
239         return(error);
240 }
241
242 int
243 linux_geteuid16(struct linux_geteuid16_args *args)
244 {
245         struct geteuid_args bsd;
246         int error;
247
248         bsd.sysmsg_result = 0;
249
250         error = geteuid(&bsd);
251         args->sysmsg_result = bsd.sysmsg_result;
252         return(error);
253 }
254
255 int
256 linux_setgid16(struct linux_setgid16_args *args)
257 {
258         struct setgid_args bsd;
259         int error;
260
261         bsd.gid = args->gid;
262         bsd.sysmsg_result = 0;
263
264         error = setgid(&bsd);
265         args->sysmsg_result = bsd.sysmsg_result;
266         return(error);
267 }
268
269 int
270 linux_setuid16(struct linux_setuid16_args *args)
271 {
272         struct setuid_args bsd;
273         int error;
274
275         bsd.uid = args->uid;
276         bsd.sysmsg_result = 0;
277
278         error = setuid(&bsd);
279         args->sysmsg_result = bsd.sysmsg_result;
280         return(error);
281 }
282
283 int
284 linux_setregid16(struct linux_setregid16_args *args)
285 {
286         struct setregid_args bsd;
287         int error;
288
289         bsd.rgid = CAST_NOCHG(args->rgid);
290         bsd.egid = CAST_NOCHG(args->egid);
291         bsd.sysmsg_result = 0;
292
293         error = setregid(&bsd);
294         args->sysmsg_result = bsd.sysmsg_result;
295         return(error);
296 }
297
298 int
299 linux_setreuid16(struct linux_setreuid16_args *args)
300 {
301         struct setreuid_args bsd;
302         int error;
303
304         bsd.ruid = CAST_NOCHG(args->ruid);
305         bsd.euid = CAST_NOCHG(args->euid);
306         bsd.sysmsg_result = 0;
307
308         error = setreuid(&bsd);
309         args->sysmsg_result = bsd.sysmsg_result;
310         return(error);
311 }
312
313 int
314 linux_setresgid16(struct linux_setresgid16_args *args)
315 {
316         struct setresgid_args bsd;
317         int error;
318
319         bsd.rgid = CAST_NOCHG(args->rgid);
320         bsd.egid = CAST_NOCHG(args->egid);
321         bsd.sgid = CAST_NOCHG(args->sgid);
322         bsd.sysmsg_result = 0;
323
324         error = setresgid(&bsd);
325         args->sysmsg_result = bsd.sysmsg_result;
326         return(error);
327 }
328
329 int
330 linux_setresuid16(struct linux_setresuid16_args *args)
331 {
332         struct setresuid_args bsd;
333         int error;
334
335         bsd.ruid = CAST_NOCHG(args->ruid);
336         bsd.euid = CAST_NOCHG(args->euid);
337         bsd.suid = CAST_NOCHG(args->suid);
338         bsd.sysmsg_result = 0;
339
340         error = setresuid(&bsd);
341         args->sysmsg_result = bsd.sysmsg_result;
342         return(error);
343 }
344