Dmitry V. Levin
e61086ff77
As time_t is a 64-bit type in x32 personality, it is not correct to treat it as a long int type. * time.c (current_time_t_is_compat): New macro. (sprinttv, sprint_timespec, printitv_bitness, tprint_timex): Use it. (tprint_timeval, do_sprinttv, sprint_timespec): Use j and uintmax_t when printing tv_sec/tv_usec. (tprint_timex): Use j and intmax_t/uintmax_t when printing struct timex members of type kernel_long_t.
865 lines
18 KiB
C
865 lines
18 KiB
C
/*
|
|
* Copyright (c) 1991, 1992 Paul Kranenburg <pk@cs.few.eur.nl>
|
|
* Copyright (c) 1993 Branko Lankester <branko@hacktic.nl>
|
|
* Copyright (c) 1993, 1994, 1995, 1996 Rick Sladkey <jrs@world.std.com>
|
|
* 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.
|
|
*/
|
|
|
|
#include "defs.h"
|
|
#include <fcntl.h>
|
|
#include <linux/version.h>
|
|
#include <sys/timex.h>
|
|
#include <linux/ioctl.h>
|
|
#include <linux/rtc.h>
|
|
|
|
#ifndef UTIME_NOW
|
|
#define UTIME_NOW ((1l << 30) - 1l)
|
|
#endif
|
|
#ifndef UTIME_OMIT
|
|
#define UTIME_OMIT ((1l << 30) - 2l)
|
|
#endif
|
|
|
|
#if SUPPORTED_PERSONALITIES > 1
|
|
# if defined X86_64 || defined X32
|
|
# define current_time_t_is_compat (current_personality == 1)
|
|
# else
|
|
# define current_time_t_is_compat (current_wordsize == 4)
|
|
# endif
|
|
#else
|
|
# define current_time_t_is_compat 0
|
|
#endif
|
|
|
|
struct timeval32
|
|
{
|
|
u_int32_t tv_sec, tv_usec;
|
|
};
|
|
|
|
static void
|
|
tprint_timeval32(struct tcb *tcp, const struct timeval32 *tv)
|
|
{
|
|
tprintf("{%u, %u}", tv->tv_sec, tv->tv_usec);
|
|
}
|
|
|
|
static void
|
|
tprint_timeval(struct tcb *tcp, const struct timeval *tv)
|
|
{
|
|
tprintf("{%ju, %ju}", (uintmax_t) tv->tv_sec, (uintmax_t) tv->tv_usec);
|
|
}
|
|
|
|
void
|
|
printtv_bitness(struct tcb *tcp, long addr, enum bitness_t bitness, int special)
|
|
{
|
|
char buf[TIMEVAL_TEXT_BUFSIZE];
|
|
sprinttv(buf, tcp, addr, bitness, special);
|
|
tprints(buf);
|
|
}
|
|
|
|
static char *
|
|
do_sprinttv(char *buf, const uintmax_t sec, const uintmax_t usec,
|
|
const int special)
|
|
{
|
|
if (special) {
|
|
switch (usec) {
|
|
case UTIME_NOW:
|
|
return stpcpy(buf, "UTIME_NOW");
|
|
case UTIME_OMIT:
|
|
return stpcpy(buf, "UTIME_OMIT");
|
|
}
|
|
}
|
|
return buf + sprintf(buf, "{%ju, %ju}", sec, usec);
|
|
}
|
|
|
|
char *
|
|
sprinttv(char *buf, struct tcb *tcp, long addr, enum bitness_t bitness, int special)
|
|
{
|
|
if (addr == 0)
|
|
return stpcpy(buf, "NULL");
|
|
|
|
if (!verbose(tcp))
|
|
return buf + sprintf(buf, "%#lx", addr);
|
|
|
|
if (bitness == BITNESS_32 || current_time_t_is_compat)
|
|
{
|
|
struct timeval32 tv;
|
|
|
|
if (umove(tcp, addr, &tv) >= 0)
|
|
return do_sprinttv(buf, tv.tv_sec, tv.tv_usec, special);
|
|
} else {
|
|
struct timeval tv;
|
|
|
|
if (umove(tcp, addr, &tv) >= 0)
|
|
return do_sprinttv(buf, tv.tv_sec, tv.tv_usec, special);
|
|
}
|
|
|
|
return stpcpy(buf, "{...}");
|
|
}
|
|
|
|
void
|
|
print_timespec(struct tcb *tcp, long addr)
|
|
{
|
|
char buf[TIMESPEC_TEXT_BUFSIZE];
|
|
sprint_timespec(buf, tcp, addr);
|
|
tprints(buf);
|
|
}
|
|
|
|
void
|
|
sprint_timespec(char *buf, struct tcb *tcp, long addr)
|
|
{
|
|
if (addr == 0)
|
|
strcpy(buf, "NULL");
|
|
else if (!verbose(tcp))
|
|
sprintf(buf, "%#lx", addr);
|
|
else {
|
|
int rc;
|
|
|
|
#if SUPPORTED_PERSONALITIES > 1
|
|
if (current_time_t_is_compat) {
|
|
struct timeval32 tv;
|
|
|
|
rc = umove(tcp, addr, &tv);
|
|
if (rc >= 0)
|
|
sprintf(buf, "{%u, %u}",
|
|
tv.tv_sec, tv.tv_usec);
|
|
} else
|
|
#endif
|
|
{
|
|
struct timespec ts;
|
|
|
|
rc = umove(tcp, addr, &ts);
|
|
if (rc >= 0)
|
|
sprintf(buf, "{%ju, %ju}",
|
|
(uintmax_t) ts.tv_sec,
|
|
(uintmax_t) ts.tv_nsec);
|
|
}
|
|
if (rc < 0)
|
|
strcpy(buf, "{...}");
|
|
}
|
|
}
|
|
|
|
int
|
|
sys_time(struct tcb *tcp)
|
|
{
|
|
if (exiting(tcp)) {
|
|
printnum_long(tcp, tcp->u_arg[0], "%ld");
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
int
|
|
sys_gettimeofday(struct tcb *tcp)
|
|
{
|
|
if (exiting(tcp)) {
|
|
if (syserror(tcp)) {
|
|
tprintf("%#lx, %#lx", tcp->u_arg[0], tcp->u_arg[1]);
|
|
return 0;
|
|
}
|
|
printtv(tcp, tcp->u_arg[0]);
|
|
tprints(", ");
|
|
printtv(tcp, tcp->u_arg[1]);
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
#ifdef ALPHA
|
|
int
|
|
sys_osf_gettimeofday(struct tcb *tcp)
|
|
{
|
|
if (exiting(tcp)) {
|
|
if (syserror(tcp)) {
|
|
tprintf("%#lx, %#lx", tcp->u_arg[0], tcp->u_arg[1]);
|
|
return 0;
|
|
}
|
|
printtv_bitness(tcp, tcp->u_arg[0], BITNESS_32, 0);
|
|
tprints(", ");
|
|
printtv_bitness(tcp, tcp->u_arg[1], BITNESS_32, 0);
|
|
}
|
|
return 0;
|
|
}
|
|
#endif
|
|
|
|
int
|
|
sys_settimeofday(struct tcb *tcp)
|
|
{
|
|
if (entering(tcp)) {
|
|
printtv(tcp, tcp->u_arg[0]);
|
|
tprints(", ");
|
|
printtv(tcp, tcp->u_arg[1]);
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
#ifdef ALPHA
|
|
int
|
|
sys_osf_settimeofday(struct tcb *tcp)
|
|
{
|
|
if (entering(tcp)) {
|
|
printtv_bitness(tcp, tcp->u_arg[0], BITNESS_32, 0);
|
|
tprints(", ");
|
|
printtv_bitness(tcp, tcp->u_arg[1], BITNESS_32, 0);
|
|
}
|
|
return 0;
|
|
}
|
|
#endif
|
|
|
|
int
|
|
sys_adjtime(struct tcb *tcp)
|
|
{
|
|
if (entering(tcp)) {
|
|
printtv(tcp, tcp->u_arg[0]);
|
|
tprints(", ");
|
|
} else {
|
|
if (syserror(tcp))
|
|
tprintf("%#lx", tcp->u_arg[1]);
|
|
else
|
|
printtv(tcp, tcp->u_arg[1]);
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
int
|
|
sys_nanosleep(struct tcb *tcp)
|
|
{
|
|
if (entering(tcp)) {
|
|
print_timespec(tcp, tcp->u_arg[0]);
|
|
tprints(", ");
|
|
} else {
|
|
/* Second (returned) timespec is only significant
|
|
* if syscall was interrupted. On success, we print
|
|
* only its address, since kernel doesn't modify it,
|
|
* and printing the value may show uninitialized data.
|
|
*/
|
|
switch (tcp->u_error) {
|
|
default:
|
|
/* Not interrupted (slept entire interval) */
|
|
if (tcp->u_arg[1]) {
|
|
tprintf("%#lx", tcp->u_arg[1]);
|
|
break;
|
|
}
|
|
/* Fall through: print_timespec(NULL) prints "NULL" */
|
|
case ERESTARTSYS:
|
|
case ERESTARTNOINTR:
|
|
case ERESTARTNOHAND:
|
|
case ERESTART_RESTARTBLOCK:
|
|
/* Interrupted */
|
|
print_timespec(tcp, tcp->u_arg[1]);
|
|
}
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
#include "xlat/itimer_which.h"
|
|
|
|
static void
|
|
printitv_bitness(struct tcb *tcp, long addr, enum bitness_t bitness)
|
|
{
|
|
if (addr == 0)
|
|
tprints("NULL");
|
|
else if (!verbose(tcp))
|
|
tprintf("%#lx", addr);
|
|
else {
|
|
int rc;
|
|
|
|
if (bitness == BITNESS_32 || current_time_t_is_compat) {
|
|
struct {
|
|
struct timeval32 it_interval, it_value;
|
|
} itv;
|
|
|
|
rc = umove(tcp, addr, &itv);
|
|
if (rc >= 0) {
|
|
tprints("{it_interval=");
|
|
tprint_timeval32(tcp, &itv.it_interval);
|
|
tprints(", it_value=");
|
|
tprint_timeval32(tcp, &itv.it_value);
|
|
tprints("}");
|
|
}
|
|
} else {
|
|
struct itimerval itv;
|
|
|
|
rc = umove(tcp, addr, &itv);
|
|
if (rc >= 0) {
|
|
tprints("{it_interval=");
|
|
tprint_timeval(tcp, &itv.it_interval);
|
|
tprints(", it_value=");
|
|
tprint_timeval(tcp, &itv.it_value);
|
|
tprints("}");
|
|
}
|
|
}
|
|
if (rc < 0)
|
|
tprints("{...}");
|
|
}
|
|
}
|
|
|
|
#define printitv(tcp, addr) \
|
|
printitv_bitness((tcp), (addr), BITNESS_CURRENT)
|
|
|
|
int
|
|
sys_getitimer(struct tcb *tcp)
|
|
{
|
|
if (entering(tcp)) {
|
|
printxval(itimer_which, tcp->u_arg[0], "ITIMER_???");
|
|
tprints(", ");
|
|
} else {
|
|
if (syserror(tcp))
|
|
tprintf("%#lx", tcp->u_arg[1]);
|
|
else
|
|
printitv(tcp, tcp->u_arg[1]);
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
#ifdef ALPHA
|
|
int
|
|
sys_osf_getitimer(struct tcb *tcp)
|
|
{
|
|
if (entering(tcp)) {
|
|
printxval(itimer_which, tcp->u_arg[0], "ITIMER_???");
|
|
tprints(", ");
|
|
} else {
|
|
if (syserror(tcp))
|
|
tprintf("%#lx", tcp->u_arg[1]);
|
|
else
|
|
printitv_bitness(tcp, tcp->u_arg[1], BITNESS_32);
|
|
}
|
|
return 0;
|
|
}
|
|
#endif
|
|
|
|
int
|
|
sys_setitimer(struct tcb *tcp)
|
|
{
|
|
if (entering(tcp)) {
|
|
printxval(itimer_which, tcp->u_arg[0], "ITIMER_???");
|
|
tprints(", ");
|
|
printitv(tcp, tcp->u_arg[1]);
|
|
tprints(", ");
|
|
} else {
|
|
if (syserror(tcp))
|
|
tprintf("%#lx", tcp->u_arg[2]);
|
|
else
|
|
printitv(tcp, tcp->u_arg[2]);
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
#ifdef ALPHA
|
|
int
|
|
sys_osf_setitimer(struct tcb *tcp)
|
|
{
|
|
if (entering(tcp)) {
|
|
printxval(itimer_which, tcp->u_arg[0], "ITIMER_???");
|
|
tprints(", ");
|
|
printitv_bitness(tcp, tcp->u_arg[1], BITNESS_32);
|
|
tprints(", ");
|
|
} else {
|
|
if (syserror(tcp))
|
|
tprintf("%#lx", tcp->u_arg[2]);
|
|
else
|
|
printitv_bitness(tcp, tcp->u_arg[2], BITNESS_32);
|
|
}
|
|
return 0;
|
|
}
|
|
#endif
|
|
|
|
#include "xlat/adjtimex_modes.h"
|
|
#include "xlat/adjtimex_status.h"
|
|
#include "xlat/adjtimex_state.h"
|
|
|
|
#if SUPPORTED_PERSONALITIES > 1
|
|
static int
|
|
tprint_timex32(struct tcb *tcp, long addr)
|
|
{
|
|
struct {
|
|
unsigned int modes;
|
|
int offset;
|
|
int freq;
|
|
int maxerror;
|
|
int esterror;
|
|
int status;
|
|
int constant;
|
|
int precision;
|
|
int tolerance;
|
|
struct timeval32 time;
|
|
int tick;
|
|
int ppsfreq;
|
|
int jitter;
|
|
int shift;
|
|
int stabil;
|
|
int jitcnt;
|
|
int calcnt;
|
|
int errcnt;
|
|
int stbcnt;
|
|
} tx;
|
|
|
|
if (umove(tcp, addr, &tx) < 0)
|
|
return -1;
|
|
|
|
tprints("{modes=");
|
|
printflags(adjtimex_modes, tx.modes, "ADJ_???");
|
|
tprintf(", offset=%d, freq=%d, maxerror=%d, ",
|
|
tx.offset, tx.freq, tx.maxerror);
|
|
tprintf("esterror=%u, status=", tx.esterror);
|
|
printflags(adjtimex_status, tx.status, "STA_???");
|
|
tprintf(", constant=%d, precision=%u, ",
|
|
tx.constant, tx.precision);
|
|
tprintf("tolerance=%d, time=", tx.tolerance);
|
|
tprint_timeval32(tcp, &tx.time);
|
|
tprintf(", tick=%d, ppsfreq=%d, jitter=%d",
|
|
tx.tick, tx.ppsfreq, tx.jitter);
|
|
tprintf(", shift=%d, stabil=%d, jitcnt=%d",
|
|
tx.shift, tx.stabil, tx.jitcnt);
|
|
tprintf(", calcnt=%d, errcnt=%d, stbcnt=%d",
|
|
tx.calcnt, tx.errcnt, tx.stbcnt);
|
|
tprints("}");
|
|
return 0;
|
|
}
|
|
#endif /* SUPPORTED_PERSONALITIES > 1 */
|
|
|
|
static int
|
|
tprint_timex(struct tcb *tcp, long addr)
|
|
{
|
|
struct timex tx;
|
|
|
|
#if SUPPORTED_PERSONALITIES > 1
|
|
if (current_time_t_is_compat)
|
|
return tprint_timex32(tcp, addr);
|
|
#endif
|
|
if (umove(tcp, addr, &tx) < 0)
|
|
return -1;
|
|
|
|
#if LINUX_VERSION_CODE < 66332
|
|
tprintf("{mode=%d, offset=%ld, frequency=%ld, ",
|
|
tx.mode, tx.offset, tx.frequency);
|
|
tprintf("maxerror=%ld, esterror=%lu, status=%u, ",
|
|
tx.maxerror, tx.esterror, tx.status);
|
|
tprintf("time_constant=%ld, precision=%lu, ",
|
|
tx.time_constant, tx.precision);
|
|
tprintf("tolerance=%ld, time=", tx.tolerance);
|
|
tprint_timeval(tcp, &tx.time);
|
|
#else
|
|
tprints("{modes=");
|
|
printflags(adjtimex_modes, tx.modes, "ADJ_???");
|
|
tprintf(", offset=%jd, freq=%jd, maxerror=%ju, esterror=%ju, status=",
|
|
(intmax_t) tx.offset, (intmax_t) tx.freq,
|
|
(uintmax_t) tx.maxerror, (uintmax_t) tx.esterror);
|
|
printflags(adjtimex_status, tx.status, "STA_???");
|
|
tprintf(", constant=%jd, precision=%ju, tolerance=%jd, time=",
|
|
(intmax_t) tx.constant, (uintmax_t) tx.precision,
|
|
(intmax_t) tx.tolerance);
|
|
tprint_timeval(tcp, &tx.time);
|
|
tprintf(", tick=%jd, ppsfreq=%jd, jitter=%jd",
|
|
(intmax_t) tx.tick, (intmax_t) tx.ppsfreq, (intmax_t) tx.jitter);
|
|
tprintf(", shift=%d, stabil=%jd, jitcnt=%jd",
|
|
tx.shift, (intmax_t) tx.stabil, (intmax_t) tx.jitcnt);
|
|
tprintf(", calcnt=%jd, errcnt=%jd, stbcnt=%jd",
|
|
(intmax_t) tx.calcnt, (intmax_t) tx.errcnt, (intmax_t) tx.stbcnt);
|
|
#endif
|
|
tprints("}");
|
|
return 0;
|
|
}
|
|
|
|
static int
|
|
do_adjtimex(struct tcb *tcp, long addr)
|
|
{
|
|
if (addr == 0)
|
|
tprints("NULL");
|
|
else if (syserror(tcp) || !verbose(tcp))
|
|
tprintf("%#lx", addr);
|
|
else if (tprint_timex(tcp, addr) < 0)
|
|
tprints("{...}");
|
|
if (syserror(tcp))
|
|
return 0;
|
|
tcp->auxstr = xlookup(adjtimex_state, tcp->u_rval);
|
|
if (tcp->auxstr)
|
|
return RVAL_STR;
|
|
return 0;
|
|
}
|
|
|
|
int
|
|
sys_adjtimex(struct tcb *tcp)
|
|
{
|
|
if (exiting(tcp))
|
|
return do_adjtimex(tcp, tcp->u_arg[0]);
|
|
return 0;
|
|
}
|
|
|
|
#include "xlat/clockflags.h"
|
|
#include "xlat/clocknames.h"
|
|
|
|
static void
|
|
printclockname(int clockid)
|
|
{
|
|
#ifdef CLOCKID_TO_FD
|
|
# include "xlat/cpuclocknames.h"
|
|
|
|
if (clockid < 0) {
|
|
if ((clockid & CLOCKFD_MASK) == CLOCKFD)
|
|
tprintf("FD_TO_CLOCKID(%d)", CLOCKID_TO_FD(clockid));
|
|
else {
|
|
if(CPUCLOCK_PERTHREAD(clockid))
|
|
tprintf("MAKE_THREAD_CPUCLOCK(%d,", CPUCLOCK_PID(clockid));
|
|
else
|
|
tprintf("MAKE_PROCESS_CPUCLOCK(%d,", CPUCLOCK_PID(clockid));
|
|
printxval(cpuclocknames, clockid & CLOCKFD_MASK, "CPUCLOCK_???");
|
|
tprints(")");
|
|
}
|
|
}
|
|
else
|
|
#endif
|
|
printxval(clocknames, clockid, "CLOCK_???");
|
|
}
|
|
|
|
int
|
|
sys_clock_settime(struct tcb *tcp)
|
|
{
|
|
if (entering(tcp)) {
|
|
printclockname(tcp->u_arg[0]);
|
|
tprints(", ");
|
|
printtv(tcp, tcp->u_arg[1]);
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
int
|
|
sys_clock_gettime(struct tcb *tcp)
|
|
{
|
|
if (entering(tcp)) {
|
|
printclockname(tcp->u_arg[0]);
|
|
tprints(", ");
|
|
} else {
|
|
if (syserror(tcp))
|
|
tprintf("%#lx", tcp->u_arg[1]);
|
|
else
|
|
printtv(tcp, tcp->u_arg[1]);
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
int
|
|
sys_clock_nanosleep(struct tcb *tcp)
|
|
{
|
|
if (entering(tcp)) {
|
|
printclockname(tcp->u_arg[0]);
|
|
tprints(", ");
|
|
printflags(clockflags, tcp->u_arg[1], "TIMER_???");
|
|
tprints(", ");
|
|
printtv(tcp, tcp->u_arg[2]);
|
|
tprints(", ");
|
|
} else {
|
|
if (syserror(tcp))
|
|
tprintf("%#lx", tcp->u_arg[3]);
|
|
else
|
|
printtv(tcp, tcp->u_arg[3]);
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
int
|
|
sys_clock_adjtime(struct tcb *tcp)
|
|
{
|
|
if (exiting(tcp))
|
|
return do_adjtimex(tcp, tcp->u_arg[1]);
|
|
printclockname(tcp->u_arg[0]);
|
|
tprints(", ");
|
|
return 0;
|
|
}
|
|
|
|
#ifndef SIGEV_THREAD_ID
|
|
# define SIGEV_THREAD_ID 4
|
|
#endif
|
|
#include "xlat/sigev_value.h"
|
|
|
|
#if SUPPORTED_PERSONALITIES > 1
|
|
static void
|
|
printsigevent32(struct tcb *tcp, long arg)
|
|
{
|
|
struct {
|
|
int sigev_value;
|
|
int sigev_signo;
|
|
int sigev_notify;
|
|
|
|
union {
|
|
int tid;
|
|
struct {
|
|
int function, attribute;
|
|
} thread;
|
|
} un;
|
|
} sev;
|
|
|
|
if (umove(tcp, arg, &sev) < 0)
|
|
tprints("{...}");
|
|
else {
|
|
tprintf("{%#x, ", sev.sigev_value);
|
|
if (sev.sigev_notify == SIGEV_SIGNAL)
|
|
tprintf("%s, ", signame(sev.sigev_signo));
|
|
else
|
|
tprintf("%u, ", sev.sigev_signo);
|
|
printxval(sigev_value, sev.sigev_notify, "SIGEV_???");
|
|
tprints(", ");
|
|
if (sev.sigev_notify == SIGEV_THREAD_ID)
|
|
tprintf("{%d}", sev.un.tid);
|
|
else if (sev.sigev_notify == SIGEV_THREAD)
|
|
tprintf("{%#x, %#x}",
|
|
sev.un.thread.function,
|
|
sev.un.thread.attribute);
|
|
else
|
|
tprints("{...}");
|
|
tprints("}");
|
|
}
|
|
}
|
|
#endif
|
|
|
|
void
|
|
printsigevent(struct tcb *tcp, long arg)
|
|
{
|
|
struct sigevent sev;
|
|
|
|
#if SUPPORTED_PERSONALITIES > 1
|
|
if (current_wordsize == 4) {
|
|
printsigevent32(tcp, arg);
|
|
return;
|
|
}
|
|
#endif
|
|
if (umove(tcp, arg, &sev) < 0)
|
|
tprints("{...}");
|
|
else {
|
|
tprintf("{%p, ", sev.sigev_value.sival_ptr);
|
|
if (sev.sigev_notify == SIGEV_SIGNAL)
|
|
tprintf("%s, ", signame(sev.sigev_signo));
|
|
else
|
|
tprintf("%u, ", sev.sigev_signo);
|
|
printxval(sigev_value, sev.sigev_notify, "SIGEV_???");
|
|
tprints(", ");
|
|
if (sev.sigev_notify == SIGEV_THREAD_ID)
|
|
#if defined(HAVE_STRUCT_SIGEVENT__SIGEV_UN__PAD)
|
|
/* _pad[0] is the _tid field which might not be
|
|
present in the userlevel definition of the
|
|
struct. */
|
|
tprintf("{%d}", sev._sigev_un._pad[0]);
|
|
#elif defined(HAVE_STRUCT_SIGEVENT___PAD)
|
|
tprintf("{%d}", sev.__pad[0]);
|
|
#else
|
|
# warning unfamiliar struct sigevent => incomplete SIGEV_THREAD_ID decoding
|
|
tprints("{...}");
|
|
#endif
|
|
else if (sev.sigev_notify == SIGEV_THREAD)
|
|
tprintf("{%p, %p}", sev.sigev_notify_function,
|
|
sev.sigev_notify_attributes);
|
|
else
|
|
tprints("{...}");
|
|
tprints("}");
|
|
}
|
|
}
|
|
|
|
int
|
|
sys_timer_create(struct tcb *tcp)
|
|
{
|
|
if (entering(tcp)) {
|
|
printclockname(tcp->u_arg[0]);
|
|
tprints(", ");
|
|
printsigevent(tcp, tcp->u_arg[1]);
|
|
tprints(", ");
|
|
} else {
|
|
int timer_id;
|
|
|
|
if (syserror(tcp) || umove(tcp, tcp->u_arg[2], &timer_id) < 0)
|
|
tprintf("%#lx", tcp->u_arg[2]);
|
|
else
|
|
tprintf("{%d}", timer_id);
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
int
|
|
sys_timer_settime(struct tcb *tcp)
|
|
{
|
|
if (entering(tcp)) {
|
|
tprintf("%#lx, ", tcp->u_arg[0]);
|
|
printflags(clockflags, tcp->u_arg[1], "TIMER_???");
|
|
tprints(", ");
|
|
printitv(tcp, tcp->u_arg[2]);
|
|
tprints(", ");
|
|
} else {
|
|
if (syserror(tcp))
|
|
tprintf("%#lx", tcp->u_arg[3]);
|
|
else
|
|
printitv(tcp, tcp->u_arg[3]);
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
int
|
|
sys_timer_gettime(struct tcb *tcp)
|
|
{
|
|
if (entering(tcp)) {
|
|
tprintf("%#lx, ", tcp->u_arg[0]);
|
|
} else {
|
|
if (syserror(tcp))
|
|
tprintf("%#lx", tcp->u_arg[1]);
|
|
else
|
|
printitv(tcp, tcp->u_arg[1]);
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
static void
|
|
print_rtc(struct tcb *tcp, const struct rtc_time *rt)
|
|
{
|
|
tprintf("{tm_sec=%d, tm_min=%d, tm_hour=%d, "
|
|
"tm_mday=%d, tm_mon=%d, tm_year=%d, ",
|
|
rt->tm_sec, rt->tm_min, rt->tm_hour,
|
|
rt->tm_mday, rt->tm_mon, rt->tm_year);
|
|
if (!abbrev(tcp))
|
|
tprintf("tm_wday=%d, tm_yday=%d, tm_isdst=%d}",
|
|
rt->tm_wday, rt->tm_yday, rt->tm_isdst);
|
|
else
|
|
tprints("...}");
|
|
}
|
|
|
|
int
|
|
rtc_ioctl(struct tcb *tcp, const unsigned int code, long arg)
|
|
{
|
|
switch (code) {
|
|
case RTC_ALM_SET:
|
|
case RTC_SET_TIME:
|
|
if (entering(tcp)) {
|
|
struct rtc_time rt;
|
|
if (umove(tcp, arg, &rt) < 0)
|
|
tprintf(", %#lx", arg);
|
|
else {
|
|
tprints(", ");
|
|
print_rtc(tcp, &rt);
|
|
}
|
|
}
|
|
break;
|
|
case RTC_ALM_READ:
|
|
case RTC_RD_TIME:
|
|
if (exiting(tcp)) {
|
|
struct rtc_time rt;
|
|
if (syserror(tcp) || umove(tcp, arg, &rt) < 0)
|
|
tprintf(", %#lx", arg);
|
|
else {
|
|
tprints(", ");
|
|
print_rtc(tcp, &rt);
|
|
}
|
|
}
|
|
break;
|
|
case RTC_IRQP_SET:
|
|
case RTC_EPOCH_SET:
|
|
if (entering(tcp))
|
|
tprintf(", %lu", arg);
|
|
break;
|
|
case RTC_IRQP_READ:
|
|
case RTC_EPOCH_READ:
|
|
if (exiting(tcp))
|
|
tprintf(", %lu", arg);
|
|
break;
|
|
case RTC_WKALM_SET:
|
|
if (entering(tcp)) {
|
|
struct rtc_wkalrm wk;
|
|
if (umove(tcp, arg, &wk) < 0)
|
|
tprintf(", %#lx", arg);
|
|
else {
|
|
tprintf(", {enabled=%d, pending=%d, ",
|
|
wk.enabled, wk.pending);
|
|
print_rtc(tcp, &wk.time);
|
|
tprints("}");
|
|
}
|
|
}
|
|
break;
|
|
case RTC_WKALM_RD:
|
|
if (exiting(tcp)) {
|
|
struct rtc_wkalrm wk;
|
|
if (syserror(tcp) || umove(tcp, arg, &wk) < 0)
|
|
tprintf(", %#lx", arg);
|
|
else {
|
|
tprintf(", {enabled=%d, pending=%d, ",
|
|
wk.enabled, wk.pending);
|
|
print_rtc(tcp, &wk.time);
|
|
tprints("}");
|
|
}
|
|
}
|
|
break;
|
|
default:
|
|
if (entering(tcp))
|
|
tprintf(", %#lx", arg);
|
|
break;
|
|
}
|
|
return 1;
|
|
}
|
|
|
|
#include "xlat/timerfdflags.h"
|
|
|
|
int
|
|
sys_timerfd(struct tcb *tcp)
|
|
{
|
|
if (entering(tcp)) {
|
|
/* It does not matter that the kernel uses itimerspec. */
|
|
tprintf("%ld, ", tcp->u_arg[0]);
|
|
printclockname(tcp->u_arg[0]);
|
|
tprints(", ");
|
|
printflags(timerfdflags, tcp->u_arg[2], "TFD_???");
|
|
tprints(", ");
|
|
printitv(tcp, tcp->u_arg[3]);
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
int
|
|
sys_timerfd_create(struct tcb *tcp)
|
|
{
|
|
if (entering(tcp)) {
|
|
printclockname(tcp->u_arg[0]);
|
|
tprints(", ");
|
|
printflags(timerfdflags, tcp->u_arg[1], "TFD_???");
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
int
|
|
sys_timerfd_settime(struct tcb *tcp)
|
|
{
|
|
if (entering(tcp)) {
|
|
printfd(tcp, tcp->u_arg[0]);
|
|
tprints(", ");
|
|
printflags(timerfdflags, tcp->u_arg[1], "TFD_???");
|
|
tprints(", ");
|
|
printitv(tcp, tcp->u_arg[2]);
|
|
tprints(", ");
|
|
printitv(tcp, tcp->u_arg[3]);
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
int
|
|
sys_timerfd_gettime(struct tcb *tcp)
|
|
{
|
|
if (entering(tcp)) {
|
|
printfd(tcp, tcp->u_arg[0]);
|
|
tprints(", ");
|
|
printitv(tcp, tcp->u_arg[1]);
|
|
}
|
|
return 0;
|
|
}
|