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
)
51 qsort(entries
, used
, sizeof(*entries
), ent_compare
);
52 for (size
= i
= 0; i
< used
; i
++)
53 size
+= 32 + entries
[i
]->len
;
55 strbuf_grow(&buf
, size
);
57 for (i
= 0; i
< used
; i
++) {
58 struct treeent
*ent
= entries
[i
];
59 strbuf_addf(&buf
, "%o %s%c", ent
->mode
, ent
->name
, '\0');
60 strbuf_add(&buf
, ent
->sha1
, 20);
63 write_sha1_file(buf
.buf
, buf
.len
, tree_type
, sha1
);
67 static const char mktree_usage
[] = "git-mktree [-z]";
69 int main(int ac
, char **av
)
72 unsigned char sha1
[20];
73 int line_termination
= '\n';
75 setup_git_directory();
77 while ((1 < ac
) && av
[1][0] == '-') {
79 if (!strcmp("-z", arg
))
91 enum object_type type
;
94 read_line(&sb
, stdin
, line_termination
);
98 /* Input is non-recursive ls-tree output format
99 * mode SP type SP sha1 TAB name
101 mode
= strtoul(ptr
, &ntr
, 8);
102 if (ptr
== ntr
|| !ntr
|| *ntr
!= ' ')
103 die("input format error: %s", sb
.buf
);
104 ptr
= ntr
+ 1; /* type */
105 ntr
= strchr(ptr
, ' ');
106 if (!ntr
|| sb
.buf
+ sb
.len
<= ntr
+ 40 ||
108 get_sha1_hex(ntr
+ 1, sha1
))
109 die("input format error: %s", sb
.buf
);
110 type
= sha1_object_info(sha1
, NULL
);
112 die("object %s unavailable", sha1_to_hex(sha1
));
113 *ntr
++ = 0; /* now at the beginning of SHA1 */
114 if (type
!= type_from_string(ptr
))
115 die("object type %s mismatch (%s)", ptr
, typename(type
));
116 ntr
+= 41; /* at the beginning of name */
117 if (line_termination
&& ntr
[0] == '"')
118 path
= unquote_c_style(ntr
, NULL
);
122 append_to_tree(mode
, sha1
, path
);
128 puts(sha1_to_hex(sha1
));