Merge branch 'jc/show-merge'
[git/git.git] / convert-objects.c
1 #define _XOPEN_SOURCE 500 /* glibc2 and AIX 5.3L need this */
2 #define _XOPEN_SOURCE_EXTENDED 1 /* AIX 5.3L needs this */
3 #include <time.h>
4 #include "cache.h"
5 #include "blob.h"
6 #include "commit.h"
7 #include "tree.h"
8
9 struct entry {
10 unsigned char old_sha1[20];
11 unsigned char new_sha1[20];
12 int converted;
13 };
14
15 #define MAXOBJECTS (1000000)
16
17 static struct entry *convert[MAXOBJECTS];
18 static int nr_convert;
19
20 static struct entry * convert_entry(unsigned char *sha1);
21
22 static struct entry *insert_new(unsigned char *sha1, int pos)
23 {
24 struct entry *new = xcalloc(1, sizeof(struct entry));
25 memcpy(new->old_sha1, sha1, 20);
26 memmove(convert + pos + 1, convert + pos, (nr_convert - pos) * sizeof(struct entry *));
27 convert[pos] = new;
28 nr_convert++;
29 if (nr_convert == MAXOBJECTS)
30 die("you're kidding me - hit maximum object limit");
31 return new;
32 }
33
34 static struct entry *lookup_entry(unsigned char *sha1)
35 {
36 int low = 0, high = nr_convert;
37
38 while (low < high) {
39 int next = (low + high) / 2;
40 struct entry *n = convert[next];
41 int cmp = memcmp(sha1, n->old_sha1, 20);
42 if (!cmp)
43 return n;
44 if (cmp < 0) {
45 high = next;
46 continue;
47 }
48 low = next+1;
49 }
50 return insert_new(sha1, low);
51 }
52
53 static void convert_binary_sha1(void *buffer)
54 {
55 struct entry *entry = convert_entry(buffer);
56 memcpy(buffer, entry->new_sha1, 20);
57 }
58
59 static void convert_ascii_sha1(void *buffer)
60 {
61 unsigned char sha1[20];
62 struct entry *entry;
63
64 if (get_sha1_hex(buffer, sha1))
65 die("expected sha1, got '%s'", (char*) buffer);
66 entry = convert_entry(sha1);
67 memcpy(buffer, sha1_to_hex(entry->new_sha1), 40);
68 }
69
70 static unsigned int convert_mode(unsigned int mode)
71 {
72 unsigned int newmode;
73
74 newmode = mode & S_IFMT;
75 if (S_ISREG(mode))
76 newmode |= (mode & 0100) ? 0755 : 0644;
77 return newmode;
78 }
79
80 static int write_subdirectory(void *buffer, unsigned long size, const char *base, int baselen, unsigned char *result_sha1)
81 {
82 char *new = xmalloc(size);
83 unsigned long newlen = 0;
84 unsigned long used;
85
86 used = 0;
87 while (size) {
88 int len = 21 + strlen(buffer);
89 char *path = strchr(buffer, ' ');
90 unsigned char *sha1;
91 unsigned int mode;
92 char *slash, *origpath;
93
94 if (!path || sscanf(buffer, "%o", &mode) != 1)
95 die("bad tree conversion");
96 mode = convert_mode(mode);
97 path++;
98 if (memcmp(path, base, baselen))
99 break;
100 origpath = path;
101 path += baselen;
102 slash = strchr(path, '/');
103 if (!slash) {
104 newlen += sprintf(new + newlen, "%o %s", mode, path);
105 new[newlen++] = '\0';
106 memcpy(new + newlen, (char *) buffer + len - 20, 20);
107 newlen += 20;
108
109 used += len;
110 size -= len;
111 buffer = (char *) buffer + len;
112 continue;
113 }
114
115 newlen += sprintf(new + newlen, "%o %.*s", S_IFDIR, (int)(slash - path), path);
116 new[newlen++] = 0;
117 sha1 = (unsigned char *)(new + newlen);
118 newlen += 20;
119
120 len = write_subdirectory(buffer, size, origpath, slash-origpath+1, sha1);
121
122 used += len;
123 size -= len;
124 buffer = (char *) buffer + len;
125 }
126
127 write_sha1_file(new, newlen, tree_type, result_sha1);
128 free(new);
129 return used;
130 }
131
132 static void convert_tree(void *buffer, unsigned long size, unsigned char *result_sha1)
133 {
134 void *orig_buffer = buffer;
135 unsigned long orig_size = size;
136
137 while (size) {
138 int len = 1+strlen(buffer);
139
140 convert_binary_sha1((char *) buffer + len);
141
142 len += 20;
143 if (len > size)
144 die("corrupt tree object");
145 size -= len;
146 buffer = (char *) buffer + len;
147 }
148
149 write_subdirectory(orig_buffer, orig_size, "", 0, result_sha1);
150 }
151
152 static unsigned long parse_oldstyle_date(const char *buf)
153 {
154 char c, *p;
155 char buffer[100];
156 struct tm tm;
157 const char *formats[] = {
158 "%c",
159 "%a %b %d %T",
160 "%Z",
161 "%Y",
162 " %Y",
163 NULL
164 };
165 /* We only ever did two timezones in the bad old format .. */
166 const char *timezones[] = {
167 "PDT", "PST", "CEST", NULL
168 };
169 const char **fmt = formats;
170
171 p = buffer;
172 while (isspace(c = *buf))
173 buf++;
174 while ((c = *buf++) != '\n')
175 *p++ = c;
176 *p++ = 0;
177 buf = buffer;
178 memset(&tm, 0, sizeof(tm));
179 do {
180 const char *next = strptime(buf, *fmt, &tm);
181 if (next) {
182 if (!*next)
183 return mktime(&tm);
184 buf = next;
185 } else {
186 const char **p = timezones;
187 while (isspace(*buf))
188 buf++;
189 while (*p) {
190 if (!memcmp(buf, *p, strlen(*p))) {
191 buf += strlen(*p);
192 break;
193 }
194 p++;
195 }
196 }
197 fmt++;
198 } while (*buf && *fmt);
199 printf("left: %s\n", buf);
200 return mktime(&tm);
201 }
202
203 static int convert_date_line(char *dst, void **buf, unsigned long *sp)
204 {
205 unsigned long size = *sp;
206 char *line = *buf;
207 char *next = strchr(line, '\n');
208 char *date = strchr(line, '>');
209 int len;
210
211 if (!next || !date)
212 die("missing or bad author/committer line %s", line);
213 next++; date += 2;
214
215 *buf = next;
216 *sp = size - (next - line);
217
218 len = date - line;
219 memcpy(dst, line, len);
220 dst += len;
221
222 /* Is it already in new format? */
223 if (isdigit(*date)) {
224 int datelen = next - date;
225 memcpy(dst, date, datelen);
226 return len + datelen;
227 }
228
229 /*
230 * Hacky hacky: one of the sparse old-style commits does not have
231 * any date at all, but we can fake it by using the committer date.
232 */
233 if (*date == '\n' && strchr(next, '>'))
234 date = strchr(next, '>')+2;
235
236 return len + sprintf(dst, "%lu -0700\n", parse_oldstyle_date(date));
237 }
238
239 static void convert_date(void *buffer, unsigned long size, unsigned char *result_sha1)
240 {
241 char *new = xmalloc(size + 100);
242 unsigned long newlen = 0;
243
244 /* "tree <sha1>\n" */
245 memcpy(new + newlen, buffer, 46);
246 newlen += 46;
247 buffer = (char *) buffer + 46;
248 size -= 46;
249
250 /* "parent <sha1>\n" */
251 while (!memcmp(buffer, "parent ", 7)) {
252 memcpy(new + newlen, buffer, 48);
253 newlen += 48;
254 buffer = (char *) buffer + 48;
255 size -= 48;
256 }
257
258 /* "author xyz <xyz> date" */
259 newlen += convert_date_line(new + newlen, &buffer, &size);
260 /* "committer xyz <xyz> date" */
261 newlen += convert_date_line(new + newlen, &buffer, &size);
262
263 /* Rest */
264 memcpy(new + newlen, buffer, size);
265 newlen += size;
266
267 write_sha1_file(new, newlen, commit_type, result_sha1);
268 free(new);
269 }
270
271 static void convert_commit(void *buffer, unsigned long size, unsigned char *result_sha1)
272 {
273 void *orig_buffer = buffer;
274 unsigned long orig_size = size;
275
276 if (memcmp(buffer, "tree ", 5))
277 die("Bad commit '%s'", (char*) buffer);
278 convert_ascii_sha1((char *) buffer + 5);
279 buffer = (char *) buffer + 46; /* "tree " + "hex sha1" + "\n" */
280 while (!memcmp(buffer, "parent ", 7)) {
281 convert_ascii_sha1((char *) buffer + 7);
282 buffer = (char *) buffer + 48;
283 }
284 convert_date(orig_buffer, orig_size, result_sha1);
285 }
286
287 static struct entry * convert_entry(unsigned char *sha1)
288 {
289 struct entry *entry = lookup_entry(sha1);
290 char type[20];
291 void *buffer, *data;
292 unsigned long size;
293
294 if (entry->converted)
295 return entry;
296 data = read_sha1_file(sha1, type, &size);
297 if (!data)
298 die("unable to read object %s", sha1_to_hex(sha1));
299
300 buffer = xmalloc(size);
301 memcpy(buffer, data, size);
302
303 if (!strcmp(type, blob_type)) {
304 write_sha1_file(buffer, size, blob_type, entry->new_sha1);
305 } else if (!strcmp(type, tree_type))
306 convert_tree(buffer, size, entry->new_sha1);
307 else if (!strcmp(type, commit_type))
308 convert_commit(buffer, size, entry->new_sha1);
309 else
310 die("unknown object type '%s' in %s", type, sha1_to_hex(sha1));
311 entry->converted = 1;
312 free(buffer);
313 free(data);
314 return entry;
315 }
316
317 int main(int argc, char **argv)
318 {
319 unsigned char sha1[20];
320 struct entry *entry;
321
322 setup_git_directory();
323
324 if (argc != 2)
325 usage("git-convert-objects <sha1>");
326 if (get_sha1(argv[1], sha1))
327 die("Not a valid object name %s", argv[1]);
328
329 entry = convert_entry(sha1);
330 printf("new sha1: %s\n", sha1_to_hex(entry->new_sha1));
331 return 0;
332 }