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         if (entering(tcp))
  79                 tprintf("%u", (uid_t) tcp->u_arg[0]);
  80
  81         return RVAL_UDECIMAL | RVAL_DECODED;
  82 }
  83
  84 SYS_FUNC(setuid)
  85 {
  86         printuid("", tcp->u_arg[0]);
  87
  88         return RVAL_DECODED;
  89 }
  90
  91 static void
  92 get_print_uid(struct tcb *tcp, const char *prefix, const long addr)
  93 {
  94         uid_t uid;
  95
  96         tprints(prefix);
  97         if (!umove_or_printaddr(tcp, addr, &uid))
  98                 tprintf("[%u]", uid);
  99 }
 100
 101 SYS_FUNC(getresuid)
 102 {
 103         if (entering(tcp))
 104                 return 0;
 105
 106         get_print_uid(tcp, "", tcp->u_arg[0]);
 107         get_print_uid(tcp, ", ", tcp->u_arg[1]);
 108         get_print_uid(tcp, ", ", tcp->u_arg[2]);
 109
 110         return 0;
 111 }
 112
 113 SYS_FUNC(setreuid)
 114 {
 115         printuid("", tcp->u_arg[0]);
 116         printuid(", ", tcp->u_arg[1]);
 117
 118         return RVAL_DECODED;
 119 }
 120
 121 SYS_FUNC(setresuid)
 122 {
 123         printuid("", tcp->u_arg[0]);
 124         printuid(", ", tcp->u_arg[1]);
 125         printuid(", ", tcp->u_arg[2]);
 126
 127         return RVAL_DECODED;
 128 }
 129
 130 SYS_FUNC(chown)
 131 {
 132         printpath(tcp, tcp->u_arg[0]);
 133         printuid(", ", tcp->u_arg[1]);
 134         printuid(", ", tcp->u_arg[2]);
 135
 136         return RVAL_DECODED;
 137 }
 138
 139 SYS_FUNC(fchown)
 140 {
 141         printfd(tcp, tcp->u_arg[0]);
 142         printuid(", ", tcp->u_arg[1]);
 143         printuid(", ", tcp->u_arg[2]);
 144
 145         return RVAL_DECODED;
 146 }
 147
 148 void
 149 printuid(const char *text, const unsigned int uid)
 150 {
 151         if ((unsigned int) -1 == uid || (uid_t) -1 == uid)
 152                 tprintf("%s-1", text);
 153         else
 154                 tprintf("%s%u", text, uid);
 155 }
 156
 157 SYS_FUNC(setgroups)
 158 {
 159         unsigned long cur, abbrev_end;
 160         uid_t gid;
 161         int failed = 0;
 162         const unsigned long len = tcp->u_arg[0];
 163         const unsigned long start = tcp->u_arg[1];
 164         const unsigned long size = len * sizeof(gid);
 165         const unsigned long end = start + size;
 166
 167         tprintf("%lu, ", len);
 168         if (len == 0) {
 169                 tprints("[]");
 170                 return RVAL_DECODED;
 171         }
 172         if (!start || !verbose(tcp) ||
 173             size / sizeof(gid) != len || end < start) {
 174                 printaddr(start);
 175                 return RVAL_DECODED;
 176         }
 177         if (abbrev(tcp)) {
 178                 abbrev_end = start + max_strlen * sizeof(gid);
 179                 if (abbrev_end < start)
 180                         abbrev_end = end;
 181         } else {
 182                 abbrev_end = end;
 183         }
 184         tprints("[");
 185         for (cur = start; cur < end; cur += sizeof(gid)) {
 186                 if (cur > start)
 187                         tprints(", ");
 188                 if (cur >= abbrev_end) {
 189                         tprints("...");
 190                         break;
 191                 }
 192                 if (umoven(tcp, cur, sizeof(gid), &gid) < 0) {
 193                         tprints("?");
 194                         failed = 1;
 195                         break;
 196                 }
 197                 tprintf("%u", (unsigned int) gid);
 198         }
 199         tprints("]");
 200         if (failed) {
 201                 tprints(" ");
 202                 printaddr(start);
 203         }
 204
 205         return RVAL_DECODED;
 206 }
 207
 208 SYS_FUNC(getgroups)
 209 {
 210         if (entering(tcp)) {
 211                 tprintf("%lu, ", tcp->u_arg[0]);
 212         } else {
 213                 unsigned long cur, abbrev_end;
 214                 uid_t gid;
 215                 int failed = 0;
 216                 const unsigned long len = tcp->u_rval;
 217                 const unsigned long size = len * sizeof(gid);
 218                 const unsigned long start = tcp->u_arg[1];
 219                 const unsigned long end = start + size;
 220
 221                 if (!start) {
 222                         printaddr(start);
 223                         return 0;
 224                 }
 225                 if (len == 0) {
 226                         tprints("[]");
 227                         return 0;
 228                 }
 229                 if (!verbose(tcp) || syserror(tcp) ||
 230                     size / sizeof(gid) != len || end < start) {
 231                         printaddr(start);
 232                         return 0;
 233                 }
 234                 if (abbrev(tcp)) {
 235                         abbrev_end = start + max_strlen * sizeof(gid);
 236                         if (abbrev_end < start)
 237                                 abbrev_end = end;
 238                 } else {
 239                         abbrev_end = end;
 240                 }
 241                 tprints("[");
 242                 for (cur = start; cur < end; cur += sizeof(gid)) {
 243                         if (cur > start)
 244                                 tprints(", ");
 245                         if (cur >= abbrev_end) {
 246                                 tprints("...");
 247                                 break;
 248                         }
 249                         if (umoven(tcp, cur, sizeof(gid), &gid) < 0) {
 250                                 tprints("?");
 251                                 failed = 1;
 252                                 break;
 253                         }
 254                         tprintf("%u", (unsigned int) gid);
 255                 }
 256                 tprints("]");
 257                 if (failed) {
 258                         tprints(" ");
 259                         printaddr(start);
 260                 }
 261         }
 262         return 0;
 263 }
 264
 265 #endif /* STRACE_UID_SIZE */