cvsserver: Add some useful commandline options
[git/spearce.git] / pack-check.c
blob3623c716e3e3b7d4a28800e34afd0e5f0e13a43d
1 #include "cache.h"
2 #include "pack.h"
4 static int verify_packfile(struct packed_git *p,
5 struct pack_window **w_curs)
7 off_t index_size = p->index_size;
8 const unsigned char *index_base = p->index_data;
9 SHA_CTX ctx;
10 unsigned char sha1[20];
11 off_t offset = 0, pack_sig = p->pack_size - 20;
12 uint32_t nr_objects, i;
13 int err;
15 /* Note that the pack header checks are actually performed by
16 * use_pack when it first opens the pack file. If anything
17 * goes wrong during those checks then the call will die out
18 * immediately.
21 SHA1_Init(&ctx);
22 while (offset < pack_sig) {
23 unsigned int remaining;
24 unsigned char *in = use_pack(p, w_curs, offset, &remaining);
25 offset += remaining;
26 if (offset > pack_sig)
27 remaining -= (unsigned int)(offset - pack_sig);
28 SHA1_Update(&ctx, in, remaining);
30 SHA1_Final(sha1, &ctx);
31 if (hashcmp(sha1, use_pack(p, w_curs, pack_sig, NULL)))
32 return error("Packfile %s SHA1 mismatch with itself",
33 p->pack_name);
34 if (hashcmp(sha1, index_base + index_size - 40))
35 return error("Packfile %s SHA1 mismatch with idx",
36 p->pack_name);
37 unuse_pack(w_curs);
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 nr_objects = p->num_objects;
44 for (i = 0, err = 0; i < nr_objects; i++) {
45 const unsigned char *sha1;
46 void *data;
47 enum object_type type;
48 unsigned long size;
49 off_t offset;
51 sha1 = nth_packed_object_sha1(p, i);
52 if (!sha1)
53 die("internal error pack-check nth-packed-object");
54 offset = find_pack_entry_one(sha1, p);
55 if (!offset)
56 die("internal error pack-check find-pack-entry-one");
57 data = unpack_entry(p, offset, &type, &size);
58 if (!data) {
59 err = error("cannot unpack %s from %s",
60 sha1_to_hex(sha1), p->pack_name);
61 continue;
63 if (check_sha1_signature(sha1, data, size, typename(type))) {
64 err = error("packed %s from %s is corrupt",
65 sha1_to_hex(sha1), p->pack_name);
66 free(data);
67 continue;
69 free(data);
72 return err;
76 #define MAX_CHAIN 50
78 static void show_pack_info(struct packed_git *p)
80 uint32_t nr_objects, i, chain_histogram[MAX_CHAIN+1];
81 nr_objects = p->num_objects;
82 memset(chain_histogram, 0, sizeof(chain_histogram));
84 for (i = 0; i < nr_objects; i++) {
85 const unsigned char *sha1;
86 unsigned char base_sha1[20];
87 const char *type;
88 unsigned long size;
89 unsigned long store_size;
90 off_t offset;
91 unsigned int delta_chain_length;
93 sha1 = nth_packed_object_sha1(p, i);
94 if (!sha1)
95 die("internal error pack-check nth-packed-object");
96 offset = find_pack_entry_one(sha1, p);
97 if (!offset)
98 die("internal error pack-check find-pack-entry-one");
100 type = packed_object_info_detail(p, offset, &size, &store_size,
101 &delta_chain_length,
102 base_sha1);
103 printf("%s ", sha1_to_hex(sha1));
104 if (!delta_chain_length)
105 printf("%-6s %lu %"PRIuMAX"\n",
106 type, size, (uintmax_t)offset);
107 else {
108 printf("%-6s %lu %"PRIuMAX" %u %s\n",
109 type, size, (uintmax_t)offset,
110 delta_chain_length, sha1_to_hex(base_sha1));
111 if (delta_chain_length <= MAX_CHAIN)
112 chain_histogram[delta_chain_length]++;
113 else
114 chain_histogram[0]++;
118 for (i = 0; i <= MAX_CHAIN; i++) {
119 if (!chain_histogram[i])
120 continue;
121 printf("chain length = %d: %d object%s\n", i,
122 chain_histogram[i], chain_histogram[i] > 1 ? "s" : "");
124 if (chain_histogram[0])
125 printf("chain length > %d: %d object%s\n", MAX_CHAIN,
126 chain_histogram[0], chain_histogram[0] > 1 ? "s" : "");
129 int verify_pack(struct packed_git *p, int verbose)
131 off_t index_size;
132 const unsigned char *index_base;
133 SHA_CTX ctx;
134 unsigned char sha1[20];
135 int ret;
137 if (open_pack_index(p))
138 return error("packfile %s index not opened", p->pack_name);
139 index_size = p->index_size;
140 index_base = p->index_data;
142 ret = 0;
143 /* Verify SHA1 sum of the index file */
144 SHA1_Init(&ctx);
145 SHA1_Update(&ctx, index_base, (unsigned int)(index_size - 20));
146 SHA1_Final(sha1, &ctx);
147 if (hashcmp(sha1, index_base + index_size - 20))
148 ret = error("Packfile index for %s SHA1 mismatch",
149 p->pack_name);
151 if (!ret) {
152 /* Verify pack file */
153 struct pack_window *w_curs = NULL;
154 ret = verify_packfile(p, &w_curs);
155 unuse_pack(&w_curs);
158 if (verbose) {
159 if (ret)
160 printf("%s: bad\n", p->pack_name);
161 else {
162 show_pack_info(p);
163 printf("%s: ok\n", p->pack_name);
167 return ret;