4 static const char send_pack_usage
[] = "git-send-pack [--exec=other] destination [heads]*";
5 static const char *exec
= "git-receive-pack";
7 static int path_match(const char *path
, int nr
, char **match
)
10 int pathlen
= strlen(path
);
12 for (i
= 0; i
< nr
; i
++) {
16 if (!len
|| len
> pathlen
)
18 if (memcmp(path
+ pathlen
- len
, s
, len
))
20 if (pathlen
> len
&& path
[pathlen
- len
- 1] != '/')
30 unsigned char old_sha1
[20];
31 unsigned char new_sha1
[20];
35 static void exec_pack_objects(void)
37 static char *args
[] = {
42 execvp("git-pack-objects", args
);
43 die("git-pack-objects exec failed (%s)", strerror(errno
));
46 static void exec_rev_list(struct ref
*refs
)
48 static char *args
[1000];
51 args
[i
++] = "git-rev-list"; /* 0 */
52 args
[i
++] = "--objects"; /* 1 */
54 char *buf
= malloc(100);
56 die("git-rev-list environment overflow");
58 snprintf(buf
, 50, "^%s", sha1_to_hex(refs
->old_sha1
));
61 snprintf(buf
, 50, "%s", sha1_to_hex(refs
->new_sha1
));
65 execvp("git-rev-list", args
);
66 die("git-rev-list exec failed (%s)", strerror(errno
));
69 static void rev_list(int fd
, struct ref
*refs
)
72 pid_t pack_objects_pid
;
74 if (pipe(pipe_fd
) < 0)
75 die("rev-list setup: pipe failed");
76 pack_objects_pid
= fork();
77 if (!pack_objects_pid
) {
84 die("pack-objects setup failed");
86 if (pack_objects_pid
< 0)
87 die("pack-objects fork failed");
95 static int pack_objects(int fd
, struct ref
*refs
)
99 rev_list_pid
= fork();
102 die("rev-list setup failed");
104 if (rev_list_pid
< 0)
105 die("rev-list fork failed");
107 * We don't wait for the rev-list pipeline in the parent:
108 * we end up waiting for the other end instead
113 static int read_ref(const char *ref
, unsigned char *sha1
)
116 static char pathname
[PATH_MAX
];
118 const char *git_dir
= gitenv(GIT_DIR_ENVIRONMENT
) ? : DEFAULT_GIT_DIR_ENVIRONMENT
;
120 snprintf(pathname
, sizeof(pathname
), "%s/%s", git_dir
, ref
);
121 fd
= open(pathname
, O_RDONLY
);
125 if (read(fd
, buffer
, sizeof(buffer
)) >= 40)
126 ret
= get_sha1_hex(buffer
, sha1
);
131 static int send_pack(int in
, int out
, int nr_match
, char **match
)
133 struct ref
*ref_list
= NULL
, **last_ref
= &ref_list
;
137 unsigned char old_sha1
[20];
138 unsigned char new_sha1
[20];
139 static char buffer
[1000];
143 len
= packet_read_line(in
, buffer
, sizeof(buffer
));
146 if (buffer
[len
-1] == '\n')
149 if (len
< 42 || get_sha1_hex(buffer
, old_sha1
) || buffer
[40] != ' ')
150 die("protocol error: expected sha/ref, got '%s'", buffer
);
152 if (nr_match
&& !path_match(name
, nr_match
, match
))
154 if (read_ref(name
, new_sha1
) < 0)
155 return error("no such local reference '%s'", name
);
156 if (!has_sha1_file(old_sha1
))
157 return error("remote '%s' points to object I don't have", name
);
158 if (!memcmp(old_sha1
, new_sha1
, 20)) {
159 fprintf(stderr
, "'%s' unchanged\n", name
);
162 ref
= xmalloc(sizeof(*ref
) + len
- 40);
163 memcpy(ref
->old_sha1
, old_sha1
, 20);
164 memcpy(ref
->new_sha1
, new_sha1
, 20);
165 memcpy(ref
->name
, buffer
+ 41, len
- 40);
168 last_ref
= &ref
->next
;
171 for (ref
= ref_list
; ref
; ref
= ref
->next
) {
172 char old_hex
[60], *new_hex
;
173 strcpy(old_hex
, sha1_to_hex(ref
->old_sha1
));
174 new_hex
= sha1_to_hex(ref
->new_sha1
);
175 packet_write(out
, "%s %s %s", old_hex
, new_hex
, ref
->name
);
176 fprintf(stderr
, "'%s': updating from %s to %s\n", ref
->name
, old_hex
, new_hex
);
181 pack_objects(out
, ref_list
);
186 int main(int argc
, char **argv
)
195 for (i
= 1; i
< argc
; i
++) {
199 if (!strncmp(arg
, "--exec=", 7)) {
203 usage(send_pack_usage
);
207 nr_heads
= argc
- i
-1;
211 usage(send_pack_usage
);
212 pid
= git_connect(fd
, dest
, exec
);
215 ret
= send_pack(fd
[0], fd
[1], nr_heads
, heads
);