2 * GIT - The information manager from hell
4 * Copyright (C) Linus Torvalds, 2005
12 static void pprint_tag(const unsigned char *sha1
, const char *buf
, unsigned long size
)
14 /* the parser in tag.c is useless here. */
15 const char *endp
= buf
+ size
;
22 if (7 <= endp
- cp
&& !memcmp("tagger ", cp
, 7)) {
23 const char *tagger
= cp
;
25 /* Found the tagger line. Copy out the contents
26 * of the buffer so far.
28 write_or_die(1, buf
, cp
- buf
);
31 * Do something intelligent, like pretty-printing
36 /* tagger to cp is a line
37 * that has ident and time.
39 const char *sp
= tagger
;
43 while (sp
< cp
&& *sp
!= '>')
47 write_or_die(1, tagger
,
52 !('0' <= *sp
&& *sp
<= '9'))
54 write_or_die(1, tagger
, sp
- tagger
);
55 date
= strtoul(sp
, &ep
, 10);
56 tz
= strtol(ep
, NULL
, 10);
57 sp
= show_date(date
, tz
, 0);
58 write_or_die(1, sp
, strlen(sp
));
65 if (cp
< endp
&& *cp
== '\n')
69 /* At this point, we have copied out the header up to the end of
70 * the tagger line and cp points at one past \n. It could be the
71 * next header line after the tagger line, or it could be another
72 * \n that marks the end of the headers. We need to copy out the
76 write_or_die(1, cp
, endp
- cp
);
79 static int cat_one_file(int opt
, const char *exp_type
, const char *obj_name
)
81 unsigned char sha1
[20];
82 enum object_type type
;
86 if (get_sha1(obj_name
, sha1
))
87 die("Not a valid object name %s", obj_name
);
92 type
= sha1_object_info(sha1
, NULL
);
94 printf("%s\n", typename(type
));
100 type
= sha1_object_info(sha1
, &size
);
102 printf("%lu\n", size
);
108 return !has_sha1_file(sha1
);
111 type
= sha1_object_info(sha1
, NULL
);
113 die("Not a valid object name %s", obj_name
);
115 /* custom pretty-print here */
116 if (type
== OBJ_TREE
) {
117 const char *ls_args
[3] = {"ls-tree", obj_name
, NULL
};
118 return cmd_ls_tree(2, ls_args
, NULL
);
121 buf
= read_sha1_file(sha1
, &type
, &size
);
123 die("Cannot read object %s", obj_name
);
124 if (type
== OBJ_TAG
) {
125 pprint_tag(sha1
, buf
, size
);
129 /* otherwise just spit out the data */
132 buf
= read_object_with_reference(sha1
, exp_type
, &size
, NULL
);
136 die("git-cat-file: unknown option: %s\n", exp_type
);
140 die("git-cat-file %s: bad file", obj_name
);
142 write_or_die(1, buf
, size
);
146 static int batch_one_object(const char *obj_name
)
148 unsigned char sha1
[20];
149 enum object_type type
;
155 if (get_sha1(obj_name
, sha1
)) {
156 printf("%s missing\n", obj_name
);
160 type
= sha1_object_info(sha1
, &size
);
164 printf("%s %s %lu\n", sha1_to_hex(sha1
), typename(type
), size
);
169 static int batch_objects(void)
173 strbuf_init(&buf
, 0);
174 while (strbuf_getline(&buf
, stdin
, '\n') != EOF
) {
175 int error
= batch_one_object(buf
.buf
);
183 static const char cat_file_usage
[] = "git-cat-file [ [-t|-s|-e|-p|<type>] <sha1> | --batch-check < <list_of_sha1s> ]";
185 int cmd_cat_file(int argc
, const char **argv
, const char *prefix
)
187 int i
, opt
= 0, batch_check
= 0;
188 const char *exp_type
= NULL
, *obj_name
= NULL
;
190 git_config(git_default_config
);
192 for (i
= 1; i
< argc
; ++i
) {
193 const char *arg
= argv
[i
];
195 if (!strcmp(arg
, "--batch-check")) {
197 error("git-cat-file: Can't use --batch-check with -%c", opt
);
198 usage(cat_file_usage
);
199 } else if (exp_type
) {
200 error("git-cat-file: Can't use --batch-check when a type (\"%s\") is specified", exp_type
);
201 usage(cat_file_usage
);
202 } else if (obj_name
) {
203 error("git-cat-file: Can't use --batch-check when an object (\"%s\") is specified", obj_name
);
204 usage(cat_file_usage
);
211 if (!strcmp(arg
, "-t") || !strcmp(arg
, "-s") || !strcmp(arg
, "-e") || !strcmp(arg
, "-p")) {
213 error("git-cat-file: Can't use %s with --batch-check", arg
);
214 usage(cat_file_usage
);
223 usage(cat_file_usage
);
227 error("git-cat-file: Can't specify a type (\"%s\") with --batch-check", arg
);
228 usage(cat_file_usage
);
236 usage(cat_file_usage
);
238 // We should have hit one of the earlier if (batch_check) cases before
240 assert(!batch_check
);
247 return batch_objects();
249 if (!exp_type
|| !obj_name
)
250 usage(cat_file_usage
);
252 return cat_one_file(opt
, exp_type
, obj_name
);