send-email: avoid open "-|" list form for Perl 5.6
[git/mingw.git] / receive-pack.c
blobeae31e370d44988b9a8ee9ddb6c3191b4f18bf3e
1 #include "cache.h"
2 #include "refs.h"
3 #include "pkt-line.h"
4 #include "run-command.h"
5 #include <sys/wait.h>
7 static const char receive_pack_usage[] = "git-receive-pack <git-dir>";
9 static char *unpacker[] = { "unpack-objects", NULL };
11 static int report_status = 0;
13 static char capabilities[] = "report-status";
14 static int capabilities_sent = 0;
16 static int show_ref(const char *path, const unsigned char *sha1)
18 if (capabilities_sent)
19 packet_write(1, "%s %s\n", sha1_to_hex(sha1), path);
20 else
21 packet_write(1, "%s %s%c%s\n",
22 sha1_to_hex(sha1), path, 0, capabilities);
23 capabilities_sent = 1;
24 return 0;
27 static void write_head_info(void)
29 for_each_ref(show_ref);
30 if (!capabilities_sent)
31 show_ref("capabilities^{}", null_sha1);
35 struct command {
36 struct command *next;
37 const char *error_string;
38 unsigned char old_sha1[20];
39 unsigned char new_sha1[20];
40 char ref_name[FLEX_ARRAY]; /* more */
43 static struct command *commands = NULL;
45 static int is_all_zeroes(const char *hex)
47 int i;
48 for (i = 0; i < 40; i++)
49 if (*hex++ != '0')
50 return 0;
51 return 1;
54 static int verify_old_ref(const char *name, char *hex_contents)
56 int fd, ret;
57 char buffer[60];
59 if (is_all_zeroes(hex_contents))
60 return 0;
61 fd = open(name, O_RDONLY);
62 if (fd < 0)
63 return -1;
64 ret = read(fd, buffer, 40);
65 close(fd);
66 if (ret != 40)
67 return -1;
68 if (memcmp(buffer, hex_contents, 40))
69 return -1;
70 return 0;
73 static char update_hook[] = "hooks/update";
75 static int run_update_hook(const char *refname,
76 char *old_hex, char *new_hex)
78 int code;
80 if (access(update_hook, X_OK) < 0)
81 return 0;
82 code = run_command(update_hook, refname, old_hex, new_hex, NULL);
83 switch (code) {
84 case 0:
85 return 0;
86 case -ERR_RUN_COMMAND_FORK:
87 return error("hook fork failed");
88 case -ERR_RUN_COMMAND_EXEC:
89 return error("hook execute failed");
90 case -ERR_RUN_COMMAND_WAITPID:
91 return error("waitpid failed");
92 case -ERR_RUN_COMMAND_WAITPID_WRONG_PID:
93 return error("waitpid is confused");
94 case -ERR_RUN_COMMAND_WAITPID_SIGNAL:
95 return error("%s died of signal\n", update_hook);
96 case -ERR_RUN_COMMAND_WAITPID_NOEXIT:
97 return error("%s died strangely", update_hook);
98 default:
99 error("%s exited with error code %d", update_hook, -code);
100 return -code;
104 static int update(struct command *cmd)
106 const char *name = cmd->ref_name;
107 unsigned char *old_sha1 = cmd->old_sha1;
108 unsigned char *new_sha1 = cmd->new_sha1;
109 char new_hex[60], *old_hex, *lock_name;
110 int newfd, namelen, written;
112 cmd->error_string = NULL;
113 if (!strncmp(name, "refs/", 5) && check_ref_format(name + 5)) {
114 cmd->error_string = "funny refname";
115 return error("refusing to create funny ref '%s' locally",
116 name);
119 namelen = strlen(name);
120 lock_name = xmalloc(namelen + 10);
121 memcpy(lock_name, name, namelen);
122 memcpy(lock_name + namelen, ".lock", 6);
124 strcpy(new_hex, sha1_to_hex(new_sha1));
125 old_hex = sha1_to_hex(old_sha1);
126 if (!has_sha1_file(new_sha1)) {
127 cmd->error_string = "bad pack";
128 return error("unpack should have generated %s, "
129 "but I can't find it!", new_hex);
131 safe_create_leading_directories(lock_name);
133 newfd = open(lock_name, O_CREAT | O_EXCL | O_WRONLY, 0666);
134 if (newfd < 0) {
135 cmd->error_string = "can't lock";
136 return error("unable to create %s (%s)",
137 lock_name, strerror(errno));
140 /* Write the ref with an ending '\n' */
141 new_hex[40] = '\n';
142 new_hex[41] = 0;
143 written = write(newfd, new_hex, 41);
144 /* Remove the '\n' again */
145 new_hex[40] = 0;
147 close(newfd);
148 if (written != 41) {
149 unlink(lock_name);
150 cmd->error_string = "can't write";
151 return error("unable to write %s", lock_name);
153 if (verify_old_ref(name, old_hex) < 0) {
154 unlink(lock_name);
155 cmd->error_string = "raced";
156 return error("%s changed during push", name);
158 if (run_update_hook(name, old_hex, new_hex)) {
159 unlink(lock_name);
160 cmd->error_string = "hook declined";
161 return error("hook declined to update %s\n", name);
163 else if (rename(lock_name, name) < 0) {
164 unlink(lock_name);
165 cmd->error_string = "can't rename";
166 return error("unable to replace %s", name);
168 else {
169 fprintf(stderr, "%s: %s -> %s\n", name, old_hex, new_hex);
170 return 0;
174 static char update_post_hook[] = "hooks/post-update";
176 static void run_update_post_hook(struct command *cmd)
178 struct command *cmd_p;
179 int argc;
180 char **argv;
182 if (access(update_post_hook, X_OK) < 0)
183 return;
184 for (argc = 1, cmd_p = cmd; cmd_p; cmd_p = cmd_p->next) {
185 if (cmd_p->error_string)
186 continue;
187 argc++;
189 argv = xmalloc(sizeof(*argv) * (1 + argc));
190 argv[0] = update_post_hook;
192 for (argc = 1, cmd_p = cmd; cmd_p; cmd_p = cmd_p->next) {
193 if (cmd_p->error_string)
194 continue;
195 argv[argc] = xmalloc(strlen(cmd_p->ref_name) + 1);
196 strcpy(argv[argc], cmd_p->ref_name);
197 argc++;
199 argv[argc] = NULL;
200 run_command_v_opt(argc, argv, RUN_COMMAND_NO_STDIO);
204 * This gets called after(if) we've successfully
205 * unpacked the data payload.
207 static void execute_commands(void)
209 struct command *cmd = commands;
211 while (cmd) {
212 update(cmd);
213 cmd = cmd->next;
215 run_update_post_hook(commands);
218 static void read_head_info(void)
220 struct command **p = &commands;
221 for (;;) {
222 static char line[1000];
223 unsigned char old_sha1[20], new_sha1[20];
224 struct command *cmd;
225 char *refname;
226 int len, reflen;
228 len = packet_read_line(0, line, sizeof(line));
229 if (!len)
230 break;
231 if (line[len-1] == '\n')
232 line[--len] = 0;
233 if (len < 83 ||
234 line[40] != ' ' ||
235 line[81] != ' ' ||
236 get_sha1_hex(line, old_sha1) ||
237 get_sha1_hex(line + 41, new_sha1))
238 die("protocol error: expected old/new/ref, got '%s'",
239 line);
241 refname = line + 82;
242 reflen = strlen(refname);
243 if (reflen + 82 < len) {
244 if (strstr(refname + reflen + 1, "report-status"))
245 report_status = 1;
247 cmd = xmalloc(sizeof(struct command) + len - 80);
248 memcpy(cmd->old_sha1, old_sha1, 20);
249 memcpy(cmd->new_sha1, new_sha1, 20);
250 memcpy(cmd->ref_name, line + 82, len - 81);
251 cmd->error_string = "n/a (unpacker error)";
252 cmd->next = NULL;
253 *p = cmd;
254 p = &cmd->next;
258 static const char *unpack(int *error_code)
260 int code = run_command_v_opt(1, unpacker, RUN_GIT_CMD);
262 *error_code = 0;
263 switch (code) {
264 case 0:
265 return NULL;
266 case -ERR_RUN_COMMAND_FORK:
267 return "unpack fork failed";
268 case -ERR_RUN_COMMAND_EXEC:
269 return "unpack execute failed";
270 case -ERR_RUN_COMMAND_WAITPID:
271 return "waitpid failed";
272 case -ERR_RUN_COMMAND_WAITPID_WRONG_PID:
273 return "waitpid is confused";
274 case -ERR_RUN_COMMAND_WAITPID_SIGNAL:
275 return "unpacker died of signal";
276 case -ERR_RUN_COMMAND_WAITPID_NOEXIT:
277 return "unpacker died strangely";
278 default:
279 *error_code = -code;
280 return "unpacker exited with error code";
284 static void report(const char *unpack_status)
286 struct command *cmd;
287 packet_write(1, "unpack %s\n",
288 unpack_status ? unpack_status : "ok");
289 for (cmd = commands; cmd; cmd = cmd->next) {
290 if (!cmd->error_string)
291 packet_write(1, "ok %s\n",
292 cmd->ref_name);
293 else
294 packet_write(1, "ng %s %s\n",
295 cmd->ref_name, cmd->error_string);
297 packet_flush(1);
300 int main(int argc, char **argv)
302 int i;
303 char *dir = NULL;
305 argv++;
306 for (i = 1; i < argc; i++) {
307 char *arg = *argv++;
309 if (*arg == '-') {
310 /* Do flag handling here */
311 usage(receive_pack_usage);
313 if (dir)
314 usage(receive_pack_usage);
315 dir = arg;
317 if (!dir)
318 usage(receive_pack_usage);
320 if(!enter_repo(dir, 0))
321 die("'%s': unable to chdir or not a git archive", dir);
323 write_head_info();
325 /* EOF */
326 packet_flush(1);
328 read_head_info();
329 if (commands) {
330 int code;
331 const char *unpack_status = unpack(&code);
332 if (!unpack_status)
333 execute_commands();
334 if (report_status)
335 report(unpack_status);
337 return 0;