2 * Copyright (c) 1991, 1992 Paul Kranenburg <pk@cs.few.eur.nl>
3 * Copyright (c) 1993 Branko Lankester <branko@hacktic.nl>
4 * Copyright (c) 1993, 1994, 1995, 1996 Rick Sladkey <jrs@world.std.com>
5 * Copyright (c) 1996-1999 Wichert Akkerman <wichert@cistron.nl>
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
11 * 1. Redistributions of source code must retain the above copyright
12 * notice, this list of conditions and the following disclaimer.
13 * 2. Redistributions in binary form must reproduce the above copyright
14 * notice, this list of conditions and the following disclaimer in the
15 * documentation and/or other materials provided with the distribution.
16 * 3. The name of the author may not be used to endorse or promote products
17 * derived from this software without specific prior written permission.
19 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
20 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
21 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
22 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
23 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
24 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
25 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
26 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
27 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
28 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
35 #include <sys/resource.h>
36 #include <sys/times.h>
37 #include <linux/kernel.h>
39 #if HAVE_LONG_LONG_RLIM_T
41 * Hacks for systems that have a long long rlim_t
44 #define rlimit64 rlimit /* Ugly hack */
45 #define rlim64_t rlim_t /* Ugly hack */
46 #ifndef RLIM64_INFINITY
47 #define RLIM64_INFINITY RLIM_INFINITY /* You guessed it */
50 #define sys_getrlimit64 sys_getrlimit
51 #define sys_setrlimit64 sys_setrlimit
54 static const struct xlat resources[] = {
56 { RLIMIT_AS, "RLIMIT_AS" },
59 { RLIMIT_CORE, "RLIMIT_CORE" },
62 { RLIMIT_CPU, "RLIMIT_CPU" },
65 { RLIMIT_DATA, "RLIMIT_DATA" },
68 { RLIMIT_FSIZE, "RLIMIT_FSIZE" },
71 { RLIMIT_LOCKS, "RLIMIT_LOCKS" },
74 { RLIMIT_MEMLOCK, "RLIMIT_MEMLOCK" },
76 #ifdef RLIMIT_MSGQUEUE
77 { RLIMIT_MSGQUEUE, "RLIMIT_MSGQUEUE" },
80 { RLIMIT_NICE, "RLIMIT_NICE" },
83 { RLIMIT_NOFILE, "RLIMIT_NOFILE" },
86 { RLIMIT_NPROC, "RLIMIT_NPROC" },
89 { RLIMIT_RSS, "RLIMIT_RSS" },
92 { RLIMIT_RTPRIO, "RLIMIT_RTPRIO" },
94 #ifdef RLIMIT_SIGPENDING
95 { RLIMIT_SIGPENDING, "RLIMIT_SIGPENDING" },
98 { RLIMIT_STACK, "RLIMIT_STACK" },
101 { RLIMIT_VMEM, "RLIMIT_VMEM" },
106 #if !HAVE_LONG_LONG_RLIM_T
112 if (lim == RLIM_INFINITY)
113 sprintf(buf, "RLIM_INFINITY");
114 else if (lim > 1024 && lim%1024 == 0)
115 sprintf(buf, "%ld*1024", lim/1024);
117 sprintf(buf, "%ld", lim);
121 # if defined POWERPC64 || defined X86_64
123 print_rlimit32(struct tcb *tcp)
126 unsigned int rlim_cur;
127 unsigned int rlim_max;
130 if (umove(tcp, tcp->u_arg[1], &rlim) < 0)
133 tprintf("{rlim_cur=%s,",
134 sprintrlim(rlim.rlim_cur == -1 ? RLIM_INFINITY
136 tprintf(" rlim_max=%s}",
137 sprintrlim(rlim.rlim_max == -1 ? RLIM_INFINITY
144 sys_getrlimit(struct tcb *tcp)
149 printxval(resources, tcp->u_arg[0], "RLIMIT_???");
153 if (syserror(tcp) || !verbose(tcp))
154 tprintf("%#lx", tcp->u_arg[1]);
155 # if defined POWERPC64 || defined X86_64
156 else if (current_personality == 1)
159 else if (umove(tcp, tcp->u_arg[1], &rlim) < 0)
162 tprintf("{rlim_cur=%s,", sprintrlim(rlim.rlim_cur));
163 tprintf(" rlim_max=%s}", sprintrlim(rlim.rlim_max));
170 sys_setrlimit(struct tcb *tcp)
175 printxval(resources, tcp->u_arg[0], "RLIMIT_???");
178 tprintf("%#lx", tcp->u_arg[1]);
179 # if defined POWERPC64 || defined X86_64
180 else if (current_personality == 1)
183 else if (umove(tcp, tcp->u_arg[1], &rlim) < 0)
186 tprintf("{rlim_cur=%s,", sprintrlim(rlim.rlim_cur));
187 tprintf(" rlim_max=%s}", sprintrlim(rlim.rlim_max));
192 #endif /* !HAVE_LONG_LONG_RLIM_T */
194 #if _LFS64_LARGEFILE || HAVE_LONG_LONG_RLIM_T
196 sprintrlim64(rlim64_t lim)
200 if (lim == RLIM64_INFINITY)
201 sprintf(buf, "RLIM64_INFINITY");
202 else if (lim > 1024 && lim%1024 == 0)
203 sprintf(buf, "%lld*1024", (long long) lim/1024);
205 sprintf(buf, "%lld", (long long) lim);
210 sys_getrlimit64(struct tcb *tcp)
212 struct rlimit64 rlim;
215 printxval(resources, tcp->u_arg[0], "RLIMIT_???");
219 if (syserror(tcp) || !verbose(tcp))
220 tprintf("%#lx", tcp->u_arg[1]);
221 else if (umove(tcp, tcp->u_arg[1], &rlim) < 0)
224 tprintf("{rlim_cur=%s,", sprintrlim64(rlim.rlim_cur));
225 tprintf(" rlim_max=%s}", sprintrlim64(rlim.rlim_max));
232 sys_setrlimit64(struct tcb *tcp)
234 struct rlimit64 rlim;
237 printxval(resources, tcp->u_arg[0], "RLIMIT_???");
240 tprintf("%#lx", tcp->u_arg[1]);
241 else if (umove(tcp, tcp->u_arg[1], &rlim) < 0)
244 tprintf("{rlim_cur=%s,", sprintrlim64(rlim.rlim_cur));
245 tprintf(" rlim_max=%s}", sprintrlim64(rlim.rlim_max));
250 #endif /* _LFS64_LARGEFILES || HAVE_LONG_LONG_RLIM_T */
253 static const struct xlat usagewho[] = {
254 { RUSAGE_SELF, "RUSAGE_SELF" },
255 { RUSAGE_CHILDREN, "RUSAGE_CHILDREN" },
257 { RUSAGE_BOTH, "RUSAGE_BOTH" },
264 printrusage32(struct tcb *tcp, long addr)
271 struct timeval32 ru_utime; /* user time used */
272 struct timeval32 ru_stime; /* system time used */
273 long ru_maxrss; /* maximum resident set size */
274 long ru_ixrss; /* integral shared memory size */
275 long ru_idrss; /* integral unshared data size */
276 long ru_isrss; /* integral unshared stack size */
277 long ru_minflt; /* page reclaims */
278 long ru_majflt; /* page faults */
279 long ru_nswap; /* swaps */
280 long ru_inblock; /* block input operations */
281 long ru_oublock; /* block output operations */
282 long ru_msgsnd; /* messages sent */
283 long ru_msgrcv; /* messages received */
284 long ru_nsignals; /* signals received */
285 long ru_nvcsw; /* voluntary context switches */
286 long ru_nivcsw; /* involuntary " */
291 else if (syserror(tcp) || !verbose(tcp))
292 tprintf("%#lx", addr);
293 else if (umove(tcp, addr, &ru) < 0)
295 else if (!abbrev(tcp)) {
296 tprintf("{ru_utime={%lu, %lu}, ru_stime={%lu, %lu}, ",
297 (long) ru.ru_utime.tv_sec, (long) ru.ru_utime.tv_usec,
298 (long) ru.ru_stime.tv_sec, (long) ru.ru_stime.tv_usec);
299 tprintf("ru_maxrss=%lu, ru_ixrss=%lu, ",
300 ru.ru_maxrss, ru.ru_ixrss);
301 tprintf("ru_idrss=%lu, ru_isrss=%lu, ",
302 ru.ru_idrss, ru.ru_isrss);
303 tprintf("ru_minflt=%lu, ru_majflt=%lu, ru_nswap=%lu, ",
304 ru.ru_minflt, ru.ru_majflt, ru.ru_nswap);
305 tprintf("ru_inblock=%lu, ru_oublock=%lu, ",
306 ru.ru_inblock, ru.ru_oublock);
307 tprintf("ru_msgsnd=%lu, ru_msgrcv=%lu, ",
308 ru.ru_msgsnd, ru.ru_msgrcv);
309 tprintf("ru_nsignals=%lu, ru_nvcsw=%lu, ru_nivcsw=%lu}",
310 ru.ru_nsignals, ru.ru_nvcsw, ru.ru_nivcsw);
313 tprintf("{ru_utime={%lu, %lu}, ru_stime={%lu, %lu}, ...}",
314 (long) ru.ru_utime.tv_sec, (long) ru.ru_utime.tv_usec,
315 (long) ru.ru_stime.tv_sec, (long) ru.ru_stime.tv_usec);
321 printrusage(struct tcb *tcp, long addr)
327 else if (syserror(tcp) || !verbose(tcp))
328 tprintf("%#lx", addr);
329 else if (umove(tcp, addr, &ru) < 0)
331 else if (!abbrev(tcp)) {
332 tprintf("{ru_utime={%lu, %lu}, ru_stime={%lu, %lu}, ",
333 (long) ru.ru_utime.tv_sec, (long) ru.ru_utime.tv_usec,
334 (long) ru.ru_stime.tv_sec, (long) ru.ru_stime.tv_usec);
335 tprintf("ru_maxrss=%lu, ru_ixrss=%lu, ",
336 ru.ru_maxrss, ru.ru_ixrss);
337 tprintf("ru_idrss=%lu, ru_isrss=%lu, ",
338 ru.ru_idrss, ru.ru_isrss);
339 tprintf("ru_minflt=%lu, ru_majflt=%lu, ru_nswap=%lu, ",
340 ru.ru_minflt, ru.ru_majflt, ru.ru_nswap);
341 tprintf("ru_inblock=%lu, ru_oublock=%lu, ",
342 ru.ru_inblock, ru.ru_oublock);
343 tprintf("ru_msgsnd=%lu, ru_msgrcv=%lu, ",
344 ru.ru_msgsnd, ru.ru_msgrcv);
345 tprintf("ru_nsignals=%lu, ru_nvcsw=%lu, ru_nivcsw=%lu}",
346 ru.ru_nsignals, ru.ru_nvcsw, ru.ru_nivcsw);
349 tprintf("{ru_utime={%lu, %lu}, ru_stime={%lu, %lu}, ...}",
350 (long) ru.ru_utime.tv_sec, (long) ru.ru_utime.tv_usec,
351 (long) ru.ru_stime.tv_sec, (long) ru.ru_stime.tv_usec);
356 sys_getrusage(struct tcb *tcp)
359 printxval(usagewho, tcp->u_arg[0], "RUSAGE_???");
363 printrusage(tcp, tcp->u_arg[1]);
369 sys_osf_getrusage(struct tcb *tcp)
372 printxval(usagewho, tcp->u_arg[0], "RUSAGE_???");
376 printrusage32(tcp, tcp->u_arg[1]);
384 sys_sysinfo(struct tcb *tcp)
389 if (syserror(tcp) || !verbose(tcp))
390 tprintf("%#lx", tcp->u_arg[0]);
391 else if (umove(tcp, tcp->u_arg[0], &si) < 0)
394 tprintf("{uptime=%lu, loads=[%lu, %lu, %lu] ",
395 (long) si.uptime, (long) si.loads[0],
396 (long) si.loads[1], (long) si.loads[2]);
397 tprintf("totalram=%lu, freeram=%lu, ",
398 (long) si.totalram, (long) si.freeram);
399 tprintf("sharedram=%lu, bufferram=%lu} ",
400 (long) si.sharedram, (long) si.bufferram);
401 tprintf("totalswap=%lu, freeswap=%lu, procs=%hu}",
402 (long) si.totalswap, (long) si.freeswap,
410 static const struct xlat priorities[] = {
411 { PRIO_PROCESS, "PRIO_PROCESS" },
412 { PRIO_PGRP, "PRIO_PGRP" },
413 { PRIO_USER, "PRIO_USER" },
418 sys_getpriority(struct tcb *tcp)
421 printxval(priorities, tcp->u_arg[0], "PRIO_???");
422 tprintf(", %lu", tcp->u_arg[1]);
428 sys_setpriority(struct tcb *tcp)
431 printxval(priorities, tcp->u_arg[0], "PRIO_???");
432 tprintf(", %lu, %ld", tcp->u_arg[1], tcp->u_arg[2]);
438 sys_nice(struct tcb *tcp)
441 tprintf("%ld", tcp->u_arg[0]);
447 sys_times(struct tcb *tcp)
452 if (tcp->u_arg[0] == 0)
454 else if (syserror(tcp))
455 tprintf("%#lx", tcp->u_arg[0]);
456 else if (umove(tcp, tcp->u_arg[0], &tbuf) < 0)
459 tprintf("{tms_utime=%lu, tms_stime=%lu, ",
460 tbuf.tms_utime, tbuf.tms_stime);
461 tprintf("tms_cutime=%lu, tms_cstime=%lu}",
462 tbuf.tms_cutime, tbuf.tms_cstime);