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-2015 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 SYS_FUNC(setgroups)
 157 {
 158         unsigned long cur, abbrev_end;
 159         uid_t gid;
 160         int failed = 0;
 161         const unsigned long len = tcp->u_arg[0];
 162         const unsigned long start = tcp->u_arg[1];
 163         const unsigned long size = len * sizeof(gid);
 164         const unsigned long end = start + size;
 165
 166         tprintf("%lu, ", len);
 167         if (len == 0) {
 168                 tprints("[]");
 169                 return RVAL_DECODED;
 170         }
 171         if (!start || !verbose(tcp) ||
 172             size / sizeof(gid) != len || end < start) {
 173                 printaddr(start);
 174                 return RVAL_DECODED;
 175         }
 176         if (abbrev(tcp)) {
 177                 abbrev_end = start + max_strlen * sizeof(gid);
 178                 if (abbrev_end < start)
 179                         abbrev_end = end;
 180         } else {
 181                 abbrev_end = end;
 182         }
 183         tprints("[");
 184         for (cur = start; cur < end; cur += sizeof(gid)) {
 185                 if (cur > start)
 186                         tprints(", ");
 187                 if (cur >= abbrev_end) {
 188                         tprints("...");
 189                         break;
 190                 }
 191                 if (umoven(tcp, cur, sizeof(gid), &gid) < 0) {
 192                         tprints("?");
 193                         failed = 1;
 194                         break;
 195                 }
 196                 tprintf("%u", (unsigned int) gid);
 197         }
 198         tprints("]");
 199         if (failed) {
 200                 tprints(" ");
 201                 printaddr(start);
 202         }
 203
 204         return RVAL_DECODED;
 205 }
 206
 207 SYS_FUNC(getgroups)
 208 {
 209         if (entering(tcp)) {
 210                 tprintf("%lu, ", tcp->u_arg[0]);
 211         } else {
 212                 unsigned long cur, abbrev_end;
 213                 uid_t gid;
 214                 int failed = 0;
 215                 const unsigned long len = tcp->u_rval;
 216                 const unsigned long size = len * sizeof(gid);
 217                 const unsigned long start = tcp->u_arg[1];
 218                 const unsigned long end = start + size;
 219
 220                 if (!start) {
 221                         printaddr(start);
 222                         return 0;
 223                 }
 224                 if (len == 0) {
 225                         tprints("[]");
 226                         return 0;
 227                 }
 228                 if (!verbose(tcp) || syserror(tcp) ||
 229                     size / sizeof(gid) != len || end < start) {
 230                         printaddr(start);
 231                         return 0;
 232                 }
 233                 if (abbrev(tcp)) {
 234                         abbrev_end = start + max_strlen * sizeof(gid);
 235                         if (abbrev_end < start)
 236                                 abbrev_end = end;
 237                 } else {
 238                         abbrev_end = end;
 239                 }
 240                 tprints("[");
 241                 for (cur = start; cur < end; cur += sizeof(gid)) {
 242                         if (cur > start)
 243                                 tprints(", ");
 244                         if (cur >= abbrev_end) {
 245                                 tprints("...");
 246                                 break;
 247                         }
 248                         if (umoven(tcp, cur, sizeof(gid), &gid) < 0) {
 249                                 tprints("?");
 250                                 failed = 1;
 251                                 break;
 252                         }
 253                         tprintf("%u", (unsigned int) gid);
 254                 }
 255                 tprints("]");
 256                 if (failed) {
 257                         tprints(" ");
 258                         printaddr(start);
 259                 }
 260         }
 261         return 0;
 262 }
 263
 264 #endif /* STRACE_UID_SIZE */