2005-04-07 22:16:10 +00:00
|
|
|
/*
|
|
|
|
* GIT - The information manager from hell
|
|
|
|
*
|
|
|
|
* Copyright (C) Linus Torvalds, 2005
|
|
|
|
*/
|
2005-04-07 22:13:13 +00:00
|
|
|
#include "cache.h"
|
2006-03-02 00:43:19 +00:00
|
|
|
#include "exec_cmd.h"
|
2006-04-02 12:44:09 +00:00
|
|
|
#include "tag.h"
|
|
|
|
#include "tree.h"
|
2006-05-24 11:08:46 +00:00
|
|
|
#include "builtin.h"
|
2006-03-02 00:43:19 +00:00
|
|
|
|
2006-08-14 20:19:15 +00:00
|
|
|
static void pprint_tag(const unsigned char *sha1, const char *buf, unsigned long size)
|
2006-03-02 00:43:19 +00:00
|
|
|
{
|
|
|
|
/* the parser in tag.c is useless here. */
|
|
|
|
const char *endp = buf + size;
|
|
|
|
const char *cp = buf;
|
|
|
|
|
|
|
|
while (cp < endp) {
|
|
|
|
char c = *cp++;
|
|
|
|
if (c != '\n')
|
|
|
|
continue;
|
|
|
|
if (7 <= endp - cp && !memcmp("tagger ", cp, 7)) {
|
|
|
|
const char *tagger = cp;
|
|
|
|
|
|
|
|
/* Found the tagger line. Copy out the contents
|
|
|
|
* of the buffer so far.
|
|
|
|
*/
|
2006-08-21 18:43:43 +00:00
|
|
|
write_or_die(1, buf, cp - buf);
|
2006-03-02 00:43:19 +00:00
|
|
|
|
|
|
|
/*
|
|
|
|
* Do something intelligent, like pretty-printing
|
|
|
|
* the date.
|
|
|
|
*/
|
|
|
|
while (cp < endp) {
|
|
|
|
if (*cp++ == '\n') {
|
|
|
|
/* tagger to cp is a line
|
|
|
|
* that has ident and time.
|
|
|
|
*/
|
|
|
|
const char *sp = tagger;
|
|
|
|
char *ep;
|
|
|
|
unsigned long date;
|
|
|
|
long tz;
|
|
|
|
while (sp < cp && *sp != '>')
|
|
|
|
sp++;
|
|
|
|
if (sp == cp) {
|
|
|
|
/* give up */
|
2006-08-21 18:43:43 +00:00
|
|
|
write_or_die(1, tagger,
|
2006-03-02 00:43:19 +00:00
|
|
|
cp - tagger);
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
while (sp < cp &&
|
|
|
|
!('0' <= *sp && *sp <= '9'))
|
|
|
|
sp++;
|
2006-08-21 18:43:43 +00:00
|
|
|
write_or_die(1, tagger, sp - tagger);
|
2006-03-02 00:43:19 +00:00
|
|
|
date = strtoul(sp, &ep, 10);
|
|
|
|
tz = strtol(ep, NULL, 10);
|
2006-08-26 22:45:26 +00:00
|
|
|
sp = show_date(date, tz, 0);
|
2006-08-21 18:43:43 +00:00
|
|
|
write_or_die(1, sp, strlen(sp));
|
2006-03-02 00:43:19 +00:00
|
|
|
xwrite(1, "\n", 1);
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
if (cp < endp && *cp == '\n')
|
|
|
|
/* end of header */
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
/* At this point, we have copied out the header up to the end of
|
|
|
|
* the tagger line and cp points at one past \n. It could be the
|
|
|
|
* next header line after the tagger line, or it could be another
|
|
|
|
* \n that marks the end of the headers. We need to copy out the
|
|
|
|
* remainder as is.
|
|
|
|
*/
|
|
|
|
if (cp < endp)
|
2006-08-21 18:43:43 +00:00
|
|
|
write_or_die(1, cp, endp - cp);
|
2006-03-02 00:43:19 +00:00
|
|
|
}
|
2005-04-07 22:13:13 +00:00
|
|
|
|
2006-07-29 05:44:25 +00:00
|
|
|
int cmd_cat_file(int argc, const char **argv, const char *prefix)
|
2005-04-07 22:13:13 +00:00
|
|
|
{
|
|
|
|
unsigned char sha1[20];
|
|
|
|
char type[20];
|
|
|
|
void *buf;
|
|
|
|
unsigned long size;
|
2005-12-04 01:57:48 +00:00
|
|
|
int opt;
|
2005-04-07 22:13:13 +00:00
|
|
|
|
2006-03-24 07:41:18 +00:00
|
|
|
git_config(git_default_config);
|
2006-05-08 21:43:38 +00:00
|
|
|
if (argc != 3)
|
2006-03-02 00:43:19 +00:00
|
|
|
usage("git-cat-file [-t|-s|-e|-p|<type>] <sha1>");
|
2006-05-08 21:43:38 +00:00
|
|
|
if (get_sha1(argv[2], sha1))
|
|
|
|
die("Not a valid object name %s", argv[2]);
|
2005-12-04 01:57:48 +00:00
|
|
|
|
|
|
|
opt = 0;
|
|
|
|
if ( argv[1][0] == '-' ) {
|
|
|
|
opt = argv[1][1];
|
|
|
|
if ( !opt || argv[1][2] )
|
|
|
|
opt = -1; /* Not a single character option */
|
|
|
|
}
|
|
|
|
|
|
|
|
buf = NULL;
|
|
|
|
switch (opt) {
|
|
|
|
case 't':
|
|
|
|
if (!sha1_object_info(sha1, type, NULL)) {
|
|
|
|
printf("%s\n", type);
|
2005-06-28 06:58:45 +00:00
|
|
|
return 0;
|
2005-05-02 02:28:18 +00:00
|
|
|
}
|
2005-12-04 01:57:48 +00:00
|
|
|
break;
|
|
|
|
|
|
|
|
case 's':
|
|
|
|
if (!sha1_object_info(sha1, type, &size)) {
|
|
|
|
printf("%lu\n", size);
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
break;
|
|
|
|
|
|
|
|
case 'e':
|
|
|
|
return !has_sha1_file(sha1);
|
|
|
|
|
2006-03-02 00:43:19 +00:00
|
|
|
case 'p':
|
2006-05-08 21:43:38 +00:00
|
|
|
if (sha1_object_info(sha1, type, NULL))
|
2006-03-02 00:43:19 +00:00
|
|
|
die("Not a valid object name %s", argv[2]);
|
|
|
|
|
|
|
|
/* custom pretty-print here */
|
2006-04-02 12:44:09 +00:00
|
|
|
if (!strcmp(type, tree_type))
|
2006-05-26 16:59:17 +00:00
|
|
|
return cmd_ls_tree(2, argv + 1, NULL);
|
2006-03-02 00:43:19 +00:00
|
|
|
|
|
|
|
buf = read_sha1_file(sha1, type, &size);
|
|
|
|
if (!buf)
|
|
|
|
die("Cannot read object %s", argv[2]);
|
2006-08-14 20:19:15 +00:00
|
|
|
if (!strcmp(type, tag_type)) {
|
|
|
|
pprint_tag(sha1, buf, size);
|
|
|
|
return 0;
|
|
|
|
}
|
2006-03-02 00:43:19 +00:00
|
|
|
|
|
|
|
/* otherwise just spit out the data */
|
|
|
|
break;
|
2005-12-04 01:57:48 +00:00
|
|
|
case 0:
|
2005-05-02 02:28:18 +00:00
|
|
|
buf = read_object_with_reference(sha1, argv[1], &size, NULL);
|
2005-12-04 01:57:48 +00:00
|
|
|
break;
|
|
|
|
|
|
|
|
default:
|
|
|
|
die("git-cat-file: unknown option: %s\n", argv[1]);
|
2005-04-08 16:16:38 +00:00
|
|
|
}
|
|
|
|
|
2005-05-02 02:28:18 +00:00
|
|
|
if (!buf)
|
2005-05-02 04:23:04 +00:00
|
|
|
die("git-cat-file %s: bad file", argv[2]);
|
2005-05-02 02:28:18 +00:00
|
|
|
|
2006-08-21 18:43:43 +00:00
|
|
|
write_or_die(1, buf, size);
|
2005-04-08 16:16:38 +00:00
|
|
|
return 0;
|
2005-04-07 22:13:13 +00:00
|
|
|
}
|