1/*
2 * GIT - The information manager from hell
3 *
4 * Copyright (C) Linus Torvalds, 2005
5 */
6#include "cache.h"
7#include "blob.h"
8#include "tree.h"
9#include "quote.h"
10
11static int line_termination = '\n';
12#define LS_RECURSIVE 1
13#define LS_TREE_ONLY 2
14#define LS_SHOW_TREES 4
15#define LS_NAME_ONLY 8
16static int ls_options = 0;
17const char **pathspec;
18static int chomp_prefix = 0;
19static const char *prefix;
20
21static const char ls_tree_usage[] =
22 "git-ls-tree [-d] [-r] [-t] [-z] [--name-only] [--name-status] [--full-name] <tree-ish> [path...]";
23
24static int show_recursive(const char *base, int baselen, const char *pathname)
25{
26 const char **s;
27
28 if (ls_options & LS_RECURSIVE)
29 return 1;
30
31 s = pathspec;
32 if (!s)
33 return 0;
34
35 for (;;) {
36 const char *spec = *s++;
37 int len, speclen;
38
39 if (!spec)
40 return 0;
41 if (strncmp(base, spec, baselen))
42 continue;
43 len = strlen(pathname);
44 spec += baselen;
45 speclen = strlen(spec);
46 if (speclen <= len)
47 continue;
48 if (memcmp(pathname, spec, len))
49 continue;
50 return 1;
51 }
52}
53
54static int show_tree(unsigned char *sha1, const char *base, int baselen,
55 const char *pathname, unsigned mode, int stage)
56{
57 int retval = 0;
58 const char *type = "blob";
59
60 if (S_ISDIR(mode)) {
61 if (show_recursive(base, baselen, pathname)) {
62 retval = READ_TREE_RECURSIVE;
63 if (!(ls_options & LS_SHOW_TREES))
64 return retval;
65 }
66 type = "tree";
67 }
68 else if (ls_options & LS_TREE_ONLY)
69 return 0;
70
71 if (chomp_prefix &&
72 (baselen < chomp_prefix || memcmp(prefix, base, chomp_prefix)))
73 return 0;
74
75 if (!(ls_options & LS_NAME_ONLY))
76 printf("%06o %s %s\t", mode, type, sha1_to_hex(sha1));
77 write_name_quoted(base + chomp_prefix, baselen - chomp_prefix,
78 pathname,
79 line_termination, stdout);
80 putchar(line_termination);
81 return retval;
82}
83
84int main(int argc, const char **argv)
85{
86 unsigned char sha1[20];
87 struct tree *tree;
88
89 prefix = setup_git_directory();
90 git_config(git_default_config);
91 if (prefix && *prefix)
92 chomp_prefix = strlen(prefix);
93 while (1 < argc && argv[1][0] == '-') {
94 switch (argv[1][1]) {
95 case 'z':
96 line_termination = 0;
97 break;
98 case 'r':
99 ls_options |= LS_RECURSIVE;
100 break;
101 case 'd':
102 ls_options |= LS_TREE_ONLY;
103 break;
104 case 't':
105 ls_options |= LS_SHOW_TREES;
106 break;
107 case '-':
108 if (!strcmp(argv[1]+2, "name-only") ||
109 !strcmp(argv[1]+2, "name-status")) {
110 ls_options |= LS_NAME_ONLY;
111 break;
112 }
113 if (!strcmp(argv[1]+2, "full-name")) {
114 chomp_prefix = 0;
115 break;
116 }
117 /* otherwise fallthru */
118 default:
119 usage(ls_tree_usage);
120 }
121 argc--; argv++;
122 }
123 /* -d -r should imply -t, but -d by itself should not have to. */
124 if ( (LS_TREE_ONLY|LS_RECURSIVE) ==
125 ((LS_TREE_ONLY|LS_RECURSIVE) & ls_options))
126 ls_options |= LS_SHOW_TREES;
127
128 if (argc < 2)
129 usage(ls_tree_usage);
130 if (get_sha1(argv[1], sha1) < 0)
131 usage(ls_tree_usage);
132
133 pathspec = get_pathspec(prefix, argv + 2);
134 tree = parse_tree_indirect(sha1);
135 if (!tree)
136 die("not a tree object");
137 read_tree_recursive(tree, "", 0, 0, pathspec, show_tree);
138
139 return 0;
140}