]> granicus.if.org Git - strace/blob - defs.h
Add PAF_ARRAY_TRUNCATED flag for print_array_ex
[strace] / 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  * Copyright (c) 2001-2019 The strace developers.
6  * All rights reserved.
7  *
8  * SPDX-License-Identifier: LGPL-2.1-or-later
9  */
10
11 #ifndef STRACE_DEFS_H
12 # define STRACE_DEFS_H
13
14 # ifdef HAVE_CONFIG_H
15 #  include "config.h"
16 # endif
17
18 # include <features.h>
19 # include <stdbool.h>
20 # include <stdint.h>
21 # include <inttypes.h>
22 # include <sys/types.h>
23 # include <stddef.h>
24 # include <unistd.h>
25 # include <stdlib.h>
26 # include <stdio.h>
27 /* Open-coding isprint(ch) et al proved more efficient than calling
28  * generalized libc interface. We don't *want* to do non-ASCII anyway.
29  */
30 /* #include <ctype.h> */
31 # include <string.h>
32 # include <errno.h>
33 # include <time.h>
34 # include <sys/time.h>
35
36 # include "arch_defs.h"
37 # include "error_prints.h"
38 # include "gcc_compat.h"
39 # include "kernel_types.h"
40 # include "list.h"
41 # include "macros.h"
42 # include "mpers_type.h"
43 # include "string_to_uint.h"
44 # include "sysent.h"
45 # include "xmalloc.h"
46
47 # ifndef HAVE_STRERROR
48 const char *strerror(int);
49 # endif
50 # ifndef HAVE_STPCPY
51 /* Some libc have stpcpy, some don't. Sigh...
52  * Roll our private implementation...
53  */
54 #  undef stpcpy
55 #  define stpcpy strace_stpcpy
56 extern char *stpcpy(char *dst, const char *src);
57 # endif
58
59 /* Glibc has an efficient macro for sigemptyset
60  * (it just does one or two assignments of 0 to internal vector of longs).
61  */
62 # if defined(__GLIBC__) && defined(__sigemptyset) && !defined(sigemptyset)
63 #  define sigemptyset __sigemptyset
64 # endif
65
66 /* Configuration section */
67 # ifndef DEFAULT_STRLEN
68 /* default maximum # of bytes printed in `printstr', change with -s switch */
69 #  define DEFAULT_STRLEN        32
70 # endif
71 # ifndef DEFAULT_ACOLUMN
72 #  define DEFAULT_ACOLUMN       40      /* default alignment column for results */
73 # endif
74 /*
75  * Maximum number of args to a syscall.
76  *
77  * Make sure that all entries in all syscallent.h files have nargs <= MAX_ARGS!
78  * linux/<ARCH>/syscallent*.h:
79  *      all have nargs <= 6 except mips o32 which has nargs <= 7.
80  */
81 # ifndef MAX_ARGS
82 #  ifdef LINUX_MIPSO32
83 #   define MAX_ARGS     7
84 #  else
85 #   define MAX_ARGS     6
86 #  endif
87 # endif
88 /* default sorting method for call profiling */
89 # ifndef DEFAULT_SORTBY
90 #  define DEFAULT_SORTBY "time"
91 # endif
92
93 /* To force NOMMU build, set to 1 */
94 # define NOMMU_SYSTEM 0
95
96 # ifndef ERESTARTSYS
97 #  define ERESTARTSYS    512
98 # endif
99 # ifndef ERESTARTNOINTR
100 #  define ERESTARTNOINTR 513
101 # endif
102 # ifndef ERESTARTNOHAND
103 #  define ERESTARTNOHAND 514
104 # endif
105 # ifndef ERESTART_RESTARTBLOCK
106 #  define ERESTART_RESTARTBLOCK 516
107 # endif
108
109 # define PERSONALITY0_WORDSIZE  SIZEOF_LONG
110 # define PERSONALITY0_KLONGSIZE SIZEOF_KERNEL_LONG_T
111 # define PERSONALITY0_INCLUDE_PRINTERS_DECLS "native_printer_decls.h"
112 # define PERSONALITY0_INCLUDE_PRINTERS_DEFS "native_printer_defs.h"
113
114 # if SUPPORTED_PERSONALITIES > 1
115 #  define PERSONALITY1_WORDSIZE  4
116 #  define PERSONALITY1_KLONGSIZE PERSONALITY1_WORDSIZE
117 # endif
118
119 # if SUPPORTED_PERSONALITIES > 2
120 #  define PERSONALITY2_WORDSIZE  4
121 #  define PERSONALITY2_KLONGSIZE PERSONALITY0_KLONGSIZE
122 # endif
123
124 # if SUPPORTED_PERSONALITIES > 1 && defined HAVE_M32_MPERS
125 #  define PERSONALITY1_INCLUDE_PRINTERS_DECLS "m32_printer_decls.h"
126 #  define PERSONALITY1_INCLUDE_PRINTERS_DEFS "m32_printer_defs.h"
127 #  define PERSONALITY1_INCLUDE_FUNCS "m32_funcs.h"
128 #  define MPERS_m32_IOCTL_MACROS "ioctl_redefs1.h"
129 #  define HAVE_PERSONALITY_1_MPERS 1
130 # else
131 #  define PERSONALITY1_INCLUDE_PRINTERS_DECLS "native_printer_decls.h"
132 #  define PERSONALITY1_INCLUDE_PRINTERS_DEFS "native_printer_defs.h"
133 #  define PERSONALITY1_INCLUDE_FUNCS "empty.h"
134 #  define HAVE_PERSONALITY_1_MPERS 0
135 # endif
136
137 # if SUPPORTED_PERSONALITIES > 2 && defined HAVE_MX32_MPERS
138 #  define PERSONALITY2_INCLUDE_FUNCS "mx32_funcs.h"
139 #  define PERSONALITY2_INCLUDE_PRINTERS_DECLS "mx32_printer_decls.h"
140 #  define PERSONALITY2_INCLUDE_PRINTERS_DEFS "mx32_printer_defs.h"
141 #  define MPERS_mx32_IOCTL_MACROS "ioctl_redefs2.h"
142 #  define HAVE_PERSONALITY_2_MPERS 1
143 # else
144 #  define PERSONALITY2_INCLUDE_PRINTERS_DECLS "native_printer_decls.h"
145 #  define PERSONALITY2_INCLUDE_PRINTERS_DEFS "native_printer_defs.h"
146 #  define PERSONALITY2_INCLUDE_FUNCS "empty.h"
147 #  define HAVE_PERSONALITY_2_MPERS 0
148 # endif
149
150 # ifdef WORDS_BIGENDIAN
151 #  define is_bigendian true
152 # else
153 #  define is_bigendian false
154 # endif
155
156 # if SUPPORTED_PERSONALITIES > 1
157 extern void set_personality(unsigned int personality);
158 extern unsigned current_personality;
159 # else
160 #  define set_personality(personality) ((void)0)
161 #  define current_personality 0
162 # endif
163
164 # if SUPPORTED_PERSONALITIES == 1
165 #  define current_wordsize PERSONALITY0_WORDSIZE
166 #  define current_klongsize PERSONALITY0_KLONGSIZE
167 # else
168 #  if SUPPORTED_PERSONALITIES == 2 && PERSONALITY0_WORDSIZE == PERSONALITY1_WORDSIZE
169 #   define current_wordsize PERSONALITY0_WORDSIZE
170 #  else
171 extern unsigned current_wordsize;
172 #  endif
173 #  if SUPPORTED_PERSONALITIES == 2 && PERSONALITY0_KLONGSIZE == PERSONALITY1_KLONGSIZE
174 #   define current_klongsize PERSONALITY0_KLONGSIZE
175 #  else
176 extern unsigned current_klongsize;
177 #  endif
178 # endif
179
180 # define max_addr() (~0ULL >> ((8 - current_wordsize) * 8))
181 # define max_kaddr() (~0ULL >> ((8 - current_klongsize) * 8))
182
183 /* Shorthands for defining word/klong-based dispatcher function bodies */
184 # ifndef current_wordsize
185 #  define opt_wordsize(opt_64_, opt_32_) \
186         ((current_wordsize > sizeof(uint32_t)) ? (opt_64_) : (opt_32_))
187 #  define dispatch_wordsize(call_64_, call_32_, ...) \
188         ((current_wordsize > sizeof(uint32_t)) \
189                 ? (call_64_)(__VA_ARGS__) : (call_32_)(__VA_ARGS__))
190 # elif current_wordsize > 4
191 #  define opt_wordsize(opt_64_, opt_32_) (opt_64_)
192 #  define dispatch_wordsize(call_64_, call_32_, ...) ((call_64_)(__VA_ARGS__))
193 # else /* current_wordsize == 4 */
194 #  define opt_wordsize(opt_64_, opt_32_) (opt_32_)
195 #  define dispatch_wordsize(call_64_, call_32_, ...) ((call_32_)(__VA_ARGS__))
196 # endif
197
198 # ifndef current_klongsize
199 #  define opt_klongsize(opt_64_, opt_32_) \
200         ((current_klongsize > sizeof(uint32_t)) ? (opt_64_) : (opt_32_))
201 #  define dispatch_klongsize(call_64_, call_32_, ...) \
202         ((current_klongsize > sizeof(uint32_t)) \
203                 ? (call_64_)(__VA_ARGS__) : (call_32_)(__VA_ARGS__))
204 # elif current_klongsize > 4
205 #  define opt_klongsize(opt_64_, opt_32_) (opt_64_)
206 #  define dispatch_klongsize(call_64_, call_32_, ...) ((call_64_)(__VA_ARGS__))
207 # else /* current_klongsize == 4 */
208 #  define opt_klongsize(opt_64_, opt_32_) (opt_32_)
209 #  define dispatch_klongsize(call_64_, call_32_, ...) ((call_32_)(__VA_ARGS__))
210 # endif
211
212
213 typedef struct ioctlent {
214         const char *symbol;
215         unsigned int code;
216 } struct_ioctlent;
217
218 # define INJECT_F_SIGNAL                0x01
219 # define INJECT_F_ERROR         0x02
220 # define INJECT_F_RETVAL                0x04
221 # define INJECT_F_DELAY_ENTER   0x08
222 # define INJECT_F_DELAY_EXIT    0x10
223 # define INJECT_F_SYSCALL       0x20
224
225 # define INJECT_ACTION_FLAGS    \
226         (INJECT_F_SIGNAL        \
227         |INJECT_F_ERROR         \
228         |INJECT_F_RETVAL        \
229         |INJECT_F_DELAY_ENTER   \
230         |INJECT_F_DELAY_EXIT    \
231         )
232
233 struct inject_data {
234         uint8_t flags;          /* 6 of 8 flags are used so far */
235         uint8_t signo;          /* NSIG <= 128 */
236         uint16_t rval_idx;      /* index in retval_vec */
237         uint16_t delay_idx;     /* index in delay_data_vec */
238         uint16_t scno;          /* syscall to be injected instead of -1 */
239 };
240
241 struct inject_opts {
242         uint16_t first;
243         uint16_t step;
244         struct inject_data data;
245 };
246
247 # define MAX_ERRNO_VALUE                        4095
248
249 /* Trace Control Block */
250 struct tcb {
251         int flags;              /* See below for TCB_ values */
252         int pid;                /* If 0, this tcb is free */
253         int qual_flg;           /* qual_flags[scno] or DEFAULT_QUAL_FLAGS + RAW */
254         unsigned long u_error;  /* Error code */
255         kernel_ulong_t scno;    /* System call number */
256         kernel_ulong_t u_arg[MAX_ARGS]; /* System call arguments */
257         kernel_long_t u_rval;   /* Return value */
258 # if SUPPORTED_PERSONALITIES > 1
259         unsigned int currpers;  /* Personality at the time of scno update */
260 # endif
261         int sys_func_rval;      /* Syscall entry parser's return value */
262         int curcol;             /* Output column for this process */
263         FILE *outf;             /* Output file for this process */
264         struct staged_output_data *staged_output_data;
265
266         const char *auxstr;     /* Auxiliary info from syscall (see RVAL_STR) */
267         void *_priv_data;       /* Private data for syscall decoding functions */
268         void (*_free_priv_data)(void *); /* Callback for freeing priv_data */
269         const struct_sysent *s_ent; /* sysent[scno] or a stub struct for bad
270                                      * scno.  Use tcp_sysent() macro for access.
271                                      */
272         const struct_sysent *s_prev_ent; /* for "resuming interrupted SYSCALL" msg */
273         struct inject_opts *inject_vec[SUPPORTED_PERSONALITIES];
274         struct timespec stime;  /* System time usage as of last process wait */
275         struct timespec ltime;  /* System time usage as of last syscall entry */
276         struct timespec atime;  /* System time right after attach */
277         struct timespec etime;  /* Syscall entry time (CLOCK_MONOTONIC) */
278         struct timespec delay_expiration_time; /* When does the delay end */
279
280         struct mmap_cache_t *mmap_cache;
281
282         /*
283          * Data that is stored during process wait traversal.
284          * We use indices as the actual data is stored in an array
285          * that is realloc'ed at runtime.
286          */
287         size_t wait_data_idx;
288         /** Wait data storage for a delayed process. */
289         struct tcb_wait_data *delayed_wait_data;
290         struct list_item wait_list;
291
292
293 # ifdef HAVE_LINUX_KVM_H
294         struct vcpu_info *vcpu_info_list;
295 # endif
296
297 # ifdef ENABLE_STACKTRACE
298         void *unwind_ctx;
299         struct unwind_queue_t *unwind_queue;
300 # endif
301 };
302
303 /* TCB flags */
304 /* We have attached to this process, but did not see it stopping yet */
305 # define TCB_STARTUP            0x01
306 # define TCB_IGNORE_ONE_SIGSTOP 0x02    /* Next SIGSTOP is to be ignored */
307 /*
308  * Are we in system call entry or in syscall exit?
309  *
310  * This bit is set in syscall_entering_finish() and cleared in
311  * syscall_exiting_finish().
312  * Other stops which are possible directly after syscall entry (death, ptrace
313  * event stop) are handled without calling syscall_{entering,exiting}_*().
314  *
315  * Use entering(tcp) / exiting(tcp) to check this bit to make code more
316  * readable.
317  */
318 # define TCB_INSYSCALL  0x04
319 # define TCB_ATTACHED   0x08    /* We attached to it already */
320 # define TCB_REPRINT    0x10    /* We should reprint this syscall on exit */
321 # define TCB_FILTERED   0x20    /* This system call has been filtered out */
322 # define TCB_TAMPERED   0x40    /* A syscall has been tampered with */
323 # define TCB_HIDE_LOG   0x80    /* We should hide everything (until execve) */
324 # define TCB_CHECK_EXEC_SYSCALL 0x100   /* Check whether this execve syscall succeeded */
325 # define TCB_SKIP_DETACH_ON_FIRST_EXEC  0x200   /* -b execve should skip detach on first execve */
326 # define TCB_GRABBED    0x400   /* We grab the process and can catch it
327                                  * in the middle of a syscall */
328 # define TCB_RECOVERING 0x800   /* We try to recover after detecting incorrect
329                                  * syscall entering/exiting state */
330 # define TCB_INJECT_DELAY_EXIT  0x1000  /* Current syscall needs to be delayed
331                                            on exit */
332 # define TCB_DELAYED    0x2000  /* Current syscall has been delayed */
333 # define TCB_TAMPERED_NO_FAIL 0x4000    /* We tamper tcb with syscall
334                                            that should not fail. */
335
336 /* qualifier flags */
337 # define QUAL_TRACE     0x001   /* this system call should be traced */
338 # define QUAL_ABBREV    0x002   /* abbreviate the structures of this syscall */
339 # define QUAL_VERBOSE   0x004   /* decode the structures of this syscall */
340 # define QUAL_RAW       0x008   /* print all args in hex for this syscall */
341 # define QUAL_INJECT    0x010   /* tamper with this system call on purpose */
342
343 # define DEFAULT_QUAL_FLAGS (QUAL_TRACE | QUAL_ABBREV | QUAL_VERBOSE)
344
345 # define entering(tcp)  (!((tcp)->flags & TCB_INSYSCALL))
346 # define exiting(tcp)   ((tcp)->flags & TCB_INSYSCALL)
347 # define syserror(tcp)  ((tcp)->u_error != 0)
348 # define traced(tcp)    ((tcp)->qual_flg & QUAL_TRACE)
349 # define verbose(tcp)   ((tcp)->qual_flg & QUAL_VERBOSE)
350 # define abbrev(tcp)    ((tcp)->qual_flg & QUAL_ABBREV)
351 # define raw(tcp)       ((tcp)->qual_flg & QUAL_RAW)
352 # define inject(tcp)    ((tcp)->qual_flg & QUAL_INJECT)
353 # define filtered(tcp)  ((tcp)->flags & TCB_FILTERED)
354 # define hide_log(tcp)  ((tcp)->flags & TCB_HIDE_LOG)
355 # define check_exec_syscall(tcp)        ((tcp)->flags & TCB_CHECK_EXEC_SYSCALL)
356 # define syscall_tampered(tcp)  ((tcp)->flags & TCB_TAMPERED)
357 # define recovering(tcp)        ((tcp)->flags & TCB_RECOVERING)
358 # define inject_delay_exit(tcp) ((tcp)->flags & TCB_INJECT_DELAY_EXIT)
359 # define syscall_delayed(tcp)   ((tcp)->flags & TCB_DELAYED)
360 # define syscall_tampered_nofail(tcp) ((tcp)->flags & TCB_TAMPERED_NO_FAIL)
361
362 extern const struct_sysent stub_sysent;
363 # define tcp_sysent(tcp) (tcp->s_ent ?: &stub_sysent)
364 # define n_args(tcp) (tcp_sysent(tcp)->nargs)
365
366 # include "xlat.h"
367
368 extern const struct xlat addrfams[];
369 extern const struct xlat arp_hardware_types[];
370 extern const struct xlat at_flags[];
371 extern const struct xlat clocknames[];
372 extern const struct xlat dirent_types[];
373 extern const struct xlat ethernet_protocols[];
374 extern const struct xlat inet_protocols[];
375 extern const struct xlat evdev_abs[];
376 extern const struct xlat audit_arch[];
377 extern const struct xlat evdev_ev[];
378 extern const struct xlat iffflags[];
379 extern const struct xlat ip_type_of_services[];
380 extern const struct xlat ipc_private[];
381 extern const struct xlat msg_flags[];
382 extern const struct xlat netlink_protocols[];
383 extern const struct xlat nl_netfilter_msg_types[];
384 extern const struct xlat nl_route_types[];
385 extern const struct xlat open_access_modes[];
386 extern const struct xlat open_mode_flags[];
387 extern const struct xlat pollflags[];
388 extern const struct xlat ptrace_cmds[];
389 extern const struct xlat resource_flags[];
390 extern const struct xlat routing_scopes[];
391 extern const struct xlat routing_table_ids[];
392 extern const struct xlat routing_types[];
393 extern const struct xlat rwf_flags[];
394 extern const struct xlat seccomp_filter_flags[];
395 extern const struct xlat seccomp_ret_action[];
396 extern const struct xlat setns_types[];
397 extern const struct xlat sg_io_info[];
398 extern const struct xlat socketlayers[];
399 extern const struct xlat socktypes[];
400 extern const struct xlat tcp_state_flags[];
401 extern const struct xlat tcp_states[];
402 extern const struct xlat whence_codes[];
403
404 /* Format of syscall return values */
405 # define RVAL_UDECIMAL  000     /* unsigned decimal format */
406 # define RVAL_HEX       001     /* hex format */
407 # define RVAL_OCTAL     002     /* octal format */
408 # define RVAL_FD                010     /* file descriptor */
409 # define RVAL_MASK      013     /* mask for these values */
410
411 # define RVAL_STR       020     /* Print `auxstr' field after return val */
412 # define RVAL_NONE      040     /* Print nothing */
413
414 # define RVAL_DECODED   0100    /* syscall decoding finished */
415 # define RVAL_IOCTL_DECODED 0200        /* ioctl sub-parser successfully decoded
416                                    the argument */
417
418 # define IOCTL_NUMBER_UNKNOWN 0
419 # define IOCTL_NUMBER_HANDLED 1
420 # define IOCTL_NUMBER_STOP_LOOKUP 010
421
422 # define indirect_ipccall(tcp) (tcp_sysent(tcp)->sys_flags & TRACE_INDIRECT_SUBCALL)
423
424 enum sock_proto {
425         SOCK_PROTO_UNKNOWN,
426         SOCK_PROTO_UNIX,
427         SOCK_PROTO_TCP,
428         SOCK_PROTO_UDP,
429         SOCK_PROTO_UDPLITE,
430         SOCK_PROTO_DCCP,
431         SOCK_PROTO_SCTP,
432         SOCK_PROTO_L2TP_IP,
433         SOCK_PROTO_PING,
434         SOCK_PROTO_RAW,
435         SOCK_PROTO_TCPv6,
436         SOCK_PROTO_UDPv6,
437         SOCK_PROTO_UDPLITEv6,
438         SOCK_PROTO_DCCPv6,
439         SOCK_PROTO_L2TP_IPv6,
440         SOCK_PROTO_SCTPv6,
441         SOCK_PROTO_PINGv6,
442         SOCK_PROTO_RAWv6,
443         SOCK_PROTO_NETLINK,
444 };
445 extern enum sock_proto get_proto_by_name(const char *);
446 extern int get_family_by_proto(enum sock_proto proto);
447
448 enum iov_decode {
449         IOV_DECODE_ADDR,
450         IOV_DECODE_STR,
451         IOV_DECODE_NETLINK
452 };
453
454 typedef enum {
455         CFLAG_NONE = 0,
456         CFLAG_ONLY_STATS,
457         CFLAG_BOTH
458 } cflag_t;
459 extern cflag_t cflag;
460 extern bool Tflag;
461 extern bool iflag;
462 extern bool count_wallclock;
463 extern unsigned int qflag;
464 extern unsigned int show_fd_path;
465 /* are we filtering traces based on paths? */
466 extern struct path_set {
467         const char **paths_selected;
468         size_t num_selected;
469         size_t size;
470 } global_path_set;
471 # define tracing_paths (global_path_set.num_selected != 0)
472 extern unsigned xflag;
473 extern unsigned followfork;
474 # ifdef ENABLE_STACKTRACE
475 /* if this is true do the stack trace for every system call */
476 extern bool stack_trace_enabled;
477 # else
478 #  define stack_trace_enabled 0
479 # endif
480 extern unsigned ptrace_setoptions;
481 extern unsigned max_strlen;
482 extern unsigned os_release;
483 # undef KERNEL_VERSION
484 # define KERNEL_VERSION(a, b, c) (((a) << 16) + ((b) << 8) + (c))
485
486 extern int read_int_from_file(struct tcb *, const char *, int *);
487
488 extern void set_sortby(const char *);
489 extern int set_overhead(const char *);
490
491 extern bool get_instruction_pointer(struct tcb *, kernel_ulong_t *);
492 extern bool get_stack_pointer(struct tcb *, kernel_ulong_t *);
493 extern void print_instruction_pointer(struct tcb *);
494
495 extern void print_syscall_resume(struct tcb *tcp);
496
497 extern int syscall_entering_decode(struct tcb *);
498 extern int syscall_entering_trace(struct tcb *, unsigned int *);
499 extern void syscall_entering_finish(struct tcb *, int);
500
501 extern int syscall_exiting_decode(struct tcb *, struct timespec *);
502 extern int syscall_exiting_trace(struct tcb *, struct timespec *, int);
503 extern void syscall_exiting_finish(struct tcb *);
504
505 extern void count_syscall(struct tcb *, const struct timespec *);
506 extern void call_summary(FILE *);
507
508 extern void clear_regs(struct tcb *tcp);
509 extern int get_scno(struct tcb *);
510 extern kernel_ulong_t get_rt_sigframe_addr(struct tcb *);
511
512 /**
513  * Convert a (shuffled) syscall number to the corresponding syscall name.
514  *
515  * @param scno Syscall number.
516  * @return     String literal corresponding to the syscall number in case latter
517  *             is valid; NULL otherwise.
518  */
519 extern const char *syscall_name(kernel_ulong_t scno);
520 /**
521  * Convert a syscall name to the corresponding (shuffled) syscall number.
522  *
523  * @param s     Syscall name.
524  * @param p     Personality.
525  * @param start From which position in syscall entry table resume the search.
526  * @return      Shuffled syscall number (ready to use against sysent_vec)
527  *              if syscall name is found; -1 otherwise.
528  */
529 extern kernel_long_t scno_by_name(const char *s, unsigned p,
530                                   kernel_long_t start);
531 /**
532  * Shuffle syscall numbers so that we don't have huge gaps in syscall table.
533  * The shuffling should be an involution: shuffle_scno(shuffle_scno(n)) == n.
534  *
535  * @param scno Raw or shuffled syscall number.
536  * @return     Shuffled or raw syscall number, respectively.
537  */
538 extern kernel_ulong_t shuffle_scno(kernel_ulong_t scno);
539 /**
540  * Print error name in accordance with current xlat style setting.
541  *
542  * @param err     Error value.
543  * @param negated If set to true, negative values of the err parameter indicate
544  *                error condition, otherwise positive.
545  */
546 extern void print_err(int64_t err, bool negated);
547
548 extern bool is_erestart(struct tcb *);
549 extern void temporarily_clear_syserror(struct tcb *);
550 extern void restore_cleared_syserror(struct tcb *);
551
552 extern void *get_tcb_priv_data(const struct tcb *);
553 extern int set_tcb_priv_data(struct tcb *, void *priv_data,
554                              void (*free_priv_data)(void *));
555 extern void free_tcb_priv_data(struct tcb *);
556
557 static inline unsigned long get_tcb_priv_ulong(const struct tcb *tcp)
558 {
559         return (unsigned long) get_tcb_priv_data(tcp);
560 }
561
562 static inline int set_tcb_priv_ulong(struct tcb *tcp, unsigned long val)
563 {
564         return set_tcb_priv_data(tcp, (void *) val, 0);
565 }
566
567 /**
568  * @return 0 on success, -1 on error.
569  */
570 extern int
571 umoven(struct tcb *, kernel_ulong_t addr, unsigned int len, void *laddr);
572 # define umove(pid, addr, objp) \
573         umoven((pid), (addr), sizeof(*(objp)), (void *) (objp))
574
575 /**
576  * @return true on success, false on error.
577  */
578 extern bool
579 tfetch_mem64(struct tcb *, uint64_t addr, unsigned int len, void *laddr);
580
581 static inline bool
582 tfetch_mem(struct tcb *tcp, const kernel_ulong_t addr,
583            unsigned int len, void *laddr)
584 {
585         return tfetch_mem64(tcp, addr, len, laddr);
586 }
587 # define tfetch_obj(pid, addr, objp)    \
588         tfetch_mem((pid), (addr), sizeof(*(objp)), (void *) (objp))
589
590 /**
591  * @return true on success, false on error.
592  */
593 extern bool
594 tfetch_mem64_ignore_syserror(struct tcb *, uint64_t addr,
595                              unsigned int len, void *laddr);
596
597 static inline bool
598 tfetch_mem_ignore_syserror(struct tcb *tcp, const kernel_ulong_t addr,
599                            unsigned int len, void *laddr)
600 {
601         return tfetch_mem64_ignore_syserror(tcp, addr, len, laddr);
602 }
603
604 /**
605  * @return 0 on success, -1 on error (and print addr).
606  */
607 extern int
608 umoven_or_printaddr64(struct tcb *, uint64_t addr,
609                       unsigned int len, void *laddr);
610 # define umove_or_printaddr64(pid, addr, objp)  \
611         umoven_or_printaddr64((pid), (addr), sizeof(*(objp)), (void *) (objp))
612
613 static inline int
614 umoven_or_printaddr(struct tcb *tcp, const kernel_ulong_t addr,
615                     unsigned int len, void *laddr)
616 {
617         return umoven_or_printaddr64(tcp, addr, len, laddr);
618 }
619 # define umove_or_printaddr(pid, addr, objp)    \
620         umoven_or_printaddr((pid), (addr), sizeof(*(objp)), (void *) (objp))
621
622 /**
623  * @return 0 on success, -1 on error (and print addr).
624  */
625 extern int
626 umoven_or_printaddr64_ignore_syserror(struct tcb *, uint64_t addr,
627                                       unsigned int len, void *laddr);
628 # define umove_or_printaddr64_ignore_syserror(pid, addr, objp)  \
629         umoven_or_printaddr64_ignore_syserror((pid), (addr), sizeof(*(objp)), \
630                                               (void *) (objp))
631
632 static inline int
633 umoven_or_printaddr_ignore_syserror(struct tcb *tcp, const kernel_ulong_t addr,
634                                     unsigned int len, void *laddr)
635 {
636         return umoven_or_printaddr64_ignore_syserror(tcp, addr, len, laddr);
637 }
638 # define umove_or_printaddr_ignore_syserror(pid, addr, objp)    \
639         umoven_or_printaddr_ignore_syserror((pid), (addr), sizeof(*(objp)), \
640                                             (void *) (objp))
641
642 /**
643  * @return strlen + 1 on success, 0 on success and no NUL seen, -1 on error.
644  */
645 extern int
646 umovestr(struct tcb *, kernel_ulong_t addr, unsigned int len, char *laddr);
647
648 /* Invalidate the cache used by umove* functions.  */
649 extern void invalidate_umove_cache(void);
650
651 extern int upeek(struct tcb *tcp, unsigned long, kernel_ulong_t *);
652 extern int upoke(struct tcb *tcp, unsigned long, kernel_ulong_t);
653
654 # if HAVE_ARCH_GETRVAL2
655 extern long getrval2(struct tcb *);
656 # endif
657
658 extern const char *signame(const int);
659 extern const char *sprintsigname(const int);
660 extern void pathtrace_select_set(const char *, struct path_set *);
661 extern bool pathtrace_match_set(struct tcb *, struct path_set *);
662
663 static inline void
664 pathtrace_select(const char *path)
665 {
666         return pathtrace_select_set(path, &global_path_set);
667 }
668
669 static inline bool
670 pathtrace_match(struct tcb *tcp)
671 {
672         return pathtrace_match_set(tcp, &global_path_set);
673 }
674
675 extern int getfdpath(struct tcb *, int, char *, unsigned);
676 extern unsigned long getfdinode(struct tcb *, int);
677 extern enum sock_proto getfdproto(struct tcb *, int);
678
679 extern const char *xlookup(const struct xlat *, const uint64_t);
680 extern const char *xlookup_le(const struct xlat *, uint64_t *);
681
682 struct dyxlat;
683 struct dyxlat *dyxlat_alloc(size_t nmemb);
684 void dyxlat_free(struct dyxlat *);
685 const struct xlat *dyxlat_get(const struct dyxlat *);
686 void dyxlat_add_pair(struct dyxlat *, uint64_t val, const char *str, size_t len);
687
688 const struct xlat *genl_families_xlat(struct tcb *tcp);
689
690 extern unsigned long get_pagesize(void);
691 extern int next_set_bit(const void *bit_array, unsigned cur_bit, unsigned size_bits);
692
693 /*
694  * Returns STR if it does not start with PREFIX,
695  * or a pointer to the first char in STR after PREFIX.
696  * The length of PREFIX is specified by PREFIX_LEN.
697  */
698 static inline const char *
699 str_strip_prefix_len(const char *str, const char *prefix, size_t prefix_len)
700 {
701         return strncmp(str, prefix, prefix_len) ? str : str + prefix_len;
702 }
703
704 # define STR_STRIP_PREFIX(str, prefix)  \
705         str_strip_prefix_len((str), (prefix), sizeof(prefix) - 1)
706
707 # define QUOTE_0_TERMINATED                     0x01
708 # define QUOTE_OMIT_LEADING_TRAILING_QUOTES     0x02
709 # define QUOTE_OMIT_TRAILING_0                  0x08
710 # define QUOTE_FORCE_HEX                                0x10
711 # define QUOTE_EMIT_COMMENT                     0x20
712
713 extern int string_quote(const char *, char *, unsigned int, unsigned int,
714                         const char *escape_chars);
715 extern int print_quoted_string_ex(const char *, unsigned int, unsigned int,
716                                   const char *escape_chars);
717 extern int print_quoted_string(const char *, unsigned int, unsigned int);
718 extern int print_quoted_cstring(const char *, unsigned int);
719
720 /* a refers to the lower numbered u_arg,
721  * b refers to the higher numbered u_arg
722  */
723 # ifdef WORDS_BIGENDIAN
724 #  define ULONG_LONG(a, b) \
725         ((unsigned long long)(unsigned)(b) | ((unsigned long long)(a)<<32))
726 # else
727 #  define ULONG_LONG(a, b) \
728         ((unsigned long long)(unsigned)(a) | ((unsigned long long)(b)<<32))
729 # endif
730 extern int getllval(struct tcb *, unsigned long long *, int);
731 extern int printllval(struct tcb *, const char *, int)
732         ATTRIBUTE_FORMAT((printf, 2, 0));
733
734 extern void printaddr64(uint64_t addr);
735
736 static inline void
737 printaddr(const kernel_ulong_t addr)
738 {
739         printaddr64(addr);
740 }
741
742 # define xlat_verbose(style_) ((style_) & XLAT_STYLE_VERBOSITY_MASK)
743 # define xlat_format(style_)  ((style_) & XLAT_STYLE_FORMAT_MASK)
744
745 extern enum xlat_style xlat_verbosity;
746
747 extern int printxvals_ex(uint64_t val, const char *dflt,
748                          enum xlat_style, const struct xlat *, ...)
749         ATTRIBUTE_SENTINEL;
750 # define printxvals(val_, dflt_, ...) \
751         printxvals_ex((val_), (dflt_), XLAT_STYLE_DEFAULT, __VA_ARGS__)
752 # define printxval_ex(xlat_, val_, dflt_, style_) \
753         printxvals_ex((val_), (dflt_), (style_), (xlat_), NULL)
754
755 extern int sprintxval_ex(char *buf, size_t size, const struct xlat *,
756                          unsigned int val, const char *dflt, enum xlat_style);
757
758 static inline int
759 sprintxval(char *buf, size_t size, const struct xlat *xlat, unsigned int val,
760            const char *dflt)
761 {
762         return sprintxval_ex(buf, size, xlat, val, dflt, XLAT_STYLE_DEFAULT);
763 }
764
765 enum xlat_style_private_flag_bits {
766         /* print_array */
767         PAF_PRINT_INDICES_BIT = XLAT_STYLE_SPEC_BITS + 1,
768         PAF_ARRAY_TRUNCATED_BIT,
769
770         /* print_xlat */
771         PXF_DEFAULT_STR_BIT,
772 };
773
774 # define FLAG_(name_) name_ = 1 << name_##_BIT
775
776 enum xlat_style_private_flags {
777         /* print_array */
778         FLAG_(PAF_PRINT_INDICES),
779         FLAG_(PAF_ARRAY_TRUNCATED),
780
781         /* print_xlat */
782         FLAG_(PXF_DEFAULT_STR),
783 };
784
785 # undef FLAG_
786
787 /** Print a value in accordance with xlat formatting settings. */
788 extern void print_xlat_ex(uint64_t val, const char *str, enum xlat_style style);
789 # define print_xlat(val_) \
790         print_xlat_ex((val_), #val_, XLAT_STYLE_DEFAULT)
791 # define print_xlat32(val_) \
792         print_xlat_ex((uint32_t) (val_), #val_, XLAT_STYLE_DEFAULT)
793 # define print_xlat_u(val_) \
794         print_xlat_ex((val_), #val_, XLAT_STYLE_FMT_U)
795 # define print_xlat_d(val_) \
796         print_xlat_ex((val_), #val_, XLAT_STYLE_FMT_D)
797
798 extern int printargs(struct tcb *);
799 extern int printargs_u(struct tcb *);
800 extern int printargs_d(struct tcb *);
801
802 extern int printflags_ex(uint64_t flags, const char *dflt,
803                          enum xlat_style, const struct xlat *, ...)
804         ATTRIBUTE_SENTINEL;
805 extern const char *sprintflags_ex(const char *prefix, const struct xlat *,
806                                   uint64_t flags, char sep, enum xlat_style);
807
808 static inline const char *
809 sprintflags(const char *prefix, const struct xlat *xlat, uint64_t flags)
810 {
811         return sprintflags_ex(prefix, xlat, flags, '\0', XLAT_STYLE_DEFAULT);
812 }
813
814 extern const char *sprinttime(long long sec);
815 extern const char *sprinttime_nsec(long long sec, unsigned long long nsec);
816 extern const char *sprinttime_usec(long long sec, unsigned long long usec);
817
818 #ifndef MAX_ADDR_LEN
819 # define MAX_ADDR_LEN 32
820 #endif
821
822 extern const char *sprint_mac_addr(const uint8_t addr[], size_t size);
823 extern void print_mac_addr(const char *prefix,
824                            const uint8_t addr[], size_t size);
825
826 extern const char *sprint_hwaddr(const uint8_t addr[], size_t size,
827                                  uint32_t devtype);
828 extern void print_hwaddr(const char *prefix,
829                          const uint8_t addr[], size_t size, uint32_t devtype);
830
831 extern void print_uuid(const unsigned char *uuid);
832
833 extern void print_symbolic_mode_t(unsigned int);
834 extern void print_numeric_umode_t(unsigned short);
835 extern void print_numeric_long_umask(unsigned long);
836 extern void print_dev_t(unsigned long long dev);
837 extern void print_kernel_version(unsigned long version);
838 extern void print_abnormal_hi(kernel_ulong_t);
839 extern void print_ioprio(unsigned int ioprio);
840
841 extern bool print_int32_array_member(struct tcb *, void *elem_buf,
842                                      size_t elem_size, void *data);
843 extern bool print_uint32_array_member(struct tcb *, void *elem_buf,
844                                       size_t elem_size, void *data);
845 extern bool print_uint64_array_member(struct tcb *, void *elem_buf,
846                                       size_t elem_size, void *data);
847
848 typedef bool (*tfetch_mem_fn)(struct tcb *, kernel_ulong_t addr,
849                               unsigned int size, void *dest);
850 typedef bool (*print_fn)(struct tcb *, void *elem_buf,
851                          size_t elem_size, void *opaque_data);
852 typedef int (*print_obj_by_addr_fn)(struct tcb *, kernel_ulong_t);
853 typedef const char * (*sprint_obj_by_addr_fn)(struct tcb *, kernel_ulong_t);
854
855
856 /**
857  * Array printing function with over-engineered interface.
858  *
859  * @param start_addr       If tfetch_mem_fn is non-NULL: address in tracee's
860  *                         memory where the start of the array is located.
861  *                         If tfetch_mem_fn is NULL: ignored.
862  * @param nmemb            Number of elements in array.
863  * @param elem_buf         If tfetch_mem_fn is non-NULL: a buffer where each
864  *                         element fetched by tfetch_mem_fn is stored.
865  *                         If tfetch_mem_fn is NULL: address of the start of
866  *                         the array in local memory.
867  * @param elem_size        Size (in bytes) of each element in the array.
868  * @param tfetch_mem_fn    Fetching function. If NULL, then elem_buf is treated
869  *                         as local array of nmemb members elem_size each;
870  *                         start_addr is ignored.
871  * @param print_func       Element printing callback.
872  * @param opaque_data      A value that is unconditionally passed to print_func
873  *                         in opaque_data argument.
874  * @param flags            Combination of xlat style settings and additional
875  *                         flags from enum print_array_flags.
876  * @param index_xlat       Xlat array that is used for printing indices.
877  * @param index_xlat_size  The size of xlat array.
878  * @param index_dflt       Default string for the values not found
879  *                         in index_xlat.
880  */
881 extern bool
882 print_array_ex(struct tcb *,
883                kernel_ulong_t start_addr,
884                size_t nmemb,
885                void *elem_buf,
886                size_t elem_size,
887                tfetch_mem_fn tfetch_mem_func,
888                print_fn print_func,
889                void *opaque_data,
890                unsigned int flags,
891                const struct xlat *index_xlat,
892                const char *index_dflt);
893
894 /** Print an array from tracee's memory without any index printing features. */
895 static inline bool
896 print_array(struct tcb *const tcp,
897             const kernel_ulong_t start_addr,
898             const size_t nmemb,
899             void *const elem_buf,
900             const size_t elem_size,
901             tfetch_mem_fn tfetch_mem_func,
902             print_fn print_func,
903             void *const opaque_data)
904 {
905         return print_array_ex(tcp, start_addr, nmemb, elem_buf, elem_size,
906                               tfetch_mem_func, print_func, opaque_data,
907                               0, NULL, NULL);
908 }
909
910 /** Shorthand for printing local arrays. */
911 static inline bool
912 print_local_array(struct tcb *tcp,
913                   void *start_addr,
914                   const size_t nmemb,
915                   void *const elem_buf,
916                   const size_t elem_size,
917                   print_fn print_func,
918                   void *const opaque_data,
919                   unsigned int flags)
920 {
921         return print_array_ex(tcp, (uintptr_t) start_addr , nmemb,
922                               elem_buf, elem_size, NULL, print_func,
923                               opaque_data, flags, NULL, NULL);
924 }
925
926 extern kernel_ulong_t *
927 fetch_indirect_syscall_args(struct tcb *, kernel_ulong_t addr, unsigned int n_args);
928
929 extern void
930 dumpiov_in_msghdr(struct tcb *, kernel_ulong_t addr, kernel_ulong_t data_size);
931
932 extern void
933 dumpiov_in_mmsghdr(struct tcb *, kernel_ulong_t addr);
934
935 extern void
936 dumpiov_upto(struct tcb *, int len, kernel_ulong_t addr, kernel_ulong_t data_size);
937
938 extern void
939 dumpstr(struct tcb *, kernel_ulong_t addr, kernel_ulong_t len);
940
941 extern int
942 printstr_ex(struct tcb *, kernel_ulong_t addr, kernel_ulong_t len,
943             unsigned int user_style);
944
945 extern int
946 printpathn(struct tcb *, kernel_ulong_t addr, unsigned int n);
947
948 extern int
949 printpath(struct tcb *, kernel_ulong_t addr);
950
951 # define TIMESPEC_TEXT_BUFSIZE \
952                 (sizeof(long long) * 3 * 2 + sizeof("{tv_sec=-, tv_nsec=}"))
953 extern void printfd(struct tcb *, int);
954 extern void print_sockaddr(const void *sa, int len);
955 extern bool
956 print_inet_addr(int af, const void *addr, unsigned int len, const char *var_name);
957 extern bool
958 decode_inet_addr(struct tcb *, kernel_ulong_t addr,
959                  unsigned int len, int family, const char *var_name);
960 extern void print_ax25_addr(const void /* ax25_address */ *addr);
961 extern void print_x25_addr(const void /* struct x25_address */ *addr);
962 extern const char *get_sockaddr_by_inode(struct tcb *, int fd, unsigned long inode);
963 extern bool print_sockaddr_by_inode(struct tcb *, int fd, unsigned long inode);
964 extern void print_dirfd(struct tcb *, int);
965
966 extern int
967 decode_sockaddr(struct tcb *, kernel_ulong_t addr, int addrlen);
968
969 extern void printuid(const char *, const unsigned int);
970
971 extern void
972 print_sigset_addr_len(struct tcb *, kernel_ulong_t addr, kernel_ulong_t len);
973 extern void
974 print_sigset_addr(struct tcb *, kernel_ulong_t addr);
975
976 extern const char *sprintsigmask_n(const char *, const void *, unsigned int);
977 # define tprintsigmask_addr(prefix, mask) \
978         tprints(sprintsigmask_n((prefix), (mask), sizeof(mask)))
979 extern void printsignal(int);
980
981 extern void
982 tprint_iov_upto(struct tcb *, kernel_ulong_t len, kernel_ulong_t addr,
983                 enum iov_decode, kernel_ulong_t data_size);
984
985 extern void
986 decode_netlink(struct tcb *, int fd, kernel_ulong_t addr, kernel_ulong_t len);
987
988 extern void tprint_open_modes(unsigned int);
989 extern const char *sprint_open_modes(unsigned int);
990
991 extern void
992 decode_seccomp_fprog(struct tcb *, kernel_ulong_t addr);
993
994 extern void
995 print_seccomp_fprog(struct tcb *, kernel_ulong_t addr, unsigned short len);
996
997 extern void
998 decode_sock_fprog(struct tcb *, kernel_ulong_t addr);
999
1000 extern void
1001 print_sock_fprog(struct tcb *, kernel_ulong_t addr, unsigned short len);
1002
1003 struct strace_stat;
1004 extern void print_struct_stat(struct tcb *, const struct strace_stat *const st);
1005
1006 struct strace_statfs;
1007 struct strace_keyctl_kdf_params;
1008
1009 extern void
1010 print_struct_statfs(struct tcb *, kernel_ulong_t addr);
1011
1012 extern void
1013 print_struct_statfs64(struct tcb *, kernel_ulong_t addr, kernel_ulong_t size);
1014
1015 extern int
1016 fetch_perf_event_attr(struct tcb *const tcp, const kernel_ulong_t addr);
1017 extern void
1018 print_perf_event_attr(struct tcb *const tcp, const kernel_ulong_t addr);
1019
1020 extern const char *get_ifname(const unsigned int ifindex);
1021 extern void print_ifindex(unsigned int);
1022
1023 extern void print_bpf_filter_code(const uint16_t code, bool extended);
1024
1025 extern void qualify(const char *);
1026 extern unsigned int qual_flags(const unsigned int);
1027
1028 # define DECL_IOCTL(name)                                               \
1029 extern int                                                              \
1030 name ## _ioctl(struct tcb *, unsigned int request, kernel_ulong_t arg)  \
1031 /* End of DECL_IOCTL definition. */
1032
1033 DECL_IOCTL(dm);
1034 DECL_IOCTL(evdev);
1035 DECL_IOCTL(file);
1036 DECL_IOCTL(fs_x);
1037 DECL_IOCTL(inotify);
1038 DECL_IOCTL(kvm);
1039 DECL_IOCTL(nbd);
1040 DECL_IOCTL(nsfs);
1041 DECL_IOCTL(ptp);
1042 DECL_IOCTL(random);
1043 DECL_IOCTL(scsi);
1044 DECL_IOCTL(term);
1045 DECL_IOCTL(ubi);
1046 DECL_IOCTL(uffdio);
1047 DECL_IOCTL(watchdog);
1048 # undef DECL_IOCTL
1049
1050 extern int decode_sg_io_v4(struct tcb *, const kernel_ulong_t arg);
1051 extern void print_evdev_ff_type(const kernel_ulong_t val);
1052
1053 struct nlmsghdr;
1054
1055 typedef bool (*netlink_decoder_t)(struct tcb *, const struct nlmsghdr *,
1056                                   kernel_ulong_t addr, unsigned int len);
1057
1058 # define DECL_NETLINK(name)                                             \
1059 extern bool                                                             \
1060 decode_netlink_ ## name(struct tcb *, const struct nlmsghdr *,          \
1061                         kernel_ulong_t addr, unsigned int len)          \
1062 /* End of DECL_NETLINK definition. */
1063
1064 DECL_NETLINK(crypto);
1065 DECL_NETLINK(netfilter);
1066 DECL_NETLINK(route);
1067 DECL_NETLINK(selinux);
1068 DECL_NETLINK(sock_diag);
1069
1070 extern void
1071 decode_netlink_kobject_uevent(struct tcb *, kernel_ulong_t addr,
1072                               kernel_ulong_t len);
1073
1074 extern int ts_nz(const struct timespec *);
1075 extern int ts_cmp(const struct timespec *, const struct timespec *);
1076 extern double ts_float(const struct timespec *);
1077 extern void ts_add(struct timespec *, const struct timespec *, const struct timespec *);
1078 extern void ts_sub(struct timespec *, const struct timespec *, const struct timespec *);
1079 extern void ts_mul(struct timespec *, const struct timespec *, int);
1080 extern void ts_div(struct timespec *, const struct timespec *, int);
1081 extern const struct timespec *ts_min(const struct timespec *, const struct timespec *);
1082 extern const struct timespec *ts_max(const struct timespec *, const struct timespec *);
1083 extern int parse_ts(const char *s, struct timespec *t);
1084
1085 # ifdef ENABLE_STACKTRACE
1086 extern void unwind_init(void);
1087 extern void unwind_tcb_init(struct tcb *);
1088 extern void unwind_tcb_fin(struct tcb *);
1089 extern void unwind_tcb_print(struct tcb *);
1090 extern void unwind_tcb_capture(struct tcb *);
1091 # endif
1092
1093 # ifdef HAVE_LINUX_KVM_H
1094 extern void kvm_run_structure_decoder_init(void);
1095 extern void kvm_vcpu_info_free(struct tcb *);
1096 # endif
1097
1098 static inline int
1099 printstrn(struct tcb *tcp, kernel_ulong_t addr, kernel_ulong_t len)
1100 {
1101         return printstr_ex(tcp, addr, len, 0);
1102 }
1103
1104 static inline int
1105 printstr(struct tcb *tcp, kernel_ulong_t addr)
1106 {
1107         return printstr_ex(tcp, addr, -1, QUOTE_0_TERMINATED);
1108 }
1109
1110 static inline int
1111 printflags64(const struct xlat *x, uint64_t flags, const char *dflt)
1112 {
1113         return printflags_ex(flags, dflt, XLAT_STYLE_DEFAULT, x, NULL);
1114 }
1115
1116 static inline int
1117 printflags(const struct xlat *x, unsigned int flags, const char *dflt)
1118 {
1119         return printflags64(x, flags, dflt);
1120 }
1121
1122 static inline int
1123 printxval64(const struct xlat *x, const uint64_t val, const char *dflt)
1124 {
1125         return printxvals(val, dflt, x, NULL);
1126 }
1127
1128 static inline int
1129 printxval(const struct xlat *x, const unsigned int val, const char *dflt)
1130 {
1131         return printxvals(val, dflt, x, NULL);
1132 }
1133
1134 static inline int
1135 printxval64_u(const struct xlat *x, const uint64_t val, const char *dflt)
1136 {
1137         return printxvals_ex(val, dflt, XLAT_STYLE_FMT_U, x, NULL);
1138 }
1139
1140 static inline int
1141 printxval_u(const struct xlat *x, const unsigned int val, const char *dflt)
1142 {
1143         return printxvals_ex(val, dflt, XLAT_STYLE_FMT_U, x, NULL);
1144 }
1145
1146 static inline int
1147 printxval64_d(const struct xlat *x, const int64_t val, const char *dflt)
1148 {
1149         return printxvals_ex(val, dflt, XLAT_STYLE_FMT_D, x, NULL);
1150 }
1151
1152 static inline int
1153 printxval_d(const struct xlat *x, const int val, const char *dflt)
1154 {
1155         return printxvals_ex(val, dflt, XLAT_STYLE_FMT_D, x, NULL);
1156 }
1157
1158 static inline void
1159 tprint_iov(struct tcb *tcp, kernel_ulong_t len, kernel_ulong_t addr,
1160            enum iov_decode decode_iov)
1161 {
1162         tprint_iov_upto(tcp, len, addr, decode_iov, -1);
1163 }
1164
1165 # if HAVE_ARCH_TIME32_SYSCALLS
1166 extern bool print_timespec32_data_size(const void *arg, size_t size);
1167 extern bool print_timespec32_array_data_size(const void *arg,
1168                                              unsigned int nmemb,
1169                                              size_t size);
1170 extern int print_timespec32(struct tcb *, kernel_ulong_t);
1171 extern const char *sprint_timespec32(struct tcb *, kernel_ulong_t);
1172 extern int print_timespec32_utime_pair(struct tcb *, kernel_ulong_t);
1173 extern int print_itimerspec32(struct tcb *, kernel_ulong_t);
1174 extern int print_timex32(struct tcb *, kernel_ulong_t);
1175 # endif /* HAVE_ARCH_TIME32_SYSCALLS */
1176
1177 extern bool print_timespec64_data_size(const void *arg, size_t size);
1178 extern bool print_timespec64_array_data_size(const void *arg,
1179                                              unsigned int nmemb,
1180                                              size_t size);
1181 extern int print_timespec64(struct tcb *, kernel_ulong_t);
1182 extern const char *sprint_timespec64(struct tcb *, kernel_ulong_t);
1183 extern int print_timespec64_utime_pair(struct tcb *, kernel_ulong_t);
1184 extern int print_itimerspec64(struct tcb *, kernel_ulong_t);
1185
1186 extern bool print_timeval64_data_size(const void *arg, size_t size);
1187
1188 extern int print_timex64(struct tcb *, kernel_ulong_t);
1189
1190 # ifdef SPARC64
1191 extern int print_sparc64_timex(struct tcb *, kernel_ulong_t);
1192 # endif
1193
1194 # ifdef ALPHA
1195 typedef struct {
1196         int tv_sec, tv_usec;
1197 } timeval32_t;
1198
1199 extern void print_timeval32_t(const timeval32_t *);
1200 extern void printrusage32(struct tcb *, kernel_ulong_t);
1201 extern const char *sprint_timeval32(struct tcb *, kernel_ulong_t addr);
1202 extern int print_timeval32(struct tcb *, kernel_ulong_t addr);
1203 extern int print_timeval32_utimes(struct tcb *, kernel_ulong_t addr);
1204 extern int print_itimerval32(struct tcb *, kernel_ulong_t addr);
1205 # endif
1206
1207 # ifdef HAVE_STRUCT_USER_DESC
1208 /**
1209  * Filter what to print from the point of view of the get_thread_area syscall.
1210  * Kernel copies only entry_number field at first and then tries to write the
1211  * whole structure.
1212  */
1213 enum user_desc_print_filter {
1214         /* Print the "entering" part of struct user_desc - entry_number.  */
1215         USER_DESC_ENTERING = 1,
1216         /* Print the "exiting" part of the structure.  */
1217         USER_DESC_EXITING  = 2,
1218         USER_DESC_BOTH     = USER_DESC_ENTERING | USER_DESC_EXITING,
1219 };
1220
1221 extern void print_user_desc(struct tcb *, kernel_ulong_t addr,
1222                             enum user_desc_print_filter filter);
1223 # endif
1224
1225 /* Strace log generation machinery.
1226  *
1227  * printing_tcp: tcb which has incomplete line being printed right now.
1228  * NULL if last line has been completed ('\n'-terminated).
1229  * printleader(tcp) examines it, finishes incomplete line if needed,
1230  * the sets it to tcp.
1231  * line_ended() clears printing_tcp and resets ->curcol = 0.
1232  * tcp->curcol == 0 check is also used to detect completeness
1233  * of last line, since in -ff mode just checking printing_tcp for NULL
1234  * is not enough.
1235  *
1236  * If you change this code, test log generation in both -f and -ff modes
1237  * using:
1238  * strace -oLOG -f[f] test/threaded_execve
1239  * strace -oLOG -f[f] test/sigkill_rain
1240  * strace -oLOG -f[f] -p "`pidof web_browser`"
1241  */
1242 extern struct tcb *printing_tcp;
1243 extern void printleader(struct tcb *);
1244 extern void line_ended(void);
1245 extern void tabto(void);
1246 extern void tprintf(const char *fmt, ...) ATTRIBUTE_FORMAT((printf, 1, 2));
1247 extern void tprints(const char *str);
1248 extern void tprintf_comment(const char *fmt, ...) ATTRIBUTE_FORMAT((printf, 1, 2));
1249 extern void tprints_comment(const char *str);
1250
1251 /*
1252  * Staging output for status qualifier.
1253  */
1254 extern FILE *strace_open_memstream(struct tcb *tcp);
1255 extern void strace_close_memstream(struct tcb *tcp, bool publish);
1256
1257 static inline void
1258 printaddr_comment(const kernel_ulong_t addr)
1259 {
1260         tprintf_comment("%#llx", (unsigned long long) addr);
1261 }
1262
1263 /*
1264  * When u64 is interpreted by the kernel as an address, there is a difference
1265  * in behaviour between 32-bit and 64-bit kernel in the way u64_to_user_ptr
1266  * works (32-bit kernel trims higher bits during conversion which may result
1267  * to a valid address).  Since 32-bit strace cannot figure out what kind of
1268  * kernel the tracee is running on, it has to account for both possibilities.
1269  */
1270 # if CAN_ARCH_BE_COMPAT_ON_64BIT_KERNEL
1271
1272 /**
1273  * Print raw 64-bit value as an address if it's too big to fit in strace's
1274  * kernel_long_t.
1275  */
1276 static inline void
1277 print_big_u64_addr(const uint64_t addr)
1278 {
1279         if (sizeof(kernel_long_t) < 8 && addr > max_kaddr()) {
1280                 printaddr64(addr);
1281                 tprints(" or ");
1282         }
1283 }
1284 # else /* !CAN_ARCH_BE_COMPAT_ON_64BIT_KERNEL */
1285 #  define print_big_u64_addr(addr_) ((void) 0)
1286 # endif /* CAN_ARCH_BE_COMPAT_ON_64BIT_KERNEL */
1287
1288 # if SIZEOF_KERNEL_LONG_T > 4           \
1289  && (SIZEOF_LONG < SIZEOF_KERNEL_LONG_T || !defined(current_wordsize))
1290 #  define ANY_WORDSIZE_LESS_THAN_KERNEL_LONG    1
1291 # else
1292 #  define ANY_WORDSIZE_LESS_THAN_KERNEL_LONG    0
1293 # endif
1294
1295 # define DECL_PRINTNUM(name)                                            \
1296 extern bool                                                             \
1297 printnum_ ## name(struct tcb *, kernel_ulong_t addr, const char *fmt)   \
1298         ATTRIBUTE_FORMAT((printf, 3, 0))                                \
1299 /* End of DECL_PRINTNUM definition. */
1300
1301 DECL_PRINTNUM(short);
1302 DECL_PRINTNUM(int);
1303 DECL_PRINTNUM(int64);
1304 # undef DECL_PRINTNUM
1305
1306 # define DECL_PRINTNUM_ADDR(name)                                       \
1307 extern bool                                                             \
1308 printnum_addr_ ## name(struct tcb *, kernel_ulong_t addr)               \
1309 /* End of DECL_PRINTNUM_ADDR definition. */
1310
1311 DECL_PRINTNUM_ADDR(int);
1312 DECL_PRINTNUM_ADDR(int64);
1313 # undef DECL_PRINTNUM_ADDR
1314
1315 extern bool
1316 printnum_fd(struct tcb *, kernel_ulong_t addr);
1317
1318 static inline bool
1319 printnum_slong(struct tcb *tcp, kernel_ulong_t addr)
1320 {
1321         return dispatch_wordsize(printnum_int64, printnum_int,
1322                                  tcp, addr, opt_wordsize("%" PRId64, "%d"));
1323 }
1324
1325 static inline bool
1326 printnum_ulong(struct tcb *tcp, kernel_ulong_t addr)
1327 {
1328         return dispatch_wordsize(printnum_int64, printnum_int,
1329                                  tcp, addr, opt_wordsize("%" PRIu64, "%u"));
1330 }
1331
1332 static inline bool
1333 printnum_ptr(struct tcb *tcp, kernel_ulong_t addr)
1334 {
1335         return dispatch_wordsize(printnum_addr_int64, printnum_addr_int,
1336                                  tcp, addr);
1337 }
1338
1339 static inline bool
1340 printnum_kptr(struct tcb *tcp, kernel_ulong_t addr)
1341 {
1342         return dispatch_klongsize(printnum_addr_int64, printnum_addr_int,
1343                                   tcp, addr);
1344 }
1345
1346
1347 # define DECL_PRINTPAIR(name)                                           \
1348 extern bool                                                             \
1349 printpair_ ## name(struct tcb *, kernel_ulong_t addr, const char *fmt)  \
1350         ATTRIBUTE_FORMAT((printf, 3, 0))                                \
1351 /* End of DECL_PRINTPAIR definition. */
1352
1353 DECL_PRINTPAIR(int);
1354 DECL_PRINTPAIR(int64);
1355 # undef DECL_PRINTPAIR
1356
1357 static inline kernel_long_t
1358 truncate_klong_to_current_wordsize(const kernel_long_t v)
1359 {
1360 # if ANY_WORDSIZE_LESS_THAN_KERNEL_LONG
1361         if (current_wordsize < sizeof(v)) {
1362                 return (int) v;
1363         } else
1364 # endif
1365         {
1366                 return v;
1367         }
1368 }
1369
1370 static inline kernel_ulong_t
1371 truncate_kulong_to_current_wordsize(const kernel_ulong_t v)
1372 {
1373 # if ANY_WORDSIZE_LESS_THAN_KERNEL_LONG
1374         if (current_wordsize < sizeof(v)) {
1375                 return (unsigned int) v;
1376         } else
1377 # endif
1378         {
1379                 return v;
1380         }
1381 }
1382
1383 /*
1384  * Cast a pointer or a pointer-sized integer to kernel_ulong_t.
1385  */
1386 # define ptr_to_kulong(v) ((kernel_ulong_t) (unsigned long) (v))
1387
1388 /*
1389  * Zero-extend a signed integer type to unsigned long long.
1390  */
1391 # define zero_extend_signed_to_ull(v) \
1392         (sizeof(v) == sizeof(char) ? (unsigned long long) (unsigned char) (v) : \
1393          sizeof(v) == sizeof(short) ? (unsigned long long) (unsigned short) (v) : \
1394          sizeof(v) == sizeof(int) ? (unsigned long long) (unsigned int) (v) : \
1395          sizeof(v) == sizeof(long) ? (unsigned long long) (unsigned long) (v) : \
1396          (unsigned long long) (v))
1397
1398 /*
1399  * Sign-extend an unsigned integer type to long long.
1400  */
1401 # define sign_extend_unsigned_to_ll(v) \
1402         (sizeof(v) == sizeof(char) ? (long long) (char) (v) : \
1403          sizeof(v) == sizeof(short) ? (long long) (short) (v) : \
1404          sizeof(v) == sizeof(int) ? (long long) (int) (v) : \
1405          sizeof(v) == sizeof(long) ? (long long) (long) (v) : \
1406          (long long) (v))
1407
1408 /*
1409  * Computes the popcount of a vector of 32-bit values.
1410  */
1411 static inline unsigned int
1412 popcount32(const uint32_t *a, unsigned int size)
1413 {
1414         unsigned int count = 0;
1415
1416         for (; size; ++a, --size) {
1417                 uint32_t x = *a;
1418
1419 # ifdef HAVE___BUILTIN_POPCOUNT
1420                 count += __builtin_popcount(x);
1421 # else
1422                 for (; x; ++count)
1423                         x &= x - 1;
1424 # endif
1425         }
1426
1427         return count;
1428 }
1429
1430 extern const char *const errnoent[];
1431 extern const char *const signalent[];
1432 extern const unsigned int nerrnos;
1433 extern const unsigned int nsignals;
1434
1435 extern const struct_sysent sysent0[];
1436 extern const struct_ioctlent ioctlent0[];
1437
1438 extern const char *const personality_names[];
1439 /* Personality designators to be used for specifying personality */
1440 extern const char *const personality_designators[];
1441
1442 # if SUPPORTED_PERSONALITIES > 1
1443 extern const struct_sysent *sysent;
1444 extern const struct_ioctlent *ioctlent;
1445 # else
1446 #  define sysent     sysent0
1447 #  define ioctlent   ioctlent0
1448 # endif
1449
1450 extern unsigned nsyscalls;
1451 extern unsigned nioctlents;
1452
1453 extern const unsigned int nsyscall_vec[SUPPORTED_PERSONALITIES];
1454 extern const struct_sysent *const sysent_vec[SUPPORTED_PERSONALITIES];
1455 extern struct inject_opts *inject_vec[SUPPORTED_PERSONALITIES];
1456
1457 # ifdef IN_MPERS_BOOTSTRAP
1458 /* Transform multi-line MPERS_PRINTER_DECL statements to one-liners.  */
1459 #  define MPERS_PRINTER_DECL(type, name, ...) MPERS_PRINTER_DECL(type, name, __VA_ARGS__)
1460 # else /* !IN_MPERS_BOOTSTRAP */
1461 #  if SUPPORTED_PERSONALITIES > 1
1462 #   include "printers.h"
1463 #  else
1464 #   include "native_printer_decls.h"
1465 #  endif
1466 #  define MPERS_PRINTER_DECL(type, name, ...) type MPERS_FUNC_NAME(name)(__VA_ARGS__)
1467 # endif /* !IN_MPERS_BOOTSTRAP */
1468
1469 /* Checks that sysent[scno] is not out of range. */
1470 static inline bool
1471 scno_in_range(kernel_ulong_t scno)
1472 {
1473         return scno < nsyscalls;
1474 }
1475
1476 /*
1477  * Checks whether scno is not out of range,
1478  * its corresponding sysent[scno].sys_func is non-NULL,
1479  * and its sysent[scno].sys_flags has no TRACE_INDIRECT_SUBCALL flag set.
1480  */
1481 static inline bool
1482 scno_is_valid(kernel_ulong_t scno)
1483 {
1484         return scno_in_range(scno)
1485                && sysent[scno].sys_func
1486                && !(sysent[scno].sys_flags & TRACE_INDIRECT_SUBCALL);
1487 }
1488
1489 # define MPERS_FUNC_NAME__(prefix, name) prefix ## name
1490 # define MPERS_FUNC_NAME_(prefix, name) MPERS_FUNC_NAME__(prefix, name)
1491 # define MPERS_FUNC_NAME(name) MPERS_FUNC_NAME_(MPERS_PREFIX, name)
1492
1493 # define SYS_FUNC_NAME(syscall_name) MPERS_FUNC_NAME(syscall_name)
1494
1495 # define SYS_FUNC(syscall_name) int SYS_FUNC_NAME(sys_ ## syscall_name)(struct tcb *tcp)
1496
1497 #endif /* !STRACE_DEFS_H */