1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
|
/* See LICENSE file for copyright and license details. */
#include "common.h"
static FILE *trace_fp;
static char last_char = '\n';
static pid_t last_pid = 0;
static int multiproctrace;
void
setup_trace_output(FILE *fp, int multiprocess)
{
multiproctrace = multiprocess;
trace_fp = fp;
}
void
tprintf(struct process *proc, const char *fmt, ...)
{
va_list ap;
if (proc->silent_until_execed)
return;
if (fmt[0] == '\n' && fmt[1]) {
last_pid = 0;
if (multiproctrace || last_char == '\n')
fmt = &fmt[1];
}
if (multiproctrace) {
if (proc->thread_leader) {
if (last_char == '\n')
fprintf(trace_fp, "[%ju, %ju] ", (uintmax_t)proc->thread_leader, (uintmax_t)proc->pid);
else if (proc->pid != last_pid)
fprintf(trace_fp, "\n[%ju, %ju] ", (uintmax_t)proc->thread_leader, (uintmax_t)proc->pid);
} else {
if (last_char == '\n')
fprintf(trace_fp, "[%ju] ", (uintmax_t)proc->pid);
else if (proc->pid != last_pid)
fprintf(trace_fp, "\n[%ju] ", (uintmax_t)proc->pid);
}
}
va_start(ap, fmt);
vfprintf(trace_fp, fmt, ap);
last_pid = proc->pid;
last_char = strchr(fmt, '\0')[-1];
va_end(ap);
}
void
weprintf(const char *fmt, ...)
{
va_list ap;
va_start(ap, fmt);
fprintf(stderr, "%s%s: ", last_char == '\n' ? "" : "\n", argv0);
vfprintf(stderr, fmt, ap);
switch (strchr(fmt, '\0')[-1]) {
case ':':
fprintf(stderr, " %s\n", strerror(errno));
break;
case '\n':
break;
default:
fprintf(stderr, "\n");
break;
}
va_end(ap);
}
FILE *
xfopen(const char *file, const char *mode)
{
FILE *ret;
const char *num = NULL;
long int tmp;
if (!strncmp(file, "/dev/fd/", sizeof("/dev/fd/") - 1))
num = &file[sizeof("/dev/fd/") - 1];
else if (!strncmp(file, "/proc/self/fd/", sizeof("/proc/self/fd/") - 1))
num = &file[sizeof("/proc/self/fd/") - 1];
else if (!strcmp(file, "/dev/stdin"))
num = "0";
else if (!strcmp(file, "/dev/stdout"))
num = "1";
else if (!strcmp(file, "/dev/stderr"))
num = "2";
if (num && isdigit(*num)) {
errno = 0;
tmp = strtol(num, (void *)&num, 10);
if (!errno && tmp >= 0 &&
#if INT_MAX < LONG_MAX
tmp < INT_MAX &&
#endif
!*num) {
ret = fdopen((int)tmp, mode);
if (!ret)
eprintf("fdopen %li %s:", tmp, mode);
return ret;
}
}
ret = fopen(file, mode);
if (!ret)
eprintf("fopen %s %s:", file, mode);
return ret;
}
|
