9 const char *tree_type = "tree";
11 static int read_one_entry(const unsigned char *sha1, const char *base, int baselen, const char *pathname, unsigned mode, int stage)
15 struct cache_entry *ce;
18 return READ_TREE_RECURSIVE;
20 len = strlen(pathname);
21 size = cache_entry_size(baselen + len);
22 ce = xcalloc(1, size);
24 ce->ce_mode = create_ce_mode(mode);
25 ce->ce_flags = create_ce_flags(baselen + len, stage);
26 memcpy(ce->name, base, baselen);
27 memcpy(ce->name + baselen, pathname, len+1);
28 memcpy(ce->sha1, sha1, 20);
29 return add_cache_entry(ce, ADD_CACHE_OK_TO_ADD|ADD_CACHE_SKIP_DFCHECK);
32 static int match_tree_entry(const char *base, int baselen, const char *path, unsigned int mode, const char **paths)
39 pathlen = strlen(path);
40 while ((match = *paths++) != NULL) {
41 int matchlen = strlen(match);
43 if (baselen >= matchlen) {
44 /* If it doesn't match, move along... */
45 if (strncmp(base, match, matchlen))
47 /* The base is a subdirectory of a path which was specified. */
51 /* Does the base match? */
52 if (strncmp(base, match, baselen))
58 if (pathlen > matchlen)
61 if (matchlen > pathlen) {
62 if (match[pathlen] != '/')
68 if (strncmp(path, match, pathlen))
76 int read_tree_recursive(struct tree *tree,
77 const char *base, int baselen,
78 int stage, const char **match,
81 struct tree_desc desc;
86 desc.buf = tree->buffer;
87 desc.size = tree->size;
92 const unsigned char *sha1;
94 sha1 = tree_entry_extract(&desc, &name, &mode);
95 update_tree_entry(&desc);
97 if (!match_tree_entry(base, baselen, name, mode, match))
100 switch (fn(sha1, base, baselen, name, mode, stage)) {
103 case READ_TREE_RECURSIVE:
110 int pathlen = strlen(name);
113 newbase = xmalloc(baselen + 1 + pathlen);
114 memcpy(newbase, base, baselen);
115 memcpy(newbase + baselen, name, pathlen);
116 newbase[baselen + pathlen] = '/';
117 retval = read_tree_recursive(lookup_tree(sha1),
119 baselen + pathlen + 1,
130 int read_tree(struct tree *tree, int stage, const char **match)
132 return read_tree_recursive(tree, "", 0, stage, match, read_one_entry);
135 struct tree *lookup_tree(const unsigned char *sha1)
137 struct object *obj = lookup_object(sha1);
139 struct tree *ret = xcalloc(1, sizeof(struct tree));
140 created_object(sha1, &ret->object);
141 ret->object.type = tree_type;
145 obj->type = tree_type;
146 if (obj->type != tree_type) {
147 error("Object %s is a %s, not a tree",
148 sha1_to_hex(sha1), obj->type);
151 return (struct tree *) obj;
154 int parse_tree_buffer(struct tree *item, void *buffer, unsigned long size)
156 struct tree_desc desc;
157 struct tree_entry_list **list_p;
160 if (item->object.parsed)
162 item->object.parsed = 1;
163 item->buffer = buffer;
169 list_p = &item->entries;
173 const unsigned char *sha1;
174 struct tree_entry_list *entry;
176 sha1 = tree_entry_extract(&desc, &path, &mode);
178 entry = xmalloc(sizeof(struct tree_entry_list));
182 entry->directory = S_ISDIR(mode) != 0;
183 entry->executable = (mode & S_IXUSR) != 0;
184 entry->symlink = S_ISLNK(mode) != 0;
185 entry->zeropad = *(const char *)(desc.buf) == '0';
188 update_tree_entry(&desc);
191 list_p = &entry->next;
194 if (track_object_refs) {
195 struct tree_entry_list *entry;
197 struct object_refs *refs = alloc_object_refs(n_refs);
198 for (entry = item->entries; entry; entry = entry->next) {
201 if (entry->directory)
202 obj = &lookup_tree(entry->sha1)->object;
204 obj = &lookup_blob(entry->sha1)->object;
205 refs->ref[i++] = obj;
208 set_object_refs(&item->object, refs);
214 int parse_tree(struct tree *item)
220 if (item->object.parsed)
222 buffer = read_sha1_file(item->object.sha1, type, &size);
224 return error("Could not read %s",
225 sha1_to_hex(item->object.sha1));
226 if (strcmp(type, tree_type)) {
228 return error("Object %s not a tree",
229 sha1_to_hex(item->object.sha1));
231 return parse_tree_buffer(item, buffer, size);
234 struct tree *parse_tree_indirect(const unsigned char *sha1)
236 struct object *obj = parse_object(sha1);
240 if (obj->type == tree_type)
241 return (struct tree *) obj;
242 else if (obj->type == commit_type)
243 obj = &(((struct commit *) obj)->tree->object);
244 else if (obj->type == tag_type)
245 obj = ((struct tag *) obj)->tagged;
249 parse_object(obj->sha1);