2 * GIT - the stupid content tracker
4 * Copyright (c) Junio C Hamano, 2006
11 static struct treeent
{
13 unsigned char sha1
[20];
15 char name
[FLEX_ARRAY
];
17 static int alloc
, used
;
19 static void append_to_tree(unsigned mode
, unsigned char *sha1
, char *path
)
22 int len
= strlen(path
);
23 if (strchr(path
, '/'))
24 die("path %s contains slash", path
);
27 alloc
= alloc_nr(used
);
28 entries
= xrealloc(entries
, sizeof(*entries
) * alloc
);
30 ent
= entries
[used
++] = xmalloc(sizeof(**entries
) + len
+ 1);
33 hashcpy(ent
->sha1
, sha1
);
34 memcpy(ent
->name
, path
, len
+1);
37 static int ent_compare(const void *a_
, const void *b_
)
39 struct treeent
*a
= *(struct treeent
**)a_
;
40 struct treeent
*b
= *(struct treeent
**)b_
;
41 return base_name_compare(a
->name
, a
->len
, a
->mode
,
42 b
->name
, b
->len
, b
->mode
);
45 static void write_tree(unsigned char *sha1
)
48 unsigned long size
, offset
;
51 qsort(entries
, used
, sizeof(*entries
), ent_compare
);
52 for (size
= i
= 0; i
< used
; i
++)
53 size
+= 32 + entries
[i
]->len
;
54 buffer
= xmalloc(size
);
57 for (i
= 0; i
< used
; i
++) {
58 struct treeent
*ent
= entries
[i
];
60 if (offset
+ ent
->len
+ 100 < size
) {
61 size
= alloc_nr(offset
+ ent
->len
+ 100);
62 buffer
= xrealloc(buffer
, size
);
64 offset
+= sprintf(buffer
+ offset
, "%o ", ent
->mode
);
65 offset
+= sprintf(buffer
+ offset
, "%s", ent
->name
);
67 hashcpy((unsigned char*)buffer
+ offset
, ent
->sha1
);
70 write_sha1_file(buffer
, offset
, tree_type
, sha1
);
73 static const char mktree_usage
[] = "git-mktree [-z]";
75 int main(int ac
, char **av
)
78 unsigned char sha1
[20];
79 int line_termination
= '\n';
81 setup_git_directory();
83 while ((1 < ac
) && av
[1][0] == '-') {
85 if (!strcmp("-z", arg
))
97 enum object_type type
;
100 read_line(&sb
, stdin
, line_termination
);
104 /* Input is non-recursive ls-tree output format
105 * mode SP type SP sha1 TAB name
107 mode
= strtoul(ptr
, &ntr
, 8);
108 if (ptr
== ntr
|| !ntr
|| *ntr
!= ' ')
109 die("input format error: %s", sb
.buf
);
110 ptr
= ntr
+ 1; /* type */
111 ntr
= strchr(ptr
, ' ');
112 if (!ntr
|| sb
.buf
+ sb
.len
<= ntr
+ 40 ||
114 get_sha1_hex(ntr
+ 1, sha1
))
115 die("input format error: %s", sb
.buf
);
116 type
= sha1_object_info(sha1
, NULL
);
118 die("object %s unavailable", sha1_to_hex(sha1
));
119 *ntr
++ = 0; /* now at the beginning of SHA1 */
120 if (type
!= type_from_string(ptr
))
121 die("object type %s mismatch (%s)", ptr
, typename(type
));
122 ntr
+= 41; /* at the beginning of name */
123 if (line_termination
&& ntr
[0] == '"')
124 path
= unquote_c_style(ntr
, NULL
);
128 append_to_tree(mode
, sha1
, path
);
134 puts(sha1_to_hex(sha1
));