compat: fall back on __va_copy if available
[git/git.git] / trace.c
1 /*
2 * GIT - The information manager from hell
3 *
4 * Copyright (C) 2000-2002 Michael R. Elkins <me@mutt.org>
5 * Copyright (C) 2002-2004 Oswald Buddenhagen <ossi@users.sf.net>
6 * Copyright (C) 2004 Theodore Y. Ts'o <tytso@mit.edu>
7 * Copyright (C) 2006 Mike McCormack
8 * Copyright (C) 2006 Christian Couder
9 *
10 * This program is free software; you can redistribute it and/or modify
11 * it under the terms of the GNU General Public License as published by
12 * the Free Software Foundation; either version 2 of the License, or
13 * (at your option) any later version.
14 *
15 * This program is distributed in the hope that it will be useful,
16 * but WITHOUT ANY WARRANTY; without even the implied warranty of
17 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
18 * GNU General Public License for more details.
19 *
20 * You should have received a copy of the GNU General Public License
21 * along with this program; if not, write to the Free Software
22 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
23 */
24
25 #include "cache.h"
26 #include "quote.h"
27
28 /* Get a trace file descriptor from GIT_TRACE env variable. */
29 static int get_trace_fd(int *need_close)
30 {
31 char *trace = getenv("GIT_TRACE");
32
33 if (!trace || !strcmp(trace, "") ||
34 !strcmp(trace, "0") || !strcasecmp(trace, "false"))
35 return 0;
36 if (!strcmp(trace, "1") || !strcasecmp(trace, "true"))
37 return STDERR_FILENO;
38 if (strlen(trace) == 1 && isdigit(*trace))
39 return atoi(trace);
40 if (is_absolute_path(trace)) {
41 int fd = open(trace, O_WRONLY | O_APPEND | O_CREAT, 0666);
42 if (fd == -1) {
43 fprintf(stderr,
44 "Could not open '%s' for tracing: %s\n"
45 "Defaulting to tracing on stderr...\n",
46 trace, strerror(errno));
47 return STDERR_FILENO;
48 }
49 *need_close = 1;
50 return fd;
51 }
52
53 fprintf(stderr, "What does '%s' for GIT_TRACE mean?\n", trace);
54 fprintf(stderr, "If you want to trace into a file, "
55 "then please set GIT_TRACE to an absolute pathname "
56 "(starting with /).\n");
57 fprintf(stderr, "Defaulting to tracing on stderr...\n");
58
59 return STDERR_FILENO;
60 }
61
62 static const char err_msg[] = "Could not trace into fd given by "
63 "GIT_TRACE environment variable";
64
65 void trace_printf(const char *fmt, ...)
66 {
67 struct strbuf buf = STRBUF_INIT;
68 va_list ap;
69 int fd, need_close = 0;
70
71 fd = get_trace_fd(&need_close);
72 if (!fd)
73 return;
74
75 set_try_to_free_routine(NULL); /* is never reset */
76 va_start(ap, fmt);
77 strbuf_vaddf(&buf, fmt, ap);
78 va_end(ap);
79
80 write_or_whine_pipe(fd, buf.buf, buf.len, err_msg);
81 strbuf_release(&buf);
82
83 if (need_close)
84 close(fd);
85 }
86
87 void trace_argv_printf(const char **argv, const char *fmt, ...)
88 {
89 struct strbuf buf = STRBUF_INIT;
90 va_list ap;
91 int fd, need_close = 0;
92
93 fd = get_trace_fd(&need_close);
94 if (!fd)
95 return;
96
97 set_try_to_free_routine(NULL); /* is never reset */
98 va_start(ap, fmt);
99 strbuf_vaddf(&buf, fmt, ap);
100 va_end(ap);
101
102 sq_quote_argv(&buf, argv, 0);
103 strbuf_addch(&buf, '\n');
104 write_or_whine_pipe(fd, buf.buf, buf.len, err_msg);
105 strbuf_release(&buf);
106
107 if (need_close)
108 close(fd);
109 }
110
111 static const char *quote_crnl(const char *path)
112 {
113 static char new_path[PATH_MAX];
114 const char *p2 = path;
115 char *p1 = new_path;
116
117 if (!path)
118 return NULL;
119
120 while (*p2) {
121 switch (*p2) {
122 case '\\': *p1++ = '\\'; *p1++ = '\\'; break;
123 case '\n': *p1++ = '\\'; *p1++ = 'n'; break;
124 case '\r': *p1++ = '\\'; *p1++ = 'r'; break;
125 default:
126 *p1++ = *p2;
127 }
128 p2++;
129 }
130 *p1 = '\0';
131 return new_path;
132 }
133
134 /* FIXME: move prefix to startup_info struct and get rid of this arg */
135 void trace_repo_setup(const char *prefix)
136 {
137 const char *git_work_tree;
138 char cwd[PATH_MAX];
139 char *trace = getenv("GIT_TRACE");
140
141 if (!trace || !strcmp(trace, "") ||
142 !strcmp(trace, "0") || !strcasecmp(trace, "false"))
143 return;
144
145 if (!getcwd(cwd, PATH_MAX))
146 die("Unable to get current working directory");
147
148 if (!(git_work_tree = get_git_work_tree()))
149 git_work_tree = "(null)";
150
151 if (!prefix)
152 prefix = "(null)";
153
154 trace_printf("setup: git_dir: %s\n", quote_crnl(get_git_dir()));
155 trace_printf("setup: worktree: %s\n", quote_crnl(git_work_tree));
156 trace_printf("setup: cwd: %s\n", quote_crnl(cwd));
157 trace_printf("setup: prefix: %s\n", quote_crnl(prefix));
158 }