1 /* 2 * Copyright (c) 1991, 1992 Paul Kranenburg <pk (at) cs.few.eur.nl> 3 * Copyright (c) 1993 Branko Lankester <branko (at) hacktic.nl> 4 * Copyright (c) 1993, 1994, 1995, 1996 Rick Sladkey <jrs (at) world.std.com> 5 * Copyright (c) 1996-1999 Wichert Akkerman <wichert (at) cistron.nl> 6 * All rights reserved. 7 * 8 * Redistribution and use in source and binary forms, with or without 9 * modification, are permitted provided that the following conditions 10 * are met: 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. 18 * 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. 29 */ 30 31 #include "defs.h" 32 #include <sys/resource.h> 33 #include <sys/times.h> 34 #include <linux/kernel.h> 35 36 #include "xlat/resources.h" 37 38 static const char * 39 sprint_rlim64(uint64_t lim) 40 { 41 static char buf[sizeof(uint64_t)*3 + sizeof("*1024")]; 42 43 if (lim == UINT64_MAX) 44 return "RLIM64_INFINITY"; 45 46 if (lim > 1024 && lim % 1024 == 0) 47 sprintf(buf, "%" PRIu64 "*1024", lim / 1024); 48 else 49 sprintf(buf, "%" PRIu64, lim); 50 return buf; 51 } 52 53 static void 54 print_rlimit64(struct tcb *tcp, unsigned long addr) 55 { 56 struct rlimit_64 { 57 uint64_t rlim_cur; 58 uint64_t rlim_max; 59 } rlim; 60 61 if (umove(tcp, addr, &rlim) < 0) 62 tprintf("%#lx", addr); 63 else { 64 tprintf("{rlim_cur=%s,", sprint_rlim64(rlim.rlim_cur)); 65 tprintf(" rlim_max=%s}", sprint_rlim64(rlim.rlim_max)); 66 } 67 } 68 69 static void 70 decode_rlimit64(struct tcb *tcp, unsigned long addr) 71 { 72 if (!addr) 73 tprints("NULL"); 74 else if (!verbose(tcp) || 75 (exiting(tcp) && syserror(tcp))) 76 tprintf("%#lx", addr); 77 else 78 print_rlimit64(tcp, addr); 79 } 80 81 #if !defined(current_wordsize) || current_wordsize == 4 82 83 static const char * 84 sprint_rlim32(uint32_t lim) 85 { 86 static char buf[sizeof(uint32_t)*3 + sizeof("*1024")]; 87 88 if (lim == UINT32_MAX) 89 return "RLIM_INFINITY"; 90 91 if (lim > 1024 && lim % 1024 == 0) 92 sprintf(buf, "%" PRIu32 "*1024", lim / 1024); 93 else 94 sprintf(buf, "%" PRIu32, lim); 95 return buf; 96 } 97 98 static void 99 print_rlimit32(struct tcb *tcp, unsigned long addr) 100 { 101 struct rlimit_32 { 102 uint32_t rlim_cur; 103 uint32_t rlim_max; 104 } rlim; 105 106 if (umove(tcp, addr, &rlim) < 0) 107 tprintf("%#lx", addr); 108 else { 109 tprintf("{rlim_cur=%s,", sprint_rlim32(rlim.rlim_cur)); 110 tprintf(" rlim_max=%s}", sprint_rlim32(rlim.rlim_max)); 111 } 112 } 113 114 static void 115 decode_rlimit(struct tcb *tcp, unsigned long addr) 116 { 117 if (!addr) 118 tprints("NULL"); 119 else if (!verbose(tcp) || (exiting(tcp) && syserror(tcp))) 120 tprintf("%#lx", addr); 121 else { 122 # if defined(X86_64) || defined(X32) 123 /* 124 * i386 is the only personality on X86_64 and X32 125 * with 32-bit rlim_t. 126 * When current_personality is X32, current_wordsize 127 * equals to 4 but rlim_t is 64-bit. 128 */ 129 if (current_personality == 1) 130 # else 131 if (current_wordsize == 4) 132 # endif 133 print_rlimit32(tcp, addr); 134 else 135 print_rlimit64(tcp, addr); 136 } 137 } 138 139 #else /* defined(current_wordsize) && current_wordsize != 4 */ 140 141 # define decode_rlimit decode_rlimit64 142 143 #endif 144 145 int 146 sys_getrlimit(struct tcb *tcp) 147 { 148 if (entering(tcp)) { 149 printxval(resources, tcp->u_arg[0], "RLIMIT_???"); 150 tprints(", "); 151 } 152 else { 153 decode_rlimit(tcp, tcp->u_arg[1]); 154 } 155 return 0; 156 } 157 158 int 159 sys_setrlimit(struct tcb *tcp) 160 { 161 if (entering(tcp)) { 162 printxval(resources, tcp->u_arg[0], "RLIMIT_???"); 163 tprints(", "); 164 decode_rlimit(tcp, tcp->u_arg[1]); 165 } 166 return 0; 167 } 168 169 int 170 sys_prlimit64(struct tcb *tcp) 171 { 172 if (entering(tcp)) { 173 tprintf("%ld, ", tcp->u_arg[0]); 174 printxval(resources, tcp->u_arg[1], "RLIMIT_???"); 175 tprints(", "); 176 decode_rlimit64(tcp, tcp->u_arg[2]); 177 tprints(", "); 178 } else { 179 decode_rlimit64(tcp, tcp->u_arg[3]); 180 } 181 return 0; 182 } 183 184 #include "xlat/usagewho.h" 185 186 #ifdef ALPHA 187 void 188 printrusage32(struct tcb *tcp, long addr) 189 { 190 struct timeval32 { 191 unsigned tv_sec; 192 unsigned tv_usec; 193 }; 194 struct rusage32 { 195 struct timeval32 ru_utime; /* user time used */ 196 struct timeval32 ru_stime; /* system time used */ 197 long ru_maxrss; /* maximum resident set size */ 198 long ru_ixrss; /* integral shared memory size */ 199 long ru_idrss; /* integral unshared data size */ 200 long ru_isrss; /* integral unshared stack size */ 201 long ru_minflt; /* page reclaims */ 202 long ru_majflt; /* page faults */ 203 long ru_nswap; /* swaps */ 204 long ru_inblock; /* block input operations */ 205 long ru_oublock; /* block output operations */ 206 long ru_msgsnd; /* messages sent */ 207 long ru_msgrcv; /* messages received */ 208 long ru_nsignals; /* signals received */ 209 long ru_nvcsw; /* voluntary context switches */ 210 long ru_nivcsw; /* involuntary " */ 211 } ru; 212 213 if (!addr) 214 tprints("NULL"); 215 else if (syserror(tcp) || !verbose(tcp)) 216 tprintf("%#lx", addr); 217 else if (umove(tcp, addr, &ru) < 0) 218 tprints("{...}"); 219 else if (!abbrev(tcp)) { 220 tprintf("{ru_utime={%lu, %lu}, ru_stime={%lu, %lu}, ", 221 (long) ru.ru_utime.tv_sec, (long) ru.ru_utime.tv_usec, 222 (long) ru.ru_stime.tv_sec, (long) ru.ru_stime.tv_usec); 223 tprintf("ru_maxrss=%lu, ru_ixrss=%lu, ", 224 ru.ru_maxrss, ru.ru_ixrss); 225 tprintf("ru_idrss=%lu, ru_isrss=%lu, ", 226 ru.ru_idrss, ru.ru_isrss); 227 tprintf("ru_minflt=%lu, ru_majflt=%lu, ru_nswap=%lu, ", 228 ru.ru_minflt, ru.ru_majflt, ru.ru_nswap); 229 tprintf("ru_inblock=%lu, ru_oublock=%lu, ", 230 ru.ru_inblock, ru.ru_oublock); 231 tprintf("ru_msgsnd=%lu, ru_msgrcv=%lu, ", 232 ru.ru_msgsnd, ru.ru_msgrcv); 233 tprintf("ru_nsignals=%lu, ru_nvcsw=%lu, ru_nivcsw=%lu}", 234 ru.ru_nsignals, ru.ru_nvcsw, ru.ru_nivcsw); 235 } 236 else { 237 tprintf("{ru_utime={%lu, %lu}, ru_stime={%lu, %lu}, ...}", 238 (long) ru.ru_utime.tv_sec, (long) ru.ru_utime.tv_usec, 239 (long) ru.ru_stime.tv_sec, (long) ru.ru_stime.tv_usec); 240 } 241 } 242 #endif 243 244 void 245 printrusage(struct tcb *tcp, long addr) 246 { 247 struct rusage ru; 248 249 if (!addr) 250 tprints("NULL"); 251 else if (syserror(tcp) || !verbose(tcp)) 252 tprintf("%#lx", addr); 253 else if (umove(tcp, addr, &ru) < 0) 254 tprints("{...}"); 255 else if (!abbrev(tcp)) { 256 tprintf("{ru_utime={%lu, %lu}, ru_stime={%lu, %lu}, ", 257 (long) ru.ru_utime.tv_sec, (long) ru.ru_utime.tv_usec, 258 (long) ru.ru_stime.tv_sec, (long) ru.ru_stime.tv_usec); 259 tprintf("ru_maxrss=%lu, ru_ixrss=%lu, ", 260 ru.ru_maxrss, ru.ru_ixrss); 261 tprintf("ru_idrss=%lu, ru_isrss=%lu, ", 262 ru.ru_idrss, ru.ru_isrss); 263 tprintf("ru_minflt=%lu, ru_majflt=%lu, ru_nswap=%lu, ", 264 ru.ru_minflt, ru.ru_majflt, ru.ru_nswap); 265 tprintf("ru_inblock=%lu, ru_oublock=%lu, ", 266 ru.ru_inblock, ru.ru_oublock); 267 tprintf("ru_msgsnd=%lu, ru_msgrcv=%lu, ", 268 ru.ru_msgsnd, ru.ru_msgrcv); 269 tprintf("ru_nsignals=%lu, ru_nvcsw=%lu, ru_nivcsw=%lu}", 270 ru.ru_nsignals, ru.ru_nvcsw, ru.ru_nivcsw); 271 } 272 else { 273 tprintf("{ru_utime={%lu, %lu}, ru_stime={%lu, %lu}, ...}", 274 (long) ru.ru_utime.tv_sec, (long) ru.ru_utime.tv_usec, 275 (long) ru.ru_stime.tv_sec, (long) ru.ru_stime.tv_usec); 276 } 277 } 278 279 int 280 sys_getrusage(struct tcb *tcp) 281 { 282 if (entering(tcp)) { 283 printxval(usagewho, tcp->u_arg[0], "RUSAGE_???"); 284 tprints(", "); 285 } 286 else 287 printrusage(tcp, tcp->u_arg[1]); 288 return 0; 289 } 290 291 #ifdef ALPHA 292 int 293 sys_osf_getrusage(struct tcb *tcp) 294 { 295 if (entering(tcp)) { 296 printxval(usagewho, tcp->u_arg[0], "RUSAGE_???"); 297 tprints(", "); 298 } 299 else 300 printrusage32(tcp, tcp->u_arg[1]); 301 return 0; 302 } 303 #endif /* ALPHA */ 304 305 int 306 sys_sysinfo(struct tcb *tcp) 307 { 308 struct sysinfo si; 309 310 if (exiting(tcp)) { 311 if (syserror(tcp) || !verbose(tcp)) 312 tprintf("%#lx", tcp->u_arg[0]); 313 else if (umove(tcp, tcp->u_arg[0], &si) < 0) 314 tprints("{...}"); 315 else { 316 tprintf("{uptime=%lu, loads=[%lu, %lu, %lu] ", 317 (long) si.uptime, (long) si.loads[0], 318 (long) si.loads[1], (long) si.loads[2]); 319 tprintf("totalram=%lu, freeram=%lu, ", 320 (long) si.totalram, (long) si.freeram); 321 tprintf("sharedram=%lu, bufferram=%lu} ", 322 (long) si.sharedram, (long) si.bufferram); 323 tprintf("totalswap=%lu, freeswap=%lu, procs=%u}", 324 (long) si.totalswap, (long) si.freeswap, 325 (unsigned)si.procs); 326 } 327 } 328 return 0; 329 } 330 331 #include "xlat/priorities.h" 332 333 int 334 sys_getpriority(struct tcb *tcp) 335 { 336 if (entering(tcp)) { 337 printxval(priorities, tcp->u_arg[0], "PRIO_???"); 338 tprintf(", %lu", tcp->u_arg[1]); 339 } 340 return 0; 341 } 342 343 int 344 sys_setpriority(struct tcb *tcp) 345 { 346 if (entering(tcp)) { 347 printxval(priorities, tcp->u_arg[0], "PRIO_???"); 348 tprintf(", %lu, %ld", tcp->u_arg[1], tcp->u_arg[2]); 349 } 350 return 0; 351 } 352 353 int 354 sys_times(struct tcb *tcp) 355 { 356 struct tms tbuf; 357 358 if (exiting(tcp)) { 359 if (tcp->u_arg[0] == 0) 360 tprints("NULL"); 361 else if (syserror(tcp)) 362 tprintf("%#lx", tcp->u_arg[0]); 363 else if (umove(tcp, tcp->u_arg[0], &tbuf) < 0) 364 tprints("{...}"); 365 else { 366 tprintf("{tms_utime=%llu, tms_stime=%llu, ", 367 (unsigned long long) tbuf.tms_utime, 368 (unsigned long long) tbuf.tms_stime); 369 tprintf("tms_cutime=%llu, tms_cstime=%llu}", 370 (unsigned long long) tbuf.tms_cutime, 371 (unsigned long long) tbuf.tms_cstime); 372 } 373 } 374 return 0; 375 } 376
