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>
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright
13 * notice, this list of conditions and the following disclaimer in the
14 * documentation and/or other materials provided with the distribution.
15 * 3. The name of the author may not be used to endorse or promote products
16 * derived from this software without specific prior written permission.
18 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
19 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
20 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
21 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
22 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
23 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
24 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
25 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
26 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
27 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
40 /* configuration section */
42 #define MAX_QUALS 1024 /* maximum number of syscalls, signals, etc. */
45 #define MAX_PROCS 32 /* maximum number of processes tracable */
47 #ifndef DEFAULT_STRLEN
48 #define DEFAULT_STRLEN 32 /* default maximum # of bytes printed in
49 `printstr', change with `-s' switch */
51 #ifndef DEFAULT_ACOLUMN
52 #define DEFAULT_ACOLUMN 40 /* default alignment column for results */
55 #define MAX_ARGS 32 /* maximum number of args to a syscall */
57 #ifndef DEFAULT_SORTBY
58 #define DEFAULT_SORTBY "time" /* default sorting method for call profiling */
61 #include <sys/types.h>
72 #endif /* STDC_HEADERS */
74 #if defined(LINUX) && defined(SPARC)
76 #endif /* LINUX && SPARC */
79 #include <sys/procfs.h>
81 #if defined(LINUXSPARC) && defined(__GLIBC__)
82 #include <sys/ptrace.h>
84 /* Work around awkward prototype in ptrace.h. */
85 #define ptrace xptrace
86 #include <sys/ptrace.h>
90 #include <asm/ptrace.h>
96 #define ORIG_EAX PT_ORIG_R3
100 extern long ptrace(int, int, char *, long);
102 extern int ptrace(int, int, char *, int, ...);
104 #else /* !__STDC__ */
106 #endif /* !__STDC__ */
107 #endif /* !LINUXSPARC */
111 #if !defined(__GLIBC__)
112 #define PTRACE_PEEKUSER PTRACE_PEEKUSR
113 #define PTRACE_POKEUSER PTRACE_POKEUSR
124 #define SUPPORTED_PERSONALITIES 1
125 #define DEFAULT_PERSONALITY 0
128 #include <linux/a.out.h>
130 #undef SUPPORTED_PERSONALITIES
131 #define SUPPORTED_PERSONALITIES 2
132 #endif /* LINUXSPARC */
134 /* Trace Control Block */
136 short flags; /* See below for TCB_ values */
137 int pid; /* Process Id of this entry */
138 long scno; /* System call number */
139 int u_nargs; /* System call arguments */
140 long u_arg[MAX_ARGS]; /* System call arguments */
141 int u_error; /* Error code */
142 long u_rval; /* (first) return value */
143 FILE *outf; /* Output file for this process */
144 char *auxstr; /* Auxiliary info from syscall (see RVAL_STR) */
145 struct timeval stime; /* System time usage as of last process wait */
146 struct timeval dtime; /* Delta for system time usage */
147 struct timeval etime; /* Syscall entry time */
148 /* Support for tracing forked processes */
149 struct tcb *parent; /* Parent of this process */
150 int nchildren; /* # of traced children */
151 int waitpid; /* pid(s) this process is waiting for */
152 /* (1st arg of wait4()) */
153 long baddr; /* `Breakpoint' address */
154 long inst[2]; /* Instructions on above */
155 int pfd; /* proc file descriptor */
157 prstatus_t status; /* procfs status structure */
162 #define TCB_STARTUP 00001 /* We have just begun ptracing this process */
163 #define TCB_INUSE 00002 /* This table entry is in use */
164 #define TCB_INSYSCALL 00004 /* A system call is in progress */
165 #define TCB_ATTACHED 00010 /* Process is not our own child */
166 #define TCB_EXITING 00020 /* As far as we know, this process is exiting */
167 #define TCB_SUSPENDED 00040 /* Process has done a wait(4), that can
168 not be allowed to complete just now */
169 #define TCB_BPTSET 00100 /* "Breakpoint" set after fork(2) */
170 #define TCB_SIGTRAPPED 00200 /* Process wanted to block SIGTRAP */
171 #define TCB_FOLLOWFORK 00400 /* Process should have forks followed */
172 #define TCB_REPRINT 01000 /* We should reprint this syscall on exit */
174 #if defined(ALPHA) || defined(SPARC) || defined(POWERPC)
175 #define TCB_WAITEXECVE 02000 /* ignore SIGTRAP after exceve */
179 /* qualifier flags */
180 #define QUAL_TRACE 0001 /* this system call should be traced */
181 #define QUAL_ABBREV 0002 /* abbreviate the structures of this syscall */
182 #define QUAL_VERBOSE 0004 /* decode the structures of this syscall */
183 #define QUAL_RAW 0010 /* print all args in hex for this syscall */
184 #define QUAL_SIGNAL 0020 /* report events with this signal */
185 #define QUAL_FAULT 0040 /* report events with this fault */
186 #define QUAL_READ 0100 /* dump data read on this file descriptor */
187 #define QUAL_WRITE 0200 /* dump data written to this file descriptor */
189 #define entering(tcp) (!((tcp)->flags & TCB_INSYSCALL))
190 #define exiting(tcp) ((tcp)->flags & TCB_INSYSCALL)
191 #define syserror(tcp) ((tcp)->u_error != 0)
192 #define verbose(tcp) (qual_flags[(tcp)->scno] & QUAL_VERBOSE)
193 #define abbrev(tcp) (qual_flags[(tcp)->scno] & QUAL_ABBREV)
194 #define waiting_parent(tcp) \
196 (tcp->parent->flags & TCB_SUSPENDED) && \
197 (tcp->parent->waitpid <= 0 || tcp->parent->waitpid == tcp->pid))
204 /* Format of syscall return values */
205 #define RVAL_DECIMAL 000 /* decimal format */
206 #define RVAL_HEX 001 /* hex format */
207 #define RVAL_OCTAL 002 /* octal format */
208 #define RVAL_UDECIMAL 003 /* unsigned decimal format */
209 #define RVAL_MASK 007 /* mask for these values */
211 #define RVAL_STR 010 /* Print `auxstr' field after return val */
212 #define RVAL_NONE 020 /* Print nothing */
215 #define offsetof(type, member) (((char *) &(((type *) NULL)->member)) - \
216 ((char *) (type *) NULL))
217 #endif /* !offsetof */
219 /* get offset of member within a user struct */
220 #define uoff(member) offsetof(struct user, member)
222 #define TRACE_FILE 001 /* Trace file-related syscalls. */
223 #define TRACE_IPC 002 /* Trace IPC-related syscalls. */
224 #define TRACE_NETWORK 004 /* Trace network-related syscalls. */
225 #define TRACE_PROCESS 010 /* Trace process-related syscalls. */
226 #define TRACE_SIGNAL 020 /* Trace signal-related syscalls. */
228 extern struct tcb tcbtab[];
229 extern int qual_flags[];
230 extern int debug, followfork, followvfork;
231 extern int rflag, tflag, dtime, cflag, xflag, qflag;
233 extern char *outfname;
235 extern int max_strlen;
236 extern struct tcb *tcp_last;
244 extern int set_personality P((int personality));
245 extern char *xlookup P((struct xlat *, int));
246 extern struct tcb *alloctcb P((int));
247 extern void droptcb P((struct tcb *));
249 extern void set_sortby P((char *));
250 extern void set_overhead P((int));
251 extern void qualify P((char *));
252 extern void newoutf P((struct tcb *));
253 extern int trace_syscall P((struct tcb *));
254 extern void printxval P((struct xlat *, int, char *));
255 extern int printargs P((struct tcb *));
256 extern int addflags P((struct xlat *, int));
257 extern int printflags P((struct xlat *, int));
258 extern int umoven P((struct tcb *, long, int, char *));
259 extern int umovestr P((struct tcb *, long, int, char *));
260 extern int upeek P((int, long, long *));
261 extern void dumpstr P((struct tcb *, long, int));
262 extern void string_quote P((char *str));
263 extern void printstr P((struct tcb *, long, int));
264 extern void printnum P((struct tcb *, long, char *));
265 extern void printpath P((struct tcb *, long));
266 extern void printpathn P((struct tcb *, long, int));
267 extern void printtv P((struct tcb *, long));
268 extern void printsock P((struct tcb *, long));
269 extern void printrusage P((struct tcb *, long));
270 extern int clearbpt P((struct tcb *));
271 extern int setbpt P((struct tcb *));
272 extern int sigishandled P((struct tcb *, int));
273 extern void printcall P((struct tcb *));
274 extern char *signame P((int));
275 extern void printsignal P((int));
276 extern void printleader P((struct tcb *));
277 extern void printtrailer P((struct tcb *));
278 extern void tabto P((int));
279 extern void call_summary P((FILE *));
280 extern void fake_execve P((struct tcb *, char *, char *[], char *[]));
282 extern int internal_fork P((struct tcb *));
283 extern int internal_exec P((struct tcb *));
284 extern int internal_wait P((struct tcb *));
285 extern int internal_exit P((struct tcb *));
287 extern char *ioctl_lookup P((long));
288 extern int ioctl_decode P((struct tcb *, long, long));
289 extern int term_ioctl P((struct tcb *, long, long));
290 extern int sock_ioctl P((struct tcb *, long, long));
291 extern int proc_ioctl P((struct tcb *, int, int));
292 extern int stream_ioctl P((struct tcb *, int, int));
294 extern void tv_tv P((struct timeval *, int, int));
295 extern int tv_nz P((struct timeval *));
296 extern int tv_cmp P((struct timeval *, struct timeval *));
297 extern double tv_float P((struct timeval *));
298 extern void tv_add P((struct timeval *, struct timeval *, struct timeval *));
299 extern void tv_sub P((struct timeval *, struct timeval *, struct timeval *));
300 extern void tv_mul P((struct timeval *, struct timeval *, int));
301 extern void tv_div P((struct timeval *, struct timeval *, int));
304 extern int fixvfork P((struct tcb *));
306 #if !(defined(LINUX) && !defined(SPARC))
307 extern long getrval2 P((struct tcb *));
310 extern int proc_open P((struct tcb *tcp, int attaching));
313 #define umove(pid, addr, objp) \
314 umoven((pid), (addr), sizeof *(objp), (char *) (objp))
318 extern void tprintf(const char *fmt, ...)
319 __attribute__ ((format (printf, 1, 2)));
321 extern void tprintf(const char *fmt, ...);
324 extern void tprintf();
327 #ifndef HAVE_STRERROR
328 const char *strerror P((int));
330 #ifndef HAVE_STRSIGNAL
331 const char *strsignal P((int));
334 extern int current_personality;
343 extern struct sysent *sysent;
344 extern int nsyscalls;
346 extern char **errnoent;
355 extern struct ioctlent *ioctlent;
356 extern int nioctlent;
358 extern char **signalent;
361 extern struct ioctlent *ioctlent;
362 extern int nioctlents;
363 extern char **signalent;
366 extern struct ioctlent ioctlent0[];
367 extern int nioctlents0;
368 extern char *signalent0[];
369 extern int nsignals0;
371 #if SUPPORTED_PERSONALITIES >= 2
372 extern struct ioctlent ioctlent1[];
373 extern int nioctlents1;
374 extern char *signalent1[];
375 extern int nsignals1;
376 #endif /* SUPPORTED_PERSONALITIES >= 2 */
378 #if SUPPORTED_PERSONALITIES >= 3
379 extern struct ioctlent ioctlent2[];
380 extern int nioctlents2;
381 extern char *signalent2[];
382 extern int nsignals2;
383 #endif /* SUPPORTED_PERSONALITIES >= 3 */