Optimize lwkt_rwlock.c a bit
[dragonfly.git] / sys / emulation / linux / linux_uid16.c
CommitLineData
984263bc
MD
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 $
1de703da 27 * $DragonFly: src/sys/emulation/linux/linux_uid16.c,v 1.2 2003/06/17 04:28:19 dillon Exp $
984263bc
MD
28 */
29
30#include "opt_compat.h"
31
32#include <sys/param.h>
33#include <sys/systm.h>
34#include <sys/proc.h>
35#include <sys/sysproto.h>
36
37#include <machine/../linux/linux.h>
38#include <machine/../linux/linux_proto.h>
39#include <compat/linux/linux_util.h>
40
41DUMMY(setfsuid16);
42DUMMY(setfsgid16);
43DUMMY(getresuid16);
44DUMMY(getresgid16);
45
46#define CAST_NOCHG(x) (x == 0xFFFF) ? -1 : x;
47
48int
49linux_chown16(struct proc *p, struct linux_chown16_args *args)
50{
51 struct chown_args bsd;
52 caddr_t sg;
53
54 sg = stackgap_init();
55 CHECKALTEXIST(p, &sg, args->path);
56
57#ifdef DEBUG
58 if (ldebug(chown16))
59 printf(ARGS(chown16, "%s, %d, %d"), args->path, args->uid,
60 args->gid);
61#endif
62
63 bsd.path = args->path;
64 bsd.uid = CAST_NOCHG(args->uid);
65 bsd.gid = CAST_NOCHG(args->gid);
66 return (chown(p, &bsd));
67}
68
69int
70linux_lchown16(struct proc *p, struct linux_lchown16_args *args)
71{
72 struct lchown_args bsd;
73 caddr_t sg;
74
75 sg = stackgap_init();
76 CHECKALTEXIST(p, &sg, args->path);
77
78#ifdef DEBUG
79 if (ldebug(lchown16))
80 printf(ARGS(lchown16, "%s, %d, %d"), args->path, args->uid,
81 args->gid);
82#endif
83
84 bsd.path = args->path;
85 bsd.uid = CAST_NOCHG(args->uid);
86 bsd.gid = CAST_NOCHG(args->gid);
87 return (lchown(p, &bsd));
88}
89
90int
91linux_setgroups16(struct proc *p, struct linux_setgroups16_args *args)
92{
93 struct ucred *newcred, *oldcred;
94 l_gid16_t linux_gidset[NGROUPS];
95 gid_t *bsd_gidset;
96 int ngrp, error;
97
98#ifdef DEBUG
99 if (ldebug(setgroups16))
100 printf(ARGS(setgroups16, "%d, *"), args->gidsetsize);
101#endif
102
103 ngrp = args->gidsetsize;
104 oldcred = p->p_ucred;
105
106 /*
107 * cr_groups[0] holds egid. Setting the whole set from
108 * the supplied set will cause egid to be changed too.
109 * Keep cr_groups[0] unchanged to prevent that.
110 */
111
112 if ((error = suser_xxx(oldcred, NULL, PRISON_ROOT)) != 0)
113 return (error);
114
115 if (ngrp >= NGROUPS)
116 return (EINVAL);
117
118 newcred = crdup(oldcred);
119 if (ngrp > 0) {
120 error = copyin((caddr_t)args->gidset, linux_gidset,
121 ngrp * sizeof(l_gid16_t));
122 if (error)
123 return (error);
124
125 newcred->cr_ngroups = ngrp + 1;
126
127 bsd_gidset = newcred->cr_groups;
128 ngrp--;
129 while (ngrp >= 0) {
130 bsd_gidset[ngrp + 1] = linux_gidset[ngrp];
131 ngrp--;
132 }
133 }
134 else
135 newcred->cr_ngroups = 1;
136
137 setsugid(p);
138 p->p_ucred = newcred;
139 crfree(oldcred);
140 return (0);
141}
142
143int
144linux_getgroups16(struct proc *p, struct linux_getgroups16_args *args)
145{
146 struct ucred *cred;
147 l_gid16_t linux_gidset[NGROUPS];
148 gid_t *bsd_gidset;
149 int bsd_gidsetsz, ngrp, error;
150
151#ifdef DEBUG
152 if (ldebug(getgroups16))
153 printf(ARGS(getgroups16, "%d, *"), args->gidsetsize);
154#endif
155
156 cred = p->p_ucred;
157 bsd_gidset = cred->cr_groups;
158 bsd_gidsetsz = cred->cr_ngroups - 1;
159
160 /*
161 * cr_groups[0] holds egid. Returning the whole set
162 * here will cause a duplicate. Exclude cr_groups[0]
163 * to prevent that.
164 */
165
166 if ((ngrp = args->gidsetsize) == 0) {
167 p->p_retval[0] = bsd_gidsetsz;
168 return (0);
169 }
170
171 if (ngrp < bsd_gidsetsz)
172 return (EINVAL);
173
174 ngrp = 0;
175 while (ngrp < bsd_gidsetsz) {
176 linux_gidset[ngrp] = bsd_gidset[ngrp + 1];
177 ngrp++;
178 }
179
180 error = copyout(linux_gidset, (caddr_t)args->gidset,
181 ngrp * sizeof(l_gid16_t));
182 if (error)
183 return (error);
184
185 p->p_retval[0] = ngrp;
186 return (0);
187}
188
189/*
190 * The FreeBSD native getgid(2) and getuid(2) also modify p->p_retval[1]
191 * when COMPAT_43 or COMPAT_SUNOS is defined. This globbers registers that
192 * are assumed to be preserved. The following lightweight syscalls fixes
193 * this. See also linux_getpid(2), linux_getgid(2) and linux_getuid(2) in
194 * linux_misc.c
195 *
196 * linux_getgid16() - MP SAFE
197 * linux_getuid16() - MP SAFE
198 */
199
200int
201linux_getgid16(struct proc *p, struct linux_getgid16_args *args)
202{
203
204 p->p_retval[0] = p->p_cred->p_rgid;
205 return (0);
206}
207
208int
209linux_getuid16(struct proc *p, struct linux_getuid16_args *args)
210{
211
212 p->p_retval[0] = p->p_cred->p_ruid;
213 return (0);
214}
215
216int
217linux_getegid16(struct proc *p, struct linux_getegid16_args *args)
218{
219 struct getegid_args bsd;
220
221 return (getegid(p, &bsd));
222}
223
224int
225linux_geteuid16(struct proc *p, struct linux_geteuid16_args *args)
226{
227 struct geteuid_args bsd;
228
229 return (geteuid(p, &bsd));
230}
231
232int
233linux_setgid16(struct proc *p, struct linux_setgid16_args *args)
234{
235 struct setgid_args bsd;
236
237 bsd.gid = args->gid;
238 return (setgid(p, &bsd));
239}
240
241int
242linux_setuid16(struct proc *p, struct linux_setuid16_args *args)
243{
244 struct setuid_args bsd;
245
246 bsd.uid = args->uid;
247 return (setuid(p, &bsd));
248}
249
250int
251linux_setregid16(struct proc *p, struct linux_setregid16_args *args)
252{
253 struct setregid_args bsd;
254
255 bsd.rgid = CAST_NOCHG(args->rgid);
256 bsd.egid = CAST_NOCHG(args->egid);
257 return (setregid(p, &bsd));
258}
259
260int
261linux_setreuid16(struct proc *p, struct linux_setreuid16_args *args)
262{
263 struct setreuid_args bsd;
264
265 bsd.ruid = CAST_NOCHG(args->ruid);
266 bsd.euid = CAST_NOCHG(args->euid);
267 return (setreuid(p, &bsd));
268}
269
270int
271linux_setresgid16(struct proc *p, struct linux_setresgid16_args *args)
272{
273 struct setresgid_args bsd;
274
275 bsd.rgid = CAST_NOCHG(args->rgid);
276 bsd.egid = CAST_NOCHG(args->egid);
277 bsd.sgid = CAST_NOCHG(args->sgid);
278 return (setresgid(p, &bsd));
279}
280
281int
282linux_setresuid16(struct proc *p, struct linux_setresuid16_args *args)
283{
284 struct setresuid_args bsd;
285
286 bsd.ruid = CAST_NOCHG(args->ruid);
287 bsd.euid = CAST_NOCHG(args->euid);
288 bsd.suid = CAST_NOCHG(args->suid);
289 return (setresuid(p, &bsd));
290}