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