* 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"
-
-#ifdef LINUX
#include <linux/version.h>
-#include <linux/timex.h>
-#endif /* LINUX */
+#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
+
+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("{%lu, %lu}",
+ (unsigned long) tv->tv_sec, (unsigned long) tv->tv_usec);
+}
void
-printtv(tcp, addr)
-struct tcb *tcp;
-long addr;
+printtv_bitness(struct tcb *tcp, long addr, enum bitness_t bitness, int special)
{
- struct timeval tv;
+ char buf[TIMEVAL_TEXT_BUFSIZE];
+ sprinttv(buf, tcp, addr, bitness, special);
+ tprints(buf);
+}
+
+char *
+sprinttv(char *buf, struct tcb *tcp, long addr, enum bitness_t bitness, int special)
+{
+ int rc;
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);
+ return stpcpy(buf, "NULL");
+
+ if (!verbose(tcp))
+ return buf + sprintf(buf, "%#lx", addr);
+
+ if (bitness == BITNESS_32
+#if SUPPORTED_PERSONALITIES > 1
+ || current_wordsize == 4
+#endif
+ )
+ {
+ struct timeval32 tv;
+
+ rc = umove(tcp, addr, &tv);
+ if (rc >= 0) {
+ if (special && tv.tv_sec == 0) {
+ if (tv.tv_usec == UTIME_NOW)
+ return stpcpy(buf, "UTIME_NOW");
+ if (tv.tv_usec == UTIME_OMIT)
+ return stpcpy(buf, "UTIME_OMIT");
+ }
+ return buf + sprintf(buf, "{%u, %u}",
+ tv.tv_sec, tv.tv_usec);
+ }
+ } else {
+ struct timeval tv;
+
+ rc = umove(tcp, addr, &tv);
+ if (rc >= 0) {
+ if (special && tv.tv_sec == 0) {
+ if (tv.tv_usec == UTIME_NOW)
+ return stpcpy(buf, "UTIME_NOW");
+ if (tv.tv_usec == UTIME_OMIT)
+ return stpcpy(buf, "UTIME_OMIT");
+ }
+ return buf + sprintf(buf, "{%lu, %lu}",
+ (unsigned long) tv.tv_sec,
+ (unsigned long) tv.tv_usec);
+ }
+ }
+
+ return stpcpy(buf, "{...}");
}
-#ifdef ALPHA
-struct timeval32
+void
+print_timespec(struct tcb *tcp, long addr)
{
- unsigned tv_sec;
- unsigned tv_usec;
-};
+ char buf[TIMESPEC_TEXT_BUFSIZE];
+ sprint_timespec(buf, tcp, addr);
+ tprints(buf);
+}
void
-printtv32(tcp, addr)
-struct tcb *tcp;
-long addr;
+sprint_timespec(char *buf, struct tcb *tcp, long addr)
{
- struct timeval32 tv;
+ if (addr == 0)
+ strcpy(buf, "NULL");
+ else if (!verbose(tcp))
+ sprintf(buf, "%#lx", addr);
+ else {
+ int rc;
- 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);
-}
+#if SUPPORTED_PERSONALITIES > 1
+ if (current_wordsize == 4) {
+ 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, "{%lu, %lu}",
+ (unsigned long) ts.tv_sec,
+ (unsigned long) ts.tv_nsec);
+ }
+ if (rc < 0)
+ strcpy(buf, "{...}");
+ }
+}
int
-sys_time(tcp)
-struct tcb *tcp;
+sys_time(struct tcb *tcp)
{
if (exiting(tcp)) {
-#ifndef SVR4
printnum(tcp, tcp->u_arg[0], "%ld");
-#endif /* SVR4 */
}
return 0;
}
int
-sys_stime(tcp)
-struct tcb *tcp;
+sys_stime(struct tcb *tcp)
{
if (exiting(tcp)) {
printnum(tcp, tcp->u_arg[0], "%ld");
}
int
-sys_gettimeofday(tcp)
-struct tcb *tcp;
+sys_gettimeofday(struct tcb *tcp)
{
if (exiting(tcp)) {
if (syserror(tcp)) {
return 0;
}
printtv(tcp, tcp->u_arg[0]);
-#ifndef SVR4
- tprintf(", ");
+ tprints(", ");
printtv(tcp, tcp->u_arg[1]);
-#endif /* !SVR4 */
}
return 0;
}
-
#ifdef ALPHA
int
-sys_osf_gettimeofday(tcp)
-struct tcb *tcp;
-{
- if (exiting(tcp)) {
- if (syserror(tcp)) {
- tprintf("%#lx, %#lx",
- tcp->u_arg[0], tcp->u_arg[1]);
- return 0;
+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);
}
- 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_settimeofday(struct tcb *tcp)
{
if (entering(tcp)) {
printtv(tcp, tcp->u_arg[0]);
-#ifndef SVR4
- tprintf(", ");
+ tprints(", ");
printtv(tcp, tcp->u_arg[1]);
-#endif /* !SVR4 */
}
return 0;
}
#ifdef ALPHA
int
-sys_osf_settimeofday(tcp)
-struct tcb *tcp;
+sys_osf_settimeofday(struct tcb *tcp)
{
- 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)) {
+ 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(tcp)
-struct tcb *tcp;
+sys_adjtime(struct tcb *tcp)
{
if (entering(tcp)) {
printtv(tcp, tcp->u_arg[0]);
- tprintf(", ");
+ tprints(", ");
} else {
if (syserror(tcp))
tprintf("%#lx", tcp->u_arg[1]);
return 0;
}
-static struct xlat which[] = {
- { ITIMER_REAL, "ITIMER_REAL" },
- { ITIMER_VIRTUAL,"ITIMER_VIRTUAL"},
- { ITIMER_PROF, "ITIMER_PROF" },
- { 0, NULL },
+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;
+}
+
+static const struct xlat which[] = {
+ XLAT(ITIMER_REAL),
+ XLAT(ITIMER_VIRTUAL),
+ XLAT(ITIMER_PROF),
+ XLAT_END
};
static void
-printitv(tcp, addr)
-struct tcb *tcp;
-long addr;
+printitv_bitness(struct tcb *tcp, long addr, enum bitness_t bitness)
{
- struct itimerval itv;
-
if (addr == 0)
- tprintf("NULL");
+ tprints("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);
- }
-}
+ int rc;
+ if (bitness == BITNESS_32
+#if SUPPORTED_PERSONALITIES > 1
+ || current_wordsize == 4
+#endif
+ )
+ {
+ struct {
+ struct timeval32 it_interval, it_value;
+ } itv;
-#ifdef ALPHA
-static void
-printitv32(tcp, addr)
-struct tcb *tcp;
-long addr;
-{
- 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);
- }
+ 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("{...}");
+ }
}
-#endif
+
+#define printitv(tcp, addr) \
+ printitv_bitness((tcp), (addr), BITNESS_CURRENT)
int
-sys_getitimer(tcp)
-struct tcb *tcp;
+sys_getitimer(struct tcb *tcp)
{
if (entering(tcp)) {
printxval(which, tcp->u_arg[0], "ITIMER_???");
- tprintf(", ");
+ tprints(", ");
} else {
if (syserror(tcp))
tprintf("%#lx", tcp->u_arg[1]);
return 0;
}
-
#ifdef ALPHA
int
-sys_osf_getitimer(tcp)
-struct tcb *tcp;
+sys_osf_getitimer(struct tcb *tcp)
{
- 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)) {
+ printxval(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(tcp)
-struct tcb *tcp;
+sys_setitimer(struct tcb *tcp)
{
if (entering(tcp)) {
printxval(which, tcp->u_arg[0], "ITIMER_???");
- tprintf(", ");
+ tprints(", ");
printitv(tcp, tcp->u_arg[1]);
- tprintf(", ");
+ tprints(", ");
} else {
if (syserror(tcp))
tprintf("%#lx", tcp->u_arg[2]);
#ifdef ALPHA
int
-sys_osf_setitimer(tcp)
-struct tcb *tcp;
-{
- 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;
+sys_osf_setitimer(struct tcb *tcp)
+{
+ if (entering(tcp)) {
+ printxval(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
+
+static const struct xlat adjtimex_modes[] = {
+ XLAT(0),
+#ifdef ADJ_OFFSET
+ XLAT(ADJ_OFFSET),
+#endif
+#ifdef ADJ_FREQUENCY
+ XLAT(ADJ_FREQUENCY),
+#endif
+#ifdef ADJ_MAXERROR
+ XLAT(ADJ_MAXERROR),
+#endif
+#ifdef ADJ_ESTERROR
+ XLAT(ADJ_ESTERROR),
+#endif
+#ifdef ADJ_STATUS
+ XLAT(ADJ_STATUS),
+#endif
+#ifdef ADJ_TIMECONST
+ XLAT(ADJ_TIMECONST),
+#endif
+#ifdef ADJ_TAI
+ XLAT(ADJ_TAI),
+#endif
+#ifdef ADJ_SETOFFSET
+ XLAT(ADJ_SETOFFSET),
+#endif
+#ifdef ADJ_MICRO
+ XLAT(ADJ_MICRO),
+#endif
+#ifdef ADJ_NANO
+ XLAT(ADJ_NANO),
+#endif
+#ifdef ADJ_TICK
+ XLAT(ADJ_TICK),
+#endif
+#ifdef ADJ_OFFSET_SINGLESHOT
+ XLAT(ADJ_OFFSET_SINGLESHOT),
+#endif
+#ifdef ADJ_OFFSET_SS_READ
+ XLAT(ADJ_OFFSET_SS_READ),
+#endif
+ XLAT_END
+};
+
+static const struct xlat adjtimex_status[] = {
+#ifdef STA_PLL
+ XLAT(STA_PLL),
+#endif
+#ifdef STA_PPSFREQ
+ XLAT(STA_PPSFREQ),
+#endif
+#ifdef STA_PPSTIME
+ XLAT(STA_PPSTIME),
+#endif
+#ifdef STA_FLL
+ XLAT(STA_FLL),
+#endif
+#ifdef STA_INS
+ XLAT(STA_INS),
+#endif
+#ifdef STA_DEL
+ XLAT(STA_DEL),
+#endif
+#ifdef STA_UNSYNC
+ XLAT(STA_UNSYNC),
+#endif
+#ifdef STA_FREQHOLD
+ XLAT(STA_FREQHOLD),
+#endif
+#ifdef STA_PPSSIGNAL
+ XLAT(STA_PPSSIGNAL),
+#endif
+#ifdef STA_PPSJITTER
+ XLAT(STA_PPSJITTER),
+#endif
+#ifdef STA_PPSWANDER
+ XLAT(STA_PPSWANDER),
+#endif
+#ifdef STA_PPSERROR
+ XLAT(STA_PPSERROR),
+#endif
+#ifdef STA_CLOCKERR
+ XLAT(STA_CLOCKERR),
+#endif
+#ifdef STA_NANO
+ XLAT(STA_NANO),
+#endif
+#ifdef STA_MODE
+ XLAT(STA_MODE),
+#endif
+#ifdef STA_CLK
+ XLAT(STA_CLK),
+#endif
+ XLAT_END
+};
+
+static const struct xlat adjtimex_state[] = {
+#ifdef TIME_OK
+ XLAT(TIME_OK),
+#endif
+#ifdef TIME_INS
+ XLAT(TIME_INS),
+#endif
+#ifdef TIME_DEL
+ XLAT(TIME_DEL),
+#endif
+#ifdef TIME_OOP
+ XLAT(TIME_OOP),
+#endif
+#ifdef TIME_WAIT
+ XLAT(TIME_WAIT),
+#endif
+#ifdef TIME_ERROR
+ XLAT(TIME_ERROR),
+#endif
+ XLAT_END
+};
+
+#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_wordsize == 4)
+ 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=%ld, freq=%ld, maxerror=%ld, ",
+ (long) tx.offset, (long) tx.freq, (long) tx.maxerror);
+ tprintf("esterror=%lu, status=", (long) tx.esterror);
+ printflags(adjtimex_status, tx.status, "STA_???");
+ tprintf(", constant=%ld, precision=%lu, ",
+ (long) tx.constant, (long) tx.precision);
+ tprintf("tolerance=%ld, time=", (long) tx.tolerance);
+ tprint_timeval(tcp, &tx.time);
+ tprintf(", tick=%ld, ppsfreq=%ld, jitter=%ld",
+ (long) tx.tick, (long) tx.ppsfreq, (long) tx.jitter);
+ tprintf(", shift=%d, stabil=%ld, jitcnt=%ld",
+ tx.shift, (long) tx.stabil, (long) tx.jitcnt);
+ tprintf(", calcnt=%ld, errcnt=%ld, stbcnt=%ld",
+ (long) tx.calcnt, (long) tx.errcnt, (long) tx.stbcnt);
#endif
+ tprints("}");
+ return 0;
+}
-#ifdef LINUX
+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(tcp)
-struct tcb *tcp;
+sys_adjtimex(struct tcb *tcp)
{
- struct timex txc;
+ if (exiting(tcp))
+ return do_adjtimex(tcp, tcp->u_arg[0]);
+ return 0;
+}
- 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("{...}");
+static const struct xlat clockflags[] = {
+ XLAT(TIMER_ABSTIME),
+ XLAT_END
+};
+
+static const struct xlat clocknames[] = {
+#ifdef CLOCK_REALTIME
+ XLAT(CLOCK_REALTIME),
+#endif
+#ifdef CLOCK_MONOTONIC
+ XLAT(CLOCK_MONOTONIC),
+#endif
+#ifdef CLOCK_PROCESS_CPUTIME_ID
+ XLAT(CLOCK_PROCESS_CPUTIME_ID),
+#endif
+#ifdef CLOCK_THREAD_CPUTIME_ID
+ XLAT(CLOCK_THREAD_CPUTIME_ID),
+#endif
+#ifdef CLOCK_MONOTONIC_RAW
+ XLAT(CLOCK_MONOTONIC_RAW),
+#endif
+#ifdef CLOCK_REALTIME_COARSE
+ XLAT(CLOCK_REALTIME_COARSE),
+#endif
+#ifdef CLOCK_MONOTONIC_COARSE
+ XLAT(CLOCK_MONOTONIC_COARSE),
+#endif
+ XLAT_END
+};
+
+#ifdef CLOCKID_TO_FD
+static const struct xlat cpuclocknames[] = {
+ XLAT(CPUCLOCK_PROF),
+ XLAT(CPUCLOCK_VIRT),
+ XLAT(CPUCLOCK_SCHED),
+ XLAT_END
+};
+#endif
+
+static void
+printclockname(int clockid)
+{
+#ifdef CLOCKID_TO_FD
+ if (clockid < 0) {
+ if ((clockid & CLOCKFD_MASK) == CLOCKFD)
+ tprintf("FD_TO_CLOCKID(%d)", CLOCKID_TO_FD(clockid));
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);
+ 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
+static const struct xlat sigev_value[] = {
+ XLAT(SIGEV_SIGNAL),
+ XLAT(SIGEV_NONE),
+ XLAT(SIGEV_THREAD),
+ XLAT(SIGEV_THREAD_ID),
+ XLAT_END
+};
+
+#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
- 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 */
+# 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, long 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;
+}
+
+#ifndef TFD_TIMER_ABSTIME
+#define TFD_TIMER_ABSTIME (1 << 0)
+#endif
+
+static const struct xlat timerfdflags[] = {
+ XLAT(TFD_TIMER_ABSTIME),
+ XLAT_END
+};
+
+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;
}
-#endif /* LINUX */
+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;
+}