* 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.
- *
- * $Id$
*/
#include "defs.h"
+#include <fcntl.h>
+#include <signal.h>
+#include <sys/timex.h>
-#ifdef LINUX
-#include <linux/version.h>
-#include <linux/timex.h>
-#endif /* LINUX */
-
-void
-printtv(tcp, addr)
-struct tcb *tcp;
-long addr;
+static void
+print_timezone(struct tcb *const tcp, const kernel_ureg_t addr)
{
- struct timeval tv;
-
- if (addr == 0)
- tprintf("NULL");
- else if (!verbose(tcp))
- tprintf("%#lx", addr);
- else if (umove(tcp, addr, &tv) < 0)
- tprintf("{...}");
- else
- tprintf("{%lu, %lu}", (long) tv.tv_sec, (long) tv.tv_usec);
-}
+ struct timezone tz;
-#ifdef ALPHA
-void
-printtv32(tcp, addr)
-struct tcb *tcp;
-long addr;
-{
- struct timeval32
- {
- unsigned tv_sec;
- unsigned tv_usec;
- };
-
- if (addr == 0)
- tprintf("NULL");
- else if (!verbose(tcp))
- tprintf("%#lx", addr);
- else if (umove(tcp, addr, &tv) < 0)
- tprintf("{...}");
- else
- tprintf("{%u, %u}", tv.tv_sec, tv.tv_usec);
-}
-#endif
+ if (umove_or_printaddr(tcp, addr, &tz))
+ return;
+ tprintf("{tz_minuteswest=%d, tz_dsttime=%d}",
+ tz.tz_minuteswest, tz.tz_dsttime);
+}
-int
-sys_time(tcp)
-struct tcb *tcp;
+SYS_FUNC(gettimeofday)
{
if (exiting(tcp)) {
-#ifndef SVR4
- printnum(tcp, tcp->u_arg[0], "%ld");
-#endif /* SVR4 */
+ print_timeval(tcp, tcp->u_arg[0]);
+ tprints(", ");
+ print_timezone(tcp, tcp->u_arg[1]);
}
return 0;
}
-int
-sys_stime(tcp)
-struct tcb *tcp;
+#ifdef ALPHA
+SYS_FUNC(osf_gettimeofday)
{
if (exiting(tcp)) {
- printnum(tcp, tcp->u_arg[0], "%ld");
+ print_timeval32(tcp, tcp->u_arg[0]);
+ tprints(", ");
+ print_timezone(tcp, tcp->u_arg[1]);
}
return 0;
}
+#endif
-int
-sys_gettimeofday(tcp)
-struct tcb *tcp;
+SYS_FUNC(settimeofday)
{
- if (exiting(tcp)) {
- if (syserror(tcp)) {
- tprintf("%#lx, %#lx",
- tcp->u_arg[0], tcp->u_arg[1]);
- return 0;
+ print_timeval(tcp, tcp->u_arg[0]);
+ tprints(", ");
+ print_timezone(tcp, tcp->u_arg[1]);
+
+ return RVAL_DECODED;
+}
+
+#ifdef ALPHA
+SYS_FUNC(osf_settimeofday)
+{
+ print_timeval32(tcp, tcp->u_arg[0]);
+ tprints(", ");
+ print_timezone(tcp, tcp->u_arg[1]);
+
+ return RVAL_DECODED;
+}
+#endif
+
+SYS_FUNC(nanosleep)
+{
+ if (entering(tcp)) {
+ print_timespec(tcp, tcp->u_arg[0]);
+ tprints(", ");
+ } else {
+
+ /*
+ * Second (returned) timespec is only significant if syscall
+ * was interrupted. On success and in case of other errors we
+ * print only its address, since kernel doesn't modify it,
+ * and printing the value may show uninitialized data.
+ */
+ if (is_erestart(tcp)) {
+ temporarily_clear_syserror(tcp);
+ print_timespec(tcp, tcp->u_arg[1]);
+ restore_cleared_syserror(tcp);
+ } else {
+ printaddr(tcp->u_arg[1]);
}
- printtv(tcp, tcp->u_arg[0]);
-#ifndef SVR4
- tprintf(", ");
- printtv(tcp, tcp->u_arg[1]);
-#endif /* !SVR4 */
}
return 0;
}
+#include "xlat/itimer_which.h"
+
+SYS_FUNC(getitimer)
+{
+ if (entering(tcp)) {
+ printxval(itimer_which, tcp->u_arg[0], "ITIMER_???");
+ tprints(", ");
+ } else {
+ print_itimerval(tcp, tcp->u_arg[1]);
+ }
+ return 0;
+}
#ifdef ALPHA
-int
-sys_osf_gettimeofday(tcp)
-struct tcb *tcp;
+SYS_FUNC(osf_getitimer)
{
- if (exiting(tcp)) {
- if (syserror(tcp)) {
- tprintf("%#lx, %#lx",
- tcp->u_arg[0], tcp->u_arg[1]);
- return 0;
+ if (entering(tcp)) {
+ printxval(itimer_which, tcp->u_arg[0], "ITIMER_???");
+ tprints(", ");
+ } else {
+ print_itimerval32(tcp, tcp->u_arg[1]);
}
- printtv32(tcp, tcp->u_arg[0]);
-#ifndef SVR4
- tprintf(", ");
- printtv32(tcp, tcp->u_arg[1]);
-#endif /* !SVR4 */
- }
- return 0;
+ return 0;
}
#endif
-int
-sys_settimeofday(tcp)
-struct tcb *tcp;
+SYS_FUNC(setitimer)
{
if (entering(tcp)) {
- printtv(tcp, tcp->u_arg[0]);
-#ifndef SVR4
- tprintf(", ");
- printtv(tcp, tcp->u_arg[1]);
-#endif /* !SVR4 */
+ printxval(itimer_which, tcp->u_arg[0], "ITIMER_???");
+ tprints(", ");
+ print_itimerval(tcp, tcp->u_arg[1]);
+ tprints(", ");
+ } else {
+ print_itimerval(tcp, tcp->u_arg[2]);
}
return 0;
}
#ifdef ALPHA
-int
-sys_osf_settimeofday(tcp)
-struct tcb *tcp;
+SYS_FUNC(osf_setitimer)
{
- if (entering(tcp)) {
- printtv32(tcp, tcp->u_arg[0]);
-#ifndef SVR4
- tprintf(", ");
- printtv32(tcp, tcp->u_arg[1]);
-#endif /* !SVR4 */
- }
- return 0;
+ if (entering(tcp)) {
+ printxval(itimer_which, tcp->u_arg[0], "ITIMER_???");
+ tprints(", ");
+ print_itimerval32(tcp, tcp->u_arg[1]);
+ tprints(", ");
+ } else {
+ print_itimerval32(tcp, tcp->u_arg[2]);
+ }
+ return 0;
}
#endif
-int
-sys_adjtime(tcp)
-struct tcb *tcp;
+#include "xlat/adjtimex_state.h"
+
+static int
+do_adjtimex(struct tcb *const tcp, const kernel_ureg_t addr)
{
- if (entering(tcp)) {
- printtv(tcp, tcp->u_arg[0]);
- tprintf(", ");
- } else {
- if (syserror(tcp))
- tprintf("%#lx", tcp->u_arg[1]);
- else
- printtv(tcp, tcp->u_arg[1]);
- }
+ if (print_timex(tcp, addr))
+ return 0;
+ tcp->auxstr = xlookup(adjtimex_state, (unsigned long) tcp->u_rval);
+ if (tcp->auxstr)
+ return RVAL_STR;
+ return 0;
+}
+
+SYS_FUNC(adjtimex)
+{
+ if (exiting(tcp))
+ return do_adjtimex(tcp, tcp->u_arg[0]);
return 0;
}
-static struct xlat which[] = {
- { ITIMER_REAL, "ITIMER_REAL" },
- { ITIMER_VIRTUAL,"ITIMER_VIRTUAL"},
- { ITIMER_PROF, "ITIMER_PROF" },
- { 0, NULL },
-};
+#include "xlat/clockflags.h"
+#include "xlat/clocknames.h"
static void
-printitv(tcp, addr)
-struct tcb *tcp;
-long addr;
+printclockname(int clockid)
{
- struct itimerval itv;
-
- if (addr == 0)
- tprintf("NULL");
- else if (!verbose(tcp))
- tprintf("%#lx", addr);
- else if (umove(tcp, addr, &itv) < 0)
- tprintf("{...}");
- else {
- tprintf("{it_interval={%lu, %lu}, it_value={%lu, %lu}}",
- (long) itv.it_interval.tv_sec, (long) itv.it_interval.tv_usec,
- (long) itv.it_value.tv_sec, (long) itv.it_value.tv_usec);
+#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_???");
}
+SYS_FUNC(clock_settime)
+{
+ printclockname(tcp->u_arg[0]);
+ tprints(", ");
+ print_timespec(tcp, tcp->u_arg[1]);
+
+ return RVAL_DECODED;
+}
-#ifdef ALPHA
-static void
-printitv32(tcp, addr)
-struct tcb *tcp;
-long addr;
+SYS_FUNC(clock_gettime)
{
- struct itimerval32
- {
- struct timeval32 it_interval;
- struct timeval32 it_value;
- } itv;
-
- if (addr == 0)
- tprintf("NULL");
- else if (!verbose(tcp))
- tprintf("%#lx", addr);
- else if (umove(tcp, addr, &itv) < 0)
- tprintf("{...}");
- else {
- tprintf("{it_interval={%u, %u}, it_value={%u, %u}}",
- itv.it_interval.tv_sec, itv.it_interval.tv_usec,
- itv.it_value.tv_sec, itv.it_value.tv_usec);
- }
+ if (entering(tcp)) {
+ printclockname(tcp->u_arg[0]);
+ tprints(", ");
+ } else {
+ print_timespec(tcp, tcp->u_arg[1]);
+ }
+ return 0;
}
-#endif
-int
-sys_getitimer(tcp)
-struct tcb *tcp;
+SYS_FUNC(clock_nanosleep)
{
if (entering(tcp)) {
- printxval(which, tcp->u_arg[0], "ITIMER_???");
- tprintf(", ");
+ printclockname(tcp->u_arg[0]);
+ tprints(", ");
+ printflags(clockflags, tcp->u_arg[1], "TIMER_???");
+ tprints(", ");
+ print_timespec(tcp, tcp->u_arg[2]);
+ tprints(", ");
} else {
- if (syserror(tcp))
- tprintf("%#lx", tcp->u_arg[1]);
- else
- printitv(tcp, tcp->u_arg[1]);
+ /*
+ * Second (returned) timespec is only significant
+ * if syscall was interrupted and flags is not TIMER_ABSTIME.
+ */
+ if (!tcp->u_arg[1] && is_erestart(tcp)) {
+ temporarily_clear_syserror(tcp);
+ print_timespec(tcp, tcp->u_arg[3]);
+ restore_cleared_syserror(tcp);
+ } else {
+ printaddr(tcp->u_arg[3]);
+ }
}
return 0;
}
+SYS_FUNC(clock_adjtime)
+{
+ if (exiting(tcp))
+ return do_adjtimex(tcp, tcp->u_arg[1]);
+ printclockname(tcp->u_arg[0]);
+ tprints(", ");
+ return 0;
+}
-#ifdef ALPHA
-int
-sys_osf_getitimer(tcp)
-struct tcb *tcp;
+SYS_FUNC(timer_create)
{
- if (entering(tcp)) {
- printxval(which, tcp->u_arg[0], "ITIMER_???");
- tprintf(", ");
- } else {
- if (syserror(tcp))
- tprintf("%#lx", tcp->u_arg[1]);
- else
- printitv32(tcp, tcp->u_arg[1]);
- }
- return 0;
+ if (entering(tcp)) {
+ printclockname(tcp->u_arg[0]);
+ tprints(", ");
+ print_sigevent(tcp, tcp->u_arg[1]);
+ tprints(", ");
+ } else {
+ printnum_int(tcp, tcp->u_arg[2], "%d");
+ }
+ return 0;
}
-#endif
-int
-sys_setitimer(tcp)
-struct tcb *tcp;
+SYS_FUNC(timer_settime)
{
if (entering(tcp)) {
- printxval(which, tcp->u_arg[0], "ITIMER_???");
- tprintf(", ");
- printitv(tcp, tcp->u_arg[1]);
- tprintf(", ");
+ tprintf("%d, ", (int) tcp->u_arg[0]);
+ printflags(clockflags, tcp->u_arg[1], "TIMER_???");
+ tprints(", ");
+ print_itimerspec(tcp, tcp->u_arg[2]);
+ tprints(", ");
} else {
- if (syserror(tcp))
- tprintf("%#lx", tcp->u_arg[2]);
- else
- printitv(tcp, tcp->u_arg[2]);
+ print_itimerspec(tcp, tcp->u_arg[3]);
}
return 0;
}
-#ifdef ALPHA
-int
-sys_osf_setitimer(tcp)
-struct tcb *tcp;
+SYS_FUNC(timer_gettime)
{
- if (entering(tcp)) {
- printxval(which, tcp->u_arg[0], "ITIMER_???");
- tprintf(", ");
- printitv32(tcp, tcp->u_arg[1]);
- tprintf(", ");
- } else {
- if (syserror(tcp))
- tprintf("%#lx", tcp->u_arg[2]);
- else
- printitv32(tcp, tcp->u_arg[2]);
- }
- return 0;
+ if (entering(tcp)) {
+ tprintf("%d, ", (int) tcp->u_arg[0]);
+ } else {
+ print_itimerspec(tcp, tcp->u_arg[1]);
+ }
+ return 0;
}
-#endif
-#ifdef LINUX
+#include "xlat/timerfdflags.h"
-int
-sys_adjtimex(tcp)
-struct tcb *tcp;
+SYS_FUNC(timerfd_create)
{
- struct timex txc;
+ printclockname(tcp->u_arg[0]);
+ tprints(", ");
+ printflags(timerfdflags, tcp->u_arg[1], "TFD_???");
- if (exiting(tcp)) {
- if (tcp->u_arg[0] == 0)
- tprintf("NULL");
- else if (syserror(tcp) || !verbose(tcp))
- tprintf("%#lx", tcp->u_arg[0]);
- else if (umove(tcp, tcp->u_arg[0], &txc) < 0)
- tprintf("{...}");
- else {
-#if LINUX_VERSION_CODE < 66332
- tprintf("{mode=%d, offset=%ld, frequency=%ld, ",
- txc.mode, txc.offset, txc.frequency);
- tprintf("maxerror=%ld, esterror=%lu, status=%u, ",
- txc.maxerror, txc.esterror, txc.status);
- tprintf("time_constant=%ld, precision=%lu, ",
- txc.time_constant, txc.precision);
- tprintf("tolerance=%ld, time={%lu, %lu}}",
- txc.tolerance, (long) txc.time.tv_sec,
- (long) txc.time.tv_usec);
-#else
- tprintf("{modes=%d, offset=%ld, freq=%ld, ",
- txc.modes, txc.offset, txc.freq);
- tprintf("maxerror=%ld, esterror=%lu, status=%u, ",
- txc.maxerror, txc.esterror, txc.status);
- tprintf("constant=%ld, precision=%lu, ",
- txc.constant, txc.precision);
- tprintf("tolerance=%ld, time={%lu, %lu}}",
- txc.tolerance, (long) txc.time.tv_sec,
- (long) txc.time.tv_usec);
- /* there's a bunch of other stuff, but it's not
- * worth the time or the trouble to include */
-#endif
- }
+ return RVAL_DECODED | RVAL_FD;
+}
+
+SYS_FUNC(timerfd_settime)
+{
+ if (entering(tcp)) {
+ printfd(tcp, tcp->u_arg[0]);
+ tprints(", ");
+ printflags(timerfdflags, tcp->u_arg[1], "TFD_???");
+ tprints(", ");
+ print_itimerspec(tcp, tcp->u_arg[2]);
+ tprints(", ");
+ } else {
+ print_itimerspec(tcp, tcp->u_arg[3]);
}
return 0;
}
-#endif /* LINUX */
+SYS_FUNC(timerfd_gettime)
+{
+ if (entering(tcp)) {
+ printfd(tcp, tcp->u_arg[0]);
+ tprints(", ");
+ } else {
+ print_itimerspec(tcp, tcp->u_arg[1]);
+ }
+ return 0;
+}