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
;
10 unsigned char sha1
[20];
11 off_t offset
= 0, pack_sig
= p
->pack_size
- 20;
12 uint32_t nr_objects
, i
;
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
22 while (offset
< pack_sig
) {
23 unsigned int remaining
;
24 unsigned char *in
= use_pack(p
, w_curs
, 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",
34 if (hashcmp(sha1
, index_base
+ index_size
- 40))
35 return error("Packfile %s SHA1 mismatch with idx",
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
;
47 enum object_type type
;
51 sha1
= nth_packed_object_sha1(p
, i
);
53 die("internal error pack-check nth-packed-object");
54 offset
= find_pack_entry_one(sha1
, p
);
56 die("internal error pack-check find-pack-entry-one");
57 data
= unpack_entry(p
, offset
, &type
, &size
);
59 err
= error("cannot unpack %s from %s",
60 sha1_to_hex(sha1
), p
->pack_name
);
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
);
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];
89 unsigned long store_size
;
91 unsigned int delta_chain_length
;
93 sha1
= nth_packed_object_sha1(p
, i
);
95 die("internal error pack-check nth-packed-object");
96 offset
= find_pack_entry_one(sha1
, p
);
98 die("internal error pack-check find-pack-entry-one");
100 type
= packed_object_info_detail(p
, offset
, &size
, &store_size
,
103 printf("%s ", sha1_to_hex(sha1
));
104 if (!delta_chain_length
)
105 printf("%-6s %lu %"PRIuMAX
"\n",
106 type
, size
, (uintmax_t)offset
);
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
]++;
114 chain_histogram
[0]++;
118 for (i
= 0; i
<= MAX_CHAIN
; i
++) {
119 if (!chain_histogram
[i
])
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
= p
->index_size
;
132 const unsigned char *index_base
= p
->index_data
;
134 unsigned char sha1
[20];
138 /* Verify SHA1 sum of the index file */
140 SHA1_Update(&ctx
, index_base
, (unsigned int)(index_size
- 20));
141 SHA1_Final(sha1
, &ctx
);
142 if (hashcmp(sha1
, index_base
+ index_size
- 20))
143 ret
= error("Packfile index for %s SHA1 mismatch",
147 /* Verify pack file */
148 struct pack_window
*w_curs
= NULL
;
149 ret
= verify_packfile(p
, &w_curs
);
155 printf("%s: bad\n", p
->pack_name
);
158 printf("%s: ok\n", p
->pack_name
);