granicus.if.org Git - strace/blob - uid.c

   1 /*
   2  * Copyright (c) 1991, 1992 Paul Kranenburg <pk@cs.few.eur.nl>
   3  * Copyright (c) 1993 Branko Lankester <branko@hacktic.nl>
   4  * Copyright (c) 1993-1996 Rick Sladkey <jrs@world.std.com>
   5  * Copyright (c) 1996-1999 Wichert Akkerman <wichert@cistron.nl>
   6  * Copyright (c) 2003-2016 Dmitry V. Levin <ldv@altlinux.org>
   7  * All rights reserved.
   8  *
   9  * Redistribution and use in source and binary forms, with or without
  10  * modification, are permitted provided that the following conditions
  11  * are met:
  12  * 1. Redistributions of source code must retain the above copyright
  13  *    notice, this list of conditions and the following disclaimer.
  14  * 2. Redistributions in binary form must reproduce the above copyright
  15  *    notice, this list of conditions and the following disclaimer in the
  16  *    documentation and/or other materials provided with the distribution.
  17  * 3. The name of the author may not be used to endorse or promote products
  18  *    derived from this software without specific prior written permission.
  19  *
  20  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
  21  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
  22  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
  23  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
  24  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
  25  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
  26  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
  27  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  28  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
  29  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  30  */
  31
  32 #ifdef STRACE_UID_SIZE
  33 # if STRACE_UID_SIZE != 16
  34 #  error invalid STRACE_UID_SIZE
  35 # endif
  36
  37 # define SIZEIFY(x)             SIZEIFY_(x,STRACE_UID_SIZE)
  38 # define SIZEIFY_(x,size)       SIZEIFY__(x,size)
  39 # define SIZEIFY__(x,size)      x ## size
  40
  41 # define printuid       SIZEIFY(printuid)
  42 # define sys_chown      SIZEIFY(sys_chown)
  43 # define sys_fchown     SIZEIFY(sys_fchown)
  44 # define sys_getgroups  SIZEIFY(sys_getgroups)
  45 # define sys_getresuid  SIZEIFY(sys_getresuid)
  46 # define sys_getuid     SIZEIFY(sys_getuid)
  47 # define sys_setfsuid   SIZEIFY(sys_setfsuid)
  48 # define sys_setgroups  SIZEIFY(sys_setgroups)
  49 # define sys_setresuid  SIZEIFY(sys_setresuid)
  50 # define sys_setreuid   SIZEIFY(sys_setreuid)
  51 # define sys_setuid     SIZEIFY(sys_setuid)
  52 #endif /* STRACE_UID_SIZE */
  53
  54 #include "defs.h"
  55
  56 #ifdef STRACE_UID_SIZE
  57 # if !NEED_UID16_PARSERS
  58 #  undef STRACE_UID_SIZE
  59 # endif
  60 #else
  61 # define STRACE_UID_SIZE 32
  62 #endif
  63
  64 #ifdef STRACE_UID_SIZE
  65
  66 # undef uid_t
  67 # define uid_t          uid_t_(STRACE_UID_SIZE)
  68 # define uid_t_(size)   uid_t__(size)
  69 # define uid_t__(size)  uint ## size ## _t
  70
  71 SYS_FUNC(getuid)
  72 {
  73         return RVAL_UDECIMAL | RVAL_DECODED;
  74 }
  75
  76 SYS_FUNC(setfsuid)
  77 {
  78         tprintf("%u", (uid_t) tcp->u_arg[0]);
  79
  80         return RVAL_UDECIMAL | RVAL_DECODED;
  81 }
  82
  83 SYS_FUNC(setuid)
  84 {
  85         printuid("", tcp->u_arg[0]);
  86
  87         return RVAL_DECODED;
  88 }
  89
  90 static void
  91 get_print_uid(struct tcb *tcp, const char *prefix, const long addr)
  92 {
  93         uid_t uid;
  94
  95         tprints(prefix);
  96         if (!umove_or_printaddr(tcp, addr, &uid))
  97                 tprintf("[%u]", uid);
  98 }
  99
 100 SYS_FUNC(getresuid)
 101 {
 102         if (entering(tcp))
 103                 return 0;
 104
 105         get_print_uid(tcp, "", tcp->u_arg[0]);
 106         get_print_uid(tcp, ", ", tcp->u_arg[1]);
 107         get_print_uid(tcp, ", ", tcp->u_arg[2]);
 108
 109         return 0;
 110 }
 111
 112 SYS_FUNC(setreuid)
 113 {
 114         printuid("", tcp->u_arg[0]);
 115         printuid(", ", tcp->u_arg[1]);
 116
 117         return RVAL_DECODED;
 118 }
 119
 120 SYS_FUNC(setresuid)
 121 {
 122         printuid("", tcp->u_arg[0]);
 123         printuid(", ", tcp->u_arg[1]);
 124         printuid(", ", tcp->u_arg[2]);
 125
 126         return RVAL_DECODED;
 127 }
 128
 129 SYS_FUNC(chown)
 130 {
 131         printpath(tcp, tcp->u_arg[0]);
 132         printuid(", ", tcp->u_arg[1]);
 133         printuid(", ", tcp->u_arg[2]);
 134
 135         return RVAL_DECODED;
 136 }
 137
 138 SYS_FUNC(fchown)
 139 {
 140         printfd(tcp, tcp->u_arg[0]);
 141         printuid(", ", tcp->u_arg[1]);
 142         printuid(", ", tcp->u_arg[2]);
 143
 144         return RVAL_DECODED;
 145 }
 146
 147 void
 148 printuid(const char *text, const unsigned int uid)
 149 {
 150         if ((uid_t) -1U == (uid_t) uid)
 151                 tprintf("%s-1", text);
 152         else
 153                 tprintf("%s%u", text, (uid_t) uid);
 154 }
 155
 156 static void
 157 print_groups(struct tcb *tcp, const unsigned int len, const unsigned long addr)
 158 {
 159         static unsigned long ngroups_max;
 160         if (!ngroups_max)
 161                 ngroups_max = sysconf(_SC_NGROUPS_MAX);
 162
 163         const unsigned int size = len * sizeof(uid_t);
 164         const unsigned long end = addr + size;
 165         if (!addr || !verbose(tcp) || size / sizeof(uid_t) != len
 166             || len > ngroups_max || end < addr) {
 167                 printaddr(addr);
 168                 return;
 169         }
 170
 171         if (len == 0) {
 172                 tprints("[]");
 173                 return;
 174         }
 175
 176         const unsigned long abbrev_end =
 177                 (abbrev(tcp) && max_strlen < len) ?
 178                         addr + max_strlen * sizeof(uid_t) : end;
 179
 180         unsigned long cur;
 181         for (cur = addr; cur < end; cur += sizeof(uid_t)) {
 182                 if (cur != addr)
 183                         tprints(", ");
 184
 185                 uid_t gid;
 186                 if (umove_or_printaddr(tcp, cur, &gid))
 187                         break;
 188
 189                 if (cur == addr)
 190                         tprints("[");
 191
 192                 if (cur >= abbrev_end) {
 193                         tprints("...");
 194                         cur = end;
 195                         break;
 196                 }
 197
 198                 tprintf("%u", (unsigned int) gid);
 199         }
 200         if (cur != addr)
 201                 tprints("]");
 202 }
 203
 204 SYS_FUNC(setgroups)
 205 {
 206         const unsigned int len = tcp->u_arg[0];
 207
 208         tprintf("%u, ", len);
 209         print_groups(tcp, len, tcp->u_arg[1]);
 210         return RVAL_DECODED;
 211 }
 212
 213 SYS_FUNC(getgroups)
 214 {
 215         if (entering(tcp))
 216                 tprintf("%u, ", (unsigned int) tcp->u_arg[0]);
 217         else
 218                 print_groups(tcp, tcp->u_rval, tcp->u_arg[1]);
 219         return 0;
 220 }
 221
 222 #endif /* STRACE_UID_SIZE */