resource.c - fp2-dev/platform/external/strace - Gitiles

 /*
  * 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>
  * 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.
  *
  *	$Id$
  */

 #include "defs.h"

 #include <sys/resource.h>
 #ifdef LINUX
 #include <sys/times.h>
 #include <linux/kernel.h>
 #endif /* LINUX */
 #if defined(SVR4) || defined(FREEBSD)
 #include <sys/times.h>
 #include <sys/time.h>
 #endif

 #if HAVE_LONG_LONG_RLIM_T
 /*
  * Hacks for systems that have a long long rlim_t
  */

 #define rlimit64 rlimit			/* Ugly hack */
 #define rlim64_t rlim_t			/* Ugly hack */
 #define RLIM64_INFINITY RLIM_INFINITY	/* You guessed it */

 #define sys_getrlimit64	sys_getrlimit
 #define sys_setrlimit64	sys_setrlimit
 #endif

 static const struct xlat resources[] = {
 #ifdef RLIMIT_AS
 	{ RLIMIT_AS,	"RLIMIT_AS"	},
 #endif
 #ifdef RLIMIT_CORE
 	{ RLIMIT_CORE,	"RLIMIT_CORE"	},
 #endif
 #ifdef RLIMIT_CPU
 	{ RLIMIT_CPU,	"RLIMIT_CPU"	},
 #endif
 #ifdef RLIMIT_DATA
 	{ RLIMIT_DATA,	"RLIMIT_DATA"	},
 #endif
 #ifdef RLIMIT_FSIZE
 	{ RLIMIT_FSIZE,	"RLIMIT_FSIZE"	},
 #endif
 #ifdef RLIMIT_LOCKS
 	{ RLIMIT_LOCKS,	"RLIMIT_LOCKS"	},
 #endif
 #ifdef RLIMIT_MEMLOCK
 	{ RLIMIT_MEMLOCK,	"RLIMIT_MEMLOCK"	},
 #endif
 #ifdef RLIMIT_MSGQUEUE
 	{ RLIMIT_MSGQUEUE,	"RLIMIT_MSGQUEUE"	},
 #endif
 #ifdef RLIMIT_NICE
 	{ RLIMIT_NICE,	"RLIMIT_NICE"	},
 #endif
 #ifdef RLIMIT_NOFILE
 	{ RLIMIT_NOFILE,	"RLIMIT_NOFILE"	},
 #endif
 #ifdef RLIMIT_NPROC
 	{ RLIMIT_NPROC,	"RLIMIT_NPROC"	},
 #endif
 #ifdef RLIMIT_RSS
 	{ RLIMIT_RSS,	"RLIMIT_RSS"	},
 #endif
 #ifdef RLIMIT_RTPRIO
 	{ RLIMIT_RTPRIO,	"RLIMIT_RTPRIO"	},
 #endif
 #ifdef RLIMIT_SIGPENDING
 	{ RLIMIT_SIGPENDING,	"RLIMIT_SIGPENDING"	},
 #endif
 #ifdef RLIMIT_STACK
 	{ RLIMIT_STACK,	"RLIMIT_STACK"	},
 #endif
 #ifdef RLIMIT_VMEM
 	{ RLIMIT_VMEM,	"RLIMIT_VMEM"	},
 #endif
 	{ 0,		NULL		},
 };

 #if !HAVE_LONG_LONG_RLIM_T
 static char *
 sprintrlim(long lim)
 {
 	static char buf[32];

 	if (lim == RLIM_INFINITY)
 		sprintf(buf, "RLIM_INFINITY");
 	else if (lim > 1024 && lim%1024 == 0)
 		sprintf(buf, "%ld*1024", lim/1024);
 	else
 		sprintf(buf, "%ld", lim);
 	return buf;
 }

 # if defined LINUX && (defined POWERPC64 || defined X86_64)
 static void
 print_rlimit32(struct tcb *tcp)
 {
 	struct rlimit32 {
 		unsigned int rlim_cur;
 		unsigned int rlim_max;
 	} rlim;

 	if (umove(tcp, tcp->u_arg[1], &rlim) < 0)
 		tprints("{...}");
 	else {
 		tprintf("{rlim_cur=%s,",
 			sprintrlim(rlim.rlim_cur == -1 ? RLIM_INFINITY
 				   : rlim.rlim_cur));
 		tprintf(" rlim_max=%s}",
 			sprintrlim(rlim.rlim_max == -1 ? RLIM_INFINITY
 				   : rlim.rlim_max));
 	}
 }
 # endif

 int
 sys_getrlimit(struct tcb *tcp)
 {
 	struct rlimit rlim;

 	if (entering(tcp)) {
 		printxval(resources, tcp->u_arg[0], "RLIMIT_???");
 		tprints(", ");
 	}
 	else {
 		if (syserror(tcp) || !verbose(tcp))
 			tprintf("%#lx", tcp->u_arg[1]);
 # if defined LINUX && (defined POWERPC64 || defined X86_64)
 		else if (current_personality == 1)
 			print_rlimit32(tcp);
 # endif
 		else if (umove(tcp, tcp->u_arg[1], &rlim) < 0)
 			tprints("{...}");
 		else {
 			tprintf("{rlim_cur=%s,", sprintrlim(rlim.rlim_cur));
 			tprintf(" rlim_max=%s}", sprintrlim(rlim.rlim_max));
 		}
 	}
 	return 0;
 }

 int
 sys_setrlimit(struct tcb *tcp)
 {
 	struct rlimit rlim;

 	if (entering(tcp)) {
 		printxval(resources, tcp->u_arg[0], "RLIMIT_???");
 		tprints(", ");
 		if (!verbose(tcp))
 			tprintf("%#lx", tcp->u_arg[1]);
 # if defined LINUX && (defined POWERPC64 || defined X86_64)
 		else if (current_personality == 1)
 			print_rlimit32(tcp);
 # endif
 		else if (umove(tcp, tcp->u_arg[1], &rlim) < 0)
 			tprints("{...}");
 		else {
 			tprintf("{rlim_cur=%s,", sprintrlim(rlim.rlim_cur));
 			tprintf(" rlim_max=%s}", sprintrlim(rlim.rlim_max));
 		}
 	}
 	return 0;
 }
 #endif /* !HAVE_LONG_LONG_RLIM_T */

 #if _LFS64_LARGEFILE || HAVE_LONG_LONG_RLIM_T
 static char *
 sprintrlim64(rlim64_t lim)
 {
 	static char buf[64];

 	if (lim == RLIM64_INFINITY)
 		sprintf(buf, "RLIM64_INFINITY");
 	else if (lim > 1024 && lim%1024 == 0)
 		sprintf(buf, "%lld*1024", (long long) lim/1024);
 	else
 		sprintf(buf, "%lld", (long long) lim);
 	return buf;
 }

 int
 sys_getrlimit64(struct tcb *tcp)
 {
 	struct rlimit64 rlim;

 	if (entering(tcp)) {
 		printxval(resources, tcp->u_arg[0], "RLIMIT_???");
 		tprints(", ");
 	}
 	else {
 		if (syserror(tcp) || !verbose(tcp))
 			tprintf("%#lx", tcp->u_arg[1]);
 		else if (umove(tcp, tcp->u_arg[1], &rlim) < 0)
 			tprints("{...}");
 		else {
 			tprintf("{rlim_cur=%s,", sprintrlim64(rlim.rlim_cur));
 			tprintf(" rlim_max=%s}", sprintrlim64(rlim.rlim_max));
 		}
 	}
 	return 0;
 }

 int
 sys_setrlimit64(struct tcb *tcp)
 {
 	struct rlimit64 rlim;

 	if (entering(tcp)) {
 		printxval(resources, tcp->u_arg[0], "RLIMIT_???");
 		tprints(", ");
 		if (!verbose(tcp))
 			tprintf("%#lx", tcp->u_arg[1]);
 		else if (umove(tcp, tcp->u_arg[1], &rlim) < 0)
 			tprints("{...}");
 		else {
 			tprintf("{rlim_cur=%s,", sprintrlim64(rlim.rlim_cur));
 			tprintf(" rlim_max=%s}", sprintrlim64(rlim.rlim_max));
 		}
 	}
 	return 0;
 }
 #endif /* _LFS64_LARGEFILES || HAVE_LONG_LONG_RLIM_T */

 #ifndef SVR4

 static const struct xlat usagewho[] = {
 	{ RUSAGE_SELF,		"RUSAGE_SELF"		},
 	{ RUSAGE_CHILDREN,	"RUSAGE_CHILDREN"	},
 #ifdef RUSAGE_BOTH
 	{ RUSAGE_BOTH,		"RUSAGE_BOTH"		},
 #endif
 	{ 0,			NULL			},
 };

 #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)
 {
 	if (entering(tcp)) {
 		printxval(usagewho, tcp->u_arg[0], "RUSAGE_???");
 		tprints(", ");
 	}
 	else
 		printrusage(tcp, tcp->u_arg[1]);
 	return 0;
 }

 #ifdef ALPHA
 int
 sys_osf_getrusage(struct tcb *tcp)
 {
 	if (entering(tcp)) {
 		printxval(usagewho, tcp->u_arg[0], "RUSAGE_???");
 		tprints(", ");
 	}
 	else
 		printrusage32(tcp, tcp->u_arg[1]);
 	return 0;
 }
 #endif /* ALPHA */

 #endif /* !SVR4 */

 #ifdef LINUX

 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] ",
 				si.uptime, si.loads[0], si.loads[1],
 				si.loads[2]);
 			tprintf("totalram=%lu, freeram=%lu, ",
 				si.totalram, si.freeram);
 			tprintf("sharedram=%lu, bufferram=%lu} ",
 				si.sharedram, si.bufferram);
 			tprintf("totalswap=%lu, freeswap=%lu, procs=%hu}",
 				si.totalswap, si.freeswap, si.procs);
 		}
 	}
 	return 0;
 }

 #endif /* LINUX */

 static const struct xlat priorities[] = {
 	{ PRIO_PROCESS,	"PRIO_PROCESS"	},
 	{ PRIO_PGRP,	"PRIO_PGRP"	},
 	{ PRIO_USER,	"PRIO_USER"	},
 	{ 0,		NULL		},
 };

 int
 sys_getpriority(struct tcb *tcp)
 {
 	if (entering(tcp)) {
 		printxval(priorities, tcp->u_arg[0], "PRIO_???");
 		tprintf(", %lu", tcp->u_arg[1]);
 	}
 	return 0;
 }

 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;
 }

 int
 sys_nice(struct tcb *tcp)
 {
 	if (entering(tcp))
 		tprintf("%ld", tcp->u_arg[0]);
 	return 0;
 }

 #ifndef SUNOS4

 int
 sys_times(struct tcb *tcp)
 {
 	struct tms tbuf;

 	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=%lu, tms_stime=%lu, ",
 				tbuf.tms_utime, tbuf.tms_stime);
 			tprintf("tms_cutime=%lu, tms_cstime=%lu}",
 				tbuf.tms_cutime, tbuf.tms_cstime);
 		}
 	}
 	return 0;
 }

 #endif /* !SUNOS4 */
	/*
	* 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>
	* 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.
	*
	* $Id$
	*/

	#include "defs.h"

	#include <sys/resource.h>
	#ifdef LINUX
	#include <sys/times.h>
	#include <linux/kernel.h>
	#endif /* LINUX */
	#if defined(SVR4) \|\| defined(FREEBSD)
	#include <sys/times.h>
	#include <sys/time.h>
	#endif

	#if HAVE_LONG_LONG_RLIM_T
	/*
	* Hacks for systems that have a long long rlim_t
	*/

	#define rlimit64 rlimit /* Ugly hack */
	#define rlim64_t rlim_t /* Ugly hack */
	#define RLIM64_INFINITY RLIM_INFINITY /* You guessed it */

	#define sys_getrlimit64 sys_getrlimit
	#define sys_setrlimit64 sys_setrlimit
	#endif

	static const struct xlat resources[] = {
	#ifdef RLIMIT_AS
	{ RLIMIT_AS, "RLIMIT_AS" },
	#endif
	#ifdef RLIMIT_CORE
	{ RLIMIT_CORE, "RLIMIT_CORE" },
	#endif
	#ifdef RLIMIT_CPU
	{ RLIMIT_CPU, "RLIMIT_CPU" },
	#endif
	#ifdef RLIMIT_DATA
	{ RLIMIT_DATA, "RLIMIT_DATA" },
	#endif
	#ifdef RLIMIT_FSIZE
	{ RLIMIT_FSIZE, "RLIMIT_FSIZE" },
	#endif
	#ifdef RLIMIT_LOCKS
	{ RLIMIT_LOCKS, "RLIMIT_LOCKS" },
	#endif
	#ifdef RLIMIT_MEMLOCK
	{ RLIMIT_MEMLOCK, "RLIMIT_MEMLOCK" },
	#endif
	#ifdef RLIMIT_MSGQUEUE
	{ RLIMIT_MSGQUEUE, "RLIMIT_MSGQUEUE" },
	#endif
	#ifdef RLIMIT_NICE
	{ RLIMIT_NICE, "RLIMIT_NICE" },
	#endif
	#ifdef RLIMIT_NOFILE
	{ RLIMIT_NOFILE, "RLIMIT_NOFILE" },
	#endif
	#ifdef RLIMIT_NPROC
	{ RLIMIT_NPROC, "RLIMIT_NPROC" },
	#endif
	#ifdef RLIMIT_RSS
	{ RLIMIT_RSS, "RLIMIT_RSS" },
	#endif
	#ifdef RLIMIT_RTPRIO
	{ RLIMIT_RTPRIO, "RLIMIT_RTPRIO" },
	#endif
	#ifdef RLIMIT_SIGPENDING
	{ RLIMIT_SIGPENDING, "RLIMIT_SIGPENDING" },
	#endif
	#ifdef RLIMIT_STACK
	{ RLIMIT_STACK, "RLIMIT_STACK" },
	#endif
	#ifdef RLIMIT_VMEM
	{ RLIMIT_VMEM, "RLIMIT_VMEM" },
	#endif
	{ 0, NULL },
	};

	#if !HAVE_LONG_LONG_RLIM_T
	static char *
	sprintrlim(long lim)
	{
	static char buf[32];

	if (lim == RLIM_INFINITY)
	sprintf(buf, "RLIM_INFINITY");
	else if (lim > 1024 && lim%1024 == 0)
	sprintf(buf, "%ld*1024", lim/1024);
	else
	sprintf(buf, "%ld", lim);
	return buf;
	}

	# if defined LINUX && (defined POWERPC64 \|\| defined X86_64)
	static void
	print_rlimit32(struct tcb *tcp)
	{
	struct rlimit32 {
	unsigned int rlim_cur;
	unsigned int rlim_max;
	} rlim;

	if (umove(tcp, tcp->u_arg[1], &rlim) < 0)
	tprints("{...}");
	else {
	tprintf("{rlim_cur=%s,",
	sprintrlim(rlim.rlim_cur == -1 ? RLIM_INFINITY
	: rlim.rlim_cur));
	tprintf(" rlim_max=%s}",
	sprintrlim(rlim.rlim_max == -1 ? RLIM_INFINITY
	: rlim.rlim_max));
	}
	}
	# endif

	int
	sys_getrlimit(struct tcb *tcp)
	{
	struct rlimit rlim;

	if (entering(tcp)) {
	printxval(resources, tcp->u_arg[0], "RLIMIT_???");
	tprints(", ");
	}
	else {
	if (syserror(tcp) \|\| !verbose(tcp))
	tprintf("%#lx", tcp->u_arg[1]);
	# if defined LINUX && (defined POWERPC64 \|\| defined X86_64)
	else if (current_personality == 1)
	print_rlimit32(tcp);
	# endif
	else if (umove(tcp, tcp->u_arg[1], &rlim) < 0)
	tprints("{...}");
	else {
	tprintf("{rlim_cur=%s,", sprintrlim(rlim.rlim_cur));
	tprintf(" rlim_max=%s}", sprintrlim(rlim.rlim_max));
	}
	}
	return 0;
	}

	int
	sys_setrlimit(struct tcb *tcp)
	{
	struct rlimit rlim;

	if (entering(tcp)) {
	printxval(resources, tcp->u_arg[0], "RLIMIT_???");
	tprints(", ");
	if (!verbose(tcp))
	tprintf("%#lx", tcp->u_arg[1]);
	# if defined LINUX && (defined POWERPC64 \|\| defined X86_64)
	else if (current_personality == 1)
	print_rlimit32(tcp);
	# endif
	else if (umove(tcp, tcp->u_arg[1], &rlim) < 0)
	tprints("{...}");
	else {
	tprintf("{rlim_cur=%s,", sprintrlim(rlim.rlim_cur));
	tprintf(" rlim_max=%s}", sprintrlim(rlim.rlim_max));
	}
	}
	return 0;
	}
	#endif /* !HAVE_LONG_LONG_RLIM_T */

	#if _LFS64_LARGEFILE \|\| HAVE_LONG_LONG_RLIM_T
	static char *
	sprintrlim64(rlim64_t lim)
	{
	static char buf[64];

	if (lim == RLIM64_INFINITY)
	sprintf(buf, "RLIM64_INFINITY");
	else if (lim > 1024 && lim%1024 == 0)
	sprintf(buf, "%lld*1024", (long long) lim/1024);
	else
	sprintf(buf, "%lld", (long long) lim);
	return buf;
	}

	int
	sys_getrlimit64(struct tcb *tcp)
	{
	struct rlimit64 rlim;

	if (entering(tcp)) {
	printxval(resources, tcp->u_arg[0], "RLIMIT_???");
	tprints(", ");
	}
	else {
	if (syserror(tcp) \|\| !verbose(tcp))
	tprintf("%#lx", tcp->u_arg[1]);
	else if (umove(tcp, tcp->u_arg[1], &rlim) < 0)
	tprints("{...}");
	else {
	tprintf("{rlim_cur=%s,", sprintrlim64(rlim.rlim_cur));
	tprintf(" rlim_max=%s}", sprintrlim64(rlim.rlim_max));
	}
	}
	return 0;
	}

	int
	sys_setrlimit64(struct tcb *tcp)
	{
	struct rlimit64 rlim;

	if (entering(tcp)) {
	printxval(resources, tcp->u_arg[0], "RLIMIT_???");
	tprints(", ");
	if (!verbose(tcp))
	tprintf("%#lx", tcp->u_arg[1]);
	else if (umove(tcp, tcp->u_arg[1], &rlim) < 0)
	tprints("{...}");
	else {
	tprintf("{rlim_cur=%s,", sprintrlim64(rlim.rlim_cur));
	tprintf(" rlim_max=%s}", sprintrlim64(rlim.rlim_max));
	}
	}
	return 0;
	}
	#endif /* _LFS64_LARGEFILES \|\| HAVE_LONG_LONG_RLIM_T */

	#ifndef SVR4

	static const struct xlat usagewho[] = {
	{ RUSAGE_SELF, "RUSAGE_SELF" },
	{ RUSAGE_CHILDREN, "RUSAGE_CHILDREN" },
	#ifdef RUSAGE_BOTH
	{ RUSAGE_BOTH, "RUSAGE_BOTH" },
	#endif
	{ 0, NULL },
	};

	#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)
	{
	if (entering(tcp)) {
	printxval(usagewho, tcp->u_arg[0], "RUSAGE_???");
	tprints(", ");
	}
	else
	printrusage(tcp, tcp->u_arg[1]);
	return 0;
	}

	#ifdef ALPHA
	int
	sys_osf_getrusage(struct tcb *tcp)
	{
	if (entering(tcp)) {
	printxval(usagewho, tcp->u_arg[0], "RUSAGE_???");
	tprints(", ");
	}
	else
	printrusage32(tcp, tcp->u_arg[1]);
	return 0;
	}
	#endif /* ALPHA */

	#endif /* !SVR4 */

	#ifdef LINUX

	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] ",
	si.uptime, si.loads[0], si.loads[1],
	si.loads[2]);
	tprintf("totalram=%lu, freeram=%lu, ",
	si.totalram, si.freeram);
	tprintf("sharedram=%lu, bufferram=%lu} ",
	si.sharedram, si.bufferram);
	tprintf("totalswap=%lu, freeswap=%lu, procs=%hu}",
	si.totalswap, si.freeswap, si.procs);
	}
	}
	return 0;
	}

	#endif /* LINUX */

	static const struct xlat priorities[] = {
	{ PRIO_PROCESS, "PRIO_PROCESS" },
	{ PRIO_PGRP, "PRIO_PGRP" },
	{ PRIO_USER, "PRIO_USER" },
	{ 0, NULL },
	};

	int
	sys_getpriority(struct tcb *tcp)
	{
	if (entering(tcp)) {
	printxval(priorities, tcp->u_arg[0], "PRIO_???");
	tprintf(", %lu", tcp->u_arg[1]);
	}
	return 0;
	}

	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;
	}

	int
	sys_nice(struct tcb *tcp)
	{
	if (entering(tcp))
	tprintf("%ld", tcp->u_arg[0]);
	return 0;
	}

	#ifndef SUNOS4

	int
	sys_times(struct tcb *tcp)
	{
	struct tms tbuf;

	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=%lu, tms_stime=%lu, ",
	tbuf.tms_utime, tbuf.tms_stime);
	tprintf("tms_cutime=%lu, tms_cstime=%lu}",
	tbuf.tms_cutime, tbuf.tms_cstime);
	}
	}
	return 0;
	}

	#endif /* !SUNOS4 */