connect.con commit Merge with master. (e764a10)
   1#include "cache.h"
   2#include "pkt-line.h"
   3#include "quote.h"
   4#include <sys/wait.h>
   5#include <sys/socket.h>
   6#include <netinet/in.h>
   7#include <arpa/inet.h>
   8#include <netdb.h>
   9
  10/*
  11 * Read all the refs from the other end
  12 */
  13struct ref **get_remote_heads(int in, struct ref **list, int nr_match, char **match)
  14{
  15        *list = NULL;
  16        for (;;) {
  17                struct ref *ref;
  18                unsigned char old_sha1[20];
  19                static char buffer[1000];
  20                char *name;
  21                int len;
  22
  23                len = packet_read_line(in, buffer, sizeof(buffer));
  24                if (!len)
  25                        break;
  26                if (buffer[len-1] == '\n')
  27                        buffer[--len] = 0;
  28
  29                if (len < 42 || get_sha1_hex(buffer, old_sha1) || buffer[40] != ' ')
  30                        die("protocol error: expected sha/ref, got '%s'", buffer);
  31                name = buffer + 41;
  32                if (nr_match && !path_match(name, nr_match, match))
  33                        continue;
  34                ref = xcalloc(1, sizeof(*ref) + len - 40);
  35                memcpy(ref->old_sha1, old_sha1, 20);
  36                memcpy(ref->name, buffer + 41, len - 40);
  37                *list = ref;
  38                list = &ref->next;
  39        }
  40        return list;
  41}
  42
  43int get_ack(int fd, unsigned char *result_sha1)
  44{
  45        static char line[1000];
  46        int len = packet_read_line(fd, line, sizeof(line));
  47
  48        if (!len)
  49                die("git-fetch-pack: expected ACK/NAK, got EOF");
  50        if (line[len-1] == '\n')
  51                line[--len] = 0;
  52        if (!strcmp(line, "NAK"))
  53                return 0;
  54        if (!strncmp(line, "ACK ", 3)) {
  55                if (!get_sha1_hex(line+4, result_sha1))
  56                        return 1;
  57        }
  58        die("git-fetch_pack: expected ACK/NAK, got '%s'", line);
  59}
  60
  61int path_match(const char *path, int nr, char **match)
  62{
  63        int i;
  64        int pathlen = strlen(path);
  65
  66        for (i = 0; i < nr; i++) {
  67                char *s = match[i];
  68                int len = strlen(s);
  69
  70                if (!len || len > pathlen)
  71                        continue;
  72                if (memcmp(path + pathlen - len, s, len))
  73                        continue;
  74                if (pathlen > len && path[pathlen - len - 1] != '/')
  75                        continue;
  76                *s = 0;
  77                return 1;
  78        }
  79        return 0;
  80}
  81
  82struct refspec {
  83        char *src;
  84        char *dst;
  85};
  86
  87static struct refspec *parse_ref_spec(int nr_refspec, char **refspec)
  88{
  89        int i;
  90        struct refspec *rs = xmalloc(sizeof(*rs) * (nr_refspec + 1));
  91        for (i = 0; i < nr_refspec; i++) {
  92                char *sp, *dp, *ep;
  93                sp = refspec[i];
  94                ep = strchr(sp, ':');
  95                if (ep) {
  96                        dp = ep + 1;
  97                        *ep = 0;
  98                }
  99                else
 100                        dp = sp;
 101                rs[i].src = sp;
 102                rs[i].dst = dp;
 103        }
 104        rs[nr_refspec].src = rs[nr_refspec].dst = NULL;
 105        return rs;
 106}
 107
 108static int count_refspec_match(const char *pattern,
 109                               struct ref *refs,
 110                               struct ref **matched_ref)
 111{
 112        int match;
 113        int patlen = strlen(pattern);
 114
 115        for (match = 0; refs; refs = refs->next) {
 116                char *name = refs->name;
 117                int namelen = strlen(name);
 118                if (namelen < patlen ||
 119                    memcmp(name + namelen - patlen, pattern, patlen))
 120                        continue;
 121                if (namelen != patlen && name[namelen - patlen - 1] != '/')
 122                        continue;
 123                match++;
 124                *matched_ref = refs;
 125        }
 126        return match;
 127}
 128
 129static void link_dst_tail(struct ref *ref, struct ref ***tail)
 130{
 131        **tail = ref;
 132        *tail = &ref->next;
 133        **tail = NULL;
 134}
 135
 136static struct ref *try_explicit_object_name(const char *name)
 137{
 138        unsigned char sha1[20];
 139        struct ref *ref;
 140        int len;
 141        if (get_sha1(name, sha1))
 142                return NULL;
 143        len = strlen(name) + 1;
 144        ref = xcalloc(1, sizeof(*ref) + len);
 145        memcpy(ref->name, name, len);
 146        memcpy(ref->new_sha1, sha1, 20);
 147        return ref;
 148}
 149
 150static int match_explicit_refs(struct ref *src, struct ref *dst,
 151                               struct ref ***dst_tail, struct refspec *rs)
 152{
 153        int i, errs;
 154        for (i = errs = 0; rs[i].src; i++) {
 155                struct ref *matched_src, *matched_dst;
 156
 157                matched_src = matched_dst = NULL;
 158                switch (count_refspec_match(rs[i].src, src, &matched_src)) {
 159                case 1:
 160                        break;
 161                case 0:
 162                        /* The source could be in the get_sha1() format
 163                         * not a reference name.
 164                         */
 165                        matched_src = try_explicit_object_name(rs[i].src);
 166                        if (matched_src)
 167                                break;
 168                        errs = 1;
 169                        error("src refspec %s does not match any.");
 170                        break;
 171                default:
 172                        errs = 1;
 173                        error("src refspec %s matches more than one.",
 174                              rs[i].src);
 175                        break;
 176                }
 177                switch (count_refspec_match(rs[i].dst, dst, &matched_dst)) {
 178                case 1:
 179                        break;
 180                case 0:
 181                        if (!memcmp(rs[i].dst, "refs/", 5)) {
 182                                int len = strlen(rs[i].dst) + 1;
 183                                matched_dst = xcalloc(1, sizeof(*dst) + len);
 184                                memcpy(matched_dst->name, rs[i].dst, len);
 185                                link_dst_tail(matched_dst, dst_tail);
 186                        }
 187                        else if (!strcmp(rs[i].src, rs[i].dst) &&
 188                                 matched_src) {
 189                                /* pushing "master:master" when
 190                                 * remote does not have master yet.
 191                                 */
 192                                int len = strlen(matched_src->name) + 1;
 193                                matched_dst = xcalloc(1, sizeof(*dst) + len);
 194                                memcpy(matched_dst->name, matched_src->name,
 195                                       len);
 196                                link_dst_tail(matched_dst, dst_tail);
 197                        }
 198                        else {
 199                                errs = 1;
 200                                error("dst refspec %s does not match any "
 201                                      "existing ref on the remote and does "
 202                                      "not start with refs/.", rs[i].dst);
 203                        }
 204                        break;
 205                default:
 206                        errs = 1;
 207                        error("dst refspec %s matches more than one.",
 208                              rs[i].dst);
 209                        break;
 210                }
 211                if (errs)
 212                        continue;
 213                if (matched_dst->peer_ref) {
 214                        errs = 1;
 215                        error("dst ref %s receives from more than one src.",
 216                              matched_dst->name);
 217                }
 218                else
 219                        matched_dst->peer_ref = matched_src;
 220        }
 221        return -errs;
 222}
 223
 224static struct ref *find_ref_by_name(struct ref *list, const char *name)
 225{
 226        for ( ; list; list = list->next)
 227                if (!strcmp(list->name, name))
 228                        return list;
 229        return NULL;
 230}
 231
 232int match_refs(struct ref *src, struct ref *dst, struct ref ***dst_tail,
 233               int nr_refspec, char **refspec, int all)
 234{
 235        struct refspec *rs = parse_ref_spec(nr_refspec, refspec);
 236
 237        if (nr_refspec)
 238                return match_explicit_refs(src, dst, dst_tail, rs);
 239
 240        /* pick the remainder */
 241        for ( ; src; src = src->next) {
 242                struct ref *dst_peer;
 243                if (src->peer_ref)
 244                        continue;
 245                dst_peer = find_ref_by_name(dst, src->name);
 246                if ((dst_peer && dst_peer->peer_ref) || (!dst_peer && !all))
 247                        continue;
 248                if (!dst_peer) {
 249                        /* Create a new one and link it */
 250                        int len = strlen(src->name) + 1;
 251                        dst_peer = xcalloc(1, sizeof(*dst_peer) + len);
 252                        memcpy(dst_peer->name, src->name, len);
 253                        memcpy(dst_peer->new_sha1, src->new_sha1, 20);
 254                        link_dst_tail(dst_peer, dst_tail);
 255                }
 256                dst_peer->peer_ref = src;
 257        }
 258        return 0;
 259}
 260
 261enum protocol {
 262        PROTO_LOCAL = 1,
 263        PROTO_SSH,
 264        PROTO_GIT,
 265};
 266
 267static enum protocol get_protocol(const char *name)
 268{
 269        if (!strcmp(name, "ssh"))
 270                return PROTO_SSH;
 271        if (!strcmp(name, "git"))
 272                return PROTO_GIT;
 273        die("I don't handle protocol '%s'", name);
 274}
 275
 276#define STR_(s) # s
 277#define STR(s)  STR_(s)
 278
 279static int git_tcp_connect(int fd[2], const char *prog, char *host, char *path)
 280{
 281        int sockfd = -1;
 282        char *colon, *end;
 283        char *port = STR(DEFAULT_GIT_PORT);
 284        struct addrinfo hints, *ai0, *ai;
 285        int gai;
 286
 287        if (host[0] == '[') {
 288                end = strchr(host + 1, ']');
 289                if (end) {
 290                        *end = 0;
 291                        end++;
 292                        host++;
 293                } else
 294                        end = host;
 295        } else
 296                end = host;
 297        colon = strchr(end, ':');
 298
 299        if (colon) {
 300                *colon = 0;
 301                port = colon + 1;
 302        }
 303
 304        memset(&hints, 0, sizeof(hints));
 305        hints.ai_socktype = SOCK_STREAM;
 306        hints.ai_protocol = IPPROTO_TCP;
 307
 308        gai = getaddrinfo(host, port, &hints, &ai);
 309        if (gai)
 310                die("Unable to look up %s (%s)", host, gai_strerror(gai));
 311
 312        for (ai0 = ai; ai; ai = ai->ai_next) {
 313                sockfd = socket(ai->ai_family, ai->ai_socktype, ai->ai_protocol);
 314                if (sockfd < 0)
 315                        continue;
 316                if (connect(sockfd, ai->ai_addr, ai->ai_addrlen) < 0) {
 317                        close(sockfd);
 318                        sockfd = -1;
 319                        continue;
 320                }
 321                break;
 322        }
 323
 324        freeaddrinfo(ai0);
 325
 326        if (sockfd < 0)
 327                die("unable to connect a socket (%s)", strerror(errno));
 328
 329        fd[0] = sockfd;
 330        fd[1] = sockfd;
 331        packet_write(sockfd, "%s %s\n", prog, path);
 332        return 0;
 333}
 334
 335/*
 336 * Yeah, yeah, fixme. Need to pass in the heads etc.
 337 */
 338int git_connect(int fd[2], char *url, const char *prog)
 339{
 340        char command[1024];
 341        char *host, *path;
 342        char *colon;
 343        int pipefd[2][2];
 344        pid_t pid;
 345        enum protocol protocol;
 346
 347        host = NULL;
 348        path = url;
 349        colon = strchr(url, ':');
 350        protocol = PROTO_LOCAL;
 351        if (colon) {
 352                *colon = 0;
 353                host = url;
 354                path = colon+1;
 355                protocol = PROTO_SSH;
 356                if (!memcmp(path, "//", 2)) {
 357                        char *slash = strchr(path + 2, '/');
 358                        if (slash) {
 359                                int nr = slash - path - 2;
 360                                memmove(path, path+2, nr);
 361                                path[nr] = 0;
 362                                protocol = get_protocol(url);
 363                                host = path;
 364                                path = slash;
 365                        }
 366                }
 367        }
 368
 369        if (protocol == PROTO_GIT)
 370                return git_tcp_connect(fd, prog, host, path);
 371
 372        if (pipe(pipefd[0]) < 0 || pipe(pipefd[1]) < 0)
 373                die("unable to create pipe pair for communication");
 374        pid = fork();
 375        if (!pid) {
 376                snprintf(command, sizeof(command), "%s %s", prog,
 377                         sq_quote(path));
 378                dup2(pipefd[1][0], 0);
 379                dup2(pipefd[0][1], 1);
 380                close(pipefd[0][0]);
 381                close(pipefd[0][1]);
 382                close(pipefd[1][0]);
 383                close(pipefd[1][1]);
 384                if (protocol == PROTO_SSH)
 385                        execlp("ssh", "ssh", host, command, NULL);
 386                else
 387                        execlp("sh", "sh", "-c", command, NULL);
 388                die("exec failed");
 389        }               
 390        fd[0] = pipefd[0][0];
 391        fd[1] = pipefd[1][1];
 392        close(pipefd[0][1]);
 393        close(pipefd[1][0]);
 394        return pid;
 395}
 396
 397int finish_connect(pid_t pid)
 398{
 399        int ret;
 400
 401        for (;;) {
 402                ret = waitpid(pid, NULL, 0);
 403                if (!ret)
 404                        break;
 405                if (errno != EINTR)
 406                        break;
 407        }
 408        return ret;
 409}