[PATCH] git-tar-tree: add a test case
[git/spearce.git] / http-pull.c
blob551663e49234dc9b719ee4abb9f8dc8609d759aa
1 #include "cache.h"
2 #include "commit.h"
4 #include "pull.h"
6 #include <curl/curl.h>
7 #include <curl/easy.h>
9 static CURL *curl;
11 static char *base;
13 static SHA_CTX c;
14 static z_stream stream;
16 static int local;
17 static int zret;
19 static size_t fwrite_sha1_file(void *ptr, size_t eltsize, size_t nmemb,
20 void *data) {
21 unsigned char expn[4096];
22 size_t size = eltsize * nmemb;
23 int posn = 0;
24 do {
25 ssize_t retval = write(local, ptr + posn, size - posn);
26 if (retval < 0)
27 return posn;
28 posn += retval;
29 } while (posn < size);
31 stream.avail_in = size;
32 stream.next_in = ptr;
33 do {
34 stream.next_out = expn;
35 stream.avail_out = sizeof(expn);
36 zret = inflate(&stream, Z_SYNC_FLUSH);
37 SHA1_Update(&c, expn, sizeof(expn) - stream.avail_out);
38 } while (stream.avail_in && zret == Z_OK);
39 return size;
42 int fetch(unsigned char *sha1)
44 char *hex = sha1_to_hex(sha1);
45 char *filename = sha1_file_name(sha1);
46 unsigned char real_sha1[20];
47 char *url;
48 char *posn;
50 local = open(filename, O_WRONLY | O_CREAT | O_EXCL, 0666);
52 if (local < 0)
53 return error("Couldn't open %s\n", filename);
55 memset(&stream, 0, sizeof(stream));
57 inflateInit(&stream);
59 SHA1_Init(&c);
61 curl_easy_setopt(curl, CURLOPT_FILE, NULL);
62 curl_easy_setopt(curl, CURLOPT_WRITEFUNCTION, fwrite_sha1_file);
64 url = xmalloc(strlen(base) + 50);
65 strcpy(url, base);
66 posn = url + strlen(base);
67 strcpy(posn, "objects/");
68 posn += 8;
69 memcpy(posn, hex, 2);
70 posn += 2;
71 *(posn++) = '/';
72 strcpy(posn, hex + 2);
74 curl_easy_setopt(curl, CURLOPT_URL, url);
76 if (curl_easy_perform(curl))
77 return error("Couldn't get %s for %s\n", url, hex);
79 close(local);
80 inflateEnd(&stream);
81 SHA1_Final(real_sha1, &c);
82 if (zret != Z_STREAM_END) {
83 unlink(filename);
84 return error("File %s (%s) corrupt\n", hex, url);
86 if (memcmp(sha1, real_sha1, 20)) {
87 unlink(filename);
88 return error("File %s has bad hash\n", hex);
91 pull_say("got %s\n", hex);
92 return 0;
95 int main(int argc, char **argv)
97 char *commit_id;
98 char *url;
99 int arg = 1;
101 while (arg < argc && argv[arg][0] == '-') {
102 if (argv[arg][1] == 't') {
103 get_tree = 1;
104 } else if (argv[arg][1] == 'c') {
105 get_history = 1;
106 } else if (argv[arg][1] == 'd') {
107 get_delta = 0;
108 } else if (argv[arg][1] == 'a') {
109 get_all = 1;
110 get_tree = 1;
111 get_history = 1;
112 } else if (argv[arg][1] == 'v') {
113 get_verbosely = 1;
115 arg++;
117 if (argc < arg + 2) {
118 usage("git-http-pull [-c] [-t] [-a] [-d] [-v] commit-id url");
119 return 1;
121 commit_id = argv[arg];
122 url = argv[arg + 1];
124 curl_global_init(CURL_GLOBAL_ALL);
126 curl = curl_easy_init();
128 base = url;
130 if (pull(commit_id))
131 return 1;
133 curl_global_cleanup();
134 return 0;