]> granicus.if.org Git - strace/blobdiff - uid.c
travis: add build environment information to the travis log
[strace] / uid.c
diff --git a/uid.c b/uid.c
index 1f8c365704551f61a81eb22a268b54fc122d34c7..0fb810c8b6b9cab6c11356576397b6a2859e891e 100644 (file)
--- a/uid.c
+++ b/uid.c
@@ -1,11 +1,42 @@
+/*
+ * Copyright (c) 1991, 1992 Paul Kranenburg <pk@cs.few.eur.nl>
+ * Copyright (c) 1993 Branko Lankester <branko@hacktic.nl>
+ * Copyright (c) 1993-1996 Rick Sladkey <jrs@world.std.com>
+ * Copyright (c) 1996-1999 Wichert Akkerman <wichert@cistron.nl>
+ * Copyright (c) 2003-2016 Dmitry V. Levin <ldv@altlinux.org>
+ * All rights reserved.
+ *
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions
+ * are met:
+ * 1. Redistributions of source code must retain the above copyright
+ *    notice, this list of conditions and the following disclaimer.
+ * 2. Redistributions in binary form must reproduce the above copyright
+ *    notice, this list of conditions and the following disclaimer in the
+ *    documentation and/or other materials provided with the distribution.
+ * 3. The name of the author may not be used to endorse or promote products
+ *    derived from this software without specific prior written permission.
+ *
+ * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
+ * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
+ * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
+ * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
+ * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
+ * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
+ * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
+ * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
+ * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
+ * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+ */
+
 #ifdef STRACE_UID_SIZE
 # if STRACE_UID_SIZE != 16
 #  error invalid STRACE_UID_SIZE
 # endif
 
-# define SIZEIFY(x)            SIZEIFY_(x,STRACE_UID_SIZE)
-# define SIZEIFY_(x,size)      SIZEIFY__(x,size)
-# define SIZEIFY__(x,size)     x ## size
+# define SIZEIFY(x)            SIZEIFY_(x, STRACE_UID_SIZE)
+# define SIZEIFY_(x, size)     SIZEIFY__(x, size)
+# define SIZEIFY__(x, size)    x ## size
 
 # define printuid      SIZEIFY(printuid)
 # define sys_chown     SIZEIFY(sys_chown)
 # define uid_t_(size)  uid_t__(size)
 # define uid_t__(size) uint ## size ## _t
 
-int
-sys_getuid(struct tcb *tcp)
+SYS_FUNC(getuid)
 {
-       if (exiting(tcp))
-               tcp->u_rval = (uid_t) tcp->u_rval;
-       return RVAL_UDECIMAL;
+       return RVAL_UDECIMAL | RVAL_DECODED;
 }
 
-int
-sys_setfsuid(struct tcb *tcp)
+SYS_FUNC(setfsuid)
 {
-       if (entering(tcp))
-               tprintf("%u", (uid_t) tcp->u_arg[0]);
-       else
-               tcp->u_rval = (uid_t) tcp->u_rval;
-       return RVAL_UDECIMAL;
+       printuid("", tcp->u_arg[0]);
+
+       return RVAL_UDECIMAL | RVAL_DECODED;
 }
 
-int
-sys_setuid(struct tcb *tcp)
+SYS_FUNC(setuid)
 {
-       if (entering(tcp)) {
-               tprintf("%u", (uid_t) tcp->u_arg[0]);
-       }
-       return 0;
+       printuid("", tcp->u_arg[0]);
+
+       return RVAL_DECODED;
 }
 
 static void
-get_print_uid(struct tcb *tcp, const char *prefix, const long addr)
+get_print_uid(struct tcb *const tcp, const char *const prefix,
+             const kernel_ulong_t addr)
 {
        uid_t uid;
 
-       if (umove(tcp, addr, &uid) < 0)
-               tprintf("%s%#lx", prefix, addr);
-       else
-               tprintf("%s[%u]", prefix, uid);
+       tprints(prefix);
+       if (!umove_or_printaddr(tcp, addr, &uid)) {
+               printuid("[", uid);
+               tprints("]");
+       }
 }
 
