1/*
2 * GIT - The information manager from hell
3 *
4 * Copyright (C) Linus Torvalds, 2005
5 */
6#include "cache.h"
7#include "exec_cmd.h"
8
9static void flush_buffer(const char *buf, unsigned long size)
10{
11 while (size > 0) {
12 long ret = xwrite(1, buf, size);
13 if (ret < 0) {
14 /* Ignore epipe */
15 if (errno == EPIPE)
16 break;
17 die("git-cat-file: %s", strerror(errno));
18 } else if (!ret) {
19 die("git-cat-file: disk full?");
20 }
21 size -= ret;
22 buf += ret;
23 }
24}
25
26static int pprint_tag(const unsigned char *sha1, const char *buf, unsigned long size)
27{
28 /* the parser in tag.c is useless here. */
29 const char *endp = buf + size;
30 const char *cp = buf;
31
32 while (cp < endp) {
33 char c = *cp++;
34 if (c != '\n')
35 continue;
36 if (7 <= endp - cp && !memcmp("tagger ", cp, 7)) {
37 const char *tagger = cp;
38
39 /* Found the tagger line. Copy out the contents
40 * of the buffer so far.
41 */
42 flush_buffer(buf, cp - buf);
43
44 /*
45 * Do something intelligent, like pretty-printing
46 * the date.
47 */
48 while (cp < endp) {
49 if (*cp++ == '\n') {
50 /* tagger to cp is a line
51 * that has ident and time.
52 */
53 const char *sp = tagger;
54 char *ep;
55 unsigned long date;
56 long tz;
57 while (sp < cp && *sp != '>')
58 sp++;
59 if (sp == cp) {
60 /* give up */
61 flush_buffer(tagger,
62 cp - tagger);
63 break;
64 }
65 while (sp < cp &&
66 !('0' <= *sp && *sp <= '9'))
67 sp++;
68 flush_buffer(tagger, sp - tagger);
69 date = strtoul(sp, &ep, 10);
70 tz = strtol(ep, NULL, 10);
71 sp = show_date(date, tz);
72 flush_buffer(sp, strlen(sp));
73 xwrite(1, "\n", 1);
74 break;
75 }
76 }
77 break;
78 }
79 if (cp < endp && *cp == '\n')
80 /* end of header */
81 break;
82 }
83 /* At this point, we have copied out the header up to the end of
84 * the tagger line and cp points at one past \n. It could be the
85 * next header line after the tagger line, or it could be another
86 * \n that marks the end of the headers. We need to copy out the
87 * remainder as is.
88 */
89 if (cp < endp)
90 flush_buffer(cp, endp - cp);
91 return 0;
92}
93
94int main(int argc, char **argv)
95{
96 unsigned char sha1[20];
97 char type[20];
98 void *buf;
99 unsigned long size;
100 int opt;
101
102 setup_git_directory();
103 git_config(git_default_config);
104 if (argc != 3 || get_sha1(argv[2], sha1))
105 usage("git-cat-file [-t|-s|-e|-p|<type>] <sha1>");
106
107 opt = 0;
108 if ( argv[1][0] == '-' ) {
109 opt = argv[1][1];
110 if ( !opt || argv[1][2] )
111 opt = -1; /* Not a single character option */
112 }
113
114 buf = NULL;
115 switch (opt) {
116 case 't':
117 if (!sha1_object_info(sha1, type, NULL)) {
118 printf("%s\n", type);
119 return 0;
120 }
121 break;
122
123 case 's':
124 if (!sha1_object_info(sha1, type, &size)) {
125 printf("%lu\n", size);
126 return 0;
127 }
128 break;
129
130 case 'e':
131 return !has_sha1_file(sha1);
132
133 case 'p':
134 if (get_sha1(argv[2], sha1) ||
135 sha1_object_info(sha1, type, NULL))
136 die("Not a valid object name %s", argv[2]);
137
138 /* custom pretty-print here */
139 if (!strcmp(type, "tree"))
140 return execl_git_cmd("ls-tree", argv[2], NULL);
141
142 buf = read_sha1_file(sha1, type, &size);
143 if (!buf)
144 die("Cannot read object %s", argv[2]);
145 if (!strcmp(type, "tag"))
146 return pprint_tag(sha1, buf, size);
147
148 /* otherwise just spit out the data */
149 break;
150 case 0:
151 buf = read_object_with_reference(sha1, argv[1], &size, NULL);
152 break;
153
154 default:
155 die("git-cat-file: unknown option: %s\n", argv[1]);
156 }
157
158 if (!buf)
159 die("git-cat-file %s: bad file", argv[2]);
160
161 flush_buffer(buf, size);
162 return 0;
163}