sys/compat/linux/linux_uid16.c

   1 /*-
   2  * SPDX-License-Identifier: BSD-2-Clause-FreeBSD
   3  *
   4  * Copyright (c) 2001  The FreeBSD Project
   5  * All rights reserved.
   6  *
   7  * Redistribution and use in source and binary forms, with or without
   8  * modification, are permitted provided that the following conditions
   9  * are met:
  10  * 1. Redistributions of source code must retain the above copyright
  11  *    notice, this list of conditions and the following disclaimer.
  12  * 2. Redistributions in binary form must reproduce the above copyright
  13  *    notice, this list of conditions and the following disclaimer in the
  14  *    documentation and/or other materials provided with the distribution.
  15  *
  16  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
  17  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  18  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  19  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
  20  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  21  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  22  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  23  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  24  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  25  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  26  * SUCH DAMAGE.
  27  */
  28
  29 #include <sys/cdefs.h>
  30 __FBSDID("$FreeBSD$");
  31
  32 #include "opt_compat.h"
  33
  34 #include <sys/fcntl.h>
  35 #include <sys/param.h>
  36 #include <sys/kernel.h>
  37 #include <sys/lock.h>
  38 #include <sys/malloc.h>
  39 #include <sys/mutex.h>
  40 #include <sys/priv.h>
  41 #include <sys/proc.h>
  42 #include <sys/sdt.h>
  43 #include <sys/syscallsubr.h>
  44 #include <sys/sysproto.h>
  45 #include <sys/systm.h>
  46
  47 #ifdef COMPAT_LINUX32
  48 #include <machine/../linux32/linux.h>
  49 #include <machine/../linux32/linux32_proto.h>
  50 #else
  51 #include <machine/../linux/linux.h>
  52 #include <machine/../linux/linux_proto.h>
  53 #endif
  54
  55 #include <compat/linux/linux_dtrace.h>
  56 #include <compat/linux/linux_util.h>
  57
  58 /* DTrace init */
  59 LIN_SDT_PROVIDER_DECLARE(LINUX_DTRACE);
  60
  61 /**
  62  * DTrace probes in this module.
  63  */
  64 LIN_SDT_PROBE_DEFINE3(uid16, linux_chown16, entry, "char *", "l_uid16_t",
  65     "l_gid16_t");
  66 LIN_SDT_PROBE_DEFINE1(uid16, linux_chown16, conv_path, "char *");
  67 LIN_SDT_PROBE_DEFINE1(uid16, linux_chown16, return, "int");
  68 LIN_SDT_PROBE_DEFINE3(uid16, linux_lchown16, entry, "char *", "l_uid16_t",
  69     "l_gid16_t");
  70 LIN_SDT_PROBE_DEFINE1(uid16, linux_lchown16, conv_path, "char *");
  71 LIN_SDT_PROBE_DEFINE1(uid16, linux_lchown16, return, "int");
  72 LIN_SDT_PROBE_DEFINE2(uid16, linux_setgroups16, entry, "l_uint", "l_gid16_t *");
  73 LIN_SDT_PROBE_DEFINE1(uid16, linux_setgroups16, copyin_error, "int");
  74 LIN_SDT_PROBE_DEFINE1(uid16, linux_setgroups16, priv_check_cred_error, "int");
  75 LIN_SDT_PROBE_DEFINE1(uid16, linux_setgroups16, return, "int");
  76 LIN_SDT_PROBE_DEFINE2(uid16, linux_getgroups16, entry, "l_uint", "l_gid16_t *");
  77 LIN_SDT_PROBE_DEFINE1(uid16, linux_getgroups16, copyout_error, "int");
  78 LIN_SDT_PROBE_DEFINE1(uid16, linux_getgroups16, return, "int");
  79 LIN_SDT_PROBE_DEFINE0(uid16, linux_getgid16, entry);
  80 LIN_SDT_PROBE_DEFINE1(uid16, linux_getgid16, return, "int");
  81 LIN_SDT_PROBE_DEFINE0(uid16, linux_getuid16, entry);
  82 LIN_SDT_PROBE_DEFINE1(uid16, linux_getuid16, return, "int");
  83 LIN_SDT_PROBE_DEFINE0(uid16, linux_getegid16, entry);
  84 LIN_SDT_PROBE_DEFINE1(uid16, linux_getegid16, return, "int");
  85 LIN_SDT_PROBE_DEFINE0(uid16, linux_geteuid16, entry);
  86 LIN_SDT_PROBE_DEFINE1(uid16, linux_geteuid16, return, "int");
  87 LIN_SDT_PROBE_DEFINE1(uid16, linux_setgid16, entry, "l_gid16_t");
  88 LIN_SDT_PROBE_DEFINE1(uid16, linux_setgid16, return, "int");
  89 LIN_SDT_PROBE_DEFINE1(uid16, linux_setuid16, entry, "l_uid16_t");
  90 LIN_SDT_PROBE_DEFINE1(uid16, linux_setuid16, return, "int");
  91 LIN_SDT_PROBE_DEFINE2(uid16, linux_setregid16, entry, "l_gid16_t", "l_gid16_t");
  92 LIN_SDT_PROBE_DEFINE1(uid16, linux_setregid16, return, "int");
  93 LIN_SDT_PROBE_DEFINE2(uid16, linux_setreuid16, entry, "l_uid16_t", "l_uid16_t");
  94 LIN_SDT_PROBE_DEFINE1(uid16, linux_setreuid16, return, "int");
  95 LIN_SDT_PROBE_DEFINE3(uid16, linux_setresgid16, entry, "l_gid16_t", "l_gid16_t",
  96     "l_gid16_t");
  97 LIN_SDT_PROBE_DEFINE1(uid16, linux_setresgid16, return, "int");
  98 LIN_SDT_PROBE_DEFINE3(uid16, linux_setresuid16, entry, "l_uid16_t", "l_uid16_t",
  99     "l_uid16_t");
 100 LIN_SDT_PROBE_DEFINE1(uid16, linux_setresuid16, return, "int");
 101
 102 DUMMY(setfsuid16);
 103 DUMMY(setfsgid16);
 104 DUMMY(getresuid16);
 105 DUMMY(getresgid16);
 106
 107 #define CAST_NOCHG(x)   ((x == 0xFFFF) ? -1 : x)
 108
 109 int
 110 linux_chown16(struct thread *td, struct linux_chown16_args *args)
 111 {
 112         char *path;
 113         int error;
 114
 115         LCONVPATHEXIST(td, args->path, &path);
 116
 117         /*
 118          * The DTrace probes have to be after the LCONVPATHEXIST, as
 119          * LCONVPATHEXIST may return on its own and we do not want to
 120          * have a stray entry without the corresponding return.
 121          */
 122         LIN_SDT_PROBE3(uid16, linux_chown16, entry, args->path, args->uid,
 123             args->gid);
 124         LIN_SDT_PROBE1(uid16, linux_chown16, conv_path, path);
 125
 126         error = kern_fchownat(td, AT_FDCWD, path, UIO_SYSSPACE,
 127             CAST_NOCHG(args->uid), CAST_NOCHG(args->gid), 0);
 128         LFREEPATH(path);
 129
 130         LIN_SDT_PROBE1(uid16, linux_chown16, return, error);
 131         return (error);
 132 }
 133
 134 int
 135 linux_lchown16(struct thread *td, struct linux_lchown16_args *args)
 136 {
 137         char *path;
 138         int error;
 139
 140         LCONVPATHEXIST(td, args->path, &path);
 141
 142         /*
 143          * The DTrace probes have to be after the LCONVPATHEXIST, as
 144          * LCONVPATHEXIST may return on its own and we do not want to
 145          * have a stray entry without the corresponding return.
 146          */
 147         LIN_SDT_PROBE3(uid16, linux_lchown16, entry, args->path, args->uid,
 148             args->gid);
 149         LIN_SDT_PROBE1(uid16, linux_lchown16, conv_path, path);
 150
 151         error = kern_fchownat(td, AT_FDCWD, path, UIO_SYSSPACE,
 152             CAST_NOCHG(args->uid), CAST_NOCHG(args->gid), AT_SYMLINK_NOFOLLOW);
 153         LFREEPATH(path);
 154
 155         LIN_SDT_PROBE1(uid16, linux_lchown16, return, error);
 156         return (error);
 157 }
 158
 159 int
 160 linux_setgroups16(struct thread *td, struct linux_setgroups16_args *args)
 161 {
 162         struct ucred *newcred, *oldcred;
 163         l_gid16_t *linux_gidset;
 164         gid_t *bsd_gidset;
 165         int ngrp, error;
 166         struct proc *p;
 167
 168         LIN_SDT_PROBE2(uid16, linux_setgroups16, entry, args->gidsetsize,
 169             args->gidset);
 170
 171         ngrp = args->gidsetsize;
 172         if (ngrp < 0 || ngrp >= ngroups_max + 1) {
 173                 LIN_SDT_PROBE1(uid16, linux_setgroups16, return, EINVAL);
 174                 return (EINVAL);
 175         }
 176         linux_gidset = malloc(ngrp * sizeof(*linux_gidset), M_LINUX, M_WAITOK);
 177         error = copyin(args->gidset, linux_gidset, ngrp * sizeof(l_gid16_t));
 178         if (error) {
 179                 LIN_SDT_PROBE1(uid16, linux_setgroups16, copyin_error, error);
 180                 LIN_SDT_PROBE1(uid16, linux_setgroups16, return, error);
 181                 free(linux_gidset, M_LINUX);
 182                 return (error);
 183         }
 184         newcred = crget();
 185         p = td->td_proc;
 186         PROC_LOCK(p);
 187         oldcred = crcopysafe(p, newcred);
 188
 189         /*
 190          * cr_groups[0] holds egid. Setting the whole set from
 191          * the supplied set will cause egid to be changed too.
 192          * Keep cr_groups[0] unchanged to prevent that.
 193          */
 194
 195         if ((error = priv_check_cred(oldcred, PRIV_CRED_SETGROUPS, 0)) != 0) {
 196                 PROC_UNLOCK(p);
 197                 crfree(newcred);
 198
 199                 LIN_SDT_PROBE1(uid16, linux_setgroups16, priv_check_cred_error,
 200                     error);
 201                 goto out;
 202         }
 203
 204         if (ngrp > 0) {
 205                 newcred->cr_ngroups = ngrp + 1;
 206
 207                 bsd_gidset = newcred->cr_groups;
 208                 ngrp--;
 209                 while (ngrp >= 0) {
 210                         bsd_gidset[ngrp + 1] = linux_gidset[ngrp];
 211                         ngrp--;
 212                 }
 213         }
 214         else
 215                 newcred->cr_ngroups = 1;
 216
 217         setsugid(td->td_proc);
 218         proc_set_cred(p, newcred);
 219         PROC_UNLOCK(p);
 220         crfree(oldcred);
 221         error = 0;
 222 out:
 223         free(linux_gidset, M_LINUX);
 224
 225         LIN_SDT_PROBE1(uid16, linux_setgroups16, return, error);
 226         return (error);
 227 }
 228
 229 int
 230 linux_getgroups16(struct thread *td, struct linux_getgroups16_args *args)
 231 {
 232         struct ucred *cred;
 233         l_gid16_t *linux_gidset;
 234         gid_t *bsd_gidset;
 235         int bsd_gidsetsz, ngrp, error;
 236
 237         LIN_SDT_PROBE2(uid16, linux_getgroups16, entry, args->gidsetsize,
 238             args->gidset);
 239
 240         cred = td->td_ucred;
 241         bsd_gidset = cred->cr_groups;
 242         bsd_gidsetsz = cred->cr_ngroups - 1;
 243
 244         /*
 245          * cr_groups[0] holds egid. Returning the whole set
 246          * here will cause a duplicate. Exclude cr_groups[0]
 247          * to prevent that.
 248          */
 249
 250         if ((ngrp = args->gidsetsize) == 0) {
 251                 td->td_retval[0] = bsd_gidsetsz;
 252
 253                 LIN_SDT_PROBE1(uid16, linux_getgroups16, return, 0);
 254                 return (0);
 255         }
 256
 257         if (ngrp < bsd_gidsetsz) {
 258                 LIN_SDT_PROBE1(uid16, linux_getgroups16, return, EINVAL);
 259                 return (EINVAL);
 260         }
 261
 262         ngrp = 0;
 263         linux_gidset = malloc(bsd_gidsetsz * sizeof(*linux_gidset),
 264             M_LINUX, M_WAITOK);
 265         while (ngrp < bsd_gidsetsz) {
 266                 linux_gidset[ngrp] = bsd_gidset[ngrp + 1];
 267                 ngrp++;
 268         }
 269
 270         error = copyout(linux_gidset, args->gidset, ngrp * sizeof(l_gid16_t));
 271         free(linux_gidset, M_LINUX);
 272         if (error) {
 273                 LIN_SDT_PROBE1(uid16, linux_getgroups16, copyout_error, error);
 274                 LIN_SDT_PROBE1(uid16, linux_getgroups16, return, error);
 275                 return (error);
 276         }
 277
 278         td->td_retval[0] = ngrp;
 279
 280         LIN_SDT_PROBE1(uid16, linux_getgroups16, return, 0);
 281         return (0);
 282 }
 283
 284 /*
 285  * The FreeBSD native getgid(2) and getuid(2) also modify td->td_retval[1]
 286  * when COMPAT_43 is defined. This clobbers registers that are assumed to
 287  * be preserved. The following lightweight syscalls fixes this. See also
 288  * linux_getpid(2), linux_getgid(2) and linux_getuid(2) in linux_misc.c
 289  *
 290  * linux_getgid16() - MP SAFE
 291  * linux_getuid16() - MP SAFE
 292  */
 293
 294 int
 295 linux_getgid16(struct thread *td, struct linux_getgid16_args *args)
 296 {
 297
 298         LIN_SDT_PROBE0(uid16, linux_getgid16, entry);
 299
 300         td->td_retval[0] = td->td_ucred->cr_rgid;
 301
 302         LIN_SDT_PROBE1(uid16, linux_getgid16, return, 0);
 303         return (0);
 304 }
 305
 306 int
 307 linux_getuid16(struct thread *td, struct linux_getuid16_args *args)
 308 {
 309
 310         LIN_SDT_PROBE0(uid16, linux_getuid16, entry);
 311
 312         td->td_retval[0] = td->td_ucred->cr_ruid;
 313
 314         LIN_SDT_PROBE1(uid16, linux_getuid16, return, 0);
 315         return (0);
 316 }
 317
 318 int
 319 linux_getegid16(struct thread *td, struct linux_getegid16_args *args)
 320 {
 321         struct getegid_args bsd;
 322         int error;
 323
 324         LIN_SDT_PROBE0(uid16, linux_getegid16, entry);
 325
 326         error = sys_getegid(td, &bsd);
 327
 328         LIN_SDT_PROBE1(uid16, linux_getegid16, return, error);
 329         return (error);
 330 }
 331
 332 int
 333 linux_geteuid16(struct thread *td, struct linux_geteuid16_args *args)
 334 {
 335         struct geteuid_args bsd;
 336         int error;
 337
 338         LIN_SDT_PROBE0(uid16, linux_geteuid16, entry);
 339
 340         error = sys_geteuid(td, &bsd);
 341
 342         LIN_SDT_PROBE1(uid16, linux_geteuid16, return, error);
 343         return (error);
 344 }
 345
 346 int
 347 linux_setgid16(struct thread *td, struct linux_setgid16_args *args)
 348 {
 349         struct setgid_args bsd;
 350         int error;
 351
 352         LIN_SDT_PROBE1(uid16, linux_setgid16, entry, args->gid);
 353
 354         bsd.gid = args->gid;
 355         error = sys_setgid(td, &bsd);
 356
 357         LIN_SDT_PROBE1(uid16, linux_setgid16, return, error);
 358         return (error);
 359 }
 360
 361 int
 362 linux_setuid16(struct thread *td, struct linux_setuid16_args *args)
 363 {
 364         struct setuid_args bsd;
 365         int error;
 366
 367         LIN_SDT_PROBE1(uid16, linux_setuid16, entry, args->uid);
 368
 369         bsd.uid = args->uid;
 370         error = sys_setuid(td, &bsd);
 371
 372         LIN_SDT_PROBE1(uid16, linux_setuid16, return, error);
 373         return (error);
 374 }
 375
 376 int
 377 linux_setregid16(struct thread *td, struct linux_setregid16_args *args)
 378 {
 379         struct setregid_args bsd;
 380         int error;
 381
 382         LIN_SDT_PROBE2(uid16, linux_setregid16, entry, args->rgid, args->egid);
 383
 384         bsd.rgid = CAST_NOCHG(args->rgid);
 385         bsd.egid = CAST_NOCHG(args->egid);
 386         error = sys_setregid(td, &bsd);
 387
 388         LIN_SDT_PROBE1(uid16, linux_setregid16, return, error);
 389         return (error);
 390 }
 391
 392 int
 393 linux_setreuid16(struct thread *td, struct linux_setreuid16_args *args)
 394 {
 395         struct setreuid_args bsd;
 396         int error;
 397
 398         LIN_SDT_PROBE2(uid16, linux_setreuid16, entry, args->ruid, args->euid);
 399
 400         bsd.ruid = CAST_NOCHG(args->ruid);
 401         bsd.euid = CAST_NOCHG(args->euid);
 402         error = sys_setreuid(td, &bsd);
 403
 404         LIN_SDT_PROBE1(uid16, linux_setreuid16, return, error);
 405         return (error);
 406 }
 407
 408 int
 409 linux_setresgid16(struct thread *td, struct linux_setresgid16_args *args)
 410 {
 411         struct setresgid_args bsd;
 412         int error;
 413
 414         LIN_SDT_PROBE3(uid16, linux_setresgid16, entry, args->rgid, args->egid,
 415             args->sgid);
 416
 417         bsd.rgid = CAST_NOCHG(args->rgid);
 418         bsd.egid = CAST_NOCHG(args->egid);
 419         bsd.sgid = CAST_NOCHG(args->sgid);
 420         error = sys_setresgid(td, &bsd);
 421
 422         LIN_SDT_PROBE1(uid16, linux_setresgid16, return, error);
 423         return (error);
 424 }
 425
 426 int
 427 linux_setresuid16(struct thread *td, struct linux_setresuid16_args *args)
 428 {
 429         struct setresuid_args bsd;
 430         int error;
 431
 432         LIN_SDT_PROBE3(uid16, linux_setresuid16, entry, args->ruid, args->euid,
 433             args->suid);
 434
 435         bsd.ruid = CAST_NOCHG(args->ruid);
 436         bsd.euid = CAST_NOCHG(args->euid);
 437         bsd.suid = CAST_NOCHG(args->suid);
 438         error = sys_setresuid(td, &bsd);
 439
 440         LIN_SDT_PROBE1(uid16, linux_setresuid16, return, error);
 441         return (error);
 442 }