-int
-sys_getresuid(struct tcb *tcp)
+SYS_FUNC(getresuid)
 {
-       if (exiting(tcp)) {
-               if (syserror(tcp)) {
-                       tprintf("%#lx, %#lx, %#lx", tcp->u_arg[0],
-                               tcp->u_arg[1], tcp->u_arg[2]);
-               } else {
-                       get_print_uid(tcp, "", tcp->u_arg[0]);
-                       get_print_uid(tcp, ", ", tcp->u_arg[1]);
-                       get_print_uid(tcp, ", ", tcp->u_arg[2]);
-               }
-       }
+       if (entering(tcp))
+               return 0;
+
+       get_print_uid(tcp, "", tcp->u_arg[0]);
+       get_print_uid(tcp, ", ", tcp->u_arg[1]);
+       get_print_uid(tcp, ", ", tcp->u_arg[2]);
+
        return 0;
 }
 
-int
-sys_setreuid(struct tcb *tcp)
+SYS_FUNC(setreuid)
 {
-       if (entering(tcp)) {
-               printuid("", tcp->u_arg[0]);
-               printuid(", ", tcp->u_arg[1]);
-       }
-       return 0;
+       printuid("", tcp->u_arg[0]);
+       printuid(", ", tcp->u_arg[1]);
+
+       return RVAL_DECODED;
 }
 
-int
-sys_setresuid(struct tcb *tcp)
+SYS_FUNC(setresuid)
 {
-       if (entering(tcp)) {
-               printuid("", tcp->u_arg[0]);
-               printuid(", ", tcp->u_arg[1]);
-               printuid(", ", tcp->u_arg[2]);
-       }
-       return 0;
+       printuid("", tcp->u_arg[0]);
+       printuid(", ", tcp->u_arg[1]);
+       printuid(", ", tcp->u_arg[2]);
+
+       return RVAL_DECODED;
 }
 
-int
-sys_chown(struct tcb *tcp)
+SYS_FUNC(chown)
 {
-       if (entering(tcp)) {
-               printpath(tcp, tcp->u_arg[0]);
-               printuid(", ", tcp->u_arg[1]);
-               printuid(", ", tcp->u_arg[2]);
-       }
-       return 0;
+       printpath(tcp, tcp->u_arg[0]);
+       printuid(", ", tcp->u_arg[1]);
+       printuid(", ", tcp->u_arg[2]);
+
+       return RVAL_DECODED;
 }
 
-int
-sys_fchown(struct tcb *tcp)
+SYS_FUNC(fchown)
 {
-       if (entering(tcp)) {
-               printfd(tcp, tcp->u_arg[0]);
-               printuid(", ", tcp->u_arg[1]);
-               printuid(", ", tcp->u_arg[2]);
-       }
-       return 0;
+       printfd(tcp, tcp->u_arg[0]);
+       printuid(", ", tcp->u_arg[1]);
+       printuid(", ", tcp->u_arg[2]);
+
+       return RVAL_DECODED;
 }
 
 void
 printuid(const char *text, const unsigned int uid)
 {
-       if ((unsigned int) -1 == uid || (uid_t) -1 == uid)
+       if ((uid_t) -1U == (uid_t) uid)
                tprintf("%s-1", text);
        else
-               tprintf("%s%u", text, uid);
+               tprintf("%s%u", text, (uid_t) uid);
 }
 
