Add an argument to print_time* routines that signalises, whether the time value is wall clock time or not. * aio.c (print_io_getevents): Add an argument to print_timespec call. * defs.h (print_timeval32_t, print_timeval32, print_itimerval32): Add "bool rtc" argument. * desc.c (decode_select): Add bool argument to print_tv_ts callback function argument. * futex.c (SYS_FUNC(futex)) <case FUTEX_WAIT>: Call print_timespec with rtc=false, as the timestamp is always relative. <case FUTEX_LOCK_PI>: Call print_timespec with rtc=true, as the timeout is always absolute. <case FUTEX_WAIT_BITSET, case FUTEX_WAIT_REQUEUE_PI>: Call print_timespec with rtc set to true when op has FUTEX_CLOCK_REALTIME flag. * ipc_sem.c (SYS_FUNC(semtimedop)): Call print_timespec with rtc=false, as timeout is always relative. * linux/dummy.h (sys_clock_getres, sys_stime): Remove. * mmsghdr.c (SYS_FUNC(recvmmsg)): Call print_timespec with rtc=false, as timeout is relative. * mq.c (SYS_FUNC(mq_timedsend), SYS_FUNC(mq_timedreceive)): Call print_timespec with rtc=true, as timeout is absolute. * msghdr.c (print_scm_timestamp, print_scm_timestampns, print_scm_timestamping): Call print_struct_timeval_data_size, print_struct_timespec_data_size, print_struct_timespec_array_data_size with rtc=true as timestamps presumed absolute. * poll.c (SYS_FUNC(ppoll)): Call print_timespec with rtc=false, as timeout is relative. * print_time.c (print_time_t): New function. (SYS_FUNC(time)): Use print_time_t for printing time. (SYS_FUNC(stime)): New function. * print_timespec.c (print_timespec_t, print_struct_timespec_data_size, print_struct_timespec_array_data_size, print_timespec): Add rtc argument, handle it. (print_timespec_t_utime): Call print_timespec_t with rtc=false when xlat_style is not abbreviated, call print_timespec_t with rtc=true instead of manual time stamp printing. (print_itimerspec): Call print_timespec_t with rtc=false. * print_timeval.c (print_timeval_t, print_struct_timeval_data_size, print_timeval, print_itimerval, print_timeval32_t, print_timeval32): Add rtc argument, handle it. (print_timeval_t_utime, print_timeval32_t_utime): Remove. (print_struct_timeval): New function. (print_timeval_utimes): Use print_struct_timeval instead of print_timeval_t_utime. * print_timex.c (print_timex): Add rtc argument, handle it. * printrusage.c (printrusage): Call print_struct_timeval with rtc=false. * sched.c (sched_rr_get_interval): Call print_timespec with rtc=false. * signal.c (rt_sigtimedwait): Call print_timespec with rtc=false. * time.c: Include "xlat/clocknames.h" under XLAT_MACROS_ONLY. (gettimeofday, settimeofday): Call print_timeval with rtc=true. (osf_gettimeofday, osf_settimeofday): Call print_timeval32 with rtc=true. (nanosleep): Call print_timespec with rtc=false. (getitimer, setitimer): Call print_itimerval with rtc=false. (osf_getitimer, osf_setitimer): Call print_itimerval32 wirh rtc=false. (do_adjtimex): Add rtc argument, handle it. (is_rtcid): New function. (clock_settime, clock_gettime): Call print_timespec with rtc=true if 0th argument is a real-time clock (as indicated by is_rtcid). (SYS_FUNC(clock_getres)): New syscall decoder. (SYS_FUNC(clock_nanosleep)): Call print_timespec with rtc=true if clock is realtime (as indicated by is_rtcid) and TIMER_ABSTIME is set in flags. (SYS_FUNC(clock_adjtime)): Call do_adjtimex with rtc=true if clock is realtime. * tests/adjtimex.c: Update expected output. * tests/clock_nanosleep.c: Likewise.
292 lines
7.2 KiB
C
292 lines
7.2 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>
|
|
* Copyright (c) 1996-1999 Wichert Akkerman <wichert@cistron.nl>
|
|
* Copyright (c) 1999-2018 The strace developers.
|
|
* 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 "print_fields.h"
|
|
#include <linux/aio_abi.h>
|
|
|
|
#include "xlat/aio_cmds.h"
|
|
#include "xlat/aio_iocb_flags.h"
|
|
|
|
#ifdef HAVE_STRUCT_IOCB_AIO_RW_FLAGS
|
|
# define AIO_RW_FLAGS_FIELD aio_rw_flags
|
|
#else
|
|
# define AIO_RW_FLAGS_FIELD aio_reserved1
|
|
#endif
|
|
|
|
SYS_FUNC(io_setup)
|
|
{
|
|
if (entering(tcp))
|
|
tprintf("%u, ", (unsigned int) tcp->u_arg[0]);
|
|
else
|
|
printnum_ptr(tcp, tcp->u_arg[1]);
|
|
return 0;
|
|
}
|
|
|
|
SYS_FUNC(io_destroy)
|
|
{
|
|
printaddr(tcp->u_arg[0]);
|
|
|
|
return RVAL_DECODED;
|
|
}
|
|
|
|
enum iocb_sub {
|
|
SUB_NONE, SUB_COMMON, SUB_VECTOR, SUB_POLL
|
|
};
|
|
|
|
static enum iocb_sub
|
|
tprint_lio_opcode(unsigned int cmd)
|
|
{
|
|
static const enum iocb_sub subs[] = {
|
|
[IOCB_CMD_PREAD] = SUB_COMMON,
|
|
[IOCB_CMD_PWRITE] = SUB_COMMON,
|
|
[IOCB_CMD_FSYNC] = SUB_NONE,
|
|
[IOCB_CMD_FDSYNC] = SUB_NONE,
|
|
[IOCB_CMD_PREADX] = SUB_NONE,
|
|
[IOCB_CMD_POLL] = SUB_POLL,
|
|
[IOCB_CMD_NOOP] = SUB_NONE,
|
|
[IOCB_CMD_PREADV] = SUB_VECTOR,
|
|
[IOCB_CMD_PWRITEV] = SUB_VECTOR,
|
|
};
|
|
|
|
printxval_ex(aio_cmds, cmd, "IOCB_CMD_???", XLAT_STYLE_FMT_U);
|
|
|
|
return cmd < ARRAY_SIZE(subs) ? subs[cmd] : SUB_NONE;
|
|
}
|
|
|
|
static void
|
|
print_common_flags(struct tcb *tcp, const struct iocb *cb)
|
|
{
|
|
if (cb->aio_flags)
|
|
PRINT_FIELD_FLAGS(", ", *cb, aio_flags, aio_iocb_flags,
|
|
"IOCB_FLAG_???");
|
|
|
|
if (cb->aio_flags & IOCB_FLAG_RESFD)
|
|
PRINT_FIELD_FD(", ", *cb, aio_resfd, tcp);
|
|
else if (cb->aio_resfd)
|
|
PRINT_FIELD_X(", ", *cb, aio_resfd);
|
|
}
|
|
|
|
static bool
|
|
iocb_is_valid(const struct iocb *cb)
|
|
{
|
|
return cb->aio_buf == (unsigned long) cb->aio_buf &&
|
|
cb->aio_nbytes == (size_t) cb->aio_nbytes &&
|
|
(ssize_t) cb->aio_nbytes >= 0;
|
|
}
|
|
|
|
static enum iocb_sub
|
|
print_iocb_header(struct tcb *tcp, const struct iocb *cb)
|
|
{
|
|
enum iocb_sub sub;
|
|
|
|
PRINT_FIELD_X("", *cb, aio_data);
|
|
|
|
if (cb->aio_key)
|
|
PRINT_FIELD_U(", ", *cb, aio_key);
|
|
|
|
if (cb->AIO_RW_FLAGS_FIELD) {
|
|
tprints(", aio_rw_flags=");
|
|
printflags(rwf_flags, cb->AIO_RW_FLAGS_FIELD, "RWF_???");
|
|
}
|
|
|
|
tprints(", aio_lio_opcode=");
|
|
sub = tprint_lio_opcode(cb->aio_lio_opcode);
|
|
|
|
if (cb->aio_flags & IOCB_FLAG_IOPRIO) {
|
|
tprints(", aio_reqprio=");
|
|
print_ioprio(zero_extend_signed_to_ull(cb->aio_reqprio));
|
|
} else if (cb->aio_reqprio) {
|
|
PRINT_FIELD_D(", ", *cb, aio_reqprio);
|
|
}
|
|
|
|
PRINT_FIELD_FD(", ", *cb, aio_fildes, tcp);
|
|
|
|
return sub;
|
|
}
|
|
|
|
static void
|
|
print_iocb(struct tcb *tcp, const struct iocb *cb)
|
|
{
|
|
tprints("{");
|
|
|
|
enum iocb_sub sub = print_iocb_header(tcp, cb);
|
|
|
|
switch (sub) {
|
|
case SUB_COMMON:
|
|
if (cb->aio_lio_opcode == 1 && iocb_is_valid(cb)) {
|
|
PRINT_FIELD_STRN(", ", *cb, aio_buf,
|
|
cb->aio_nbytes, tcp);
|
|
} else {
|
|
PRINT_FIELD_X(", ", *cb, aio_buf);
|
|
}
|
|
PRINT_FIELD_U(", ", *cb, aio_nbytes);
|
|
PRINT_FIELD_D(", ", *cb, aio_offset);
|
|
print_common_flags(tcp, cb);
|
|
break;
|
|
case SUB_VECTOR:
|
|
if (iocb_is_valid(cb)) {
|
|
tprints(", aio_buf=");
|
|
tprint_iov(tcp, cb->aio_nbytes, cb->aio_buf,
|
|
cb->aio_lio_opcode == 8
|
|
? IOV_DECODE_STR
|
|
: IOV_DECODE_ADDR);
|
|
} else {
|
|
PRINT_FIELD_X(", ", *cb, aio_buf);
|
|
PRINT_FIELD_U(", ", *cb, aio_nbytes);
|
|
}
|
|
PRINT_FIELD_D(", ", *cb, aio_offset);
|
|
print_common_flags(tcp, cb);
|
|
break;
|
|
case SUB_POLL:
|
|
PRINT_FIELD_FLAGS(", ", *cb, aio_buf, pollflags, "POLL???");
|
|
print_common_flags(tcp, cb);
|
|
break;
|
|
case SUB_NONE:
|
|
break;
|
|
}
|
|
|
|
tprints("}");
|
|
}
|
|
|
|
static bool
|
|
print_iocbp(struct tcb *tcp, void *elem_buf, size_t elem_size, void *data)
|
|
{
|
|
kernel_ulong_t addr;
|
|
struct iocb cb;
|
|
|
|
if (elem_size < sizeof(kernel_ulong_t)) {
|
|
addr = *(unsigned int *) elem_buf;
|
|
} else {
|
|
addr = *(kernel_ulong_t *) elem_buf;
|
|
}
|
|
|
|
if (!umove_or_printaddr(tcp, addr, &cb))
|
|
print_iocb(tcp, &cb);
|
|
|
|
return true;
|
|
}
|
|
|
|
SYS_FUNC(io_submit)
|
|
{
|
|
const kernel_long_t nr =
|
|
truncate_klong_to_current_wordsize(tcp->u_arg[1]);
|
|
const kernel_ulong_t addr = tcp->u_arg[2];
|
|
kernel_ulong_t iocbp;
|
|
|
|
printaddr(tcp->u_arg[0]);
|
|
tprintf(", %" PRI_kld ", ", nr);
|
|
|
|
if (nr < 0)
|
|
printaddr(addr);
|
|
else
|
|
print_array(tcp, addr, nr, &iocbp, current_wordsize,
|
|
tfetch_mem, print_iocbp, 0);
|
|
|
|
return RVAL_DECODED;
|
|
}
|
|
|
|
static bool
|
|
print_io_event(struct tcb *tcp, void *elem_buf, size_t elem_size, void *data)
|
|
{
|
|
struct io_event *event = elem_buf;
|
|
|
|
PRINT_FIELD_X("{", *event, data);
|
|
PRINT_FIELD_X(", ", *event, obj);
|
|
PRINT_FIELD_D(", ", *event, res);
|
|
PRINT_FIELD_D(", ", *event, res2);
|
|
tprints("}");
|
|
|
|
return true;
|
|
}
|
|
|
|
SYS_FUNC(io_cancel)
|
|
{
|
|
if (entering(tcp)) {
|
|
printaddr(tcp->u_arg[0]);
|
|
tprints(", ");
|
|
|
|
struct iocb cb;
|
|
|
|
if (!umove_or_printaddr(tcp, tcp->u_arg[1], &cb)) {
|
|
tprints("{");
|
|
print_iocb_header(tcp, &cb);
|
|
tprints("}");
|
|
}
|
|
tprints(", ");
|
|
} else {
|
|
struct io_event event;
|
|
|
|
if (!umove_or_printaddr(tcp, tcp->u_arg[2], &event))
|
|
print_io_event(tcp, &event, sizeof(event), 0);
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
static int
|
|
print_io_getevents(struct tcb *tcp, bool has_usig)
|
|
{
|
|
if (entering(tcp)) {
|
|
printaddr(tcp->u_arg[0]);
|
|
tprintf(", %" PRI_kld ", %" PRI_kld ", ",
|
|
truncate_klong_to_current_wordsize(tcp->u_arg[1]),
|
|
truncate_klong_to_current_wordsize(tcp->u_arg[2]));
|
|
} else {
|
|
struct io_event buf;
|
|
print_array(tcp, tcp->u_arg[3], tcp->u_rval, &buf, sizeof(buf),
|
|
tfetch_mem, print_io_event, 0);
|
|
tprints(", ");
|
|
/*
|
|
* Since the timeout and usig parameters are read by the kernel
|
|
* on entering syscall, it has to be decoded the same way
|
|
* whether the syscall has failed or not.
|
|
*/
|
|
temporarily_clear_syserror(tcp);
|
|
print_timespec(tcp, tcp->u_arg[4], false);
|
|
if (has_usig) {
|
|
tprints(", ");
|
|
print_aio_sigset(tcp, tcp->u_arg[5]);
|
|
}
|
|
restore_cleared_syserror(tcp);
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
SYS_FUNC(io_getevents)
|
|
{
|
|
return print_io_getevents(tcp, false);
|
|
}
|
|
|
|
SYS_FUNC(io_pgetevents)
|
|
{
|
|
return print_io_getevents(tcp, true);
|
|
}
|