gitweb: Create Gitweb::Util module
[git/jnareb-git/bp-gitweb.git] / builtin / cat-file.c
blob94632dbdb400f9a2986d10f06dd16119ce1b4e54
1 /*
2 * GIT - The information manager from hell
4 * Copyright (C) Linus Torvalds, 2005
5 */
6 #include "cache.h"
7 #include "exec_cmd.h"
8 #include "tag.h"
9 #include "tree.h"
10 #include "builtin.h"
11 #include "parse-options.h"
12 #include "diff.h"
13 #include "userdiff.h"
15 #define BATCH 1
16 #define BATCH_CHECK 2
18 static void pprint_tag(const unsigned char *sha1, const char *buf, unsigned long size)
20 /* the parser in tag.c is useless here. */
21 const char *endp = buf + size;
22 const char *cp = buf;
24 while (cp < endp) {
25 char c = *cp++;
26 if (c != '\n')
27 continue;
28 if (7 <= endp - cp && !memcmp("tagger ", cp, 7)) {
29 const char *tagger = cp;
31 /* Found the tagger line. Copy out the contents
32 * of the buffer so far.
34 write_or_die(1, buf, cp - buf);
37 * Do something intelligent, like pretty-printing
38 * the date.
40 while (cp < endp) {
41 if (*cp++ == '\n') {
42 /* tagger to cp is a line
43 * that has ident and time.
45 const char *sp = tagger;
46 char *ep;
47 unsigned long date;
48 long tz;
49 while (sp < cp && *sp != '>')
50 sp++;
51 if (sp == cp) {
52 /* give up */
53 write_or_die(1, tagger,
54 cp - tagger);
55 break;
57 while (sp < cp &&
58 !('0' <= *sp && *sp <= '9'))
59 sp++;
60 write_or_die(1, tagger, sp - tagger);
61 date = strtoul(sp, &ep, 10);
62 tz = strtol(ep, NULL, 10);
63 sp = show_date(date, tz, 0);
64 write_or_die(1, sp, strlen(sp));
65 xwrite(1, "\n", 1);
66 break;
69 break;
71 if (cp < endp && *cp == '\n')
72 /* end of header */
73 break;
75 /* At this point, we have copied out the header up to the end of
76 * the tagger line and cp points at one past \n. It could be the
77 * next header line after the tagger line, or it could be another
78 * \n that marks the end of the headers. We need to copy out the
79 * remainder as is.
81 if (cp < endp)
82 write_or_die(1, cp, endp - cp);
85 static int cat_one_file(int opt, const char *exp_type, const char *obj_name)
87 unsigned char sha1[20];
88 enum object_type type;
89 char *buf;
90 unsigned long size;
91 struct object_context obj_context;
93 if (get_sha1_with_context(obj_name, sha1, &obj_context))
94 die("Not a valid object name %s", obj_name);
96 buf = NULL;
97 switch (opt) {
98 case 't':
99 type = sha1_object_info(sha1, NULL);
100 if (type > 0) {
101 printf("%s\n", typename(type));
102 return 0;
104 break;
106 case 's':
107 type = sha1_object_info(sha1, &size);
108 if (type > 0) {
109 printf("%lu\n", size);
110 return 0;
112 break;
114 case 'e':
115 return !has_sha1_file(sha1);
117 case 'p':
118 type = sha1_object_info(sha1, NULL);
119 if (type < 0)
120 die("Not a valid object name %s", obj_name);
122 /* custom pretty-print here */
123 if (type == OBJ_TREE) {
124 const char *ls_args[3] = { NULL };
125 ls_args[0] = "ls-tree";
126 ls_args[1] = obj_name;
127 return cmd_ls_tree(2, ls_args, NULL);
130 buf = read_sha1_file(sha1, &type, &size);
131 if (!buf)
132 die("Cannot read object %s", obj_name);
133 if (type == OBJ_TAG) {
134 pprint_tag(sha1, buf, size);
135 return 0;
138 /* otherwise just spit out the data */
139 break;
141 case 'c':
142 if (!obj_context.path[0])
143 die("git cat-file --textconv %s: <object> must be <sha1:path>",
144 obj_name);
146 if (!textconv_object(obj_context.path, obj_context.mode, sha1, &buf, &size))
147 die("git cat-file --textconv: unable to run textconv on %s",
148 obj_name);
149 break;
151 case 0:
152 buf = read_object_with_reference(sha1, exp_type, &size, NULL);
153 break;
155 default:
156 die("git cat-file: unknown option: %s", exp_type);
159 if (!buf)
160 die("git cat-file %s: bad file", obj_name);
162 write_or_die(1, buf, size);
163 return 0;
166 static int batch_one_object(const char *obj_name, int print_contents)
168 unsigned char sha1[20];
169 enum object_type type = 0;
170 unsigned long size;
171 void *contents = contents;
173 if (!obj_name)
174 return 1;
176 if (get_sha1(obj_name, sha1)) {
177 printf("%s missing\n", obj_name);
178 fflush(stdout);
179 return 0;
182 if (print_contents == BATCH)
183 contents = read_sha1_file(sha1, &type, &size);
184 else
185 type = sha1_object_info(sha1, &size);
187 if (type <= 0) {
188 printf("%s missing\n", obj_name);
189 fflush(stdout);
190 return 0;
193 printf("%s %s %lu\n", sha1_to_hex(sha1), typename(type), size);
194 fflush(stdout);
196 if (print_contents == BATCH) {
197 write_or_die(1, contents, size);
198 printf("\n");
199 fflush(stdout);
200 free(contents);
203 return 0;
206 static int batch_objects(int print_contents)
208 struct strbuf buf = STRBUF_INIT;
210 while (strbuf_getline(&buf, stdin, '\n') != EOF) {
211 int error = batch_one_object(buf.buf, print_contents);
212 if (error)
213 return error;
216 return 0;
219 static const char * const cat_file_usage[] = {
220 "git cat-file (-t|-s|-e|-p|<type>|--textconv) <object>",
221 "git cat-file (--batch|--batch-check) < <list_of_objects>",
222 NULL
225 static int git_cat_file_config(const char *var, const char *value, void *cb)
227 switch (userdiff_config(var, value)) {
228 case 0:
229 break;
230 case -1:
231 return -1;
232 default:
233 return 0;
236 return git_default_config(var, value, cb);
239 int cmd_cat_file(int argc, const char **argv, const char *prefix)
241 int opt = 0, batch = 0;
242 const char *exp_type = NULL, *obj_name = NULL;
244 const struct option options[] = {
245 OPT_GROUP("<type> can be one of: blob, tree, commit, tag"),
246 OPT_SET_INT('t', NULL, &opt, "show object type", 't'),
247 OPT_SET_INT('s', NULL, &opt, "show object size", 's'),
248 OPT_SET_INT('e', NULL, &opt,
249 "exit with zero when there's no error", 'e'),
250 OPT_SET_INT('p', NULL, &opt, "pretty-print object's content", 'p'),
251 OPT_SET_INT(0, "textconv", &opt,
252 "for blob objects, run textconv on object's content", 'c'),
253 OPT_SET_INT(0, "batch", &batch,
254 "show info and content of objects fed from the standard input",
255 BATCH),
256 OPT_SET_INT(0, "batch-check", &batch,
257 "show info about objects fed from the standard input",
258 BATCH_CHECK),
259 OPT_END()
262 git_config(git_cat_file_config, NULL);
264 if (argc != 3 && argc != 2)
265 usage_with_options(cat_file_usage, options);
267 argc = parse_options(argc, argv, prefix, options, cat_file_usage, 0);
269 if (opt) {
270 if (argc == 1)
271 obj_name = argv[0];
272 else
273 usage_with_options(cat_file_usage, options);
275 if (!opt && !batch) {
276 if (argc == 2) {
277 exp_type = argv[0];
278 obj_name = argv[1];
279 } else
280 usage_with_options(cat_file_usage, options);
282 if (batch && (opt || argc)) {
283 usage_with_options(cat_file_usage, options);
286 if (batch)
287 return batch_objects(batch);
289 return cat_one_file(opt, exp_type, obj_name);