Book a Demo!
CoCalc Logo Icon
StoreFeaturesDocsShareSupportNewsAboutPoliciesSign UpSign In
att
GitHub Repository: att/ast
Path: blob/master/src/lib/libast/misc/systrace.c
1810 views
1
/***********************************************************************
2
* *
3
* This software is part of the ast package *
4
* Copyright (c) 1985-2011 AT&T Intellectual Property *
5
* and is licensed under the *
6
* Eclipse Public License, Version 1.0 *
7
* by AT&T Intellectual Property *
8
* *
9
* A copy of the License is available at *
10
* http://www.eclipse.org/org/documents/epl-v10.html *
11
* (with md5 checksum b35adb5213ca9657e911e9befb180842) *
12
* *
13
* Information and Software Systems Research *
14
* AT&T Research *
15
* Florham Park NJ *
16
* *
17
* Glenn Fowler <[email protected]> *
18
* David Korn <[email protected]> *
19
* Phong Vo <[email protected]> *
20
* *
21
***********************************************************************/
22
#pragma prototyped
23
24
/*
25
* trace systems calls if possible
26
*/
27
28
#include <ast.h>
29
#include <error.h>
30
#include <proc.h>
31
#include <debug.h>
32
33
void
34
systrace(const char* id)
35
{
36
register int n;
37
register char* out;
38
char* s;
39
char buf[PATH_MAX];
40
char* av[7];
41
long ov[2];
42
43
static char* trace[] = { "trace", "truss", "strace", "traces" };
44
45
if (!(s = getenv("HOME")))
46
return;
47
if (!id && !(id = (const char*)error_info.id))
48
id = (const char*)trace[0];
49
out = buf;
50
out += sfsprintf(out, sizeof(buf), "%s/.%s/%s", s, trace[0], id);
51
if (access(buf, F_OK))
52
return;
53
av[1] = trace[0];
54
av[2] = "-o";
55
av[3] = buf;
56
av[4] = "-p";
57
av[5] = out + 1;
58
av[6] = 0;
59
ov[0] = PROC_FD_DUP(open("/dev/null", O_WRONLY), 2, PROC_FD_PARENT|PROC_FD_CHILD);
60
ov[1] = 0;
61
sfsprintf(out, &buf[sizeof(buf)] - out, ".%d", getpid());
62
for (n = 0; n < elementsof(trace); n++)
63
if (!procfree(procopen(trace[n], av + 1, NiL, ov, PROC_ARGMOD|PROC_GID|PROC_UID|(n == (elementsof(trace) - 1) ? PROC_CLEANUP : 0))))
64
{
65
sleep(1);
66
break;
67
}
68
}
69
70