1 /* Machine independent support for SVR4 /proc (process file system) for GDB.
2 Copyright 1999, 2000, 2001 Free Software Foundation, Inc.
3 Written by Michael Snyder at Cygnus Solutions.
4 Based on work by Fred Fish, Stu Grossman, Geoff Noer, and others.
6 This file is part of GDB.
8 This program is free software; you can redistribute it and/or modify
9 it under the terms of the GNU General Public License as published by
10 the Free Software Foundation; either version 2 of the License, or
11 (at your option) any later version.
13 This program is distributed in the hope that it will be useful,
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 GNU General Public License for more details.
18 You should have received a copy of the GNU General Public License
19 along with this program; if not, write to the Free Software Foundation,
20 Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
23 * Pretty-print trace of api calls to the /proc api
24 * (ioctl or read/write calls).
30 #include "completer.h"
32 #if defined (NEW_PROC_API)
33 #define _STRUCTURED_PROC 1
37 #include <sys/types.h>
38 #include <sys/procfs.h>
39 #ifdef HAVE_SYS_PROC_H
40 #include <sys/proc.h> /* for struct proc */
42 #ifdef HAVE_SYS_USER_H
43 #include <sys/user.h> /* for struct user */
45 #include <fcntl.h> /* for O_RDWR etc. */
48 #include "proc-utils.h"
50 /* Much of the information used in the /proc interface, particularly for
51 printing status information, is kept as tables of structures of the
52 following form. These tables can be used to map numeric values to
53 their symbolic names and to a string that describes their specific use. */
56 long value
; /* The numeric value */
57 char *name
; /* The equivalent symbolic value */
58 char *desc
; /* Short description of value */
61 static int procfs_trace
= 0;
62 static FILE *procfs_file
= NULL
;
63 static char *procfs_filename
= "procfs_trace";
66 prepare_to_trace (void)
68 if (procfs_trace
) /* if procfs tracing turned on */
69 if (procfs_file
== NULL
) /* if output file not yet open */
70 if (procfs_filename
!= NULL
) /* if output filename known */
71 procfs_file
= fopen (procfs_filename
, "a"); /* open output file */
75 set_procfs_trace_cmd (char *args
, int from_tty
, struct cmd_list_element
*c
)
77 #if 0 /* not sure what I might actually need to do here, if anything */
84 set_procfs_file_cmd (char *args
, int from_tty
, struct cmd_list_element
*c
)
86 /* Just changed the filename for procfs tracing.
87 If a file was already open, close it. */
96 static struct trans ioctl_table
[] = {
97 #ifdef PIOCACINFO /* irix */
98 { PIOCACINFO
, "PIOCACINFO", "get process account info" },
100 { PIOCACTION
, "PIOCACTION", "get signal action structs" },
101 #ifdef PIOCARGUMENTS /* osf */
102 { PIOCARGUMENTS
, "PIOCARGUMENTS", "command line args" },
104 #ifdef PIOCAUXV /* solaris aux vectors */
105 { PIOCAUXV
, "PIOCAUXV", "get aux vector" },
106 { PIOCNAUXV
, "PIOCNAUXV", "get number of aux vector entries" },
108 { PIOCCFAULT
, "PIOCCFAULT", "clear current fault" },
109 { PIOCCRED
, "PIOCCRED", "get process credentials" },
110 #ifdef PIOCENEVCTRS /* irix event counters */
111 { PIOCENEVCTRS
, "PIOCENEVCTRS", "acquire and start event counters" },
112 { PIOCGETEVCTRL
, "PIOCGETEVCTRL", "get control info of event counters" },
113 { PIOCGETEVCTRS
, "PIOCGETEVCTRS", "dump event counters" },
114 { PIOCGETPREVCTRS
, "PIOCGETPREVCTRS", "dump event counters & prusage info" },
115 { PIOCRELEVCTRS
, "PIOCRELEVCTRS", "release/stop event counters" },
116 { PIOCSETEVCTRL
, "PIOCSETEVCTRL", "set control info of event counters" },
117 { PIOCGETPTIMER
, "PIOCGETPTIMER", "get process timers" },
118 #endif /* irix event counters */
119 { PIOCGENTRY
, "PIOCGENTRY", "get traced syscall entry set" },
120 #if defined (PIOCGETPR)
121 { PIOCGETPR
, "PIOCGETPR", "read struct proc" },
123 #if defined (PIOCGETU)
124 { PIOCGETU
, "PIOCGETU", "read user area" },
126 #if defined (PIOCGETUTK) && (defined(KERNEL) || defined(SHOW_UTT)) /* osf */
127 { PIOCGETUTK
, "PIOCGETUTK", "get the utask struct" },
129 { PIOCGEXIT
, "PIOCGEXIT", "get traced syscall exit set" },
130 { PIOCGFAULT
, "PIOCGFAULT", "get traced fault set" },
131 #ifdef PIOCGFPCR /* osf */
132 { PIOCGFPCR
, "PIOCGFPCR", "get FP control register" },
133 { PIOCSFPCR
, "PIOCSFPCR", "set FP conrtol register" },
135 { PIOCGFPREG
, "PIOCGFPREG", "get floating point registers" },
136 { PIOCGHOLD
, "PIOCGHOLD", "get held signal set" },
137 { PIOCGREG
, "PIOCGREG", "get general registers" },
138 { PIOCGROUPS
, "PIOCGROUPS", "get supplementary groups" },
139 #ifdef PIOCGSPCACT /* osf */
140 { PIOCGSPCACT
, "PIOCGSPCACT", "get special action" },
141 { PIOCSSPCACT
, "PIOCSSPCACT", "set special action" },
143 { PIOCGTRACE
, "PIOCGTRACE", "get traced signal set" },
144 #ifdef PIOCGWATCH /* irix watchpoints */
145 { PIOCGWATCH
, "PIOCGWATCH", "get watchpoint" },
146 { PIOCSWATCH
, "PIOCSWATCH", "set watchpoint" },
147 { PIOCNWATCH
, "PIOCNWATCH", "get number of watchpoints" },
148 #endif /* irix watchpoints */
149 #ifdef PIOCGWIN /* solaris sparc */
150 { PIOCGWIN
, "PIOCGWIN", "get gwindows_t" },
152 #ifdef PIOCGXREG /* solaris sparc extra regs */
153 { PIOCGXREGSIZE
, "PIOCXREGSIZE", "get extra register state size" },
154 { PIOCGXREG
, "PIOCGXREG", "get extra register state" },
155 { PIOCSXREG
, "PIOCSXREG", "set extra register state" },
157 { PIOCKILL
, "PIOCKILL", "send signal" },
158 #ifdef PIOCLDT /* solaris i386 */
159 { PIOCLDT
, "PIOCLDT", "get LDT" },
160 { PIOCNLDT
, "PIOCNLDT", "get number of LDT entries" },
162 #ifdef PIOCLSTATUS /* solaris and unixware */
163 { PIOCLSTATUS
, "PIOCLSTATUS", "get status of all lwps" },
164 { PIOCLUSAGE
, "PIOCLUSAGE", "get resource usage of all lwps" },
165 { PIOCOPENLWP
, "PIOCOPENLWP", "get lwp file descriptor" },
166 { PIOCLWPIDS
, "PIOCLWPIDS", "get lwp identifiers" },
168 { PIOCMAP
, "PIOCMAP", "get memory map information" },
169 { PIOCMAXSIG
, "PIOCMAXSIG", "get max signal number" },
170 { PIOCNICE
, "PIOCNICE", "set nice priority" },
171 { PIOCNMAP
, "PIOCNMAP", "get number of memory mappings" },
172 { PIOCOPENM
, "PIOCOPENM", "open mapped object for reading" },
173 #ifdef PIOCOPENMOBS /* osf */
174 { PIOCOPENMOBS
, "PIOCOPENMOBS", "open mapped object" },
176 #ifdef PIOCOPENPD /* solaris */
177 { PIOCOPENPD
, "PIOCOPENPD", "get page data file descriptor" },
179 { PIOCPSINFO
, "PIOCPSINFO", "get ps(1) information" },
180 { PIOCRESET
, "PIOCRESET", "reset process flags" },
181 { PIOCRFORK
, "PIOCRFORK", "reset inherit-on-fork flag" },
182 { PIOCRRLC
, "PIOCRRLC", "reset run-on-last-close flag" },
183 { PIOCRUN
, "PIOCRUN", "make process runnable" },
184 #ifdef PIOCSAVECCNTRS /* irix */
185 { PIOCSAVECCNTRS
, "PIOCSAVECCNTRS", "parent gets child cntrs" },
187 { PIOCSENTRY
, "PIOCSENTRY", "set traced syscall entry set" },
188 { PIOCSET
, "PIOCSET", "set process flags" },
189 { PIOCSEXIT
, "PIOCSEXIT", "set traced syscall exit set" },
190 { PIOCSFAULT
, "PIOCSFAULT", "set traced fault set" },
191 { PIOCSFORK
, "PIOCSFORK", "set inherit-on-fork flag" },
192 { PIOCSFPREG
, "PIOCSFPREG", "set floating point registers" },
193 { PIOCSHOLD
, "PIOCSHOLD", "set held signal set" },
194 { PIOCSREG
, "PIOCSREG", "set general registers" },
195 { PIOCSRLC
, "PIOCSRLC", "set run-on-last-close flag" },
196 { PIOCSSIG
, "PIOCSSIG", "set current signal" },
197 { PIOCSTATUS
, "PIOCSTATUS", "get process status" },
198 { PIOCSTOP
, "PIOCSTOP", "post stop request" },
199 { PIOCSTRACE
, "PIOCSTRACE", "set traced signal set" },
200 { PIOCUNKILL
, "PIOCUNKILL", "delete a signal" },
201 #ifdef PIOCUSAGE /* solaris */
202 { PIOCUSAGE
, "PIOCUSAGE", "get resource usage" },
204 { PIOCWSTOP
, "PIOCWSTOP", "wait for process to stop" },
206 #ifdef PIOCNTHR /* osf threads */
207 { PIOCNTHR
, "PIOCNTHR", "get thread count" },
208 { PIOCRTINH
, "PIOCRTINH", "reset inherit-on-thread-creation" },
209 { PIOCSTINH
, "PIOCSTINH", "set inherit-on-thread-creation" },
210 { PIOCTLIST
, "PIOCTLIST", "get thread ids" },
211 { PIOCXPTH
, "PIOCXPTH", "translate port to thread handle" },
212 { PIOCTRUN
, "PIOCTRUN", "make thread runnable" },
213 { PIOCTSTATUS
, "PIOCTSTATUS", "get thread status" },
214 { PIOCTSTOP
, "PIOCTSTOP", "stop a thread" },
215 /* ... TGTRACE TSTRACE TSSIG TKILL TUNKILL TCFAULT TGFAULT TSFAULT
216 TGFPREG TSFPREG TGREG TSREG TACTION TTERM TABRUN TGENTRY TSENTRY
217 TGEXIT TSEXIT TSHOLD ... thread functions */
218 #endif /* osf threads */
223 ioctl_with_trace (int fd
, long opcode
, void *ptr
, char *file
, int line
)
233 for (i
= 0; ioctl_table
[i
].name
!= NULL
; i
++)
234 if (ioctl_table
[i
].value
== opcode
)
238 fprintf (procfs_file
? procfs_file
: stdout
,
239 "%s:%d -- ", file
, line
);
242 arg1
= ptr
? *(long *) ptr
: 0;
243 fprintf (procfs_file
? procfs_file
: stdout
,
244 "ioctl (PIOCSET, %s) %s\n",
245 arg1
== PR_FORK
? "PR_FORK" :
246 arg1
== PR_RLC
? "PR_RLC" :
248 arg1
== PR_ASYNC
? "PR_ASYNC" :
251 info_verbose
? ioctl_table
[i
].desc
: "");
254 arg1
= ptr
? *(long *) ptr
: 0;
255 fprintf (procfs_file
? procfs_file
: stdout
,
256 "ioctl (PIOCRESET, %s) %s\n",
257 arg1
== PR_FORK
? "PR_FORK" :
258 arg1
== PR_RLC
? "PR_RLC" :
260 arg1
== PR_ASYNC
? "PR_ASYNC" :
263 info_verbose
? ioctl_table
[i
].desc
: "");
266 fprintf (procfs_file
? procfs_file
: stdout
,
267 "ioctl (PIOCSTRACE) ");
268 proc_prettyfprint_signalset (procfs_file
? procfs_file
: stdout
,
269 (sigset_t
*) ptr
, 0);
272 fprintf (procfs_file
? procfs_file
: stdout
,
274 opcode
== PIOCSFAULT
? "PIOCSFAULT" : "PIOCGFAULT");
275 proc_prettyfprint_faultset (procfs_file
? procfs_file
: stdout
,
276 (fltset_t
*) ptr
, 0);
279 fprintf (procfs_file
? procfs_file
: stdout
,
281 opcode
== PIOCSENTRY
? "PIOCSENTRY" : "PIOCGENTRY");
282 proc_prettyfprint_syscalls (procfs_file
? procfs_file
: stdout
,
283 (sysset_t
*) ptr
, 0);
286 fprintf (procfs_file
? procfs_file
: stdout
,
288 opcode
== PIOCSEXIT
? "PIOCSEXIT" : "PIOCGEXIT");
289 proc_prettyfprint_syscalls (procfs_file
? procfs_file
: stdout
,
290 (sysset_t
*) ptr
, 0);
293 fprintf (procfs_file
? procfs_file
: stdout
,
295 opcode
== PIOCSHOLD
? "PIOCSHOLD" : "PIOCGHOLD");
296 proc_prettyfprint_signalset (procfs_file
? procfs_file
: stdout
,
297 (sigset_t
*) ptr
, 0);
300 fprintf (procfs_file
? procfs_file
: stdout
,
301 "ioctl (PIOCSSIG) ");
302 proc_prettyfprint_signal (procfs_file
? procfs_file
: stdout
,
303 ptr
? ((siginfo_t
*) ptr
)->si_signo
: 0,
305 fprintf (procfs_file
? procfs_file
: stdout
, "\n");
308 fprintf (procfs_file
? procfs_file
: stdout
,
311 arg1
= ptr
? *(long *) ptr
: 0;
313 fprintf (procfs_file
? procfs_file
: stdout
, "clearSig ");
315 fprintf (procfs_file
? procfs_file
: stdout
, "clearFlt ");
317 fprintf (procfs_file
? procfs_file
: stdout
, "setTrace ");
319 fprintf (procfs_file
? procfs_file
: stdout
, "setHold ");
321 fprintf (procfs_file
? procfs_file
: stdout
, "setFlt ");
323 fprintf (procfs_file
? procfs_file
: stdout
, "setVaddr ");
325 fprintf (procfs_file
? procfs_file
: stdout
, "step ");
327 fprintf (procfs_file
? procfs_file
: stdout
, "syscallAbort ");
329 fprintf (procfs_file
? procfs_file
: stdout
, "stopReq ");
331 fprintf (procfs_file
? procfs_file
: stdout
, "\n");
334 fprintf (procfs_file
? procfs_file
: stdout
,
335 "ioctl (PIOCKILL) ");
336 proc_prettyfprint_signal (procfs_file
? procfs_file
: stdout
,
337 ptr
? *(long *) ptr
: 0, 0);
338 fprintf (procfs_file
? procfs_file
: stdout
, "\n");
342 fprintf (procfs_file
? procfs_file
: stdout
,
343 "ioctl (PIOCSSPCACT) ");
344 arg1
= ptr
? *(long *) ptr
: 0;
345 if (arg1
& PRFS_STOPFORK
)
346 fprintf (procfs_file
? procfs_file
: stdout
, "stopFork ");
347 if (arg1
& PRFS_STOPEXEC
)
348 fprintf (procfs_file
? procfs_file
: stdout
, "stopExec ");
349 if (arg1
& PRFS_STOPTERM
)
350 fprintf (procfs_file
? procfs_file
: stdout
, "stopTerm ");
351 if (arg1
& PRFS_STOPTCR
)
352 fprintf (procfs_file
? procfs_file
: stdout
, "stopThreadCreate ");
353 if (arg1
& PRFS_STOPTTERM
)
354 fprintf (procfs_file
? procfs_file
: stdout
, "stopThreadTerm ");
355 if (arg1
& PRFS_KOLC
)
356 fprintf (procfs_file
? procfs_file
: stdout
, "killOnLastClose ");
357 fprintf (procfs_file
? procfs_file
: stdout
, "\n");
359 #endif /* PIOCSSPCACT */
361 if (ioctl_table
[i
].name
)
362 fprintf (procfs_file
? procfs_file
: stdout
,
365 info_verbose
? ioctl_table
[i
].desc
: "");
367 fprintf (procfs_file
? procfs_file
: stdout
,
368 "ioctl (<unknown %ld (0x%lx)) \n", opcode
, opcode
);
372 fflush (procfs_file
);
375 ret
= ioctl (fd
, opcode
, ptr
);
376 if (procfs_trace
&& ret
< 0)
378 fprintf (procfs_file
? procfs_file
: stdout
,
379 "[ioctl (%s) FAILED! (%s)]\n",
380 ioctl_table
[i
].name
!= NULL
?
381 ioctl_table
[i
].name
: "<unknown>",
382 safe_strerror (errno
));
384 fflush (procfs_file
);
390 #else /* NEW_PROC_API */
392 static struct trans rw_table
[] = {
393 #ifdef PCAGENT /* solaris */
394 { PCAGENT
, "PCAGENT", "create agent lwp with regs from argument" },
396 { PCCFAULT
, "PCCFAULT", "clear current fault" },
397 #ifdef PCCSIG /* solaris */
398 { PCCSIG
, "PCCSIG", "clear current signal" },
400 #ifdef PCDSTOP /* solaris */
401 { PCDSTOP
, "PCDSTOP", "post stop request" },
403 { PCKILL
, "PCKILL", "post a signal" },
404 #ifdef PCNICE /* solaris */
405 { PCNICE
, "PCNICE", "set nice priority" },
407 #ifdef PCREAD /* solaris */
408 { PCREAD
, "PCREAD", "read from the address space" },
409 { PCWRITE
, "PCWRITE", "write to the address space" },
411 #ifdef PCRESET /* unixware */
412 { PCRESET
, "PCRESET", "unset modes" },
414 { PCRUN
, "PCRUN", "make process/lwp runnable" },
415 #ifdef PCSASRS /* solaris 2.7 only */
416 { PCSASRS
, "PCSASRS", "set ancillary state registers" },
418 #ifdef PCSCRED /* solaris */
419 { PCSCRED
, "PCSCRED", "set process credentials" },
421 { PCSENTRY
, "PCSENTRY", "set traced syscall entry set" },
422 { PCSET
, "PCSET", "set modes" },
423 { PCSEXIT
, "PCSEXIT", "set traced syscall exit set" },
424 { PCSFAULT
, "PCSFAULT", "set traced fault set" },
425 { PCSFPREG
, "PCSFPREG", "set floating point registers" },
426 #ifdef PCSHOLD /* solaris */
427 { PCSHOLD
, "PCSHOLD", "set signal mask" },
429 { PCSREG
, "PCSREG", "set general registers" },
430 { PCSSIG
, "PCSSIG", "set current signal" },
431 { PCSTOP
, "PCSTOP", "post stop request and wait" },
432 { PCSTRACE
, "PCSTRACE", "set traced signal set" },
433 #ifdef PCSVADDR /* solaris */
434 { PCSVADDR
, "PCSVADDR", "set pc virtual address" },
436 #ifdef PCSXREG /* solaris sparc only */
437 { PCSXREG
, "PCSXREG", "set extra registers" },
439 #ifdef PCTWSTOP /* solaris */
440 { PCTWSTOP
, "PCTWSTOP", "wait for stop, with timeout arg" },
442 #ifdef PCUNKILL /* solaris */
443 { PCUNKILL
, "PCUNKILL", "delete a pending signal" },
445 #ifdef PCUNSET /* solaris */
446 { PCUNSET
, "PCUNSET", "unset modes" },
448 #ifdef PCWATCH /* solaris */
449 { PCWATCH
, "PCWATCH", "set/unset watched memory area" },
451 { PCWSTOP
, "PCWSTOP", "wait for process/lwp to stop, no timeout" },
455 static off_t lseek_offset
;
458 write_with_trace (int fd
, void *varg
, size_t len
, char *file
, int line
)
462 procfs_ctl_t
*arg
= (procfs_ctl_t
*) varg
;
467 procfs_ctl_t opcode
= arg
[0];
468 for (i
= 0; rw_table
[i
].name
!= NULL
; i
++)
469 if (rw_table
[i
].value
== opcode
)
473 fprintf (procfs_file
? procfs_file
: stdout
,
474 "%s:%d -- ", file
, line
);
477 fprintf (procfs_file
? procfs_file
: stdout
,
478 "write (PCSET, %s) %s\n",
479 arg
[1] == PR_FORK
? "PR_FORK" :
480 arg
[1] == PR_RLC
? "PR_RLC" :
482 arg
[1] == PR_ASYNC
? "PR_ASYNC" :
485 info_verbose
? rw_table
[i
].desc
: "");
491 #if PCRESET != PCUNSET
495 fprintf (procfs_file
? procfs_file
: stdout
,
496 "write (PCRESET, %s) %s\n",
497 arg
[1] == PR_FORK
? "PR_FORK" :
498 arg
[1] == PR_RLC
? "PR_RLC" :
500 arg
[1] == PR_ASYNC
? "PR_ASYNC" :
503 info_verbose
? rw_table
[i
].desc
: "");
506 fprintf (procfs_file
? procfs_file
: stdout
,
507 "write (PCSTRACE) ");
508 proc_prettyfprint_signalset (procfs_file
? procfs_file
: stdout
,
509 (sigset_t
*) &arg
[1], 0);
512 fprintf (procfs_file
? procfs_file
: stdout
,
513 "write (PCSFAULT) ");
514 proc_prettyfprint_faultset (procfs_file
? procfs_file
: stdout
,
515 (fltset_t
*) &arg
[1], 0);
518 fprintf (procfs_file
? procfs_file
: stdout
,
519 "write (PCSENTRY) ");
520 proc_prettyfprint_syscalls (procfs_file
? procfs_file
: stdout
,
521 (sysset_t
*) &arg
[1], 0);
524 fprintf (procfs_file
? procfs_file
: stdout
,
526 proc_prettyfprint_syscalls (procfs_file
? procfs_file
: stdout
,
527 (sysset_t
*) &arg
[1], 0);
531 fprintf (procfs_file
? procfs_file
: stdout
,
533 proc_prettyfprint_signalset (procfs_file
? procfs_file
: stdout
,
534 (sigset_t
*) &arg
[1], 0);
538 fprintf (procfs_file
? procfs_file
: stdout
,
540 proc_prettyfprint_signal (procfs_file
? procfs_file
: stdout
,
541 arg
[1] ? ((siginfo_t
*) &arg
[1])->si_signo
544 fprintf (procfs_file
? procfs_file
: stdout
, "\n");
547 fprintf (procfs_file
? procfs_file
: stdout
,
550 fprintf (procfs_file
? procfs_file
: stdout
, "clearSig ");
551 if (arg
[1] & PRCFAULT
)
552 fprintf (procfs_file
? procfs_file
: stdout
, "clearFlt ");
554 fprintf (procfs_file
? procfs_file
: stdout
, "step ");
556 if (arg
[1] & PRSABORT
)
557 fprintf (procfs_file
? procfs_file
: stdout
, "syscallAbort ");
561 fprintf (procfs_file
? procfs_file
: stdout
, "stopReq ");
564 fprintf (procfs_file
? procfs_file
: stdout
, "\n");
567 fprintf (procfs_file
? procfs_file
: stdout
,
569 proc_prettyfprint_signal (procfs_file
? procfs_file
: stdout
,
571 fprintf (procfs_file
? procfs_file
: stdout
, "\n");
576 static unsigned char break_insn
[] = BREAKPOINT
;
578 if (len
== sizeof (break_insn
) &&
579 memcmp (arg
, &break_insn
, len
) == 0)
580 fprintf (procfs_file
? procfs_file
: stdout
,
581 "write (<breakpoint at 0x%08lx>) \n",
582 (unsigned long) lseek_offset
);
585 if (rw_table
[i
].name
)
586 fprintf (procfs_file
? procfs_file
: stdout
,
589 info_verbose
? rw_table
[i
].desc
: "");
592 if (lseek_offset
!= -1)
593 fprintf (procfs_file
? procfs_file
: stdout
,
594 "write (<unknown>, %lud bytes at 0x%08lx) \n",
595 (unsigned long) len
, (unsigned long) lseek_offset
);
597 fprintf (procfs_file
? procfs_file
: stdout
,
598 "write (<unknown>, %lud bytes) \n",
599 (unsigned long) len
);
605 fflush (procfs_file
);
608 ret
= write (fd
, (void *) arg
, len
);
609 if (procfs_trace
&& ret
!= len
)
611 fprintf (procfs_file
? procfs_file
: stdout
,
612 "[write (%s) FAILED! (%s)]\n",
613 rw_table
[i
].name
!= NULL
?
614 rw_table
[i
].name
: "<unknown>",
615 safe_strerror (errno
));
617 fflush (procfs_file
);
625 lseek_with_trace (int fd
, off_t offset
, int whence
, char *file
, int line
)
631 ret
= lseek (fd
, offset
, whence
);
633 if (procfs_trace
&& (ret
== -1 || errno
!= 0))
635 fprintf (procfs_file
? procfs_file
: stdout
,
636 "[lseek (0x%08lx) FAILED! (%s)]\n",
637 (unsigned long) offset
, safe_strerror (errno
));
639 fflush (procfs_file
);
645 #endif /* NEW_PROC_API */
648 open_with_trace (char *filename
, int mode
, char *file
, int line
)
654 ret
= open (filename
, mode
);
658 fprintf (procfs_file
? procfs_file
: stdout
,
659 "%s:%d -- ", file
, line
);
663 fprintf (procfs_file
? procfs_file
: stdout
,
664 "[open FAILED! (%s) line %d]\\n",
665 safe_strerror (errno
), line
);
669 fprintf (procfs_file
? procfs_file
: stdout
,
670 "%d = open (%s, ", ret
, filename
);
671 if (mode
== O_RDONLY
)
672 fprintf (procfs_file
? procfs_file
: stdout
, "O_RDONLY) %d\n",
674 else if (mode
== O_WRONLY
)
675 fprintf (procfs_file
? procfs_file
: stdout
, "O_WRONLY) %d\n",
677 else if (mode
== O_RDWR
)
678 fprintf (procfs_file
? procfs_file
: stdout
, "O_RDWR) %d\n",
682 fflush (procfs_file
);
689 close_with_trace (int fd
, char *file
, int line
)
699 fprintf (procfs_file
? procfs_file
: stdout
,
700 "%s:%d -- ", file
, line
);
702 fprintf (procfs_file
? procfs_file
: stdout
,
703 "[close FAILED! (%s)]\n", safe_strerror (errno
));
705 fprintf (procfs_file
? procfs_file
: stdout
,
706 "%d = close (%d)\n", ret
, fd
);
708 fflush (procfs_file
);
715 wait_with_trace (int *wstat
, char *file
, int line
)
723 fprintf (procfs_file
? procfs_file
: stdout
,
724 "%s:%d -- ", file
, line
);
725 fprintf (procfs_file
? procfs_file
: stdout
,
726 "wait (line %d) ", line
);
728 fflush (procfs_file
);
735 fprintf (procfs_file
? procfs_file
: stdout
,
736 "[wait FAILED! (%s)]\n", safe_strerror (errno
));
738 fprintf (procfs_file
? procfs_file
: stdout
,
739 "returned pid %d, status 0x%x\n", ret
, lstat
);
741 fflush (procfs_file
);
750 procfs_note (char *msg
, char *file
, int line
)
756 fprintf (procfs_file
? procfs_file
: stdout
,
757 "%s:%d -- ", file
, line
);
758 fprintf (procfs_file
? procfs_file
: stdout
, msg
);
760 fflush (procfs_file
);
765 proc_prettyfprint_status (long flags
, int why
, int what
, int thread
)
771 fprintf (procfs_file
? procfs_file
: stdout
,
772 "Thread %d: ", thread
);
774 proc_prettyfprint_flags (procfs_file
? procfs_file
: stdout
,
777 if (flags
& (PR_STOPPED
| PR_ISTOP
))
778 proc_prettyfprint_why (procfs_file
? procfs_file
: stdout
,
781 fflush (procfs_file
);
787 _initialize_proc_api (void)
789 struct cmd_list_element
*c
;
791 c
= add_set_cmd ("procfs-trace", no_class
,
792 var_boolean
, (char *) &procfs_trace
,
793 "Set tracing for /proc api calls.\n", &setlist
);
795 add_show_from_set (c
, &showlist
);
796 set_cmd_sfunc (c
, set_procfs_trace_cmd
);
797 set_cmd_completer (c
, filename_completer
);
799 c
= add_set_cmd ("procfs-file", no_class
, var_filename
,
800 (char *) &procfs_filename
,
801 "Set filename for /proc tracefile.\n", &setlist
);
803 add_show_from_set (c
, &showlist
);
804 set_cmd_sfunc (c
, set_procfs_file_cmd
);
This page took 0.04614 seconds and 4 git commands to generate.