1 /* 2 * Copyright 1997 Sean Eric Fagan 3 * 4 * Redistribution and use in source and binary forms, with or without 5 * modification, are permitted provided that the following conditions 6 * are met: 7 * 1. Redistributions of source code must retain the above copyright 8 * notice, this list of conditions and the following disclaimer. 9 * 2. Redistributions in binary form must reproduce the above copyright 10 * notice, this list of conditions and the following disclaimer in the 11 * documentation and/or other materials provided with the distribution. 12 * 3. All advertising materials mentioning features or use of this software 13 * must display the following acknowledgement: 14 * This product includes software developed by Sean Eric Fagan 15 * 4. Neither the name of the author may be used to endorse or promote 16 * products derived from this software without specific prior written 17 * permission. 18 * 19 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND 20 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 21 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 22 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE 23 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 24 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 25 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 26 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 27 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 28 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 29 * SUCH DAMAGE. 30 */ 31 32 #ifndef lint 33 static const char rcsid[] = 34 "$FreeBSD$"; 35 #endif /* not lint */ 36 37 /* 38 * This file has routines used to print out system calls and their 39 * arguments. 40 */ 41 42 #include <sys/mman.h> 43 #include <sys/types.h> 44 #include <sys/ptrace.h> 45 #include <sys/socket.h> 46 #include <sys/time.h> 47 #include <sys/un.h> 48 #include <netinet/in.h> 49 #include <arpa/inet.h> 50 #include <sys/ioccom.h> 51 #include <machine/atomic.h> 52 #include <errno.h> 53 #include <sys/umtx.h> 54 #include <sys/event.h> 55 #include <sys/stat.h> 56 #include <sys/resource.h> 57 58 #include <ctype.h> 59 #include <err.h> 60 #include <fcntl.h> 61 #include <poll.h> 62 #include <signal.h> 63 #include <stdint.h> 64 #include <stdio.h> 65 #include <stdlib.h> 66 #include <string.h> 67 #include <time.h> 68 #include <unistd.h> 69 #include <vis.h> 70 71 #include "truss.h" 72 #include "extern.h" 73 #include "syscall.h" 74 75 /* 64-bit alignment on 32-bit platforms. */ 76 #ifdef __powerpc__ 77 #define QUAD_ALIGN 1 78 #else 79 #define QUAD_ALIGN 0 80 #endif 81 82 /* Number of slots needed for a 64-bit argument. */ 83 #ifdef __LP64__ 84 #define QUAD_SLOTS 1 85 #else 86 #define QUAD_SLOTS 2 87 #endif 88 89 /* 90 * This should probably be in its own file, sorted alphabetically. 91 */ 92 static struct syscall syscalls[] = { 93 { .name = "fcntl", .ret_type = 1, .nargs = 3, 94 .args = { { Int, 0 } , { Fcntl, 1 }, { Fcntlflag | OUT, 2 } } }, 95 { .name = "fork", .ret_type = 1, .nargs = 0 }, 96 { .name = "getegid", .ret_type = 1, .nargs = 0 }, 97 { .name = "geteuid", .ret_type = 1, .nargs = 0 }, 98 { .name = "getgid", .ret_type = 1, .nargs = 0 }, 99 { .name = "getpid", .ret_type = 1, .nargs = 0 }, 100 { .name = "getpgid", .ret_type = 1, .nargs = 1, 101 .args = { { Int, 0 } } }, 102 { .name = "getpgrp", .ret_type = 1, .nargs = 0 }, 103 { .name = "getppid", .ret_type = 1, .nargs = 0 }, 104 { .name = "getsid", .ret_type = 1, .nargs = 1, 105 .args = { { Int, 0 } } }, 106 { .name = "getuid", .ret_type = 1, .nargs = 0 }, 107 { .name = "readlink", .ret_type = 1, .nargs = 3, 108 .args = { { Name, 0 } , { Readlinkres | OUT, 1 }, { Int, 2 } } }, 109 { .name = "lseek", .ret_type = 2, .nargs = 3, 110 .args = { { Int, 0 }, { Quad, 1 + QUAD_ALIGN }, { Whence, 1 + QUAD_SLOTS + QUAD_ALIGN } } }, 111 { .name = "linux_lseek", .ret_type = 2, .nargs = 3, 112 .args = { { Int, 0 }, { Int, 1 }, { Whence, 2 } } }, 113 { .name = "mmap", .ret_type = 2, .nargs = 6, 114 .args = { { Ptr, 0 }, { Int, 1 }, { Mprot, 2 }, { Mmapflags, 3 }, { Int, 4 }, { Quad, 5 + QUAD_ALIGN } } }, 115 { .name = "mprotect", .ret_type = 1, .nargs = 3, 116 .args = { { Ptr, 0 }, { Int, 1 }, { Mprot, 2 } } }, 117 { .name = "open", .ret_type = 1, .nargs = 3, 118 .args = { { Name | IN, 0 } , { Open, 1 }, { Octal, 2 } } }, 119 { .name = "mkdir", .ret_type = 1, .nargs = 2, 120 .args = { { Name, 0 } , { Octal, 1 } } }, 121 { .name = "linux_open", .ret_type = 1, .nargs = 3, 122 .args = { { Name, 0 }, { Hex, 1 }, { Octal, 2 } } }, 123 { .name = "close", .ret_type = 1, .nargs = 1, 124 .args = { { Int, 0 } } }, 125 { .name = "link", .ret_type = 0, .nargs = 2, 126 .args = { { Name, 0 }, { Name, 1 } } }, 127 { .name = "unlink", .ret_type = 0, .nargs = 1, 128 .args = { { Name, 0 } } }, 129 { .name = "chdir", .ret_type = 0, .nargs = 1, 130 .args = { { Name, 0 } } }, 131 { .name = "chroot", .ret_type = 0, .nargs = 1, 132 .args = { { Name, 0 } } }, 133 { .name = "mknod", .ret_type = 0, .nargs = 3, 134 .args = { { Name, 0 }, { Octal, 1 }, { Int, 3 } } }, 135 { .name = "chmod", .ret_type = 0, .nargs = 2, 136 .args = { { Name, 0 }, { Octal, 1 } } }, 137 { .name = "chown", .ret_type = 0, .nargs = 3, 138 .args = { { Name, 0 }, { Int, 1 }, { Int, 2 } } }, 139 { .name = "mount", .ret_type = 0, .nargs = 4, 140 .args = { { Name, 0 }, { Name, 1 }, { Int, 2 }, { Ptr, 3 } } }, 141 { .name = "umount", .ret_type = 0, .nargs = 2, 142 .args = { { Name, 0 }, { Int, 2 } } }, 143 { .name = "fstat", .ret_type = 1, .nargs = 2, 144 .args = { { Int, 0 }, { Stat | OUT , 1 } } }, 145 { .name = "stat", .ret_type = 1, .nargs = 2, 146 .args = { { Name | IN, 0 }, { Stat | OUT, 1 } } }, 147 { .name = "lstat", .ret_type = 1, .nargs = 2, 148 .args = { { Name | IN, 0 }, { Stat | OUT, 1 } } }, 149 { .name = "linux_newstat", .ret_type = 1, .nargs = 2, 150 .args = { { Name | IN, 0 }, { Ptr | OUT, 1 } } }, 151 { .name = "linux_newfstat", .ret_type = 1, .nargs = 2, 152 .args = { { Int, 0 }, { Ptr | OUT, 1 } } }, 153 { .name = "write", .ret_type = 1, .nargs = 3, 154 .args = { { Int, 0 }, { BinString | IN, 1 }, { Int, 2 } } }, 155 { .name = "ioctl", .ret_type = 1, .nargs = 3, 156 .args = { { Int, 0 }, { Ioctl, 1 }, { Hex, 2 } } }, 157 { .name = "break", .ret_type = 1, .nargs = 1, 158 .args = { { Ptr, 0 } } }, 159 { .name = "exit", .ret_type = 0, .nargs = 1, 160 .args = { { Hex, 0 } } }, 161 { .name = "access", .ret_type = 1, .nargs = 2, 162 .args = { { Name | IN, 0 }, { Int, 1 } } }, 163 { .name = "sigaction", .ret_type = 1, .nargs = 3, 164 .args = { { Signal, 0 }, { Sigaction | IN, 1 }, { Sigaction | OUT, 2 } } }, 165 { .name = "accept", .ret_type = 1, .nargs = 3, 166 .args = { { Int, 0 }, { Sockaddr | OUT, 1 }, { Ptr | OUT, 2 } } }, 167 { .name = "bind", .ret_type = 1, .nargs = 3, 168 .args = { { Int, 0 }, { Sockaddr | IN, 1 }, { Int, 2 } } }, 169 { .name = "connect", .ret_type = 1, .nargs = 3, 170 .args = { { Int, 0 }, { Sockaddr | IN, 1 }, { Int, 2 } } }, 171 { .name = "getpeername", .ret_type = 1, .nargs = 3, 172 .args = { { Int, 0 }, { Sockaddr | OUT, 1 }, { Ptr | OUT, 2 } } }, 173 { .name = "getsockname", .ret_type = 1, .nargs = 3, 174 .args = { { Int, 0 }, { Sockaddr | OUT, 1 }, { Ptr | OUT, 2 } } }, 175 { .name = "recvfrom", .ret_type = 1, .nargs = 6, 176 .args = { { Int, 0 }, { BinString | OUT, 1 }, { Int, 2 }, { Hex, 3 }, { Sockaddr | OUT, 4 }, { Ptr | OUT, 5 } } }, 177 { .name = "sendto", .ret_type = 1, .nargs = 6, 178 .args = { { Int, 0 }, { BinString | IN, 1 }, { Int, 2 }, { Hex, 3 }, { Sockaddr | IN, 4 }, { Ptr | IN, 5 } } }, 179 { .name = "execve", .ret_type = 1, .nargs = 3, 180 .args = { { Name | IN, 0 }, { StringArray | IN, 1 }, { StringArray | IN, 2 } } }, 181 { .name = "linux_execve", .ret_type = 1, .nargs = 3, 182 .args = { { Name | IN, 0 }, { StringArray | IN, 1 }, { StringArray | IN, 2 } } }, 183 { .name = "kldload", .ret_type = 0, .nargs = 1, 184 .args = { { Name | IN, 0 } } }, 185 { .name = "kldunload", .ret_type = 0, .nargs = 1, 186 .args = { { Int, 0 } } }, 187 { .name = "kldfind", .ret_type = 0, .nargs = 1, 188 .args = { { Name | IN, 0 } } }, 189 { .name = "kldnext", .ret_type = 0, .nargs = 1, 190 .args = { { Int, 0 } } }, 191 { .name = "kldstat", .ret_type = 0, .nargs = 2, 192 .args = { { Int, 0 }, { Ptr, 1 } } }, 193 { .name = "kldfirstmod", .ret_type = 0, .nargs = 1, 194 .args = { { Int, 0 } } }, 195 { .name = "nanosleep", .ret_type = 0, .nargs = 1, 196 .args = { { Timespec, 0 } } }, 197 { .name = "select", .ret_type = 1, .nargs = 5, 198 .args = { { Int, 0 }, { Fd_set, 1 }, { Fd_set, 2 }, { Fd_set, 3 }, { Timeval, 4 } } }, 199 { .name = "poll", .ret_type = 1, .nargs = 3, 200 .args = { { Pollfd, 0 }, { Int, 1 }, { Int, 2 } } }, 201 { .name = "gettimeofday", .ret_type = 1, .nargs = 2, 202 .args = { { Timeval | OUT, 0 }, { Ptr, 1 } } }, 203 { .name = "clock_gettime", .ret_type = 1, .nargs = 2, 204 .args = { { Int, 0 }, { Timespec | OUT, 1 } } }, 205 { .name = "getitimer", .ret_type = 1, .nargs = 2, 206 .args = { { Int, 0 }, { Itimerval | OUT, 2 } } }, 207 { .name = "setitimer", .ret_type = 1, .nargs = 3, 208 .args = { { Int, 0 }, { Itimerval, 1 } , { Itimerval | OUT, 2 } } }, 209 { .name = "kse_release", .ret_type = 0, .nargs = 1, 210 .args = { { Timespec, 0 } } }, 211 { .name = "kevent", .ret_type = 0, .nargs = 6, 212 .args = { { Int, 0 }, { Kevent, 1 }, { Int, 2 }, { Kevent | OUT, 3 }, { Int, 4 }, { Timespec, 5 } } }, 213 { .name = "_umtx_lock", .ret_type = 0, .nargs = 1, 214 .args = { { Umtx, 0 } } }, 215 { .name = "_umtx_unlock", .ret_type = 0, .nargs = 1, 216 .args = { { Umtx, 0 } } }, 217 { .name = "sigprocmask", .ret_type = 0, .nargs = 3, 218 .args = { { Sigprocmask, 0 }, { Sigset, 1 }, { Sigset | OUT, 2 } } }, 219 { .name = "unmount", .ret_type = 1, .nargs = 2, 220 .args = { { Name, 0 }, { Int, 1 } } }, 221 { .name = "socket", .ret_type = 1, .nargs = 3, 222 .args = { { Sockdomain, 0 }, { Socktype, 1 }, { Int, 2 } } }, 223 { .name = "getrusage", .ret_type = 1, .nargs = 2, 224 .args = { { Int, 0 }, { Rusage | OUT, 1 } } }, 225 { .name = "__getcwd", .ret_type = 1, .nargs = 2, 226 .args = { { Name | OUT, 0 }, { Int, 1 } } }, 227 { .name = "shutdown", .ret_type = 1, .nargs = 2, 228 .args = { { Int, 0 }, { Shutdown, 1 } } }, 229 { .name = "getrlimit", .ret_type = 1, .nargs = 2, 230 .args = { { Resource, 0 }, { Rlimit | OUT, 1 } } }, 231 { .name = "setrlimit", .ret_type = 1, .nargs = 2, 232 .args = { { Resource, 0 }, { Rlimit | IN, 1 } } }, 233 { .name = "utimes", .ret_type = 1, .nargs = 2, 234 .args = { { Name | IN, 0 }, { Timeval2 | IN, 1 } } }, 235 { .name = "lutimes", .ret_type = 1, .nargs = 2, 236 .args = { { Name | IN, 0 }, { Timeval2 | IN, 1 } } }, 237 { .name = "futimes", .ret_type = 1, .nargs = 2, 238 .args = { { Int, 0 }, { Timeval | IN, 1 } } }, 239 { .name = "chflags", .ret_type = 1, .nargs = 2, 240 .args = { { Name | IN, 0 }, { Hex, 1 } } }, 241 { .name = "lchflags", .ret_type = 1, .nargs = 2, 242 .args = { { Name | IN, 0 }, { Hex, 1 } } }, 243 { .name = "pathconf", .ret_type = 1, .nargs = 2, 244 .args = { { Name | IN, 0 }, { Pathconf, 1 } } }, 245 { .name = "pipe", .ret_type = 1, .nargs = 1, 246 .args = { { Ptr, 0 } } }, 247 { .name = "truncate", .ret_type = 1, .nargs = 3, 248 .args = { { Name | IN, 0 }, { Int | IN, 1 }, { Quad | IN, 2 } } }, 249 { .name = "ftruncate", .ret_type = 1, .nargs = 3, 250 .args = { { Int | IN, 0 }, { Int | IN, 1 }, { Quad | IN, 2 } } }, 251 { .name = "kill", .ret_type = 1, .nargs = 2, 252 .args = { { Int | IN, 0 }, { Signal | IN, 1 } } }, 253 { .name = "munmap", .ret_type = 1, .nargs = 2, 254 .args = { { Ptr, 0 }, { Int, 1 } } }, 255 { .name = "read", .ret_type = 1, .nargs = 3, 256 .args = { { Int, 0 }, { BinString | OUT, 1 }, { Int, 2 } } }, 257 { .name = "rename", .ret_type = 1, .nargs = 2, 258 .args = { { Name , 0 } , { Name, 1 } } }, 259 { .name = "symlink", .ret_type = 1, .nargs = 2, 260 .args = { { Name , 0 } , { Name, 1 } } }, 261 { .name = "posix_openpt", .ret_type = 1, .nargs = 1, 262 .args = { { Open, 0 } } }, 263 { .name = 0 }, 264 }; 265 266 /* Xlat idea taken from strace */ 267 struct xlat { 268 int val; 269 const char *str; 270 }; 271 272 #define X(a) { a, #a }, 273 #define XEND { 0, NULL } 274 275 static struct xlat kevent_filters[] = { 276 X(EVFILT_READ) X(EVFILT_WRITE) X(EVFILT_AIO) X(EVFILT_VNODE) 277 X(EVFILT_PROC) X(EVFILT_SIGNAL) X(EVFILT_TIMER) 278 X(EVFILT_FS) X(EVFILT_READ) XEND 279 }; 280 281 static struct xlat kevent_flags[] = { 282 X(EV_ADD) X(EV_DELETE) X(EV_ENABLE) X(EV_DISABLE) X(EV_ONESHOT) 283 X(EV_CLEAR) X(EV_FLAG1) X(EV_ERROR) X(EV_EOF) XEND 284 }; 285 286 static struct xlat poll_flags[] = { 287 X(POLLSTANDARD) X(POLLIN) X(POLLPRI) X(POLLOUT) X(POLLERR) 288 X(POLLHUP) X(POLLNVAL) X(POLLRDNORM) X(POLLRDBAND) 289 X(POLLWRBAND) X(POLLINIGNEOF) XEND 290 }; 291 292 static struct xlat mmap_flags[] = { 293 X(MAP_SHARED) X(MAP_PRIVATE) X(MAP_FIXED) X(MAP_RENAME) 294 X(MAP_NORESERVE) X(MAP_RESERVED0080) X(MAP_RESERVED0100) 295 X(MAP_HASSEMAPHORE) X(MAP_STACK) X(MAP_NOSYNC) X(MAP_ANON) 296 X(MAP_NOCORE) XEND 297 }; 298 299 static struct xlat mprot_flags[] = { 300 X(PROT_NONE) X(PROT_READ) X(PROT_WRITE) X(PROT_EXEC) XEND 301 }; 302 303 static struct xlat whence_arg[] = { 304 X(SEEK_SET) X(SEEK_CUR) X(SEEK_END) XEND 305 }; 306 307 static struct xlat sigaction_flags[] = { 308 X(SA_ONSTACK) X(SA_RESTART) X(SA_RESETHAND) X(SA_NOCLDSTOP) 309 X(SA_NODEFER) X(SA_NOCLDWAIT) X(SA_SIGINFO) XEND 310 }; 311 312 static struct xlat fcntl_arg[] = { 313 X(F_DUPFD) X(F_GETFD) X(F_SETFD) X(F_GETFL) X(F_SETFL) 314 X(F_GETOWN) X(F_SETOWN) X(F_GETLK) X(F_SETLK) X(F_SETLKW) XEND 315 }; 316 317 static struct xlat fcntlfd_arg[] = { 318 X(FD_CLOEXEC) XEND 319 }; 320 321 static struct xlat fcntlfl_arg[] = { 322 X(O_APPEND) X(O_ASYNC) X(O_FSYNC) X(O_NONBLOCK) X(O_NOFOLLOW) 323 X(O_DIRECT) XEND 324 }; 325 326 static struct xlat sockdomain_arg[] = { 327 X(PF_UNSPEC) X(PF_LOCAL) X(PF_UNIX) X(PF_INET) X(PF_IMPLINK) 328 X(PF_PUP) X(PF_CHAOS) X(PF_NETBIOS) X(PF_ISO) X(PF_OSI) 329 X(PF_ECMA) X(PF_DATAKIT) X(PF_CCITT) X(PF_SNA) X(PF_DECnet) 330 X(PF_DLI) X(PF_LAT) X(PF_HYLINK) X(PF_APPLETALK) X(PF_ROUTE) 331 X(PF_LINK) X(PF_XTP) X(PF_COIP) X(PF_CNT) X(PF_SIP) X(PF_IPX) 332 X(PF_RTIP) X(PF_PIP) X(PF_ISDN) X(PF_KEY) X(PF_INET6) 333 X(PF_NATM) X(PF_ATM) X(PF_NETGRAPH) X(PF_SLOW) X(PF_SCLUSTER) 334 X(PF_ARP) X(PF_BLUETOOTH) XEND 335 }; 336 337 static struct xlat socktype_arg[] = { 338 X(SOCK_STREAM) X(SOCK_DGRAM) X(SOCK_RAW) X(SOCK_RDM) 339 X(SOCK_SEQPACKET) XEND 340 }; 341 342 static struct xlat open_flags[] = { 343 X(O_RDONLY) X(O_WRONLY) X(O_RDWR) X(O_ACCMODE) X(O_NONBLOCK) 344 X(O_APPEND) X(O_SHLOCK) X(O_EXLOCK) X(O_ASYNC) X(O_FSYNC) 345 X(O_NOFOLLOW) X(O_CREAT) X(O_TRUNC) X(O_EXCL) X(O_NOCTTY) 346 X(O_DIRECT) XEND 347 }; 348 349 static struct xlat shutdown_arg[] = { 350 X(SHUT_RD) X(SHUT_WR) X(SHUT_RDWR) XEND 351 }; 352 353 static struct xlat resource_arg[] = { 354 X(RLIMIT_CPU) X(RLIMIT_FSIZE) X(RLIMIT_DATA) X(RLIMIT_STACK) 355 X(RLIMIT_CORE) X(RLIMIT_RSS) X(RLIMIT_MEMLOCK) X(RLIMIT_NPROC) 356 X(RLIMIT_NOFILE) X(RLIMIT_SBSIZE) X(RLIMIT_VMEM) XEND 357 }; 358 359 static struct xlat pathconf_arg[] = { 360 X(_PC_LINK_MAX) X(_PC_MAX_CANON) X(_PC_MAX_INPUT) 361 X(_PC_NAME_MAX) X(_PC_PATH_MAX) X(_PC_PIPE_BUF) 362 X(_PC_CHOWN_RESTRICTED) X(_PC_NO_TRUNC) X(_PC_VDISABLE) 363 X(_PC_ASYNC_IO) X(_PC_PRIO_IO) X(_PC_SYNC_IO) 364 X(_PC_ALLOC_SIZE_MIN) X(_PC_FILESIZEBITS) 365 X(_PC_REC_INCR_XFER_SIZE) X(_PC_REC_MAX_XFER_SIZE) 366 X(_PC_REC_MIN_XFER_SIZE) X(_PC_REC_XFER_ALIGN) 367 X(_PC_SYMLINK_MAX) X(_PC_ACL_EXTENDED) X(_PC_ACL_PATH_MAX) 368 X(_PC_CAP_PRESENT) X(_PC_INF_PRESENT) X(_PC_MAC_PRESENT) 369 XEND 370 }; 371 372 #undef X 373 #undef XEND 374 375 /* 376 * Searches an xlat array for a value, and returns it if found. Otherwise 377 * return a string representation. 378 */ 379 static const char * 380 lookup(struct xlat *xlat, int val, int base) 381 { 382 static char tmp[16]; 383 384 for (; xlat->str != NULL; xlat++) 385 if (xlat->val == val) 386 return (xlat->str); 387 switch (base) { 388 case 8: 389 sprintf(tmp, "0%o", val); 390 break; 391 case 16: 392 sprintf(tmp, "0x%x", val); 393 break; 394 case 10: 395 sprintf(tmp, "%u", val); 396 break; 397 default: 398 errx(1,"Unknown lookup base"); 399 break; 400 } 401 return (tmp); 402 } 403 404 static const char * 405 xlookup(struct xlat *xlat, int val) 406 { 407 408 return (lookup(xlat, val, 16)); 409 } 410 411 /* Searches an xlat array containing bitfield values. Remaining bits 412 set after removing the known ones are printed at the end: 413 IN|0x400 */ 414 static char * 415 xlookup_bits(struct xlat *xlat, int val) 416 { 417 static char str[512]; 418 int len = 0; 419 int rem = val; 420 421 for (; xlat->str != NULL; xlat++) { 422 if ((xlat->val & rem) == xlat->val) { 423 /* don't print the "all-bits-zero" string unless all 424 bits are really zero */ 425 if (xlat->val == 0 && val != 0) 426 continue; 427 len += sprintf(str + len, "%s|", xlat->str); 428 rem &= ~(xlat->val); 429 } 430 } 431 /* if we have leftover bits or didn't match anything */ 432 if (rem || len == 0) 433 len += sprintf(str + len, "0x%x", rem); 434 if (len && str[len - 1] == '|') 435 len--; 436 str[len] = 0; 437 return (str); 438 } 439 440 /* 441 * If/when the list gets big, it might be desirable to do it 442 * as a hash table or binary search. 443 */ 444 445 struct syscall * 446 get_syscall(const char *name) 447 { 448 struct syscall *sc = syscalls; 449 450 if (name == NULL) 451 return (NULL); 452 while (sc->name) { 453 if (!strcmp(name, sc->name)) 454 return (sc); 455 sc++; 456 } 457 return (NULL); 458 } 459 460 /* 461 * get_struct 462 * 463 * Copy a fixed amount of bytes from the process. 464 */ 465 466 static int 467 get_struct(int pid, void *offset, void *buf, int len) 468 { 469 struct ptrace_io_desc iorequest; 470 471 iorequest.piod_op = PIOD_READ_D; 472 iorequest.piod_offs = offset; 473 iorequest.piod_addr = buf; 474 iorequest.piod_len = len; 475 if (ptrace(PT_IO, pid, (caddr_t)&iorequest, 0) < 0) 476 return (-1); 477 return (0); 478 } 479 480 #define MAXSIZE 4096 481 #define BLOCKSIZE 1024 482 /* 483 * get_string 484 * Copy a string from the process. Note that it is 485 * expected to be a C string, but if max is set, it will 486 * only get that much. 487 */ 488 489 static char * 490 get_string(pid_t pid, void *offset, int max) 491 { 492 char *buf; 493 struct ptrace_io_desc iorequest; 494 int totalsize, size; 495 int diff = 0; 496 int i; 497 498 totalsize = size = max ? (max + 1) : BLOCKSIZE; 499 buf = malloc(totalsize); 500 if (buf == NULL) 501 return (NULL); 502 for (;;) { 503 diff = totalsize - size; 504 iorequest.piod_op = PIOD_READ_D; 505 iorequest.piod_offs = (char *)offset + diff; 506 iorequest.piod_addr = buf + diff; 507 iorequest.piod_len = size; 508 if (ptrace(PT_IO, pid, (caddr_t)&iorequest, 0) < 0) { 509 free(buf); 510 return (NULL); 511 } 512 for (i = 0 ; i < size; i++) { 513 if (buf[diff + i] == '\0') 514 return (buf); 515 } 516 if (totalsize < MAXSIZE - BLOCKSIZE && max == 0) { 517 totalsize += BLOCKSIZE; 518 buf = realloc(buf, totalsize); 519 size = BLOCKSIZE; 520 } else { 521 buf[totalsize - 1] = '\0'; 522 return (buf); 523 } 524 } 525 } 526 527 528 /* 529 * print_arg 530 * Converts a syscall argument into a string. Said string is 531 * allocated via malloc(), so needs to be free()'d. The file 532 * descriptor is for the process' memory (via /proc), and is used 533 * to get any data (where the argument is a pointer). sc is 534 * a pointer to the syscall description (see above); args is 535 * an array of all of the system call arguments. 536 */ 537 538 char * 539 print_arg(struct syscall_args *sc, unsigned long *args, long retval, struct trussinfo *trussinfo) 540 { 541 char *tmp = NULL; 542 int pid = trussinfo->pid; 543 544 switch (sc->type & ARG_MASK) { 545 case Hex: 546 asprintf(&tmp, "0x%x", (int)args[sc->offset]); 547 break; 548 case Octal: 549 asprintf(&tmp, "0%o", (int)args[sc->offset]); 550 break; 551 case Int: 552 asprintf(&tmp, "%d", (int)args[sc->offset]); 553 break; 554 case Name: { 555 /* NULL-terminated string. */ 556 char *tmp2; 557 tmp2 = get_string(pid, (void*)args[sc->offset], 0); 558 asprintf(&tmp, "\"%s\"", tmp2); 559 free(tmp2); 560 break; 561 } 562 case BinString: { 563 /* Binary block of data that might have printable characters. 564 XXX If type|OUT, assume that the length is the syscall's 565 return value. Otherwise, assume that the length of the block 566 is in the next syscall argument. */ 567 int max_string = trussinfo->strsize; 568 char tmp2[max_string+1], *tmp3; 569 int len; 570 int truncated = 0; 571 572 if (sc->type & OUT) 573 len = retval; 574 else 575 len = args[sc->offset + 1]; 576 577 /* Don't print more than max_string characters, to avoid word 578 wrap. If we have to truncate put some ... after the string. 579 */ 580 if (len > max_string) { 581 len = max_string; 582 truncated = 1; 583 } 584 if (len && get_struct(pid, (void*)args[sc->offset], &tmp2, len) != -1) { 585 tmp3 = malloc(len * 4 + 1); 586 while (len) { 587 if (strvisx(tmp3, tmp2, len, VIS_CSTYLE|VIS_TAB|VIS_NL) <= max_string) 588 break; 589 len--; 590 truncated = 1; 591 }; 592 asprintf(&tmp, "\"%s\"%s", tmp3, truncated?"...":""); 593 free(tmp3); 594 } else { 595 asprintf(&tmp, "0x%lx", args[sc->offset]); 596 } 597 break; 598 } 599 case StringArray: { 600 int num, size, i; 601 char *tmp2; 602 char *string; 603 char *strarray[100]; /* XXX This is ugly. */ 604 605 if (get_struct(pid, (void *)args[sc->offset], (void *)&strarray, 606 sizeof(strarray)) == -1) { 607 err(1, "get_struct %p", (void *)args[sc->offset]); 608 } 609 num = 0; 610 size = 0; 611 612 /* Find out how large of a buffer we'll need. */ 613 while (strarray[num] != NULL) { 614 string = get_string(pid, (void*)strarray[num], 0); 615 size += strlen(string); 616 free(string); 617 num++; 618 } 619 size += 4 + (num * 4); 620 tmp = (char *)malloc(size); 621 tmp2 = tmp; 622 623 tmp2 += sprintf(tmp2, " ["); 624 for (i = 0; i < num; i++) { 625 string = get_string(pid, (void*)strarray[i], 0); 626 tmp2 += sprintf(tmp2, " \"%s\"%c", string, (i+1 == num) ? ' ' : ','); 627 free(string); 628 } 629 tmp2 += sprintf(tmp2, "]"); 630 break; 631 } 632 #ifdef __LP64__ 633 case Quad: 634 asprintf(&tmp, "0x%lx", args[sc->offset]); 635 break; 636 #else 637 case Quad: { 638 unsigned long long ll; 639 ll = *(unsigned long long *)(args + sc->offset); 640 asprintf(&tmp, "0x%llx", ll); 641 break; 642 } 643 #endif 644 case Ptr: 645 asprintf(&tmp, "0x%lx", args[sc->offset]); 646 break; 647 case Readlinkres: { 648 char *tmp2; 649 if (retval == -1) { 650 tmp = strdup(""); 651 break; 652 } 653 tmp2 = get_string(pid, (void*)args[sc->offset], retval); 654 asprintf(&tmp, "\"%s\"", tmp2); 655 free(tmp2); 656 break; 657 } 658 case Ioctl: { 659 const char *temp = ioctlname(args[sc->offset]); 660 if (temp) { 661 tmp = strdup(temp); 662 } else { 663 unsigned long arg = args[sc->offset]; 664 asprintf(&tmp, "0x%lx { IO%s%s 0x%lx('%c'), %lu, %lu }", arg, 665 arg&IOC_OUT?"R":"", arg&IOC_IN?"W":"", 666 IOCGROUP(arg), isprint(IOCGROUP(arg))?(char)IOCGROUP(arg):'?', 667 arg & 0xFF, IOCPARM_LEN(arg)); 668 } 669 break; 670 } 671 case Umtx: { 672 struct umtx umtx; 673 if (get_struct(pid, (void *)args[sc->offset], &umtx, sizeof(umtx)) != -1) 674 asprintf(&tmp, "{ 0x%lx }", (long)umtx.u_owner); 675 else 676 asprintf(&tmp, "0x%lx", args[sc->offset]); 677 break; 678 } 679 case Timespec: { 680 struct timespec ts; 681 if (get_struct(pid, (void *)args[sc->offset], &ts, sizeof(ts)) != -1) 682 asprintf(&tmp, "{%ld.%09ld }", (long)ts.tv_sec, ts.tv_nsec); 683 else 684 asprintf(&tmp, "0x%lx", args[sc->offset]); 685 break; 686 } 687 case Timeval: { 688 struct timeval tv; 689 if (get_struct(pid, (void *)args[sc->offset], &tv, sizeof(tv)) != -1) 690 asprintf(&tmp, "{%ld.%06ld }", (long)tv.tv_sec, tv.tv_usec); 691 else 692 asprintf(&tmp, "0x%lx", args[sc->offset]); 693 break; 694 } 695 case Timeval2: { 696 struct timeval tv[2]; 697 if (get_struct(pid, (void *)args[sc->offset], &tv, sizeof(tv)) != -1) 698 asprintf(&tmp, "{%ld.%06ld, %ld.%06ld }", 699 (long)tv[0].tv_sec, tv[0].tv_usec, 700 (long)tv[1].tv_sec, tv[1].tv_usec); 701 else 702 asprintf(&tmp, "0x%lx", args[sc->offset]); 703 break; 704 } 705 case Itimerval: { 706 struct itimerval itv; 707 if (get_struct(pid, (void *)args[sc->offset], &itv, sizeof(itv)) != -1) 708 asprintf(&tmp, "{%ld.%06ld, %ld.%06ld }", 709 (long)itv.it_interval.tv_sec, 710 itv.it_interval.tv_usec, 711 (long)itv.it_value.tv_sec, 712 itv.it_value.tv_usec); 713 else 714 asprintf(&tmp, "0x%lx", args[sc->offset]); 715 break; 716 } 717 case Pollfd: { 718 /* 719 * XXX: A Pollfd argument expects the /next/ syscall argument to be 720 * the number of fds in the array. This matches the poll syscall. 721 */ 722 struct pollfd *pfd; 723 int numfds = args[sc->offset+1]; 724 int bytes = sizeof(struct pollfd) * numfds; 725 int i, tmpsize, u, used; 726 const int per_fd = 100; 727 728 if ((pfd = malloc(bytes)) == NULL) 729 err(1, "Cannot malloc %d bytes for pollfd array", bytes); 730 if (get_struct(pid, (void *)args[sc->offset], pfd, bytes) != -1) { 731 732 used = 0; 733 tmpsize = 1 + per_fd * numfds + 2; 734 if ((tmp = malloc(tmpsize)) == NULL) 735 err(1, "Cannot alloc %d bytes for poll output", tmpsize); 736 737 tmp[used++] = '{'; 738 for (i = 0; i < numfds; i++) { 739 740 u = snprintf(tmp + used, per_fd, 741 "%s%d/%s", 742 i > 0 ? " " : "", 743 pfd[i].fd, 744 xlookup_bits(poll_flags, pfd[i].events) ); 745 if (u > 0) 746 used += u < per_fd ? u : per_fd; 747 } 748 tmp[used++] = '}'; 749 tmp[used++] = '\0'; 750 } else { 751 asprintf(&tmp, "0x%lx", args[sc->offset]); 752 } 753 free(pfd); 754 break; 755 } 756 case Fd_set: { 757 /* 758 * XXX: A Fd_set argument expects the /first/ syscall argument to be 759 * the number of fds in the array. This matches the select syscall. 760 */ 761 fd_set *fds; 762 int numfds = args[0]; 763 int bytes = _howmany(numfds, _NFDBITS) * _NFDBITS; 764 int i, tmpsize, u, used; 765 const int per_fd = 20; 766 767 if ((fds = malloc(bytes)) == NULL) 768 err(1, "Cannot malloc %d bytes for fd_set array", bytes); 769 if (get_struct(pid, (void *)args[sc->offset], fds, bytes) != -1) { 770 used = 0; 771 tmpsize = 1 + numfds * per_fd + 2; 772 if ((tmp = malloc(tmpsize)) == NULL) 773 err(1, "Cannot alloc %d bytes for fd_set output", tmpsize); 774 775 tmp[used++] = '{'; 776 for (i = 0; i < numfds; i++) { 777 if (FD_ISSET(i, fds)) { 778 u = snprintf(tmp + used, per_fd, "%d ", i); 779 if (u > 0) 780 used += u < per_fd ? u : per_fd; 781 } 782 } 783 if (tmp[used-1] == ' ') 784 used--; 785 tmp[used++] = '}'; 786 tmp[used++] = '\0'; 787 } else { 788 asprintf(&tmp, "0x%lx", args[sc->offset]); 789 } 790 free(fds); 791 break; 792 } 793 case Signal: { 794 long sig; 795 796 sig = args[sc->offset]; 797 tmp = strsig(sig); 798 if (tmp == NULL) 799 asprintf(&tmp, "%ld", sig); 800 break; 801 } 802 case Sigset: { 803 long sig; 804 sigset_t ss; 805 int i, used; 806 807 sig = args[sc->offset]; 808 if (get_struct(pid, (void *)args[sc->offset], (void *)&ss, sizeof(ss)) == -1) { 809 asprintf(&tmp, "0x%lx", args[sc->offset]); 810 break; 811 } 812 tmp = malloc(sys_nsig * 8); /* 7 bytes avg per signal name */ 813 used = 0; 814 for (i = 1; i < sys_nsig; i++) { 815 if (sigismember(&ss, i)) { 816 used += sprintf(tmp + used, "%s|", strsig(i)); 817 } 818 } 819 if (used) 820 tmp[used-1] = 0; 821 else 822 strcpy(tmp, "0x0"); 823 break; 824 } 825 case Sigprocmask: { 826 switch (args[sc->offset]) { 827 #define S(a) case a: tmp = strdup(#a); break; 828 S(SIG_BLOCK); 829 S(SIG_UNBLOCK); 830 S(SIG_SETMASK); 831 #undef S 832 } 833 if (tmp == NULL) 834 asprintf(&tmp, "0x%lx", args[sc->offset]); 835 break; 836 } 837 case Fcntlflag: { 838 /* XXX output depends on the value of the previous argument */ 839 switch (args[sc->offset-1]) { 840 case F_SETFD: 841 tmp = strdup(xlookup_bits(fcntlfd_arg, args[sc->offset])); 842 break; 843 case F_SETFL: 844 tmp = strdup(xlookup_bits(fcntlfl_arg, args[sc->offset])); 845 break; 846 case F_GETFD: 847 case F_GETFL: 848 case F_GETOWN: 849 tmp = strdup(""); 850 break; 851 default: 852 asprintf(&tmp, "0x%lx", args[sc->offset]); 853 break; 854 } 855 break; 856 } 857 case Open: 858 tmp = strdup(xlookup_bits(open_flags, args[sc->offset])); 859 break; 860 case Fcntl: 861 tmp = strdup(xlookup(fcntl_arg, args[sc->offset])); 862 break; 863 case Mprot: 864 tmp = strdup(xlookup_bits(mprot_flags, args[sc->offset])); 865 break; 866 case Mmapflags: 867 tmp = strdup(xlookup_bits(mmap_flags, args[sc->offset])); 868 break; 869 case Whence: 870 tmp = strdup(xlookup(whence_arg, args[sc->offset])); 871 break; 872 case Sockdomain: 873 tmp = strdup(xlookup(sockdomain_arg, args[sc->offset])); 874 break; 875 case Socktype: 876 tmp = strdup(xlookup(socktype_arg, args[sc->offset])); 877 break; 878 case Shutdown: 879 tmp = strdup(xlookup(shutdown_arg, args[sc->offset])); 880 break; 881 case Resource: 882 tmp = strdup(xlookup(resource_arg, args[sc->offset])); 883 break; 884 case Pathconf: 885 tmp = strdup(xlookup(pathconf_arg, args[sc->offset])); 886 break; 887 case Sockaddr: { 888 struct sockaddr_storage ss; 889 char addr[64]; 890 struct sockaddr_in *lsin; 891 struct sockaddr_in6 *lsin6; 892 struct sockaddr_un *sun; 893 struct sockaddr *sa; 894 char *p; 895 u_char *q; 896 int i; 897 898 if (args[sc->offset] == 0) { 899 asprintf(&tmp, "NULL"); 900 break; 901 } 902 903 /* yuck: get ss_len */ 904 if (get_struct(pid, (void *)args[sc->offset], (void *)&ss, 905 sizeof(ss.ss_len) + sizeof(ss.ss_family)) == -1) 906 err(1, "get_struct %p", (void *)args[sc->offset]); 907 /* 908 * If ss_len is 0, then try to guess from the sockaddr type. 909 * AF_UNIX may be initialized incorrectly, so always frob 910 * it by using the "right" size. 911 */ 912 if (ss.ss_len == 0 || ss.ss_family == AF_UNIX) { 913 switch (ss.ss_family) { 914 case AF_INET: 915 ss.ss_len = sizeof(*lsin); 916 break; 917 case AF_UNIX: 918 ss.ss_len = sizeof(*sun); 919 break; 920 default: 921 /* hurrrr */ 922 break; 923 } 924 } 925 if (get_struct(pid, (void *)args[sc->offset], (void *)&ss, ss.ss_len) 926 == -1) { 927 err(2, "get_struct %p", (void *)args[sc->offset]); 928 } 929 930 switch (ss.ss_family) { 931 case AF_INET: 932 lsin = (struct sockaddr_in *)&ss; 933 inet_ntop(AF_INET, &lsin->sin_addr, addr, sizeof addr); 934 asprintf(&tmp, "{ AF_INET %s:%d }", addr, htons(lsin->sin_port)); 935 break; 936 case AF_INET6: 937 lsin6 = (struct sockaddr_in6 *)&ss; 938 inet_ntop(AF_INET6, &lsin6->sin6_addr, addr, sizeof addr); 939 asprintf(&tmp, "{ AF_INET6 [%s]:%d }", addr, htons(lsin6->sin6_port)); 940 break; 941 case AF_UNIX: 942 sun = (struct sockaddr_un *)&ss; 943 asprintf(&tmp, "{ AF_UNIX \"%s\" }", sun->sun_path); 944 break; 945 default: 946 sa = (struct sockaddr *)&ss; 947 asprintf(&tmp, "{ sa_len = %d, sa_family = %d, sa_data = {%n%*s } }", 948 (int)sa->sa_len, (int)sa->sa_family, &i, 949 6 * (int)(sa->sa_len - ((char *)&sa->sa_data - (char *)sa)), ""); 950 if (tmp != NULL) { 951 p = tmp + i; 952 for (q = (u_char *)&sa->sa_data; q < (u_char *)sa + sa->sa_len; q++) 953 p += sprintf(p, " %#02x,", *q); 954 } 955 } 956 break; 957 } 958 case Sigaction: { 959 struct sigaction sa; 960 char *hand; 961 const char *h; 962 963 if (get_struct(pid, (void *)args[sc->offset], &sa, sizeof(sa)) != -1) { 964 965 asprintf(&hand, "%p", sa.sa_handler); 966 if (sa.sa_handler == SIG_DFL) 967 h = "SIG_DFL"; 968 else if (sa.sa_handler == SIG_IGN) 969 h = "SIG_IGN"; 970 else 971 h = hand; 972 973 asprintf(&tmp, "{ %s %s ss_t }", 974 h, 975 xlookup_bits(sigaction_flags, sa.sa_flags)); 976 free(hand); 977 } else { 978 asprintf(&tmp, "0x%lx", args[sc->offset]); 979 } 980 break; 981 } 982 case Kevent: { 983 /* 984 * XXX XXX: the size of the array is determined by either the 985 * next syscall argument, or by the syscall returnvalue, 986 * depending on which argument number we are. This matches the 987 * kevent syscall, but luckily that's the only syscall that uses 988 * them. 989 */ 990 struct kevent *ke; 991 int numevents = -1; 992 int bytes = 0; 993 int i, tmpsize, u, used; 994 const int per_ke = 100; 995 996 if (sc->offset == 1) 997 numevents = args[sc->offset+1]; 998 else if (sc->offset == 3 && retval != -1) 999 numevents = retval; 1000 1001 if (numevents >= 0) 1002 bytes = sizeof(struct kevent) * numevents; 1003 if ((ke = malloc(bytes)) == NULL) 1004 err(1, "Cannot malloc %d bytes for kevent array", bytes); 1005 if (numevents >= 0 && get_struct(pid, (void *)args[sc->offset], ke, bytes) != -1) { 1006 used = 0; 1007 tmpsize = 1 + per_ke * numevents + 2; 1008 if ((tmp = malloc(tmpsize)) == NULL) 1009 err(1, "Cannot alloc %d bytes for kevent output", tmpsize); 1010 1011 tmp[used++] = '{'; 1012 for (i = 0; i < numevents; i++) { 1013 u = snprintf(tmp + used, per_ke, 1014 "%s%p,%s,%s,%d,%p,%p", 1015 i > 0 ? " " : "", 1016 (void *)ke[i].ident, 1017 xlookup(kevent_filters, ke[i].filter), 1018 xlookup_bits(kevent_flags, ke[i].flags), 1019 ke[i].fflags, 1020 (void *)ke[i].data, 1021 (void *)ke[i].udata); 1022 if (u > 0) 1023 used += u < per_ke ? u : per_ke; 1024 } 1025 tmp[used++] = '}'; 1026 tmp[used++] = '\0'; 1027 } else { 1028 asprintf(&tmp, "0x%lx", args[sc->offset]); 1029 } 1030 free(ke); 1031 break; 1032 } 1033 case Stat: { 1034 struct stat st; 1035 if (get_struct(pid, (void *)args[sc->offset], &st, sizeof(st)) != -1) { 1036 char mode[12]; 1037 strmode(st.st_mode, mode); 1038 asprintf(&tmp, "{ mode=%s,inode=%jd,size=%jd,blksize=%ld }", 1039 mode, 1040 (intmax_t)st.st_ino,(intmax_t)st.st_size,(long)st.st_blksize); 1041 } else { 1042 asprintf(&tmp, "0x%lx", args[sc->offset]); 1043 } 1044 break; 1045 } 1046 case Rusage: { 1047 struct rusage ru; 1048 if (get_struct(pid, (void *)args[sc->offset], &ru, sizeof(ru)) != -1) { 1049 asprintf(&tmp, "{ u=%ld.%06ld,s=%ld.%06ld,in=%ld,out=%ld }", 1050 (long)ru.ru_utime.tv_sec, ru.ru_utime.tv_usec, 1051 (long)ru.ru_stime.tv_sec, ru.ru_stime.tv_usec, 1052 ru.ru_inblock, ru.ru_oublock); 1053 } else { 1054 asprintf(&tmp, "0x%lx", args[sc->offset]); 1055 } 1056 break; 1057 } 1058 case Rlimit: { 1059 struct rlimit rl; 1060 if (get_struct(pid, (void *)args[sc->offset], &rl, sizeof(rl)) != -1) { 1061 asprintf(&tmp, "{ cur=%ju,max=%ju }", 1062 rl.rlim_cur, rl.rlim_max); 1063 } else { 1064 asprintf(&tmp, "0x%lx", args[sc->offset]); 1065 } 1066 break; 1067 } 1068 default: 1069 errx(1, "Invalid argument type %d\n", sc->type & ARG_MASK); 1070 } 1071 return (tmp); 1072 } 1073 1074 /* 1075 * print_syscall 1076 * Print (to outfile) the system call and its arguments. Note that 1077 * nargs is the number of arguments (not the number of words; this is 1078 * potentially confusing, I know). 1079 */ 1080 1081 void 1082 print_syscall(struct trussinfo *trussinfo, const char *name, int nargs, char **s_args) 1083 { 1084 int i; 1085 int len = 0; 1086 struct timespec timediff; 1087 1088 if (trussinfo->flags & FOLLOWFORKS) 1089 len += fprintf(trussinfo->outfile, "%5d: ", trussinfo->pid); 1090 1091 if (name != NULL && (!strcmp(name, "execve") || !strcmp(name, "exit"))) { 1092 clock_gettime(CLOCK_REALTIME, &trussinfo->after); 1093 } 1094 1095 if (trussinfo->flags & ABSOLUTETIMESTAMPS) { 1096 timespecsubt(&trussinfo->after, &trussinfo->start_time, &timediff); 1097 len += fprintf(trussinfo->outfile, "%ld.%09ld ", 1098 (long)timediff.tv_sec, timediff.tv_nsec); 1099 } 1100 1101 if (trussinfo->flags & RELATIVETIMESTAMPS) { 1102 timespecsubt(&trussinfo->after, &trussinfo->before, &timediff); 1103 len += fprintf(trussinfo->outfile, "%ld.%09ld ", 1104 (long)timediff.tv_sec, timediff.tv_nsec); 1105 } 1106 1107 len += fprintf(trussinfo->outfile, "%s(", name); 1108 1109 for (i = 0; i < nargs; i++) { 1110 if (s_args[i]) 1111 len += fprintf(trussinfo->outfile, "%s", s_args[i]); 1112 else 1113 len += fprintf(trussinfo->outfile, "<missing argument>"); 1114 len += fprintf(trussinfo->outfile, "%s", i < (nargs - 1) ? "," : ""); 1115 } 1116 len += fprintf(trussinfo->outfile, ")"); 1117 for (i = 0; i < 6 - (len / 8); i++) 1118 fprintf(trussinfo->outfile, "\t"); 1119 } 1120 1121 void 1122 print_syscall_ret(struct trussinfo *trussinfo, const char *name, int nargs, 1123 char **s_args, int errorp, long retval, struct syscall *sc) 1124 { 1125 struct timespec timediff; 1126 1127 if (trussinfo->flags & COUNTONLY) { 1128 if (!sc) 1129 return; 1130 clock_gettime(CLOCK_REALTIME, &trussinfo->after); 1131 timespecsubt(&trussinfo->after, &trussinfo->before, &timediff); 1132 timespecadd(&sc->time, &timediff, &sc->time); 1133 sc->ncalls++; 1134 if (errorp) 1135 sc->nerror++; 1136 return; 1137 } 1138 1139 print_syscall(trussinfo, name, nargs, s_args); 1140 fflush(trussinfo->outfile); 1141 if (errorp) { 1142 fprintf(trussinfo->outfile, " ERR#%ld '%s'\n", retval, strerror(retval)); 1143 } else { 1144 /* 1145 * Because pipe(2) has a special assembly glue to provide the 1146 * libc API, we have to adjust retval. 1147 */ 1148 if (name != NULL && !strcmp(name, "pipe")) 1149 retval = 0; 1150 fprintf(trussinfo->outfile, " = %ld (0x%lx)\n", retval, retval); 1151 } 1152 } 1153 1154 void 1155 print_summary(struct trussinfo *trussinfo) 1156 { 1157 struct syscall *sc; 1158 struct timespec total = {0, 0}; 1159 int ncall, nerror; 1160 1161 fprintf(trussinfo->outfile, "%-20s%15s%8s%8s\n", 1162 "syscall", "seconds", "calls", "errors"); 1163 ncall = nerror = 0; 1164 for (sc = syscalls; sc->name != NULL; sc++) 1165 if (sc->ncalls) { 1166 fprintf(trussinfo->outfile, "%-20s%5jd.%09ld%8d%8d\n", 1167 sc->name, (intmax_t)sc->time.tv_sec, 1168 sc->time.tv_nsec, sc->ncalls, sc->nerror); 1169 timespecadd(&total, &sc->time, &total); 1170 ncall += sc->ncalls; 1171 nerror += sc->nerror; 1172 } 1173 fprintf(trussinfo->outfile, "%20s%15s%8s%8s\n", 1174 "", "-------------", "-------", "-------"); 1175 fprintf(trussinfo->outfile, "%-20s%5jd.%09ld%8d%8d\n", 1176 "", (intmax_t)total.tv_sec, total.tv_nsec, ncall, nerror); 1177 } 1178