+/*
+ * 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
# 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
{
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), &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 *tcp, const unsigned int len, const unsigned long 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), &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;
}