[PATCH] Add the merge test Linus called "test script from hell".
[git/repo.git] / object.c
blobb5a62e7f87f24c2ab0ea83f3c445d81bcbff027a
1 #include "object.h"
2 #include "blob.h"
3 #include "tree.h"
4 #include "commit.h"
5 #include "cache.h"
6 #include "tag.h"
7 #include <stdlib.h>
8 #include <string.h>
10 struct object **objs;
11 int nr_objs;
12 static int obj_allocs;
14 static int find_object(unsigned char *sha1)
16 int first = 0, last = nr_objs;
18 while (first < last) {
19 int next = (first + last) / 2;
20 struct object *obj = objs[next];
21 int cmp;
23 cmp = memcmp(sha1, obj->sha1, 20);
24 if (!cmp)
25 return next;
26 if (cmp < 0) {
27 last = next;
28 continue;
30 first = next+1;
32 return -first-1;
35 struct object *lookup_object(unsigned char *sha1)
37 int pos = find_object(sha1);
38 if (pos >= 0)
39 return objs[pos];
40 return NULL;
43 void created_object(unsigned char *sha1, struct object *obj)
45 int pos = find_object(sha1);
47 obj->parsed = 0;
48 memcpy(obj->sha1, sha1, 20);
49 obj->type = NULL;
50 obj->refs = NULL;
51 obj->used = 0;
53 if (pos >= 0)
54 die("Inserting %s twice\n", sha1_to_hex(sha1));
55 pos = -pos-1;
57 if (obj_allocs == nr_objs) {
58 obj_allocs = alloc_nr(obj_allocs);
59 objs = xrealloc(objs, obj_allocs * sizeof(struct object *));
62 /* Insert it into the right place */
63 memmove(objs + pos + 1, objs + pos, (nr_objs - pos) *
64 sizeof(struct object *));
66 objs[pos] = obj;
67 nr_objs++;
70 void add_ref(struct object *refer, struct object *target)
72 struct object_list **pp = &refer->refs;
73 struct object_list *p;
75 while ((p = *pp) != NULL) {
76 if (p->item == target)
77 return;
78 pp = &p->next;
81 target->used = 1;
82 p = xmalloc(sizeof(*p));
83 p->item = target;
84 p->next = NULL;
85 *pp = p;
88 void mark_reachable(struct object *obj, unsigned int mask)
90 struct object_list *p = obj->refs;
92 /* If we've been here already, don't bother */
93 if (obj->flags & mask)
94 return;
95 obj->flags |= mask;
96 while (p) {
97 mark_reachable(p->item, mask);
98 p = p->next;
102 struct object *parse_object(unsigned char *sha1)
104 unsigned long mapsize;
105 void *map = map_sha1_file(sha1, &mapsize);
106 if (map) {
107 struct object *obj;
108 char type[100];
109 unsigned long size;
110 void *buffer = unpack_sha1_file(map, mapsize, type, &size);
111 munmap(map, mapsize);
112 if (!buffer)
113 return NULL;
114 if (check_sha1_signature(sha1, buffer, size, type) < 0)
115 printf("sha1 mismatch %s\n", sha1_to_hex(sha1));
116 if (!strcmp(type, "blob")) {
117 struct blob *blob = lookup_blob(sha1);
118 parse_blob_buffer(blob, buffer, size);
119 obj = &blob->object;
120 } else if (!strcmp(type, "tree")) {
121 struct tree *tree = lookup_tree(sha1);
122 parse_tree_buffer(tree, buffer, size);
123 obj = &tree->object;
124 } else if (!strcmp(type, "commit")) {
125 struct commit *commit = lookup_commit(sha1);
126 parse_commit_buffer(commit, buffer, size);
127 obj = &commit->object;
128 } else if (!strcmp(type, "tag")) {
129 struct tag *tag = lookup_tag(sha1);
130 parse_tag_buffer(tag, buffer, size);
131 obj = &tag->object;
132 } else {
133 obj = NULL;
135 free(buffer);
136 return obj;
138 return NULL;