-int
-sys_setgroups(struct tcb *tcp)
+static bool
+print_gid(struct tcb *tcp, void *elem_buf, size_t elem_size, void *data)
 {
-       if (entering(tcp)) {
-               unsigned long len, size, start, cur, end, abbrev_end;
-               uid_t gid;
-               int failed = 0;
-
-               len = tcp->u_arg[0];
-               tprintf("%lu, ", len);
-               if (len == 0) {
-                       tprints("[]");
-                       return 0;
-               }
-               start = tcp->u_arg[1];
-               if (start == 0) {
-                       tprints("NULL");
-                       return 0;
-               }
-               size = len * sizeof(gid);
-               end = start + size;
-               if (!verbose(tcp) || size / sizeof(gid) != len || end < start) {
-                       tprintf("%#lx", start);
-                       return 0;
-               }
-               if (abbrev(tcp)) {
-                       abbrev_end = start + max_strlen * sizeof(gid);
-                       if (abbrev_end < start)
-                               abbrev_end = end;
-               } else {
-                       abbrev_end = end;
-               }
-               tprints("[");
-               for (cur = start; cur < end; cur += sizeof(gid)) {
-                       if (cur > start)
-                               tprints(", ");
-                       if (cur >= abbrev_end) {
-                               tprints("...");
-                               break;
-                       }
-                       if (umoven(tcp, cur, sizeof(gid), (char *) &gid) < 0) {
-                               tprints("?");
-                               failed = 1;
-                               break;
-                       }
-                       tprintf("%u", (unsigned int) gid);
-               }
-               tprints("]");
-               if (failed)
-                       tprintf(" %#lx", tcp->u_arg[1]);
-       }
-       return 0;
+       printuid("", (*(uid_t *) elem_buf));
+
+       return true;
 }
 
-int
-sys_getgroups(struct tcb *tcp)
+static void
+print_groups(struct tcb *const tcp, const unsigned int len,
+            const kernel_ulong_t addr)
 {
-       unsigned long len;
-
-       if (entering(tcp)) {
-               len = tcp->u_arg[0];
-               tprintf("%lu, ", len);
-       } else {
-               unsigned long size, start, cur, end, abbrev_end;
-               uid_t gid;
-               int failed = 0;
-
-               start = tcp->u_arg[1];
-               if (start == 0) {
-                       tprints("NULL");
-                       return 0;
-               }
-               len = tcp->u_rval;
-               if (len == 0) {
-                       tprints("[]");
-                       return 0;
-               }
-               size = len * sizeof(gid);
-               end = start + size;
-               if (!verbose(tcp) || tcp->u_arg[0] == 0 ||
-                   size / sizeof(gid) != len || end < start) {
-                       tprintf("%#lx", start);
-                       return 0;
-               }
-               if (abbrev(tcp)) {
-                       abbrev_end = start + max_strlen * sizeof(gid);
-                       if (abbrev_end < start)
-                               abbrev_end = end;
-               } else {
-                       abbrev_end = end;
-               }
-               tprints("[");
-               for (cur = start; cur < end; cur += sizeof(gid)) {
-                       if (cur > start)
-                               tprints(", ");
-                       if (cur >= abbrev_end) {
-                               tprints("...");
-                               break;
-                       }
-                       if (umoven(tcp, cur, sizeof(gid), (char *) &gid) < 0) {
-                               tprints("?");
-                               failed = 1;
-                               break;
-                       }
-                       tprintf("%u", (unsigned int) gid);
-               }
-               tprints("]");
-               if (failed)
-                       tprintf(" %#lx", tcp->u_arg[1]);
+       static unsigned long ngroups_max;
+       if (!ngroups_max)
+               ngroups_max = sysconf(_SC_NGROUPS_MAX);
+
+       if (len > ngroups_max) {
+               printaddr(addr);
+               return;
        }
+
+       uid_t gid;
+       print_array(tcp, addr, len, &gid, sizeof(gid),
+                   umoven_or_printaddr, print_gid, 0);
+}
+
+SYS_FUNC(setgroups)
+{
+       const int len = tcp->u_arg[0];
+
+       tprintf("%d, ", len);
+       print_groups(tcp, len, tcp->u_arg[1]);
+       return RVAL_DECODED;
+}
+
+SYS_FUNC(getgroups)
+{
+       if (entering(tcp))
+               tprintf("%d, ", (int) tcp->u_arg[0]);
+       else
+               print_groups(tcp, tcp->u_rval, tcp->u_arg[1]);
        return 0;
 }