12 int track_object_refs
= 1;
14 static int hashtable_index(const unsigned char *sha1
)
16 unsigned int i
= *(unsigned int *)sha1
;
17 return (int)(i
% obj_allocs
);
20 static int find_object(const unsigned char *sha1
)
22 int i
= hashtable_index(sha1
);
28 if (memcmp(sha1
, objs
[i
]->sha1
, 20) == 0)
37 struct object
*lookup_object(const unsigned char *sha1
)
39 int pos
= find_object(sha1
);
45 void created_object(const unsigned char *sha1
, struct object
*obj
)
50 memcpy(obj
->sha1
, sha1
, 20);
55 if (obj_allocs
- 1 <= nr_objs
* 2) {
56 int i
, count
= obj_allocs
;
57 obj_allocs
= (obj_allocs
< 32 ? 32 : 2 * obj_allocs
);
58 objs
= xrealloc(objs
, obj_allocs
* sizeof(struct object
*));
59 memset(objs
+ count
, 0, (obj_allocs
- count
)
60 * sizeof(struct object
*));
61 for (i
= 0; i
< count
; i
++)
63 int j
= find_object(objs
[i
]->sha1
);
72 pos
= find_object(sha1
);
74 die("Inserting %s twice\n", sha1_to_hex(sha1
));
81 struct object_refs
*alloc_object_refs(unsigned count
)
83 struct object_refs
*refs
;
84 size_t size
= sizeof(*refs
) + count
*sizeof(struct object
*);
87 memset(refs
, 0, size
);
92 static int compare_object_pointers(const void *a
, const void *b
)
94 const struct object
* const *pa
= a
;
95 const struct object
* const *pb
= b
;
104 void set_object_refs(struct object
*obj
, struct object_refs
*refs
)
108 /* Do not install empty list of references */
109 if (refs
->count
< 1) {
114 /* Sort the list and filter out duplicates */
115 qsort(refs
->ref
, refs
->count
, sizeof(refs
->ref
[0]),
116 compare_object_pointers
);
117 for (i
= j
= 1; i
< refs
->count
; i
++) {
118 if (refs
->ref
[i
] != refs
->ref
[i
- 1])
119 refs
->ref
[j
++] = refs
->ref
[i
];
121 if (j
< refs
->count
) {
122 /* Duplicates were found - reallocate list */
123 size_t size
= sizeof(*refs
) + j
*sizeof(struct object
*);
125 refs
= xrealloc(refs
, size
);
128 for (i
= 0; i
< refs
->count
; i
++)
129 refs
->ref
[i
]->used
= 1;
133 void mark_reachable(struct object
*obj
, unsigned int mask
)
135 if (!track_object_refs
)
136 die("cannot do reachability with object refs turned off");
137 /* If we've been here already, don't bother */
138 if (obj
->flags
& mask
)
142 const struct object_refs
*refs
= obj
->refs
;
144 for (i
= 0; i
< refs
->count
; i
++)
145 mark_reachable(refs
->ref
[i
], mask
);
149 struct object
*lookup_object_type(const unsigned char *sha1
, const char *type
)
152 return lookup_unknown_object(sha1
);
153 } else if (!strcmp(type
, blob_type
)) {
154 return &lookup_blob(sha1
)->object
;
155 } else if (!strcmp(type
, tree_type
)) {
156 return &lookup_tree(sha1
)->object
;
157 } else if (!strcmp(type
, commit_type
)) {
158 return &lookup_commit(sha1
)->object
;
159 } else if (!strcmp(type
, tag_type
)) {
160 return &lookup_tag(sha1
)->object
;
162 error("Unknown type %s", type
);
168 struct object object
;
169 struct commit commit
;
175 struct object
*lookup_unknown_object(const unsigned char *sha1
)
177 struct object
*obj
= lookup_object(sha1
);
179 union any_object
*ret
= xmalloc(sizeof(*ret
));
180 memset(ret
, 0, sizeof(*ret
));
181 created_object(sha1
, &ret
->object
);
182 ret
->object
.type
= NULL
;
188 struct object
*parse_object(const unsigned char *sha1
)
192 void *buffer
= read_sha1_file(sha1
, type
, &size
);
195 if (check_sha1_signature(sha1
, buffer
, size
, type
) < 0)
196 printf("sha1 mismatch %s\n", sha1_to_hex(sha1
));
197 if (!strcmp(type
, "blob")) {
198 struct blob
*blob
= lookup_blob(sha1
);
199 parse_blob_buffer(blob
, buffer
, size
);
201 } else if (!strcmp(type
, "tree")) {
202 struct tree
*tree
= lookup_tree(sha1
);
203 parse_tree_buffer(tree
, buffer
, size
);
205 } else if (!strcmp(type
, "commit")) {
206 struct commit
*commit
= lookup_commit(sha1
);
207 parse_commit_buffer(commit
, buffer
, size
);
208 if (!commit
->buffer
) {
209 commit
->buffer
= buffer
;
212 obj
= &commit
->object
;
213 } else if (!strcmp(type
, "tag")) {
214 struct tag
*tag
= lookup_tag(sha1
);
215 parse_tag_buffer(tag
, buffer
, size
);
226 struct object_list
*object_list_insert(struct object
*item
,
227 struct object_list
**list_p
)
229 struct object_list
*new_list
= xmalloc(sizeof(struct object_list
));
230 new_list
->item
= item
;
231 new_list
->next
= *list_p
;
236 void object_list_append(struct object
*item
,
237 struct object_list
**list_p
)
240 list_p
= &((*list_p
)->next
);
242 *list_p
= xmalloc(sizeof(struct object_list
));
243 (*list_p
)->next
= NULL
;
244 (*list_p
)->item
= item
;
247 unsigned object_list_length(struct object_list
*list
)
257 int object_list_contains(struct object_list
*list
, struct object
*obj
)
260 if (list
->item
== obj
)