Use Perl Makemaker when cross compiling on Linux
[git/pclouds.git] / git.c
blob210a763d2c7dac20d8a7d8b7699e4d9ee6514e80
1 #include "builtin.h"
2 #include "exec_cmd.h"
3 #include "cache.h"
4 #include "quote.h"
6 const char git_usage_string[] =
7 "git [--version] [--exec-path[=GIT_EXEC_PATH]] [-p|--paginate] [--bare] [--git-dir=GIT_DIR] [--work-tree=GIT_WORK_TREE] [--help] COMMAND [ARGS]";
9 static void prepend_to_path(const char *dir, int len)
11 const char *old_path = getenv("PATH");
12 char *path;
13 int path_len = len;
15 if (!old_path)
16 old_path = "/usr/local/bin:/usr/bin:/bin";
18 path_len = len + strlen(old_path) + 1;
20 path = xmalloc(path_len + 1);
22 memcpy(path, dir, len);
23 #ifdef __MINGW32__
24 path[len] = ';';
25 #else
26 path[len] = ':';
27 #endif
28 memcpy(path + len + 1, old_path, path_len - len);
30 setenv("PATH", path, 1);
32 free(path);
35 static int handle_options(const char*** argv, int* argc, int* envchanged)
37 int handled = 0;
39 while (*argc > 0) {
40 const char *cmd = (*argv)[0];
41 if (cmd[0] != '-')
42 break;
45 * For legacy reasons, the "version" and "help"
46 * commands can be written with "--" prepended
47 * to make them look like flags.
49 if (!strcmp(cmd, "--help") || !strcmp(cmd, "--version"))
50 break;
53 * Check remaining flags.
55 if (!prefixcmp(cmd, "--exec-path")) {
56 cmd += 11;
57 if (*cmd == '=')
58 git_set_exec_path(cmd + 1);
59 else {
60 puts(git_exec_path());
61 exit(0);
63 } else if (!strcmp(cmd, "-p") || !strcmp(cmd, "--paginate")) {
64 setup_pager();
65 } else if (!strcmp(cmd, "--git-dir")) {
66 if (*argc < 2) {
67 fprintf(stderr, "No directory given for --git-dir.\n" );
68 usage(git_usage_string);
70 setenv(GIT_DIR_ENVIRONMENT, (*argv)[1], 1);
71 if (envchanged)
72 *envchanged = 1;
73 (*argv)++;
74 (*argc)--;
75 handled++;
76 } else if (!prefixcmp(cmd, "--git-dir=")) {
77 setenv(GIT_DIR_ENVIRONMENT, cmd + 10, 1);
78 if (envchanged)
79 *envchanged = 1;
80 } else if (!strcmp(cmd, "--work-tree")) {
81 if (*argc < 2) {
82 fprintf(stderr, "No directory given for --work-tree.\n" );
83 usage(git_usage_string);
85 setenv(GIT_WORK_TREE_ENVIRONMENT, (*argv)[1], 1);
86 if (envchanged)
87 *envchanged = 1;
88 (*argv)++;
89 (*argc)--;
90 } else if (!prefixcmp(cmd, "--work-tree=")) {
91 setenv(GIT_WORK_TREE_ENVIRONMENT, cmd + 12, 1);
92 if (envchanged)
93 *envchanged = 1;
94 } else if (!strcmp(cmd, "--bare")) {
95 static char git_dir[PATH_MAX+1];
96 setenv(GIT_DIR_ENVIRONMENT, getcwd(git_dir, sizeof(git_dir)), 1);
97 if (envchanged)
98 *envchanged = 1;
99 } else {
100 fprintf(stderr, "Unknown option: %s\n", cmd);
101 usage(git_usage_string);
104 (*argv)++;
105 (*argc)--;
106 handled++;
108 return handled;
111 static const char *alias_command;
112 static char *alias_string;
114 static int git_alias_config(const char *var, const char *value)
116 if (!prefixcmp(var, "alias.") && !strcmp(var + 6, alias_command)) {
117 alias_string = xstrdup(value);
119 return 0;
122 static int split_cmdline(char *cmdline, const char ***argv)
124 int src, dst, count = 0, size = 16;
125 char quoted = 0;
127 *argv = xmalloc(sizeof(char*) * size);
129 /* split alias_string */
130 (*argv)[count++] = cmdline;
131 for (src = dst = 0; cmdline[src];) {
132 char c = cmdline[src];
133 if (!quoted && isspace(c)) {
134 cmdline[dst++] = 0;
135 while (cmdline[++src]
136 && isspace(cmdline[src]))
137 ; /* skip */
138 if (count >= size) {
139 size += 16;
140 *argv = xrealloc(*argv, sizeof(char*) * size);
142 (*argv)[count++] = cmdline + dst;
143 } else if(!quoted && (c == '\'' || c == '"')) {
144 quoted = c;
145 src++;
146 } else if (c == quoted) {
147 quoted = 0;
148 src++;
149 } else {
150 if (c == '\\' && quoted != '\'') {
151 src++;
152 c = cmdline[src];
153 if (!c) {
154 free(*argv);
155 *argv = NULL;
156 return error("cmdline ends with \\");
159 cmdline[dst++] = c;
160 src++;
164 cmdline[dst] = 0;
166 if (quoted) {
167 free(*argv);
168 *argv = NULL;
169 return error("unclosed quote");
172 return count;
175 static int handle_alias(int *argcp, const char ***argv)
177 int nongit = 0, envchanged = 0, ret = 0, saved_errno = errno;
178 const char *subdir;
179 int count, option_count;
180 const char** new_argv;
182 subdir = setup_git_directory_gently(&nongit);
184 alias_command = (*argv)[0];
185 git_config(git_alias_config);
186 if (alias_string) {
187 if (alias_string[0] == '!') {
188 if (*argcp > 1) {
189 int i, sz = PATH_MAX;
190 char *s = xmalloc(sz), *new_alias = s;
192 add_to_string(&s, &sz, alias_string, 0);
193 free(alias_string);
194 alias_string = new_alias;
195 for (i = 1; i < *argcp &&
196 !add_to_string(&s, &sz, " ", 0) &&
197 !add_to_string(&s, &sz, (*argv)[i], 1)
198 ; i++)
199 ; /* do nothing */
200 if (!sz)
201 die("Too many or long arguments");
203 trace_printf("trace: alias to shell cmd: %s => %s\n",
204 alias_command, alias_string + 1);
205 ret = system(alias_string + 1);
206 if (ret >= 0 && WIFEXITED(ret) &&
207 WEXITSTATUS(ret) != 127)
208 exit(WEXITSTATUS(ret));
209 die("Failed to run '%s' when expanding alias '%s'\n",
210 alias_string + 1, alias_command);
212 count = split_cmdline(alias_string, &new_argv);
213 option_count = handle_options(&new_argv, &count, &envchanged);
214 if (envchanged)
215 die("alias '%s' changes environment variables\n"
216 "You can use '!git' in the alias to do this.",
217 alias_command);
218 memmove(new_argv - option_count, new_argv,
219 count * sizeof(char *));
220 new_argv -= option_count;
222 if (count < 1)
223 die("empty alias for %s", alias_command);
225 if (!strcmp(alias_command, new_argv[0]))
226 die("recursive alias: %s", alias_command);
228 trace_argv_printf(new_argv, count,
229 "trace: alias expansion: %s =>",
230 alias_command);
232 new_argv = xrealloc(new_argv, sizeof(char*) *
233 (count + *argcp + 1));
234 /* insert after command name */
235 memcpy(new_argv + count, *argv + 1, sizeof(char*) * *argcp);
236 new_argv[count+*argcp] = NULL;
238 *argv = new_argv;
239 *argcp += count - 1;
241 ret = 1;
244 if (subdir)
245 chdir(subdir);
247 errno = saved_errno;
249 return ret;
252 const char git_version_string[] = GIT_VERSION;
254 #define RUN_SETUP (1<<0)
255 #define USE_PAGER (1<<1)
257 * require working tree to be present -- anything uses this needs
258 * RUN_SETUP for reading from the configuration file.
260 #define NEED_WORK_TREE (1<<2)
262 struct cmd_struct {
263 const char *cmd;
264 int (*fn)(int, const char **, const char *);
265 int option;
268 static int run_command(struct cmd_struct *p, int argc, const char **argv)
270 int status;
271 struct stat st;
272 const char *prefix;
274 prefix = NULL;
275 if (p->option & RUN_SETUP)
276 prefix = setup_git_directory();
277 if (p->option & USE_PAGER)
278 setup_pager();
279 if ((p->option & NEED_WORK_TREE) &&
280 (!is_inside_work_tree() || is_inside_git_dir()))
281 die("%s must be run in a work tree", p->cmd);
282 trace_argv_printf(argv, argc, "trace: built-in: git");
284 status = p->fn(argc, argv, prefix);
285 if (status)
286 return status;
288 /* Somebody closed stdout? */
289 if (fstat(fileno(stdout), &st))
290 return 0;
291 /* Ignore write errors for pipes and sockets.. */
292 if (S_ISFIFO(st.st_mode) || S_ISSOCK(st.st_mode))
293 return 0;
295 /* Check for ENOSPC and EIO errors.. */
296 if (fflush(stdout))
297 die("write failure on standard output: %s", strerror(errno));
298 if (ferror(stdout))
299 die("unknown write failure on standard output");
300 if (fclose(stdout))
301 die("close failed on standard output: %s", strerror(errno));
302 return 0;
305 static void handle_internal_command(int argc, const char **argv)
307 const char *cmd = argv[0];
308 static struct cmd_struct commands[] = {
309 { "add", cmd_add, RUN_SETUP | NEED_WORK_TREE },
310 { "annotate", cmd_annotate, RUN_SETUP },
311 { "apply", cmd_apply },
312 { "archive", cmd_archive },
313 { "blame", cmd_blame, RUN_SETUP },
314 { "branch", cmd_branch, RUN_SETUP },
315 { "bundle", cmd_bundle },
316 { "cat-file", cmd_cat_file, RUN_SETUP },
317 { "checkout-index", cmd_checkout_index, RUN_SETUP },
318 { "check-ref-format", cmd_check_ref_format },
319 { "check-attr", cmd_check_attr, RUN_SETUP | NEED_WORK_TREE },
320 { "cherry", cmd_cherry, RUN_SETUP },
321 { "cherry-pick", cmd_cherry_pick, RUN_SETUP | NEED_WORK_TREE },
322 { "commit-tree", cmd_commit_tree, RUN_SETUP },
323 { "config", cmd_config },
324 { "count-objects", cmd_count_objects, RUN_SETUP },
325 { "describe", cmd_describe, RUN_SETUP },
326 { "diff", cmd_diff, USE_PAGER },
327 { "diff-files", cmd_diff_files },
328 { "diff-index", cmd_diff_index, RUN_SETUP },
329 { "diff-tree", cmd_diff_tree, RUN_SETUP },
330 { "fetch--tool", cmd_fetch__tool, RUN_SETUP },
331 { "fmt-merge-msg", cmd_fmt_merge_msg, RUN_SETUP },
332 { "for-each-ref", cmd_for_each_ref, RUN_SETUP },
333 { "format-patch", cmd_format_patch, RUN_SETUP },
334 { "fsck", cmd_fsck, RUN_SETUP },
335 { "fsck-objects", cmd_fsck, RUN_SETUP },
336 { "gc", cmd_gc, RUN_SETUP },
337 { "get-tar-commit-id", cmd_get_tar_commit_id },
338 { "grep", cmd_grep, RUN_SETUP | USE_PAGER },
339 { "help", cmd_help },
340 { "init", cmd_init_db },
341 { "init-db", cmd_init_db },
342 { "log", cmd_log, RUN_SETUP | USE_PAGER },
343 { "ls-files", cmd_ls_files, RUN_SETUP },
344 { "ls-tree", cmd_ls_tree, RUN_SETUP },
345 { "mailinfo", cmd_mailinfo },
346 { "mailsplit", cmd_mailsplit },
347 { "merge-base", cmd_merge_base, RUN_SETUP },
348 { "merge-file", cmd_merge_file },
349 { "mv", cmd_mv, RUN_SETUP | NEED_WORK_TREE },
350 { "name-rev", cmd_name_rev, RUN_SETUP },
351 { "pack-objects", cmd_pack_objects, RUN_SETUP },
352 { "pickaxe", cmd_blame, RUN_SETUP },
353 { "prune", cmd_prune, RUN_SETUP },
354 { "prune-packed", cmd_prune_packed, RUN_SETUP },
355 { "push", cmd_push, RUN_SETUP },
356 { "read-tree", cmd_read_tree, RUN_SETUP },
357 { "reflog", cmd_reflog, RUN_SETUP },
358 { "repo-config", cmd_config },
359 { "rerere", cmd_rerere, RUN_SETUP },
360 { "rev-list", cmd_rev_list, RUN_SETUP },
361 { "rev-parse", cmd_rev_parse, RUN_SETUP },
362 { "revert", cmd_revert, RUN_SETUP | NEED_WORK_TREE },
363 { "rm", cmd_rm, RUN_SETUP | NEED_WORK_TREE },
364 { "runstatus", cmd_runstatus, RUN_SETUP | NEED_WORK_TREE },
365 { "shortlog", cmd_shortlog, RUN_SETUP | USE_PAGER },
366 { "show-branch", cmd_show_branch, RUN_SETUP },
367 { "show", cmd_show, RUN_SETUP | USE_PAGER },
368 { "stripspace", cmd_stripspace },
369 { "symbolic-ref", cmd_symbolic_ref, RUN_SETUP },
370 { "tar-tree", cmd_tar_tree },
371 { "unpack-objects", cmd_unpack_objects, RUN_SETUP },
372 { "update-index", cmd_update_index, RUN_SETUP },
373 { "update-ref", cmd_update_ref, RUN_SETUP },
374 { "upload-archive", cmd_upload_archive },
375 { "version", cmd_version },
376 { "whatchanged", cmd_whatchanged, RUN_SETUP | USE_PAGER },
377 { "write-tree", cmd_write_tree, RUN_SETUP },
378 { "verify-pack", cmd_verify_pack },
379 { "show-ref", cmd_show_ref, RUN_SETUP },
380 { "pack-refs", cmd_pack_refs, RUN_SETUP },
382 int i;
384 #ifdef STRIP_EXTENSION
385 i = strlen(argv[0]) - strlen(STRIP_EXTENSION);
386 if (i > 0 && !strcmp(argv[0] + i, STRIP_EXTENSION)) {
387 char *argv0 = strdup(argv[0]);
388 argv[0] = cmd = argv0;
389 argv0[i] = '\0';
391 #endif
393 /* Turn "git cmd --help" into "git help cmd" */
394 if (argc > 1 && !strcmp(argv[1], "--help")) {
395 argv[1] = argv[0];
396 argv[0] = cmd = "help";
399 for (i = 0; i < ARRAY_SIZE(commands); i++) {
400 struct cmd_struct *p = commands+i;
401 if (strcmp(p->cmd, cmd))
402 continue;
403 exit(run_command(p, argc, argv));
407 int main(int argc, const char **argv)
409 const char *cmd = argv[0] ? argv[0] : "git-help";
410 char *slash = strrchr(cmd, '/');
411 const char *exec_path = NULL;
412 int done_alias = 0;
415 * Take the basename of argv[0] as the command
416 * name, and the dirname as the default exec_path
417 * if it's an absolute path and we don't have
418 * anything better.
420 if (slash) {
421 *slash++ = 0;
422 if (*cmd == '/')
423 exec_path = cmd;
424 cmd = slash;
427 #ifdef __MINGW32__
428 slash = strrchr(cmd, '\\');
429 if (slash) {
430 *slash++ = 0;
431 if (cmd[1] == ':')
432 exec_path = cmd;
433 cmd = slash;
435 #endif
438 * "git-xxxx" is the same as "git xxxx", but we obviously:
440 * - cannot take flags in between the "git" and the "xxxx".
441 * - cannot execute it externally (since it would just do
442 * the same thing over again)
444 * So we just directly call the internal command handler, and
445 * die if that one cannot handle it.
447 if (!prefixcmp(cmd, "git-")) {
448 cmd += 4;
449 argv[0] = cmd;
450 handle_internal_command(argc, argv);
451 die("cannot handle %s internally", cmd);
454 /* Look for flags.. */
455 argv++;
456 argc--;
457 handle_options(&argv, &argc, NULL);
458 if (argc > 0) {
459 if (!prefixcmp(argv[0], "--"))
460 argv[0] += 2;
461 } else {
462 /* Default command: "help" */
463 argv[0] = "help";
464 argc = 1;
466 cmd = argv[0];
469 * We search for git commands in the following order:
470 * - git_exec_path()
471 * - the path of the "git" command if we could find it
472 * in $0
473 * - the regular PATH.
475 if (exec_path)
476 prepend_to_path(exec_path, strlen(exec_path));
477 exec_path = git_exec_path();
478 prepend_to_path(exec_path, strlen(exec_path));
480 while (1) {
481 /* See if it's an internal command */
482 handle_internal_command(argc, argv);
484 /* .. then try the external ones */
485 execv_git_cmd(argv);
487 /* It could be an alias -- this works around the insanity
488 * of overriding "git log" with "git show" by having
489 * alias.log = show
491 if (done_alias || !handle_alias(&argc, &argv))
492 break;
493 done_alias = 1;
496 if (errno == ENOENT) {
497 if (done_alias) {
498 fprintf(stderr, "Expansion of alias '%s' failed; "
499 "'%s' is not a git-command\n",
500 cmd, argv[0]);
501 exit(1);
503 help_unknown_cmd(cmd);
506 fprintf(stderr, "Failed to run command '%s': %s\n",
507 cmd, strerror(errno));
509 return 1;