2 * Copryight 1997 Sean Eric Fagan
4 * Redistribution and use in source and binary forms, with or without
5 * modification, are permitted provided that the following conditions
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
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
33 static const char rcsid[] =
38 * This file has routines used to print out system calls and their
43 #include <sys/types.h>
44 #include <sys/ptrace.h>
45 #include <sys/socket.h>
48 #include <netinet/in.h>
49 #include <arpa/inet.h>
50 #include <sys/ioccom.h>
51 #include <machine/atomic.h>
54 #include <sys/event.h>
56 #include <sys/resource.h>
75 /* 64-bit alignment on 32-bit platforms. */
82 /* Number of slots needed for a 64-bit argument. */
90 * This should probably be in its own file, sorted alphabetically.
93 struct syscall syscalls[] = {
95 { { Int, 0 } , { Fcntl, 1 }, { Fcntlflag | OUT, 2 } } },
97 { { Name, 0 } , { Readlinkres | OUT, 1 }, { Int, 2 } } },
99 { { Int, 0 }, { Quad, 1 + QUAD_ALIGN }, { Whence, 1 + QUAD_SLOTS + QUAD_ALIGN } } },
100 { "linux_lseek", 2, 3,
101 { { Int, 0 }, { Int, 1 }, { Whence, 2 } } },
103 { { Ptr, 0 }, { Int, 1 }, { Mprot, 2 }, { Mmapflags, 3 }, { Int, 4 }, { Quad, 5 + QUAD_ALIGN } } },
105 { { Ptr, 0 }, { Int, 1 }, { Mprot, 2 } } },
107 { { Name | IN, 0 } , { Open, 1 }, { Octal, 2 } } },
109 { { Name, 0 } , { Octal, 1 } } },
110 { "linux_open", 1, 3,
111 { { Name, 0 }, { Hex, 1 }, { Octal, 2 } } },
115 { { Name, 0 }, { Name, 1 } } },
123 { { Name, 0 }, { Octal, 1 }, { Int, 3 } } },
125 { { Name, 0 }, { Octal, 1 } } },
127 { { Name, 0 }, { Int, 1 }, { Int, 2 } } },
129 { { Name, 0 }, { Name, 1 }, { Int, 2 }, { Ptr, 3 } } },
131 { { Name, 0 }, { Int, 2 } } },
133 { { Int, 0 }, { Stat | OUT , 1 } } },
135 { { Name | IN, 0 }, { Stat | OUT, 1 } } },
137 { { Name | IN, 0 }, { Stat | OUT, 1 } } },
138 { "linux_newstat", 1, 2,
139 { { Name | IN, 0 }, { Ptr | OUT, 1 } } },
140 { "linux_newfstat", 1, 2,
141 { { Int, 0 }, { Ptr | OUT, 1 } } },
143 { { Int, 0 }, { BinString | IN, 1 }, { Int, 2 } } },
145 { { Int, 0 }, { Ioctl, 1 }, { Hex, 2 } } },
146 { "break", 1, 1, { { Ptr, 0 } } },
147 { "exit", 0, 1, { { Hex, 0 } } },
148 { "access", 1, 2, { { Name | IN, 0 }, { Int, 1 } } },
150 { { Signal, 0 }, { Sigaction | IN, 1 }, { Sigaction | OUT, 2 } } },
152 { { Int, 0 }, { Sockaddr | OUT, 1 }, { Ptr | OUT, 2 } } },
154 { { Int, 0 }, { Sockaddr | IN, 1 }, { Int, 2 } } },
156 { { Int, 0 }, { Sockaddr | IN, 1 }, { Int, 2 } } },
157 { "getpeername", 1, 3,
158 { { Int, 0 }, { Sockaddr | OUT, 1 }, { Ptr | OUT, 2 } } },
159 { "getsockname", 1, 3,
160 { { Int, 0 }, { Sockaddr | OUT, 1 }, { Ptr | OUT, 2 } } },
162 { { Int, 0 }, { BinString | OUT, 1 }, { Int, 2 }, { Hex, 3 }, { Sockaddr | OUT, 4 }, { Ptr | OUT, 5 } } },
164 { { Int, 0 }, { BinString | IN, 1 }, { Int, 2 }, { Hex, 3 }, { Sockaddr | IN, 4 }, { Ptr | IN, 5 } } },
166 { { Name | IN, 0 }, { StringArray | IN, 1 }, { StringArray | IN, 2 } } },
167 { "linux_execve", 1, 3,
168 { { Name | IN, 0 }, { StringArray | IN, 1 }, { StringArray | IN, 2 } } },
169 { "kldload", 0, 1, { { Name | IN, 0 } } },
170 { "kldunload", 0, 1, { { Int, 0 } } },
171 { "kldfind", 0, 1, { { Name | IN, 0 } } },
172 { "kldnext", 0, 1, { { Int, 0 } } },
173 { "kldstat", 0, 2, { { Int, 0 }, { Ptr, 1 } } },
174 { "kldfirstmod", 0, 1, { { Int, 0 } } },
175 { "nanosleep", 0, 1, { { Timespec, 0 } } },
176 { "select", 1, 5, { { Int, 0 }, { Fd_set, 1 }, { Fd_set, 2 }, { Fd_set, 3 }, { Timeval, 4 } } },
177 { "poll", 1, 3, { { Pollfd, 0 }, { Int, 1 }, { Int, 2 } } },
178 { "gettimeofday", 1, 2, { { Timeval | OUT, 0 }, { Ptr, 1 } } },
179 { "clock_gettime", 1, 2, { { Int, 0 }, { Timespec | OUT, 1 } } },
180 { "getitimer", 1, 2, { { Int, 0 }, { Itimerval | OUT, 2 } } },
181 { "setitimer", 1, 3, { { Int, 0 }, { Itimerval, 1 } , { Itimerval | OUT, 2 } } },
182 { "kse_release", 0, 1, { { Timespec, 0 } } },
183 { "kevent", 0, 6, { { Int, 0 }, { Kevent, 1 }, { Int, 2 }, { Kevent | OUT, 3 }, { Int, 4 }, { Timespec, 5 } } },
184 { "_umtx_lock", 0, 1, { { Umtx, 0 } } },
185 { "_umtx_unlock", 0, 1, { { Umtx, 0 } } },
186 { "sigprocmask", 0, 3, { { Sigprocmask, 0 }, { Sigset, 1 }, { Sigset | OUT, 2 } } },
187 { "unmount", 1, 2, { { Name, 0 }, { Int, 1 } } },
188 { "socket", 1, 3, { { Sockdomain, 0 }, { Socktype, 1 }, { Int, 2 } } },
189 { "getrusage", 1, 2, { { Int, 0 }, { Rusage | OUT, 1 } } },
190 { "__getcwd", 1, 2, { { Name | OUT, 0 }, { Int, 1 } } },
191 { "shutdown", 1, 2, { { Int, 0 }, { Shutdown, 1 } } },
192 { "getrlimit", 1, 2, { { Resource, 0 }, { Rlimit | OUT, 1 } } },
193 { "setrlimit", 1, 2, { { Resource, 0 }, { Rlimit | IN, 1 } } },
195 { { Name | IN, 0 }, { Timeval2 | IN, 1 } } },
197 { { Name | IN, 0 }, { Timeval2 | IN, 1 } } },
199 { { Int, 0 }, { Timeval | IN, 1 } } },
201 { { Name | IN, 0 }, { Hex, 1 } } },
203 { { Name | IN, 0 }, { Hex, 1 } } },
205 { { Name | IN, 0 }, { Pathconf, 1 } } },
207 { { Name | IN, 0 }, { Int | IN, 1 }, { Quad | IN, 2 } } },
209 { { Int | IN, 0 }, { Int | IN, 1 }, { Quad | IN, 2 } } },
211 { { Int | IN, 0 }, { Signal | IN, 1 } } },
213 { { Ptr, 0 }, { Int, 1 } } },
215 { { Int, 0 }, { BinString | OUT, 1 }, { Int, 2 } } },
217 { { Name , 0 } , { Name, 1 } } },
219 { { Name , 0 } , { Name, 1 } } },
220 { 0, 0, 0, { { 0, 0 } } },
223 /* Xlat idea taken from strace */
229 #define X(a) { a, #a },
230 #define XEND { 0, NULL }
232 static struct xlat kevent_filters[] = {
233 X(EVFILT_READ) X(EVFILT_WRITE) X(EVFILT_AIO) X(EVFILT_VNODE)
234 X(EVFILT_PROC) X(EVFILT_SIGNAL) X(EVFILT_TIMER)
235 X(EVFILT_NETDEV) X(EVFILT_FS) X(EVFILT_READ) XEND
238 static struct xlat kevent_flags[] = {
239 X(EV_ADD) X(EV_DELETE) X(EV_ENABLE) X(EV_DISABLE) X(EV_ONESHOT)
240 X(EV_CLEAR) X(EV_FLAG1) X(EV_ERROR) X(EV_EOF) XEND
243 struct xlat poll_flags[] = {
244 X(POLLSTANDARD) X(POLLIN) X(POLLPRI) X(POLLOUT) X(POLLERR)
245 X(POLLHUP) X(POLLNVAL) X(POLLRDNORM) X(POLLRDBAND)
246 X(POLLWRBAND) X(POLLINIGNEOF) XEND
249 static struct xlat mmap_flags[] = {
250 X(MAP_SHARED) X(MAP_PRIVATE) X(MAP_FIXED) X(MAP_RENAME)
251 X(MAP_NORESERVE) X(MAP_RESERVED0080) X(MAP_RESERVED0100)
252 X(MAP_HASSEMAPHORE) X(MAP_STACK) X(MAP_NOSYNC) X(MAP_ANON)
256 static struct xlat mprot_flags[] = {
257 X(PROT_NONE) X(PROT_READ) X(PROT_WRITE) X(PROT_EXEC) XEND
260 static struct xlat whence_arg[] = {
261 X(SEEK_SET) X(SEEK_CUR) X(SEEK_END) XEND
264 static struct xlat sigaction_flags[] = {
265 X(SA_ONSTACK) X(SA_RESTART) X(SA_RESETHAND) X(SA_NOCLDSTOP)
266 X(SA_NODEFER) X(SA_NOCLDWAIT) X(SA_SIGINFO) XEND
269 static struct xlat fcntl_arg[] = {
270 X(F_DUPFD) X(F_GETFD) X(F_SETFD) X(F_GETFL) X(F_SETFL)
271 X(F_GETOWN) X(F_SETOWN) X(F_GETLK) X(F_SETLK) X(F_SETLKW) XEND
274 static struct xlat fcntlfd_arg[] = {
278 static struct xlat fcntlfl_arg[] = {
279 X(O_APPEND) X(O_ASYNC) X(O_FSYNC) X(O_NONBLOCK) X(O_NOFOLLOW)
283 static struct xlat sockdomain_arg[] = {
284 X(PF_UNSPEC) X(PF_LOCAL) X(PF_UNIX) X(PF_INET) X(PF_IMPLINK)
285 X(PF_PUP) X(PF_CHAOS) X(PF_NETBIOS) X(PF_ISO) X(PF_OSI)
286 X(PF_ECMA) X(PF_DATAKIT) X(PF_CCITT) X(PF_SNA) X(PF_DECnet)
287 X(PF_DLI) X(PF_LAT) X(PF_HYLINK) X(PF_APPLETALK) X(PF_ROUTE)
288 X(PF_LINK) X(PF_XTP) X(PF_COIP) X(PF_CNT) X(PF_SIP) X(PF_IPX)
289 X(PF_RTIP) X(PF_PIP) X(PF_ISDN) X(PF_KEY) X(PF_INET6)
290 X(PF_NATM) X(PF_ATM) X(PF_NETGRAPH) X(PF_SLOW) X(PF_SCLUSTER)
291 X(PF_ARP) X(PF_BLUETOOTH) XEND
294 static struct xlat socktype_arg[] = {
295 X(SOCK_STREAM) X(SOCK_DGRAM) X(SOCK_RAW) X(SOCK_RDM)
296 X(SOCK_SEQPACKET) XEND
299 static struct xlat open_flags[] = {
300 X(O_RDONLY) X(O_WRONLY) X(O_RDWR) X(O_ACCMODE) X(O_NONBLOCK)
301 X(O_APPEND) X(O_SHLOCK) X(O_EXLOCK) X(O_ASYNC) X(O_FSYNC)
302 X(O_NOFOLLOW) X(O_CREAT) X(O_TRUNC) X(O_EXCL) X(O_NOCTTY)
306 static struct xlat shutdown_arg[] = {
307 X(SHUT_RD) X(SHUT_WR) X(SHUT_RDWR) XEND
310 static struct xlat resource_arg[] = {
311 X(RLIMIT_CPU) X(RLIMIT_FSIZE) X(RLIMIT_DATA) X(RLIMIT_STACK)
312 X(RLIMIT_CORE) X(RLIMIT_RSS) X(RLIMIT_MEMLOCK) X(RLIMIT_NPROC)
313 X(RLIMIT_NOFILE) X(RLIMIT_SBSIZE) X(RLIMIT_VMEM) XEND
316 static struct xlat pathconf_arg[] = {
317 X(_PC_LINK_MAX) X(_PC_MAX_CANON) X(_PC_MAX_INPUT)
318 X(_PC_NAME_MAX) X(_PC_PATH_MAX) X(_PC_PIPE_BUF)
319 X(_PC_CHOWN_RESTRICTED) X(_PC_NO_TRUNC) X(_PC_VDISABLE)
320 X(_PC_ASYNC_IO) X(_PC_PRIO_IO) X(_PC_SYNC_IO)
321 X(_PC_ALLOC_SIZE_MIN) X(_PC_FILESIZEBITS)
322 X(_PC_REC_INCR_XFER_SIZE) X(_PC_REC_MAX_XFER_SIZE)
323 X(_PC_REC_MIN_XFER_SIZE) X(_PC_REC_XFER_ALIGN)
324 X(_PC_SYMLINK_MAX) X(_PC_ACL_EXTENDED) X(_PC_ACL_PATH_MAX)
325 X(_PC_CAP_PRESENT) X(_PC_INF_PRESENT) X(_PC_MAC_PRESENT)
333 * Searches an xlat array for a value, and returns it if found. Otherwise
334 * return a string representation.
337 lookup(struct xlat *xlat, int val, int base)
341 for (; xlat->str != NULL; xlat++)
342 if (xlat->val == val)
346 sprintf(tmp, "0%o", val);
349 sprintf(tmp, "0x%x", val);
352 sprintf(tmp, "%u", val);
355 errx(1,"Unknown lookup base");
362 xlookup(struct xlat *xlat, int val)
365 return (lookup(xlat, val, 16));
368 /* Searches an xlat array containing bitfield values. Remaining bits
369 set after removing the known ones are printed at the end:
372 xlookup_bits(struct xlat *xlat, int val)
374 static char str[512];
378 for (; xlat->str != NULL; xlat++) {
379 if ((xlat->val & rem) == xlat->val) {
380 /* don't print the "all-bits-zero" string unless all
381 bits are really zero */
382 if (xlat->val == 0 && val != 0)
384 len += sprintf(str + len, "%s|", xlat->str);
388 /* if we have leftover bits or didn't match anything */
390 len += sprintf(str + len, "0x%x", rem);
391 if (len && str[len - 1] == '|')
398 * If/when the list gets big, it might be desirable to do it
399 * as a hash table or binary search.
403 get_syscall(const char *name)
405 struct syscall *sc = syscalls;
410 if (!strcmp(name, sc->name))
420 * Copy a fixed amount of bytes from the process.
424 get_struct(int pid, void *offset, void *buf, int len)
426 struct ptrace_io_desc iorequest;
428 iorequest.piod_op = PIOD_READ_D;
429 iorequest.piod_offs = offset;
430 iorequest.piod_addr = buf;
431 iorequest.piod_len = len;
432 if (ptrace(PT_IO, pid, (caddr_t)&iorequest, 0) < 0)
438 #define BLOCKSIZE 1024
441 * Copy a string from the process. Note that it is
442 * expected to be a C string, but if max is set, it will
443 * only get that much.
447 get_string(pid_t pid, void *offset, int max)
450 struct ptrace_io_desc iorequest;
455 totalsize = size = max ? (max + 1) : BLOCKSIZE;
456 buf = malloc(totalsize);
460 diff = totalsize - size;
461 iorequest.piod_op = PIOD_READ_D;
462 iorequest.piod_offs = (char *)offset + diff;
463 iorequest.piod_addr = buf + diff;
464 iorequest.piod_len = size;
465 if (ptrace(PT_IO, pid, (caddr_t)&iorequest, 0) < 0) {
469 for (i = 0 ; i < size; i++) {
470 if (buf[diff + i] == '\0')
473 if (totalsize < MAXSIZE - BLOCKSIZE && max == 0) {
474 totalsize += BLOCKSIZE;
475 buf = realloc(buf, totalsize);
478 buf[totalsize] = '\0';
487 * Converts a syscall argument into a string. Said string is
488 * allocated via malloc(), so needs to be free()'d. The file
489 * descriptor is for the process' memory (via /proc), and is used
490 * to get any data (where the argument is a pointer). sc is
491 * a pointer to the syscall description (see above); args is
492 * an array of all of the system call arguments.
496 print_arg(struct syscall_args *sc, unsigned long *args, long retval, struct trussinfo *trussinfo)
499 int pid = trussinfo->pid;
501 switch (sc->type & ARG_MASK) {
503 asprintf(&tmp, "0x%x", (int)args[sc->offset]);
506 asprintf(&tmp, "0%o", (int)args[sc->offset]);
509 asprintf(&tmp, "%d", (int)args[sc->offset]);
512 /* NULL-terminated string. */
514 tmp2 = get_string(pid, (void*)args[sc->offset], 0);
515 asprintf(&tmp, "\"%s\"", tmp2);
520 /* Binary block of data that might have printable characters.
521 XXX If type|OUT, assume that the length is the syscall's
522 return value. Otherwise, assume that the length of the block
523 is in the next syscall argument. */
524 int max_string = trussinfo->strsize;
525 char tmp2[max_string+1], *tmp3;
532 len = args[sc->offset + 1];
534 /* Don't print more than max_string characters, to avoid word
535 wrap. If we have to truncate put some ... after the string.
537 if (len > max_string) {
541 if (len && get_struct(pid, (void*)args[sc->offset], &tmp2, len) != -1) {
542 tmp3 = malloc(len * 4 + 1);
544 if (strvisx(tmp3, tmp2, len, VIS_CSTYLE|VIS_TAB|VIS_NL) <= max_string)
549 asprintf(&tmp, "\"%s\"%s", tmp3, truncated?"...":"");
552 asprintf(&tmp, "0x%lx", args[sc->offset]);
560 char *strarray[100]; /* XXX This is ugly. */
562 if (get_struct(pid, (void *)args[sc->offset], (void *)&strarray,
563 sizeof(strarray)) == -1) {
564 err(1, "get_struct %p", (void *)args[sc->offset]);
569 /* Find out how large of a buffer we'll need. */
570 while (strarray[num] != NULL) {
571 string = get_string(pid, (void*)strarray[num], 0);
572 size += strlen(string);
576 size += 4 + (num * 4);
577 tmp = (char *)malloc(size);
580 tmp2 += sprintf(tmp2, " [");
581 for (i = 0; i < num; i++) {
582 string = get_string(pid, (void*)strarray[i], 0);
583 tmp2 += sprintf(tmp2, " \"%s\"%c", string, (i+1 == num) ? ' ' : ',');
586 tmp2 += sprintf(tmp2, "]");
591 asprintf(&tmp, "0x%lx", args[sc->offset]);
595 unsigned long long ll;
596 ll = *(unsigned long long *)(args + sc->offset);
597 asprintf(&tmp, "0x%llx", ll);
602 asprintf(&tmp, "0x%lx", args[sc->offset]);
610 tmp2 = get_string(pid, (void*)args[sc->offset], retval);
611 asprintf(&tmp, "\"%s\"", tmp2);
616 const char *temp = ioctlname(args[sc->offset]);
620 unsigned long arg = args[sc->offset];
621 asprintf(&tmp, "0x%lx { IO%s%s 0x%lx('%c'), %lu, %lu }", arg,
622 arg&IOC_OUT?"R":"", arg&IOC_IN?"W":"",
623 IOCGROUP(arg), isprint(IOCGROUP(arg))?(char)IOCGROUP(arg):'?',
624 arg & 0xFF, IOCPARM_LEN(arg));
630 if (get_struct(pid, (void *)args[sc->offset], &umtx, sizeof(umtx)) != -1)
631 asprintf(&tmp, "{ 0x%lx }", (long)umtx.u_owner);
633 asprintf(&tmp, "0x%lx", args[sc->offset]);
638 if (get_struct(pid, (void *)args[sc->offset], &ts, sizeof(ts)) != -1)
639 asprintf(&tmp, "{%ld.%09ld }", (long)ts.tv_sec, ts.tv_nsec);
641 asprintf(&tmp, "0x%lx", args[sc->offset]);
646 if (get_struct(pid, (void *)args[sc->offset], &tv, sizeof(tv)) != -1)
647 asprintf(&tmp, "{%ld.%06ld }", (long)tv.tv_sec, tv.tv_usec);
649 asprintf(&tmp, "0x%lx", args[sc->offset]);
653 struct timeval tv[2];
654 if (get_struct(pid, (void *)args[sc->offset], &tv, sizeof(tv)) != -1)
655 asprintf(&tmp, "{%ld.%06ld, %ld.%06ld }",
656 (long)tv[0].tv_sec, tv[0].tv_usec,
657 (long)tv[1].tv_sec, tv[1].tv_usec);
659 asprintf(&tmp, "0x%lx", args[sc->offset]);
663 struct itimerval itv;
664 if (get_struct(pid, (void *)args[sc->offset], &itv, sizeof(itv)) != -1)
665 asprintf(&tmp, "{%ld.%06ld, %ld.%06ld }",
666 (long)itv.it_interval.tv_sec,
667 itv.it_interval.tv_usec,
668 (long)itv.it_value.tv_sec,
669 itv.it_value.tv_usec);
671 asprintf(&tmp, "0x%lx", args[sc->offset]);
676 * XXX: A Pollfd argument expects the /next/ syscall argument to be
677 * the number of fds in the array. This matches the poll syscall.
680 int numfds = args[sc->offset+1];
681 int bytes = sizeof(struct pollfd) * numfds;
682 int i, tmpsize, u, used;
683 const int per_fd = 100;
685 if ((pfd = malloc(bytes)) == NULL)
686 err(1, "Cannot malloc %d bytes for pollfd array", bytes);
687 if (get_struct(pid, (void *)args[sc->offset], pfd, bytes) != -1) {
690 tmpsize = 1 + per_fd * numfds + 2;
691 if ((tmp = malloc(tmpsize)) == NULL)
692 err(1, "Cannot alloc %d bytes for poll output", tmpsize);
695 for (i = 0; i < numfds; i++) {
697 u = snprintf(tmp + used, per_fd,
701 xlookup_bits(poll_flags, pfd[i].events) );
703 used += u < per_fd ? u : per_fd;
708 asprintf(&tmp, "0x%lx", args[sc->offset]);
715 * XXX: A Fd_set argument expects the /first/ syscall argument to be
716 * the number of fds in the array. This matches the select syscall.
719 int numfds = args[0];
720 int bytes = _howmany(numfds, _NFDBITS) * _NFDBITS;
721 int i, tmpsize, u, used;
722 const int per_fd = 20;
724 if ((fds = malloc(bytes)) == NULL)
725 err(1, "Cannot malloc %d bytes for fd_set array", bytes);
726 if (get_struct(pid, (void *)args[sc->offset], fds, bytes) != -1) {
728 tmpsize = 1 + numfds * per_fd + 2;
729 if ((tmp = malloc(tmpsize)) == NULL)
730 err(1, "Cannot alloc %d bytes for fd_set output", tmpsize);
733 for (i = 0; i < numfds; i++) {
734 if (FD_ISSET(i, fds)) {
735 u = snprintf(tmp + used, per_fd, "%d ", i);
737 used += u < per_fd ? u : per_fd;
740 if (tmp[used-1] == ' ')
745 asprintf(&tmp, "0x%lx", args[sc->offset]);
753 sig = args[sc->offset];
756 asprintf(&tmp, "%ld", sig);
764 sig = args[sc->offset];
765 if (get_struct(pid, (void *)args[sc->offset], (void *)&ss, sizeof(ss)) == -1) {
766 asprintf(&tmp, "0x%lx", args[sc->offset]);
769 tmp = malloc(sys_nsig * 8); /* 7 bytes avg per signal name */
771 for (i = 1; i < sys_nsig; i++) {
772 if (sigismember(&ss, i)) {
773 used += sprintf(tmp + used, "%s|", strsig(i));
783 switch (args[sc->offset]) {
784 #define S(a) case a: tmp = strdup(#a); break;
791 asprintf(&tmp, "0x%lx", args[sc->offset]);
795 /* XXX output depends on the value of the previous argument */
796 switch (args[sc->offset-1]) {
798 tmp = strdup(xlookup_bits(fcntlfd_arg, args[sc->offset]));
801 tmp = strdup(xlookup_bits(fcntlfl_arg, args[sc->offset]));
809 asprintf(&tmp, "0x%lx", args[sc->offset]);
815 tmp = strdup(xlookup_bits(open_flags, args[sc->offset]));
818 tmp = strdup(xlookup(fcntl_arg, args[sc->offset]));
821 tmp = strdup(xlookup_bits(mprot_flags, args[sc->offset]));
824 tmp = strdup(xlookup_bits(mmap_flags, args[sc->offset]));
827 tmp = strdup(xlookup(whence_arg, args[sc->offset]));
830 tmp = strdup(xlookup(sockdomain_arg, args[sc->offset]));
833 tmp = strdup(xlookup(socktype_arg, args[sc->offset]));
836 tmp = strdup(xlookup(shutdown_arg, args[sc->offset]));
839 tmp = strdup(xlookup(resource_arg, args[sc->offset]));
842 tmp = strdup(xlookup(pathconf_arg, args[sc->offset]));
845 struct sockaddr_storage ss;
847 struct sockaddr_in *lsin;
848 struct sockaddr_in6 *lsin6;
849 struct sockaddr_un *sun;
855 if (args[sc->offset] == 0) {
856 asprintf(&tmp, "NULL");
860 /* yuck: get ss_len */
861 if (get_struct(pid, (void *)args[sc->offset], (void *)&ss,
862 sizeof(ss.ss_len) + sizeof(ss.ss_family)) == -1)
863 err(1, "get_struct %p", (void *)args[sc->offset]);
865 * If ss_len is 0, then try to guess from the sockaddr type.
866 * AF_UNIX may be initialized incorrectly, so always frob
867 * it by using the "right" size.
869 if (ss.ss_len == 0 || ss.ss_family == AF_UNIX) {
870 switch (ss.ss_family) {
872 ss.ss_len = sizeof(*lsin);
875 ss.ss_len = sizeof(*sun);
882 if (get_struct(pid, (void *)args[sc->offset], (void *)&ss, ss.ss_len)
884 err(2, "get_struct %p", (void *)args[sc->offset]);
887 switch (ss.ss_family) {
889 lsin = (struct sockaddr_in *)&ss;
890 inet_ntop(AF_INET, &lsin->sin_addr, addr, sizeof addr);
891 asprintf(&tmp, "{ AF_INET %s:%d }", addr, htons(lsin->sin_port));
894 lsin6 = (struct sockaddr_in6 *)&ss;
895 inet_ntop(AF_INET6, &lsin6->sin6_addr, addr, sizeof addr);
896 asprintf(&tmp, "{ AF_INET6 [%s]:%d }", addr, htons(lsin6->sin6_port));
899 sun = (struct sockaddr_un *)&ss;
900 asprintf(&tmp, "{ AF_UNIX \"%s\" }", sun->sun_path);
903 sa = (struct sockaddr *)&ss;
904 asprintf(&tmp, "{ sa_len = %d, sa_family = %d, sa_data = {%n%*s } }",
905 (int)sa->sa_len, (int)sa->sa_family, &i,
906 6 * (int)(sa->sa_len - ((char *)&sa->sa_data - (char *)sa)), "");
909 for (q = (u_char *)&sa->sa_data; q < (u_char *)sa + sa->sa_len; q++)
910 p += sprintf(p, " %#02x,", *q);
920 if (get_struct(pid, (void *)args[sc->offset], &sa, sizeof(sa)) != -1) {
922 asprintf(&hand, "%p", sa.sa_handler);
923 if (sa.sa_handler == SIG_DFL)
925 else if (sa.sa_handler == SIG_IGN)
930 asprintf(&tmp, "{ %s %s ss_t }",
932 xlookup_bits(sigaction_flags, sa.sa_flags));
935 asprintf(&tmp, "0x%lx", args[sc->offset]);
941 * XXX XXX: the size of the array is determined by either the
942 * next syscall argument, or by the syscall returnvalue,
943 * depending on which argument number we are. This matches the
944 * kevent syscall, but luckily that's the only syscall that uses
950 int i, tmpsize, u, used;
951 const int per_ke = 100;
954 numevents = args[sc->offset+1];
955 else if (sc->offset == 3 && retval != -1)
959 bytes = sizeof(struct kevent) * numevents;
960 if ((ke = malloc(bytes)) == NULL)
961 err(1, "Cannot malloc %d bytes for kevent array", bytes);
962 if (numevents >= 0 && get_struct(pid, (void *)args[sc->offset], ke, bytes) != -1) {
964 tmpsize = 1 + per_ke * numevents + 2;
965 if ((tmp = malloc(tmpsize)) == NULL)
966 err(1, "Cannot alloc %d bytes for kevent output", tmpsize);
969 for (i = 0; i < numevents; i++) {
970 u = snprintf(tmp + used, per_ke,
971 "%s%p,%s,%s,%d,%p,%p",
974 xlookup(kevent_filters, ke[i].filter),
975 xlookup_bits(kevent_flags, ke[i].flags),
978 (void *)ke[i].udata);
980 used += u < per_ke ? u : per_ke;
985 asprintf(&tmp, "0x%lx", args[sc->offset]);
992 if (get_struct(pid, (void *)args[sc->offset], &st, sizeof(st)) != -1) {
994 strmode(st.st_mode, mode);
995 asprintf(&tmp, "{ mode=%s,inode=%jd,size=%jd,blksize=%ld }",
997 (intmax_t)st.st_ino,(intmax_t)st.st_size,(long)st.st_blksize);
999 asprintf(&tmp, "0x%lx", args[sc->offset]);
1005 if (get_struct(pid, (void *)args[sc->offset], &ru, sizeof(ru)) != -1) {
1006 asprintf(&tmp, "{ u=%ld.%06ld,s=%ld.%06ld,in=%ld,out=%ld }",
1007 (long)ru.ru_utime.tv_sec, ru.ru_utime.tv_usec,
1008 (long)ru.ru_stime.tv_sec, ru.ru_stime.tv_usec,
1009 ru.ru_inblock, ru.ru_oublock);
1011 asprintf(&tmp, "0x%lx", args[sc->offset]);
1017 if (get_struct(pid, (void *)args[sc->offset], &rl, sizeof(rl)) != -1) {
1018 asprintf(&tmp, "{ cur=%ju,max=%ju }",
1019 rl.rlim_cur, rl.rlim_max);
1021 asprintf(&tmp, "0x%lx", args[sc->offset]);
1026 errx(1, "Invalid argument type %d\n", sc->type & ARG_MASK);
1033 * Print (to outfile) the system call and its arguments. Note that
1034 * nargs is the number of arguments (not the number of words; this is
1035 * potentially confusing, I know).
1039 print_syscall(struct trussinfo *trussinfo, const char *name, int nargs, char **s_args)
1043 struct timespec timediff;
1045 if (trussinfo->flags & FOLLOWFORKS)
1046 len += fprintf(trussinfo->outfile, "%5d: ", trussinfo->pid);
1048 if (name != NULL && (!strcmp(name, "execve") || !strcmp(name, "exit"))) {
1049 clock_gettime(CLOCK_REALTIME, &trussinfo->after);
1052 if (trussinfo->flags & ABSOLUTETIMESTAMPS) {
1053 timespecsubt(&trussinfo->after, &trussinfo->start_time, &timediff);
1054 len += fprintf(trussinfo->outfile, "%ld.%09ld ",
1055 (long)timediff.tv_sec, timediff.tv_nsec);
1058 if (trussinfo->flags & RELATIVETIMESTAMPS) {
1059 timespecsubt(&trussinfo->after, &trussinfo->before, &timediff);
1060 len += fprintf(trussinfo->outfile, "%ld.%09ld ",
1061 (long)timediff.tv_sec, timediff.tv_nsec);
1064 len += fprintf(trussinfo->outfile, "%s(", name);
1066 for (i = 0; i < nargs; i++) {
1068 len += fprintf(trussinfo->outfile, "%s", s_args[i]);
1070 len += fprintf(trussinfo->outfile, "<missing argument>");
1071 len += fprintf(trussinfo->outfile, "%s", i < (nargs - 1) ? "," : "");
1073 len += fprintf(trussinfo->outfile, ")");
1074 for (i = 0; i < 6 - (len / 8); i++)
1075 fprintf(trussinfo->outfile, "\t");
1079 print_syscall_ret(struct trussinfo *trussinfo, const char *name, int nargs,
1080 char **s_args, int errorp, long retval)
1083 print_syscall(trussinfo, name, nargs, s_args);
1084 fflush(trussinfo->outfile);
1086 fprintf(trussinfo->outfile, " ERR#%ld '%s'\n", retval, strerror(retval));
1088 fprintf(trussinfo->outfile, " = %ld (0x%lx)\n", retval, retval);