pay attention to DESTDIR when building with NO_PERL_MAKEMAKER
[git/spearce.git] / builtin-rev-parse.c
blob45bead65451e87a4b564e59fed3518a4de9198e9
1 /*
2 * rev-parse.c
4 * Copyright (C) Linus Torvalds, 2005
5 */
6 #include "cache.h"
7 #include "commit.h"
8 #include "refs.h"
9 #include "quote.h"
10 #include "builtin.h"
11 #include "parse-options.h"
13 #define DO_REVS 1
14 #define DO_NOREV 2
15 #define DO_FLAGS 4
16 #define DO_NONFLAGS 8
17 static int filter = ~0;
19 static const char *def;
21 #define NORMAL 0
22 #define REVERSED 1
23 static int show_type = NORMAL;
25 #define SHOW_SYMBOLIC_ASIS 1
26 #define SHOW_SYMBOLIC_FULL 2
27 static int symbolic;
28 static int abbrev;
29 static int abbrev_ref;
30 static int abbrev_ref_strict;
31 static int output_sq;
34 * Some arguments are relevant "revision" arguments,
35 * others are about output format or other details.
36 * This sorts it all out.
38 static int is_rev_argument(const char *arg)
40 static const char *rev_args[] = {
41 "--all",
42 "--bisect",
43 "--dense",
44 "--branches",
45 "--header",
46 "--max-age=",
47 "--max-count=",
48 "--min-age=",
49 "--no-merges",
50 "--objects",
51 "--objects-edge",
52 "--parents",
53 "--pretty",
54 "--remotes",
55 "--sparse",
56 "--tags",
57 "--topo-order",
58 "--date-order",
59 "--unpacked",
60 NULL
62 const char **p = rev_args;
64 /* accept -<digit>, like traditional "head" */
65 if ((*arg == '-') && isdigit(arg[1]))
66 return 1;
68 for (;;) {
69 const char *str = *p++;
70 int len;
71 if (!str)
72 return 0;
73 len = strlen(str);
74 if (!strcmp(arg, str) ||
75 (str[len-1] == '=' && !strncmp(arg, str, len)))
76 return 1;
80 /* Output argument as a string, either SQ or normal */
81 static void show(const char *arg)
83 if (output_sq) {
84 int sq = '\'', ch;
86 putchar(sq);
87 while ((ch = *arg++)) {
88 if (ch == sq)
89 fputs("'\\'", stdout);
90 putchar(ch);
92 putchar(sq);
93 putchar(' ');
95 else
96 puts(arg);
99 /* Like show(), but with a negation prefix according to type */
100 static void show_with_type(int type, const char *arg)
102 if (type != show_type)
103 putchar('^');
104 show(arg);
107 /* Output a revision, only if filter allows it */
108 static void show_rev(int type, const unsigned char *sha1, const char *name)
110 if (!(filter & DO_REVS))
111 return;
112 def = NULL;
114 if ((symbolic || abbrev_ref) && name) {
115 if (symbolic == SHOW_SYMBOLIC_FULL || abbrev_ref) {
116 unsigned char discard[20];
117 char *full;
119 switch (dwim_ref(name, strlen(name), discard, &full)) {
120 case 0:
122 * Not found -- not a ref. We could
123 * emit "name" here, but symbolic-full
124 * users are interested in finding the
125 * refs spelled in full, and they would
126 * need to filter non-refs if we did so.
128 break;
129 case 1: /* happy */
130 if (abbrev_ref)
131 full = shorten_unambiguous_ref(full,
132 abbrev_ref_strict);
133 show_with_type(type, full);
134 break;
135 default: /* ambiguous */
136 error("refname '%s' is ambiguous", name);
137 break;
139 } else {
140 show_with_type(type, name);
143 else if (abbrev)
144 show_with_type(type, find_unique_abbrev(sha1, abbrev));
145 else
146 show_with_type(type, sha1_to_hex(sha1));
149 /* Output a flag, only if filter allows it. */
150 static int show_flag(const char *arg)
152 if (!(filter & DO_FLAGS))
153 return 0;
154 if (filter & (is_rev_argument(arg) ? DO_REVS : DO_NOREV)) {
155 show(arg);
156 return 1;
158 return 0;
161 static int show_default(void)
163 const char *s = def;
165 if (s) {
166 unsigned char sha1[20];
168 def = NULL;
169 if (!get_sha1(s, sha1)) {
170 show_rev(NORMAL, sha1, s);
171 return 1;
174 return 0;
177 static int show_reference(const char *refname, const unsigned char *sha1, int flag, void *cb_data)
179 show_rev(NORMAL, sha1, refname);
180 return 0;
183 static void show_datestring(const char *flag, const char *datestr)
185 static char buffer[100];
187 /* date handling requires both flags and revs */
188 if ((filter & (DO_FLAGS | DO_REVS)) != (DO_FLAGS | DO_REVS))
189 return;
190 snprintf(buffer, sizeof(buffer), "%s%lu", flag, approxidate(datestr));
191 show(buffer);
194 static int show_file(const char *arg)
196 show_default();
197 if ((filter & (DO_NONFLAGS|DO_NOREV)) == (DO_NONFLAGS|DO_NOREV)) {
198 show(arg);
199 return 1;
201 return 0;
204 static int try_difference(const char *arg)
206 char *dotdot;
207 unsigned char sha1[20];
208 unsigned char end[20];
209 const char *next;
210 const char *this;
211 int symmetric;
213 if (!(dotdot = strstr(arg, "..")))
214 return 0;
215 next = dotdot + 2;
216 this = arg;
217 symmetric = (*next == '.');
219 *dotdot = 0;
220 next += symmetric;
222 if (!*next)
223 next = "HEAD";
224 if (dotdot == arg)
225 this = "HEAD";
226 if (!get_sha1(this, sha1) && !get_sha1(next, end)) {
227 show_rev(NORMAL, end, next);
228 show_rev(symmetric ? NORMAL : REVERSED, sha1, this);
229 if (symmetric) {
230 struct commit_list *exclude;
231 struct commit *a, *b;
232 a = lookup_commit_reference(sha1);
233 b = lookup_commit_reference(end);
234 exclude = get_merge_bases(a, b, 1);
235 while (exclude) {
236 struct commit_list *n = exclude->next;
237 show_rev(REVERSED,
238 exclude->item->object.sha1,NULL);
239 free(exclude);
240 exclude = n;
243 return 1;
245 *dotdot = '.';
246 return 0;
249 static int try_parent_shorthands(const char *arg)
251 char *dotdot;
252 unsigned char sha1[20];
253 struct commit *commit;
254 struct commit_list *parents;
255 int parents_only;
257 if ((dotdot = strstr(arg, "^!")))
258 parents_only = 0;
259 else if ((dotdot = strstr(arg, "^@")))
260 parents_only = 1;
262 if (!dotdot || dotdot[2])
263 return 0;
265 *dotdot = 0;
266 if (get_sha1(arg, sha1))
267 return 0;
269 if (!parents_only)
270 show_rev(NORMAL, sha1, arg);
271 commit = lookup_commit_reference(sha1);
272 for (parents = commit->parents; parents; parents = parents->next)
273 show_rev(parents_only ? NORMAL : REVERSED,
274 parents->item->object.sha1, arg);
276 return 1;
279 static int parseopt_dump(const struct option *o, const char *arg, int unset)
281 struct strbuf *parsed = o->value;
282 if (unset)
283 strbuf_addf(parsed, " --no-%s", o->long_name);
284 else if (o->short_name)
285 strbuf_addf(parsed, " -%c", o->short_name);
286 else
287 strbuf_addf(parsed, " --%s", o->long_name);
288 if (arg) {
289 strbuf_addch(parsed, ' ');
290 sq_quote_buf(parsed, arg);
292 return 0;
295 static const char *skipspaces(const char *s)
297 while (isspace(*s))
298 s++;
299 return s;
302 static int cmd_parseopt(int argc, const char **argv, const char *prefix)
304 static int keep_dashdash = 0, stop_at_non_option = 0;
305 static char const * const parseopt_usage[] = {
306 "git rev-parse --parseopt [options] -- [<args>...]",
307 NULL
309 static struct option parseopt_opts[] = {
310 OPT_BOOLEAN(0, "keep-dashdash", &keep_dashdash,
311 "keep the `--` passed as an arg"),
312 OPT_BOOLEAN(0, "stop-at-non-option", &stop_at_non_option,
313 "stop parsing after the "
314 "first non-option argument"),
315 OPT_END(),
318 struct strbuf sb = STRBUF_INIT, parsed = STRBUF_INIT;
319 const char **usage = NULL;
320 struct option *opts = NULL;
321 int onb = 0, osz = 0, unb = 0, usz = 0;
323 strbuf_addstr(&parsed, "set --");
324 argc = parse_options(argc, argv, prefix, parseopt_opts, parseopt_usage,
325 PARSE_OPT_KEEP_DASHDASH);
326 if (argc < 1 || strcmp(argv[0], "--"))
327 usage_with_options(parseopt_usage, parseopt_opts);
329 /* get the usage up to the first line with a -- on it */
330 for (;;) {
331 if (strbuf_getline(&sb, stdin, '\n') == EOF)
332 die("premature end of input");
333 ALLOC_GROW(usage, unb + 1, usz);
334 if (!strcmp("--", sb.buf)) {
335 if (unb < 1)
336 die("no usage string given before the `--' separator");
337 usage[unb] = NULL;
338 break;
340 usage[unb++] = strbuf_detach(&sb, NULL);
343 /* parse: (<short>|<short>,<long>|<long>)[=?]? SP+ <help> */
344 while (strbuf_getline(&sb, stdin, '\n') != EOF) {
345 const char *s;
346 struct option *o;
348 if (!sb.len)
349 continue;
351 ALLOC_GROW(opts, onb + 1, osz);
352 memset(opts + onb, 0, sizeof(opts[onb]));
354 o = &opts[onb++];
355 s = strchr(sb.buf, ' ');
356 if (!s || *sb.buf == ' ') {
357 o->type = OPTION_GROUP;
358 o->help = xstrdup(skipspaces(sb.buf));
359 continue;
362 o->type = OPTION_CALLBACK;
363 o->help = xstrdup(skipspaces(s));
364 o->value = &parsed;
365 o->flags = PARSE_OPT_NOARG;
366 o->callback = &parseopt_dump;
367 while (s > sb.buf && strchr("*=?!", s[-1])) {
368 switch (*--s) {
369 case '=':
370 o->flags &= ~PARSE_OPT_NOARG;
371 break;
372 case '?':
373 o->flags &= ~PARSE_OPT_NOARG;
374 o->flags |= PARSE_OPT_OPTARG;
375 break;
376 case '!':
377 o->flags |= PARSE_OPT_NONEG;
378 break;
379 case '*':
380 o->flags |= PARSE_OPT_HIDDEN;
381 break;
385 if (s - sb.buf == 1) /* short option only */
386 o->short_name = *sb.buf;
387 else if (sb.buf[1] != ',') /* long option only */
388 o->long_name = xmemdupz(sb.buf, s - sb.buf);
389 else {
390 o->short_name = *sb.buf;
391 o->long_name = xmemdupz(sb.buf + 2, s - sb.buf - 2);
394 strbuf_release(&sb);
396 /* put an OPT_END() */
397 ALLOC_GROW(opts, onb + 1, osz);
398 memset(opts + onb, 0, sizeof(opts[onb]));
399 argc = parse_options(argc, argv, prefix, opts, usage,
400 keep_dashdash ? PARSE_OPT_KEEP_DASHDASH : 0 |
401 stop_at_non_option ? PARSE_OPT_STOP_AT_NON_OPTION : 0);
403 strbuf_addf(&parsed, " --");
404 sq_quote_argv(&parsed, argv, 0);
405 puts(parsed.buf);
406 return 0;
409 static int cmd_sq_quote(int argc, const char **argv)
411 struct strbuf buf = STRBUF_INIT;
413 if (argc)
414 sq_quote_argv(&buf, argv, 0);
415 printf("%s\n", buf.buf);
416 strbuf_release(&buf);
418 return 0;
421 static void die_no_single_rev(int quiet)
423 if (quiet)
424 exit(1);
425 else
426 die("Needed a single revision");
429 int cmd_rev_parse(int argc, const char **argv, const char *prefix)
431 int i, as_is = 0, verify = 0, quiet = 0, revs_count = 0, type = 0;
432 unsigned char sha1[20];
433 const char *name = NULL;
435 if (argc > 1 && !strcmp("--parseopt", argv[1]))
436 return cmd_parseopt(argc - 1, argv + 1, prefix);
438 if (argc > 1 && !strcmp("--sq-quote", argv[1]))
439 return cmd_sq_quote(argc - 2, argv + 2);
441 prefix = setup_git_directory();
442 git_config(git_default_config, NULL);
443 for (i = 1; i < argc; i++) {
444 const char *arg = argv[i];
446 if (as_is) {
447 if (show_file(arg) && as_is < 2)
448 verify_filename(prefix, arg);
449 continue;
451 if (!strcmp(arg,"-n")) {
452 if (++i >= argc)
453 die("-n requires an argument");
454 if ((filter & DO_FLAGS) && (filter & DO_REVS)) {
455 show(arg);
456 show(argv[i]);
458 continue;
460 if (!prefixcmp(arg, "-n")) {
461 if ((filter & DO_FLAGS) && (filter & DO_REVS))
462 show(arg);
463 continue;
466 if (*arg == '-') {
467 if (!strcmp(arg, "--")) {
468 as_is = 2;
469 /* Pass on the "--" if we show anything but files.. */
470 if (filter & (DO_FLAGS | DO_REVS))
471 show_file(arg);
472 continue;
474 if (!strcmp(arg, "--default")) {
475 def = argv[i+1];
476 i++;
477 continue;
479 if (!strcmp(arg, "--revs-only")) {
480 filter &= ~DO_NOREV;
481 continue;
483 if (!strcmp(arg, "--no-revs")) {
484 filter &= ~DO_REVS;
485 continue;
487 if (!strcmp(arg, "--flags")) {
488 filter &= ~DO_NONFLAGS;
489 continue;
491 if (!strcmp(arg, "--no-flags")) {
492 filter &= ~DO_FLAGS;
493 continue;
495 if (!strcmp(arg, "--verify")) {
496 filter &= ~(DO_FLAGS|DO_NOREV);
497 verify = 1;
498 continue;
500 if (!strcmp(arg, "--quiet") || !strcmp(arg, "-q")) {
501 quiet = 1;
502 continue;
504 if (!strcmp(arg, "--short") ||
505 !prefixcmp(arg, "--short=")) {
506 filter &= ~(DO_FLAGS|DO_NOREV);
507 verify = 1;
508 abbrev = DEFAULT_ABBREV;
509 if (arg[7] == '=')
510 abbrev = strtoul(arg + 8, NULL, 10);
511 if (abbrev < MINIMUM_ABBREV)
512 abbrev = MINIMUM_ABBREV;
513 else if (40 <= abbrev)
514 abbrev = 40;
515 continue;
517 if (!strcmp(arg, "--sq")) {
518 output_sq = 1;
519 continue;
521 if (!strcmp(arg, "--not")) {
522 show_type ^= REVERSED;
523 continue;
525 if (!strcmp(arg, "--symbolic")) {
526 symbolic = SHOW_SYMBOLIC_ASIS;
527 continue;
529 if (!strcmp(arg, "--symbolic-full-name")) {
530 symbolic = SHOW_SYMBOLIC_FULL;
531 continue;
533 if (!prefixcmp(arg, "--abbrev-ref") &&
534 (!arg[12] || arg[12] == '=')) {
535 abbrev_ref = 1;
536 abbrev_ref_strict = warn_ambiguous_refs;
537 if (arg[12] == '=') {
538 if (!strcmp(arg + 13, "strict"))
539 abbrev_ref_strict = 1;
540 else if (!strcmp(arg + 13, "loose"))
541 abbrev_ref_strict = 0;
542 else
543 die("unknown mode for %s", arg);
545 continue;
547 if (!strcmp(arg, "--all")) {
548 for_each_ref(show_reference, NULL);
549 continue;
551 if (!strcmp(arg, "--branches")) {
552 for_each_branch_ref(show_reference, NULL);
553 continue;
555 if (!strcmp(arg, "--tags")) {
556 for_each_tag_ref(show_reference, NULL);
557 continue;
559 if (!strcmp(arg, "--remotes")) {
560 for_each_remote_ref(show_reference, NULL);
561 continue;
563 if (!strcmp(arg, "--show-prefix")) {
564 if (prefix)
565 puts(prefix);
566 continue;
568 if (!strcmp(arg, "--show-cdup")) {
569 const char *pfx = prefix;
570 if (!is_inside_work_tree()) {
571 const char *work_tree =
572 get_git_work_tree();
573 if (work_tree)
574 printf("%s\n", work_tree);
575 continue;
577 while (pfx) {
578 pfx = strchr(pfx, '/');
579 if (pfx) {
580 pfx++;
581 printf("../");
584 putchar('\n');
585 continue;
587 if (!strcmp(arg, "--git-dir")) {
588 const char *gitdir = getenv(GIT_DIR_ENVIRONMENT);
589 static char cwd[PATH_MAX];
590 if (gitdir) {
591 puts(gitdir);
592 continue;
594 if (!prefix) {
595 puts(".git");
596 continue;
598 if (!getcwd(cwd, PATH_MAX))
599 die_errno("unable to get current working directory");
600 printf("%s/.git\n", cwd);
601 continue;
603 if (!strcmp(arg, "--is-inside-git-dir")) {
604 printf("%s\n", is_inside_git_dir() ? "true"
605 : "false");
606 continue;
608 if (!strcmp(arg, "--is-inside-work-tree")) {
609 printf("%s\n", is_inside_work_tree() ? "true"
610 : "false");
611 continue;
613 if (!strcmp(arg, "--is-bare-repository")) {
614 printf("%s\n", is_bare_repository() ? "true"
615 : "false");
616 continue;
618 if (!prefixcmp(arg, "--since=")) {
619 show_datestring("--max-age=", arg+8);
620 continue;
622 if (!prefixcmp(arg, "--after=")) {
623 show_datestring("--max-age=", arg+8);
624 continue;
626 if (!prefixcmp(arg, "--before=")) {
627 show_datestring("--min-age=", arg+9);
628 continue;
630 if (!prefixcmp(arg, "--until=")) {
631 show_datestring("--min-age=", arg+8);
632 continue;
634 if (show_flag(arg) && verify)
635 die_no_single_rev(quiet);
636 continue;
639 /* Not a flag argument */
640 if (try_difference(arg))
641 continue;
642 if (try_parent_shorthands(arg))
643 continue;
644 name = arg;
645 type = NORMAL;
646 if (*arg == '^') {
647 name++;
648 type = REVERSED;
650 if (!get_sha1(name, sha1)) {
651 if (verify)
652 revs_count++;
653 else
654 show_rev(type, sha1, name);
655 continue;
657 if (verify)
658 die_no_single_rev(quiet);
659 as_is = 1;
660 if (!show_file(arg))
661 continue;
662 verify_filename(prefix, arg);
664 if (verify) {
665 if (revs_count == 1) {
666 show_rev(type, sha1, name);
667 return 0;
668 } else if (revs_count == 0 && show_default())
669 return 0;
670 die_no_single_rev(quiet);
671 } else
672 show_default();
673 return 0;