shortlog: fix "-n"
[git/haiku.git] / pack-check.c
blobc0caaee0933382f30cc932731e1e387cc9a03c12
1 #include "cache.h"
2 #include "pack.h"
4 static int verify_packfile(struct packed_git *p)
6 unsigned long index_size = p->index_size;
7 void *index_base = p->index_base;
8 SHA_CTX ctx;
9 unsigned char sha1[20];
10 unsigned long pack_size = p->pack_size;
11 void *pack_base;
12 struct pack_header *hdr;
13 int nr_objects, err, i;
15 /* Header consistency check */
16 hdr = p->pack_base;
17 if (hdr->hdr_signature != htonl(PACK_SIGNATURE))
18 return error("Packfile %s signature mismatch", p->pack_name);
19 if (!pack_version_ok(hdr->hdr_version))
20 return error("Packfile version %d unsupported",
21 ntohl(hdr->hdr_version));
22 nr_objects = ntohl(hdr->hdr_entries);
23 if (num_packed_objects(p) != nr_objects)
24 return error("Packfile claims to have %d objects, "
25 "while idx size expects %d", nr_objects,
26 num_packed_objects(p));
28 SHA1_Init(&ctx);
29 pack_base = p->pack_base;
30 SHA1_Update(&ctx, pack_base, pack_size - 20);
31 SHA1_Final(sha1, &ctx);
32 if (hashcmp(sha1, (unsigned char *)pack_base + pack_size - 20))
33 return error("Packfile %s SHA1 mismatch with itself",
34 p->pack_name);
35 if (hashcmp(sha1, (unsigned char *)index_base + index_size - 40))
36 return error("Packfile %s SHA1 mismatch with idx",
37 p->pack_name);
39 /* Make sure everything reachable from idx is valid. Since we
40 * have verified that nr_objects matches between idx and pack,
41 * we do not do scan-streaming check on the pack file.
43 for (i = err = 0; i < nr_objects; i++) {
44 unsigned char sha1[20];
45 void *data;
46 char type[20];
47 unsigned long size, offset;
49 if (nth_packed_object_sha1(p, i, sha1))
50 die("internal error pack-check nth-packed-object");
51 offset = find_pack_entry_one(sha1, p);
52 if (!offset)
53 die("internal error pack-check find-pack-entry-one");
54 data = unpack_entry_gently(p, offset, type, &size);
55 if (!data) {
56 err = error("cannot unpack %s from %s",
57 sha1_to_hex(sha1), p->pack_name);
58 continue;
60 if (check_sha1_signature(sha1, data, size, type)) {
61 err = error("packed %s from %s is corrupt",
62 sha1_to_hex(sha1), p->pack_name);
63 free(data);
64 continue;
66 free(data);
69 return err;
73 #define MAX_CHAIN 40
75 static void show_pack_info(struct packed_git *p)
77 struct pack_header *hdr;
78 int nr_objects, i;
79 unsigned int chain_histogram[MAX_CHAIN];
81 hdr = p->pack_base;
82 nr_objects = ntohl(hdr->hdr_entries);
83 memset(chain_histogram, 0, sizeof(chain_histogram));
85 for (i = 0; i < nr_objects; i++) {
86 unsigned char sha1[20], base_sha1[20];
87 char type[20];
88 unsigned long size;
89 unsigned long store_size;
90 unsigned long offset;
91 unsigned int delta_chain_length;
93 if (nth_packed_object_sha1(p, i, sha1))
94 die("internal error pack-check nth-packed-object");
95 offset = find_pack_entry_one(sha1, p);
96 if (!offset)
97 die("internal error pack-check find-pack-entry-one");
99 packed_object_info_detail(p, offset, type, &size, &store_size,
100 &delta_chain_length,
101 base_sha1);
102 printf("%s ", sha1_to_hex(sha1));
103 if (!delta_chain_length)
104 printf("%-6s %lu %lu\n", type, size, offset);
105 else {
106 printf("%-6s %lu %lu %u %s\n", type, size, offset,
107 delta_chain_length, sha1_to_hex(base_sha1));
108 if (delta_chain_length < MAX_CHAIN)
109 chain_histogram[delta_chain_length]++;
110 else
111 chain_histogram[0]++;
115 for (i = 0; i < MAX_CHAIN; i++) {
116 if (!chain_histogram[i])
117 continue;
118 printf("chain length %s %d: %d object%s\n",
119 i ? "=" : ">=",
120 i ? i : MAX_CHAIN,
121 chain_histogram[i],
122 1 < chain_histogram[i] ? "s" : "");
126 int verify_pack(struct packed_git *p, int verbose)
128 unsigned long index_size = p->index_size;
129 void *index_base = p->index_base;
130 SHA_CTX ctx;
131 unsigned char sha1[20];
132 int ret;
134 ret = 0;
135 /* Verify SHA1 sum of the index file */
136 SHA1_Init(&ctx);
137 SHA1_Update(&ctx, index_base, index_size - 20);
138 SHA1_Final(sha1, &ctx);
139 if (hashcmp(sha1, (unsigned char *)index_base + index_size - 20))
140 ret = error("Packfile index for %s SHA1 mismatch",
141 p->pack_name);
143 if (!ret) {
144 /* Verify pack file */
145 use_packed_git(p);
146 ret = verify_packfile(p);
147 unuse_packed_git(p);
150 if (verbose) {
151 if (ret)
152 printf("%s: bad\n", p->pack_name);
153 else {
154 use_packed_git(p);
155 show_pack_info(p);
156 unuse_packed_git(p);
157 printf("%s: ok\n", p->pack_name);
161 return ret;