12 #include <curl/curl.h>
13 #include <curl/easy.h>
20 static z_stream stream
;
25 static size_t fwrite_sha1_file(void *ptr
, size_t eltsize
, size_t nmemb
,
28 size_t size
= eltsize
* nmemb
;
31 ssize_t retval
= write(local
, ptr
+ posn
, size
- posn
);
35 } while (posn
< size
);
37 stream
.avail_in
= size
;
40 stream
.next_out
= expn
;
41 stream
.avail_out
= sizeof(expn
);
42 zret
= inflate(&stream
, Z_SYNC_FLUSH
);
43 SHA1_Update(&c
, expn
, sizeof(expn
) - stream
.avail_out
);
44 } while (stream
.avail_in
&& zret
== Z_OK
);
48 int fetch(unsigned char *sha1
)
50 char *hex
= sha1_to_hex(sha1
);
51 char *filename
= sha1_file_name(sha1
);
56 local
= open(filename
, O_WRONLY
| O_CREAT
| O_EXCL
, 0666);
59 return error("Couldn't open %s\n", filename
);
61 memset(&stream
, 0, sizeof(stream
));
67 curl_easy_setopt(curl
, CURLOPT_FILE
, NULL
);
68 curl_easy_setopt(curl
, CURLOPT_WRITEFUNCTION
, fwrite_sha1_file
);
70 url
= xmalloc(strlen(base
) + 50);
72 posn
= url
+ strlen(base
);
73 strcpy(posn
, "objects/");
78 strcpy(posn
, hex
+ 2);
80 curl_easy_setopt(curl
, CURLOPT_URL
, url
);
82 /*printf("Getting %s\n", hex);*/
84 if (curl_easy_perform(curl
))
85 return error("Couldn't get %s for %s\n", url
, hex
);
89 SHA1_Final(real_sha1
, &c
);
90 if (zret
!= Z_STREAM_END
) {
92 return error("File %s (%s) corrupt\n", hex
, url
);
94 if (memcmp(sha1
, real_sha1
, 20)) {
96 return error("File %s has bad hash\n", hex
);
102 int main(int argc
, char **argv
)
108 while (arg
< argc
&& argv
[arg
][0] == '-') {
109 if (argv
[arg
][1] == 't') {
111 } else if (argv
[arg
][1] == 'c') {
113 } else if (argv
[arg
][1] == 'a') {
120 if (argc
< arg
+ 2) {
121 usage("http-pull [-c] [-t] [-a] commit-id url");
124 commit_id
= argv
[arg
];
127 curl_global_init(CURL_GLOBAL_ALL
);
129 curl
= curl_easy_init();
136 curl_global_cleanup();