* Copyright (c) 1993 Branko Lankester <branko@hacktic.nl>
* Copyright (c) 1993, 1994, 1995, 1996 Rick Sladkey <jrs@world.std.com>
* Copyright (c) 1996-1999 Wichert Akkerman <wichert@cistron.nl>
+ * Copyright (c) 1999-2017 The strace developers.
* All rights reserved.
*
* Redistribution and use in source and binary forms, with or without
#include "defs.h"
#include <sys/resource.h>
-#include <sys/times.h>
-#include <linux/kernel.h>
#include "xlat/resources.h"
}
static void
-print_rlimit64(struct tcb *tcp, unsigned long addr)
+print_rlimit64(struct tcb *const tcp, const kernel_ulong_t addr)
{
struct rlimit_64 {
uint64_t rlim_cur;
uint64_t rlim_max;
} rlim;
- if (umove(tcp, addr, &rlim) < 0)
- tprintf("%#lx", addr);
- else {
+ if (!umove_or_printaddr(tcp, addr, &rlim)) {
tprintf("{rlim_cur=%s,", sprint_rlim64(rlim.rlim_cur));
tprintf(" rlim_max=%s}", sprint_rlim64(rlim.rlim_max));
}
}
-static void
-decode_rlimit64(struct tcb *tcp, unsigned long addr)
-{
- if (!addr)
- tprints("NULL");
- else if (!verbose(tcp) ||
- (exiting(tcp) && syserror(tcp)))
- tprintf("%#lx", addr);
- else
- print_rlimit64(tcp, addr);
-}
-
#if !defined(current_wordsize) || current_wordsize == 4
static const char *
}
static void
-print_rlimit32(struct tcb *tcp, unsigned long addr)
+print_rlimit32(struct tcb *const tcp, const kernel_ulong_t addr)
{
struct rlimit_32 {
uint32_t rlim_cur;
uint32_t rlim_max;
} rlim;
- if (umove(tcp, addr, &rlim) < 0)
- tprintf("%#lx", addr);
- else {
+ if (!umove_or_printaddr(tcp, addr, &rlim)) {
tprintf("{rlim_cur=%s,", sprint_rlim32(rlim.rlim_cur));
tprintf(" rlim_max=%s}", sprint_rlim32(rlim.rlim_max));
}
}
static void
-decode_rlimit(struct tcb *tcp, unsigned long addr)
-{
- if (!addr)
- tprints("NULL");
- else if (!verbose(tcp) || (exiting(tcp) && syserror(tcp)))
- tprintf("%#lx", addr);
- else {
-# if defined(X86_64) || defined(X32)
- /*
- * i386 is the only personality on X86_64 and X32
- * with 32-bit rlim_t.
- * When current_personality is X32, current_wordsize
- * equals to 4 but rlim_t is 64-bit.
- */
- if (current_personality == 1)
-# else
- if (current_wordsize == 4)
-# endif
- print_rlimit32(tcp, addr);
- else
- print_rlimit64(tcp, addr);
- }
+decode_rlimit(struct tcb *const tcp, const kernel_ulong_t addr)
+{
+ /*
+ * i386 is the only personality on X86_64 and X32
+ * with 32-bit rlim_t.
+ * When current_personality is X32, current_wordsize
+ * equals to 4 but rlim_t is 64-bit.
+ */
+ if (current_klongsize == 4)
+ print_rlimit32(tcp, addr);
+ else
+ print_rlimit64(tcp, addr);
}
#else /* defined(current_wordsize) && current_wordsize != 4 */
-# define decode_rlimit decode_rlimit64
+# define decode_rlimit print_rlimit64
#endif
-int
-sys_getrlimit(struct tcb *tcp)
+SYS_FUNC(getrlimit)
{
if (entering(tcp)) {
printxval(resources, tcp->u_arg[0], "RLIMIT_???");
tprints(", ");
- }
- else {
+ } else {
decode_rlimit(tcp, tcp->u_arg[1]);
}
return 0;
}
-int
-sys_setrlimit(struct tcb *tcp)
+SYS_FUNC(setrlimit)
{
- if (entering(tcp)) {
- printxval(resources, tcp->u_arg[0], "RLIMIT_???");
- tprints(", ");
- decode_rlimit(tcp, tcp->u_arg[1]);
- }
- return 0;
+ printxval(resources, tcp->u_arg[0], "RLIMIT_???");
+ tprints(", ");
+ decode_rlimit(tcp, tcp->u_arg[1]);
+
+ return RVAL_DECODED;
}
-int
-sys_prlimit64(struct tcb *tcp)
+SYS_FUNC(prlimit64)
{
if (entering(tcp)) {
- tprintf("%ld, ", tcp->u_arg[0]);
+ tprintf("%d, ", (int) tcp->u_arg[0]);
printxval(resources, tcp->u_arg[1], "RLIMIT_???");
tprints(", ");
- decode_rlimit64(tcp, tcp->u_arg[2]);
+ print_rlimit64(tcp, tcp->u_arg[2]);
tprints(", ");
} else {
- decode_rlimit64(tcp, tcp->u_arg[3]);
+ print_rlimit64(tcp, tcp->u_arg[3]);
}
return 0;
}
#include "xlat/usagewho.h"
-#ifdef ALPHA
-void
-printrusage32(struct tcb *tcp, long addr)
-{
- struct timeval32 {
- unsigned tv_sec;
- unsigned tv_usec;
- };
- struct rusage32 {
- struct timeval32 ru_utime; /* user time used */
- struct timeval32 ru_stime; /* system time used */
- long ru_maxrss; /* maximum resident set size */
- long ru_ixrss; /* integral shared memory size */
- long ru_idrss; /* integral unshared data size */
- long ru_isrss; /* integral unshared stack size */
- long ru_minflt; /* page reclaims */
- long ru_majflt; /* page faults */
- long ru_nswap; /* swaps */
- long ru_inblock; /* block input operations */
- long ru_oublock; /* block output operations */
- long ru_msgsnd; /* messages sent */
- long ru_msgrcv; /* messages received */
- long ru_nsignals; /* signals received */
- long ru_nvcsw; /* voluntary context switches */
- long ru_nivcsw; /* involuntary " */
- } ru;
-
- if (!addr)
- tprints("NULL");
- else if (syserror(tcp) || !verbose(tcp))
- tprintf("%#lx", addr);
- else if (umove(tcp, addr, &ru) < 0)
- tprints("{...}");
- else if (!abbrev(tcp)) {
- tprintf("{ru_utime={%lu, %lu}, ru_stime={%lu, %lu}, ",
- (long) ru.ru_utime.tv_sec, (long) ru.ru_utime.tv_usec,
- (long) ru.ru_stime.tv_sec, (long) ru.ru_stime.tv_usec);
- tprintf("ru_maxrss=%lu, ru_ixrss=%lu, ",
- ru.ru_maxrss, ru.ru_ixrss);
- tprintf("ru_idrss=%lu, ru_isrss=%lu, ",
- ru.ru_idrss, ru.ru_isrss);
- tprintf("ru_minflt=%lu, ru_majflt=%lu, ru_nswap=%lu, ",
- ru.ru_minflt, ru.ru_majflt, ru.ru_nswap);
- tprintf("ru_inblock=%lu, ru_oublock=%lu, ",
- ru.ru_inblock, ru.ru_oublock);
- tprintf("ru_msgsnd=%lu, ru_msgrcv=%lu, ",
- ru.ru_msgsnd, ru.ru_msgrcv);
- tprintf("ru_nsignals=%lu, ru_nvcsw=%lu, ru_nivcsw=%lu}",
- ru.ru_nsignals, ru.ru_nvcsw, ru.ru_nivcsw);
- }
- else {
- tprintf("{ru_utime={%lu, %lu}, ru_stime={%lu, %lu}, ...}",
- (long) ru.ru_utime.tv_sec, (long) ru.ru_utime.tv_usec,
- (long) ru.ru_stime.tv_sec, (long) ru.ru_stime.tv_usec);
- }
-}
-#endif
-
-void
-printrusage(struct tcb *tcp, long addr)
-{
- struct rusage ru;
-
- if (!addr)
- tprints("NULL");
- else if (syserror(tcp) || !verbose(tcp))
- tprintf("%#lx", addr);
- else if (umove(tcp, addr, &ru) < 0)
- tprints("{...}");
- else if (!abbrev(tcp)) {
- tprintf("{ru_utime={%lu, %lu}, ru_stime={%lu, %lu}, ",
- (long) ru.ru_utime.tv_sec, (long) ru.ru_utime.tv_usec,
- (long) ru.ru_stime.tv_sec, (long) ru.ru_stime.tv_usec);
- tprintf("ru_maxrss=%lu, ru_ixrss=%lu, ",
- ru.ru_maxrss, ru.ru_ixrss);
- tprintf("ru_idrss=%lu, ru_isrss=%lu, ",
- ru.ru_idrss, ru.ru_isrss);
- tprintf("ru_minflt=%lu, ru_majflt=%lu, ru_nswap=%lu, ",
- ru.ru_minflt, ru.ru_majflt, ru.ru_nswap);
- tprintf("ru_inblock=%lu, ru_oublock=%lu, ",
- ru.ru_inblock, ru.ru_oublock);
- tprintf("ru_msgsnd=%lu, ru_msgrcv=%lu, ",
- ru.ru_msgsnd, ru.ru_msgrcv);
- tprintf("ru_nsignals=%lu, ru_nvcsw=%lu, ru_nivcsw=%lu}",
- ru.ru_nsignals, ru.ru_nvcsw, ru.ru_nivcsw);
- }
- else {
- tprintf("{ru_utime={%lu, %lu}, ru_stime={%lu, %lu}, ...}",
- (long) ru.ru_utime.tv_sec, (long) ru.ru_utime.tv_usec,
- (long) ru.ru_stime.tv_sec, (long) ru.ru_stime.tv_usec);
- }
-}
-
-int
-sys_getrusage(struct tcb *tcp)
+SYS_FUNC(getrusage)
{
if (entering(tcp)) {
printxval(usagewho, tcp->u_arg[0], "RUSAGE_???");
tprints(", ");
- }
- else
+ } else
printrusage(tcp, tcp->u_arg[1]);
return 0;
}
#ifdef ALPHA
-int
-sys_osf_getrusage(struct tcb *tcp)
+SYS_FUNC(osf_getrusage)
{
if (entering(tcp)) {
printxval(usagewho, tcp->u_arg[0], "RUSAGE_???");
tprints(", ");
- }
- else
+ } else
printrusage32(tcp, tcp->u_arg[1]);
return 0;
}
#endif /* ALPHA */
-#include <sys/sysinfo.h>
-
-int
-sys_sysinfo(struct tcb *tcp)
-{
- struct sysinfo si;
-
- if (exiting(tcp)) {
- if (syserror(tcp) || !verbose(tcp))
- tprintf("%#lx", tcp->u_arg[0]);
- else if (umove(tcp, tcp->u_arg[0], &si) < 0)
- tprints("{...}");
- else {
- tprintf("{uptime=%lu, loads=[%lu, %lu, %lu] ",
- (long) si.uptime, (long) si.loads[0],
- (long) si.loads[1], (long) si.loads[2]);
- tprintf("totalram=%lu, freeram=%lu, ",
- (long) si.totalram, (long) si.freeram);
- tprintf("sharedram=%lu, bufferram=%lu} ",
- (long) si.sharedram, (long) si.bufferram);
- tprintf("totalswap=%lu, freeswap=%lu, procs=%u}",
- (long) si.totalswap, (long) si.freeswap,
- (unsigned)si.procs);
- }
- }
- return 0;
-}
-
#include "xlat/priorities.h"
-int
-sys_getpriority(struct tcb *tcp)
+SYS_FUNC(getpriority)
{
- if (entering(tcp)) {
- printxval(priorities, tcp->u_arg[0], "PRIO_???");
- tprintf(", %lu", tcp->u_arg[1]);
- }
- return 0;
-}
+ printxval(priorities, tcp->u_arg[0], "PRIO_???");
+ tprintf(", %d", (int) tcp->u_arg[1]);
-int
-sys_setpriority(struct tcb *tcp)
-{
- if (entering(tcp)) {
- printxval(priorities, tcp->u_arg[0], "PRIO_???");
- tprintf(", %lu, %ld", tcp->u_arg[1], tcp->u_arg[2]);
- }
- return 0;
+ return RVAL_DECODED;
}
-int
-sys_times(struct tcb *tcp)
+SYS_FUNC(setpriority)
{
- struct tms tbuf;
+ printxval(priorities, tcp->u_arg[0], "PRIO_???");
+ tprintf(", %d, %d", (int) tcp->u_arg[1], (int) tcp->u_arg[2]);
- if (exiting(tcp)) {
- if (tcp->u_arg[0] == 0)
- tprints("NULL");
- else if (syserror(tcp))
- tprintf("%#lx", tcp->u_arg[0]);
- else if (umove(tcp, tcp->u_arg[0], &tbuf) < 0)
- tprints("{...}");
- else {
- tprintf("{tms_utime=%llu, tms_stime=%llu, ",
- (unsigned long long) tbuf.tms_utime,
- (unsigned long long) tbuf.tms_stime);
- tprintf("tms_cutime=%llu, tms_cstime=%llu}",
- (unsigned long long) tbuf.tms_cutime,
- (unsigned long long) tbuf.tms_cstime);
- }
- }
- return 0;
+ return RVAL_DECODED;
}