git-remote-mediawiki: add a .perlcriticrc file
[git/mjg.git] / builtin / write-tree.c
blob084c0df7833f29c7554a4ffe95dac4bda1c6ce66
1 /*
2 * GIT - The information manager from hell
4 * Copyright (C) Linus Torvalds, 2005
5 */
6 #include "builtin.h"
7 #include "cache.h"
8 #include "tree.h"
9 #include "cache-tree.h"
10 #include "parse-options.h"
12 static const char * const write_tree_usage[] = {
13 N_("git write-tree [--missing-ok] [--prefix=<prefix>/]"),
14 NULL
17 int cmd_write_tree(int argc, const char **argv, const char *unused_prefix)
19 int flags = 0, ret;
20 const char *prefix = NULL;
21 unsigned char sha1[20];
22 const char *me = "git-write-tree";
23 struct option write_tree_options[] = {
24 OPT_BIT(0, "missing-ok", &flags, N_("allow missing objects"),
25 WRITE_TREE_MISSING_OK),
26 { OPTION_STRING, 0, "prefix", &prefix, N_("<prefix>/"),
27 N_("write tree object for a subdirectory <prefix>") ,
28 PARSE_OPT_LITERAL_ARGHELP },
29 { OPTION_BIT, 0, "ignore-cache-tree", &flags, NULL,
30 N_("only useful for debugging"),
31 PARSE_OPT_HIDDEN | PARSE_OPT_NOARG, NULL,
32 WRITE_TREE_IGNORE_CACHE_TREE },
33 OPT_END()
36 git_config(git_default_config, NULL);
37 argc = parse_options(argc, argv, unused_prefix, write_tree_options,
38 write_tree_usage, 0);
40 ret = write_cache_as_tree(sha1, flags, prefix);
41 switch (ret) {
42 case 0:
43 printf("%s\n", sha1_to_hex(sha1));
44 break;
45 case WRITE_TREE_UNREADABLE_INDEX:
46 die("%s: error reading the index", me);
47 break;
48 case WRITE_TREE_UNMERGED_INDEX:
49 die("%s: error building trees", me);
50 break;
51 case WRITE_TREE_PREFIX_ERROR:
52 die("%s: prefix %s not found", me, prefix);
53 break;
55 return ret;