granicus.if.org Git - strace/blob - defs.h

   1 /*
   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  * All rights reserved.
   6  *
   7  * Redistribution and use in source and binary forms, with or without
   8  * modification, are permitted provided that the following conditions
   9  * are met:
  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.
  17  *
  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.
  28  *
  29  *      $Id$
  30  */
  31
  32 #ifdef linux
  33 #include <features.h>
  34 #endif
  35
  36 #ifdef HAVE_CONFIG_H
  37 #include "config.h"
  38 #endif
  39
  40 /* configuration section */
  41 #ifndef MAX_QUALS
  42 #if defined(linux) && defined(MIPS)
  43 #define MAX_QUALS       4999    /* maximum number of syscalls, signals, etc. */
  44 #else
  45 #define MAX_QUALS       2048    /* maximum number of syscalls, signals, etc. */
  46 #endif
  47 #endif
  48 #ifndef MAX_PROCS
  49 #define MAX_PROCS       64      /* maximum number of processes tracable */
  50 #endif
  51 #ifndef DEFAULT_STRLEN
  52 #define DEFAULT_STRLEN  32      /* default maximum # of bytes printed in
  53                                   `printstr', change with `-s' switch */
  54 #endif
  55 #ifndef DEFAULT_ACOLUMN
  56 #define DEFAULT_ACOLUMN 40      /* default alignment column for results */
  57 #endif
  58 #ifndef MAX_ARGS
  59 #define MAX_ARGS        32      /* maximum number of args to a syscall */
  60 #endif
  61 #ifndef DEFAULT_SORTBY
  62 #define DEFAULT_SORTBY "time"   /* default sorting method for call profiling */
  63 #endif
  64
  65 #include <sys/types.h>
  66 #include <unistd.h>
  67 #include <stdlib.h>
  68 #include <stdio.h>
  69 #include <ctype.h>
  70 #include <string.h>
  71 #include <time.h>
  72 #include <sys/time.h>
  73 #include <errno.h>
  74
  75 #ifdef STDC_HEADERS
  76 #include <stddef.h>
  77 #endif /* STDC_HEADERS */
  78
  79 #if defined(LINUX)
  80 #  if defined(SPARC)
  81 #     define LINUXSPARC
  82 #  endif
  83 #  if defined(ALPHA)
  84 #     define LINUX_64BIT
  85 #  endif
  86 #endif
  87
  88 #if defined(SVR4) || defined(FREEBSD)
  89 #define USE_PROCFS
  90 #else
  91 #undef USE_PROCFS
  92 #endif
  93
  94 #ifdef FREEBSD
  95 #ifndef I386
  96 #error "FreeBSD support is only for i386 arch right now."
  97 #endif
  98 #include <machine/psl.h>
  99 #include <machine/reg.h>
 100 #include <sys/syscall.h>
 101 #endif
 102
 103 #ifdef USE_PROCFS
 104 #include <sys/procfs.h>
 105 #ifdef HAVE_MP_PROCFS
 106 #include <sys/uio.h>
 107 #endif
 108 #ifdef FREEBSD
 109 #include <sys/pioctl.h>
 110 #endif /* FREEBSD */
 111 #else /* !USE_PROCFS */
 112 #if defined(LINUXSPARC) && defined(__GLIBC__)
 113 #include <sys/ptrace.h>
 114 #else
 115 /* Work around awkward prototype in ptrace.h. */
 116 #define ptrace xptrace
 117 #include <sys/ptrace.h>
 118 #undef ptrace
 119 #ifdef POWERPC
 120 #define __KERNEL__
 121 #include <asm/ptrace.h>
 122 #undef __KERNEL__
 123 /* TEMP */
 124 #define UESP    PT_R1
 125 #define EIP     PT_NIP
 126 #define EAX     PT_R3
 127 #define ORIG_EAX PT_ORIG_R3
 128 #endif
 129 #ifdef __STDC__
 130 #ifdef LINUX
 131 extern long ptrace(int, int, char *, long);
 132 #else /* !LINUX */
 133 extern int ptrace(int, int, char *, int, ...);
 134 #endif /* !LINUX */
 135 #else /* !__STDC__ */
 136 extern int ptrace();
 137 #endif /* !__STDC__ */
 138 #endif /* !LINUXSPARC */
 139 #endif /* !SVR4 */
 140
 141 #ifdef LINUX
 142 #if !defined(__GLIBC__)
 143 #define PTRACE_PEEKUSER PTRACE_PEEKUSR
 144 #define PTRACE_POKEUSER PTRACE_POKEUSR
 145 #endif
 146 #ifdef ALPHA
 147 #  define REG_R0 0
 148 #  define REG_A0 16
 149 #  define REG_A3 19
 150 #  define REG_FP 30
 151 #  define REG_PC 64
 152 #endif /* ALPHA */
 153 #ifdef MIPS
 154 #  define REG_V0 2
 155 #  define REG_A0 4
 156 #  define REG_A3 7
 157 #  define REG_SP 29
 158 #  define REG_EPC 64
 159 #endif /* MIPS */
 160 #endif /* LINUX */
 161
 162 #define SUPPORTED_PERSONALITIES 1
 163 #define DEFAULT_PERSONALITY 0
 164
 165 #ifdef LINUXSPARC
 166 #include <linux/a.out.h>
 167 #include <asm/psr.h>
 168 #undef  SUPPORTED_PERSONALITIES
 169 #define SUPPORTED_PERSONALITIES 2
 170 #endif /* LINUXSPARC */
 171
 172
 173 #ifdef SVR4
 174 #ifdef HAVE_MP_PROCFS
 175 extern int mp_ioctl (int f, int c, void *a, int s);
 176 #define IOCTL(f,c,a)    mp_ioctl (f, c, a, sizeof *a)
 177 #define IOCTL_STATUS(t) \
 178          pread (t->pfd_stat, &t->status, sizeof t->status, 0)
 179 #define IOCTL_WSTOP(t)                                          \
 180         (IOCTL (t->pfd, PCWSTOP, (char *)NULL) < 0 ? -1 :               \
 181          IOCTL_STATUS (t))
 182 #define PR_WHY          pr_lwp.pr_why
 183 #define PR_WHAT         pr_lwp.pr_what
 184 #define PR_REG          pr_lwp.pr_context.uc_mcontext.gregs
 185 #define PR_FLAGS        pr_lwp.pr_flags
 186 #define PR_SYSCALL      pr_lwp.pr_syscall
 187 #define PIOCSTIP        PCSTOP
 188 #define PIOCSET         PCSET
 189 #define PIOCRESET       PCRESET
 190 #define PIOCSTRACE      PCSTRACE
 191 #define PIOCSFAULT      PCSFAULT
 192 #define PIOCWSTOP       PCWSTOP
 193 #define PIOCSTOP        PCSTOP
 194 #define PIOCSENTRY      PCSENTRY
 195 #define PIOCSEXIT       PCSEXIT
 196 #define PIOCRUN         PCRUN
 197 #else
 198 #define IOCTL           ioctl
 199 #define IOCTL_STATUS(t) ioctl (t->pfd, PIOCSTATUS, &t->status)
 200 #define IOCTL_WSTOP(t)  ioctl (t->pfd, PIOCWSTOP, &t->status)
 201 #define PR_WHY          pr_why
 202 #define PR_WHAT         pr_what
 203 #define PR_REG          pr_reg
 204 #define PR_FLAGS        pr_flags
 205 #define PR_SYSCALL      pr_syscall
 206 #endif
 207 #endif
 208 #ifdef FREEBSD
 209 #define IOCTL           ioctl
 210 #define IOCTL_STATUS(t) ioctl (t->pfd, PIOCSTATUS, &t->status)
 211 #define IOCTL_WSTOP(t)  ioctl (t->pfd, PIOCWAIT, &t->status)
 212 #define PIOCRUN         PIOCCONT
 213 #define PIOCWSTOP       PIOCWAIT
 214 #define PR_WHY          why
 215 #define PR_WHAT         val
 216 #define PR_FLAGS        state
 217 /* from /usr/src/sys/miscfs/procfs/procfs_vnops.c,
 218    status.state = 0 for running, 1 for stopped */
 219 #define PR_ASLEEP       1
 220 #define PR_SYSENTRY     S_SCE
 221 #define PR_SYSEXIT      S_SCX
 222 #define PR_SIGNALLED    S_SIG
 223 #define PR_FAULTED      S_CORE
 224 #endif
 225
 226 /* Trace Control Block */
 227 struct tcb {
 228         short flags;            /* See below for TCB_ values */
 229         int pid;                /* Process Id of this entry */
 230         long scno;              /* System call number */
 231         int u_nargs;            /* System call arguments */
 232         long u_arg[MAX_ARGS];   /* System call arguments */
 233         int u_error;            /* Error code */
 234         long u_rval;            /* (first) return value */
 235 #ifdef HAVE_LONG_LONG
 236         long long u_lrval;      /* long long return value */
 237 #endif
 238         FILE *outf;             /* Output file for this process */
 239         const char *auxstr;     /* Auxiliary info from syscall (see RVAL_STR) */
 240         struct timeval stime;   /* System time usage as of last process wait */
 241         struct timeval dtime;   /* Delta for system time usage */
 242         struct timeval etime;   /* Syscall entry time */
 243                                 /* Support for tracing forked processes */
 244         struct tcb *parent;     /* Parent of this process */
 245         int nchildren;          /* # of traced children */
 246         int waitpid;            /* pid(s) this process is waiting for */
 247                                 /* (1st arg of wait4()) */
 248         long baddr;             /* `Breakpoint' address */
 249         long inst[2];           /* Instructions on above */
 250         int pfd;                /* proc file descriptor */
 251 #ifdef SVR4
 252 #ifdef HAVE_MP_PROCFS
 253         int pfd_stat;
 254         int pfd_as;
 255         pstatus_t status;
 256 #else
 257         prstatus_t status;      /* procfs status structure */
 258 #endif
 259 #endif
 260 #ifdef FREEBSD
 261         struct procfs_status status;
 262         int pfd_reg;
 263         int pfd_status;
 264 #endif
 265 };
 266
 267 /* TCB flags */
 268 #define TCB_STARTUP     00001   /* We have just begun ptracing this process */
 269 #define TCB_INUSE       00002   /* This table entry is in use */
 270 #define TCB_INSYSCALL   00004   /* A system call is in progress */
 271 #define TCB_ATTACHED    00010   /* Process is not our own child */
 272 #define TCB_EXITING     00020   /* As far as we know, this process is exiting */
 273 #define TCB_SUSPENDED   00040   /* Process has done a wait(4), that can
 274                                    not be allowed to complete just now */
 275 #define TCB_BPTSET      00100   /* "Breakpoint" set after fork(2) */
 276 #define TCB_SIGTRAPPED  00200   /* Process wanted to block SIGTRAP */
 277 #define TCB_FOLLOWFORK  00400   /* Process should have forks followed */
 278 #define TCB_REPRINT     01000   /* We should reprint this syscall on exit */
 279 #ifdef LINUX
 280 #if defined(ALPHA) || defined(SPARC) || defined(POWERPC)
 281 #define TCB_WAITEXECVE  02000   /* ignore SIGTRAP after exceve */
 282 #endif /* ALPHA */
 283 #endif /* LINUX */
 284
 285 /* qualifier flags */
 286 #define QUAL_TRACE      0001    /* this system call should be traced */
 287 #define QUAL_ABBREV     0002    /* abbreviate the structures of this syscall */
 288 #define QUAL_VERBOSE    0004    /* decode the structures of this syscall */
 289 #define QUAL_RAW        0010    /* print all args in hex for this syscall */
 290 #define QUAL_SIGNAL     0020    /* report events with this signal */
 291 #define QUAL_FAULT      0040    /* report events with this fault */
 292 #define QUAL_READ       0100    /* dump data read on this file descriptor */
 293 #define QUAL_WRITE      0200    /* dump data written to this file descriptor */
 294
 295 #define entering(tcp)   (!((tcp)->flags & TCB_INSYSCALL))
 296 #define exiting(tcp)    ((tcp)->flags & TCB_INSYSCALL)
 297 #define syserror(tcp)   ((tcp)->u_error != 0)
 298 #define verbose(tcp)    (qual_flags[(tcp)->scno] & QUAL_VERBOSE)
 299 #define abbrev(tcp)     (qual_flags[(tcp)->scno] & QUAL_ABBREV)
 300 #define waiting_parent(tcp) \
 301                 (tcp->parent && \
 302                 (tcp->parent->flags & TCB_SUSPENDED) && \
 303                 (tcp->parent->waitpid <= 0 || tcp->parent->waitpid == tcp->pid))
 304
 305 struct xlat {
 306         int val;
 307         char *str;
 308 };
 309
 310 /* Format of syscall return values */
 311 #define RVAL_DECIMAL    000     /* decimal format */
 312 #define RVAL_HEX        001     /* hex format */
 313 #define RVAL_OCTAL      002     /* octal format */
 314 #define RVAL_UDECIMAL   003     /* unsigned decimal format */
 315 #define RVAL_LDECIMAL   004     /* long decimal format */
 316 #define RVAL_LHEX       005     /* long hex format */
 317 #define RVAL_LOCTAL     006     /* long octal format */
 318 #define RVAL_LUDECIMAL  007     /* long unsigned decimal format */
 319 #define RVAL_MASK       007     /* mask for these values */
 320
 321 #define RVAL_STR        010     /* Print `auxstr' field after return val */
 322 #define RVAL_NONE       020     /* Print nothing */
 323
 324 #ifndef offsetof
 325 #define offsetof(type, member)  (((char *) &(((type *) NULL)->member)) - \
 326                                  ((char *) (type *) NULL))
 327 #endif /* !offsetof */
 328
 329 /* get offset of member within a user struct */
 330 #define uoff(member)    offsetof(struct user, member)
 331
 332 #define TRACE_FILE      001     /* Trace file-related syscalls. */
 333 #define TRACE_IPC       002     /* Trace IPC-related syscalls. */
 334 #define TRACE_NETWORK   004     /* Trace network-related syscalls. */
 335 #define TRACE_PROCESS   010     /* Trace process-related syscalls. */
 336 #define TRACE_SIGNAL    020     /* Trace signal-related syscalls. */
 337
 338 extern struct tcb tcbtab[];
 339 extern int qual_flags[];
 340 extern int debug, followfork, followvfork;
 341 extern int rflag, tflag, dtime, cflag, xflag, qflag;
 342 extern int acolumn;
 343 extern char *outfname;
 344 extern int nprocs;
 345 extern int max_strlen;
 346 extern struct tcb *tcp_last;
 347
 348 #ifdef __STDC__
 349 #define P(args) args
 350 #else
 351 #define P(args) ()
 352 #endif
 353
 354 extern int set_personality P((int personality));
 355 extern char *xlookup P((struct xlat *, int));
 356 extern struct tcb *alloctcb P((int));
 357 extern void droptcb P((struct tcb *));
 358
 359 extern void set_sortby P((char *));
 360 extern void set_overhead P((int));
 361 extern void qualify P((char *));
 362 extern void newoutf P((struct tcb *));
 363 extern int get_scno P((struct tcb *));
 364 extern int trace_syscall P((struct tcb *));
 365 extern void printxval P((struct xlat *, int, char *));
 366 extern int printargs P((struct tcb *));
 367 extern int addflags P((struct xlat *, int));
 368 extern int printflags P((struct xlat *, int));
 369 extern int umoven P((struct tcb *, long, int, char *));
 370 extern int umovestr P((struct tcb *, long, int, char *));
 371 extern int upeek P((int, long, long *));
 372 extern void dumpstr P((struct tcb *, long, int));
 373 extern void string_quote P((char *str));
 374 extern void printstr P((struct tcb *, long, int));
 375 extern void printnum P((struct tcb *, long, char *));
 376 extern void printpath P((struct tcb *, long));
 377 extern void printpathn P((struct tcb *, long, int));
 378 extern void printtv P((struct tcb *, long));
 379 extern void printsock P((struct tcb *, long, int));
 380 extern void printrusage P((struct tcb *, long));
 381 extern int clearbpt P((struct tcb *));
 382 extern int setbpt P((struct tcb *));
 383 extern int sigishandled P((struct tcb *, int));
 384 extern void printcall P((struct tcb *));
 385 extern char *signame P((int));
 386 extern void printsignal P((int));
 387 extern void printleader P((struct tcb *));
 388 extern void printtrailer P((struct tcb *));
 389 extern void tabto P((int));
 390 extern void call_summary P((FILE *));
 391 extern void fake_execve P((struct tcb *, char *, char *[], char *[]));
 392 extern void printtv32 P((struct tcb*, long));
 393
 394 #ifdef LINUX
 395 extern int internal_clone P((struct tcb *));
 396 #endif
 397 extern int internal_fork P((struct tcb *));
 398 extern int internal_exec P((struct tcb *));
 399 extern int internal_wait P((struct tcb *));
 400 extern int internal_exit P((struct tcb *));
 401
 402 extern char *ioctl_lookup P((long));
 403 extern int ioctl_decode P((struct tcb *, long, long));
 404 extern int term_ioctl P((struct tcb *, long, long));
 405 extern int sock_ioctl P((struct tcb *, long, long));
 406 extern int proc_ioctl P((struct tcb *, int, int));
 407 extern int stream_ioctl P((struct tcb *, int, int));
 408
 409 extern void tv_tv P((struct timeval *, int, int));
 410 extern int tv_nz P((struct timeval *));
 411 extern int tv_cmp P((struct timeval *, struct timeval *));
 412 extern double tv_float P((struct timeval *));
 413 extern void tv_add P((struct timeval *, struct timeval *, struct timeval *));
 414 extern void tv_sub P((struct timeval *, struct timeval *, struct timeval *));
 415 extern void tv_mul P((struct timeval *, struct timeval *, int));
 416 extern void tv_div P((struct timeval *, struct timeval *, int));
 417
 418 #ifdef SUNOS4
 419 extern int fixvfork P((struct tcb *));
 420 #endif
 421 #if !(defined(LINUX) && !defined(SPARC))
 422 extern long getrval2 P((struct tcb *));
 423 #endif
 424 #ifdef USE_PROCFS
 425 extern int proc_open P((struct tcb *tcp, int attaching));
 426 #endif
 427
 428 #define umove(pid, addr, objp)  \
 429         umoven((pid), (addr), sizeof *(objp), (char *) (objp))
 430
 431 #ifdef __STDC__
 432 #ifdef __GNUC__
 433 extern void tprintf(const char *fmt, ...)
 434         __attribute__ ((format (printf, 1, 2)));
 435 #else
 436 extern void tprintf(const char *fmt, ...);
 437 #endif
 438 #else
 439 extern void tprintf();
 440 #endif
 441
 442 #ifndef HAVE_STRERROR
 443 const char *strerror P((int));
 444 #endif
 445 #ifndef HAVE_STRSIGNAL
 446 const char *strsignal P((int));
 447 #endif
 448
 449 extern int current_personality;
 450
 451 struct sysent {
 452         int     nargs;
 453         int     sys_flags;
 454         int     (*sys_func)();
 455         char    *sys_name;
 456 };
 457
 458 extern struct sysent *sysent;
 459 extern int nsyscalls;
 460
 461 extern char **errnoent;
 462 extern int nerrnos;
 463
 464 struct ioctlent {
 465         char *doth;
 466         char *symbol;
 467         unsigned long code;
 468 };
 469
 470 extern struct ioctlent *ioctlent;
 471 extern int nioctlent;
 472
 473 extern char **signalent;
 474 extern int nsignals;
 475
 476 extern struct ioctlent *ioctlent;
 477 extern int nioctlents;
 478 extern char **signalent;
 479 extern int nsignals;
 480
 481 extern struct ioctlent ioctlent0[];
 482 extern int nioctlents0;
 483 extern char *signalent0[];
 484 extern int nsignals0;
 485
 486 #if SUPPORTED_PERSONALITIES >= 2
 487 extern struct ioctlent ioctlent1[];
 488 extern int nioctlents1;
 489 extern char *signalent1[];
 490 extern int nsignals1;
 491 #endif /* SUPPORTED_PERSONALITIES >= 2 */
 492
 493 #if SUPPORTED_PERSONALITIES >= 3
 494 extern struct ioctlent ioctlent2[];
 495 extern int nioctlents2;
 496 extern char *signalent2[];
 497 extern int nsignals2;
 498 #endif /* SUPPORTED_PERSONALITIES >= 3 */
 499
 500 #if FREEBSD
 501 /* ARRGH!  off_t args are aligned on 64 bit boundaries! */
 502 #define ALIGN64(tcp,arg)                                                \
 503 do {                                                                    \
 504         if (arg % 2)                                                    \
 505             memmove (&tcp->u_arg[arg], &tcp->u_arg[arg + 1],            \
 506                      (tcp->u_nargs - arg - 1) * sizeof tcp->u_arg[0]);  \
 507 } while (0)
 508 #else
 509 #define ALIGN64(tcp,arg) do { } while (0)
 510 #endif
 511
 512 #if _LFS64_LARGEFILE || FREEBSD
 513
 514 /* _l refers to the lower numbered u_arg,
 515  * _h refers to the higher numbered u_arg
 516  */
 517
 518 #if 1
 519 /* This should work, assuming we can do non-aligned 64 bit fetches.
 520  * if not we'll have to figure out how which of the other versions to use.
 521  */
 522
 523 #define get64(_l,_h) (*(long long *) &(_l))
 524
 525 #else
 526
 527 #if _LITTLE_ENDIAN
 528 #define get64(_l,_h) ((long long)((unsigned long long)(_l) | ((unsigned long long)(_h)<<32)))
 529 #else
 530 #define get64(_l,_h) ((long long)((unsigned long long)(_h) | ((unsigned long long)(_l)<<32)))
 531 #endif
 532 #endif
 533 #endif
 534