connect.con commit Yank writing-back support from gitfakemmap. (f48000f)
   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        char force;
  86};
  87
  88/*
  89 * A:B means fast forward remote B with local A.
  90 * +A:B means overwrite remote B with local A.
  91 * +A is a shorthand for +A:A.
  92 * A is a shorthand for A:A.
  93 */
  94static struct refspec *parse_ref_spec(int nr_refspec, char **refspec)
  95{
  96        int i;
  97        struct refspec *rs = xcalloc(sizeof(*rs), (nr_refspec + 1));
  98        for (i = 0; i < nr_refspec; i++) {
  99                char *sp, *dp, *ep;
 100                sp = refspec[i];
 101                if (*sp == '+') {
 102                        rs[i].force = 1;
 103                        sp++;
 104                }
 105                ep = strchr(sp, ':');
 106                if (ep) {
 107                        dp = ep + 1;
 108                        *ep = 0;
 109                }
 110                else
 111                        dp = sp;
 112                rs[i].src = sp;
 113                rs[i].dst = dp;
 114        }
 115        rs[nr_refspec].src = rs[nr_refspec].dst = NULL;
 116        return rs;
 117}
 118
 119static int count_refspec_match(const char *pattern,
 120                               struct ref *refs,
 121                               struct ref **matched_ref)
 122{
 123        int match;
 124        int patlen = strlen(pattern);
 125
 126        for (match = 0; refs; refs = refs->next) {
 127                char *name = refs->name;
 128                int namelen = strlen(name);
 129                if (namelen < patlen ||
 130                    memcmp(name + namelen - patlen, pattern, patlen))
 131                        continue;
 132                if (namelen != patlen && name[namelen - patlen - 1] != '/')
 133                        continue;
 134                match++;
 135                *matched_ref = refs;
 136        }
 137        return match;
 138}
 139
 140static void link_dst_tail(struct ref *ref, struct ref ***tail)
 141{
 142        **tail = ref;
 143        *tail = &ref->next;
 144        **tail = NULL;
 145}
 146
 147static struct ref *try_explicit_object_name(const char *name)
 148{
 149        unsigned char sha1[20];
 150        struct ref *ref;
 151        int len;
 152        if (get_sha1(name, sha1))
 153                return NULL;
 154        len = strlen(name) + 1;
 155        ref = xcalloc(1, sizeof(*ref) + len);
 156        memcpy(ref->name, name, len);
 157        memcpy(ref->new_sha1, sha1, 20);
 158        return ref;
 159}
 160
 161static int match_explicit_refs(struct ref *src, struct ref *dst,
 162                               struct ref ***dst_tail, struct refspec *rs)
 163{
 164        int i, errs;
 165        for (i = errs = 0; rs[i].src; i++) {
 166                struct ref *matched_src, *matched_dst;
 167
 168                matched_src = matched_dst = NULL;
 169                switch (count_refspec_match(rs[i].src, src, &matched_src)) {
 170                case 1:
 171                        break;
 172                case 0:
 173                        /* The source could be in the get_sha1() format
 174                         * not a reference name.
 175                         */
 176                        matched_src = try_explicit_object_name(rs[i].src);
 177                        if (matched_src)
 178                                break;
 179                        errs = 1;
 180                        error("src refspec %s does not match any.",
 181                              rs[i].src);
 182                        break;
 183                default:
 184                        errs = 1;
 185                        error("src refspec %s matches more than one.",
 186                              rs[i].src);
 187                        break;
 188                }
 189                switch (count_refspec_match(rs[i].dst, dst, &matched_dst)) {
 190                case 1:
 191                        break;
 192                case 0:
 193                        if (!memcmp(rs[i].dst, "refs/", 5)) {
 194                                int len = strlen(rs[i].dst) + 1;
 195                                matched_dst = xcalloc(1, sizeof(*dst) + len);
 196                                memcpy(matched_dst->name, rs[i].dst, len);
 197                                link_dst_tail(matched_dst, dst_tail);
 198                        }
 199                        else if (!strcmp(rs[i].src, rs[i].dst) &&
 200                                 matched_src) {
 201                                /* pushing "master:master" when
 202                                 * remote does not have master yet.
 203                                 */
 204                                int len = strlen(matched_src->name) + 1;
 205                                matched_dst = xcalloc(1, sizeof(*dst) + len);
 206                                memcpy(matched_dst->name, matched_src->name,
 207                                       len);
 208                                link_dst_tail(matched_dst, dst_tail);
 209                        }
 210                        else {
 211                                errs = 1;
 212                                error("dst refspec %s does not match any "
 213                                      "existing ref on the remote and does "
 214                                      "not start with refs/.", rs[i].dst);
 215                        }
 216                        break;
 217                default:
 218                        errs = 1;
 219                        error("dst refspec %s matches more than one.",
 220                              rs[i].dst);
 221                        break;
 222                }
 223                if (errs)
 224                        continue;
 225                if (matched_dst->peer_ref) {
 226                        errs = 1;
 227                        error("dst ref %s receives from more than one src.",
 228                              matched_dst->name);
 229                }
 230                else {
 231                        matched_dst->peer_ref = matched_src;
 232                        matched_dst->force = rs[i].force;
 233                }
 234        }
 235        return -errs;
 236}
 237
 238static struct ref *find_ref_by_name(struct ref *list, const char *name)
 239{
 240        for ( ; list; list = list->next)
 241                if (!strcmp(list->name, name))
 242                        return list;
 243        return NULL;
 244}
 245
 246int match_refs(struct ref *src, struct ref *dst, struct ref ***dst_tail,
 247               int nr_refspec, char **refspec, int all)
 248{
 249        struct refspec *rs = parse_ref_spec(nr_refspec, refspec);
 250
 251        if (nr_refspec)
 252                return match_explicit_refs(src, dst, dst_tail, rs);
 253
 254        /* pick the remainder */
 255        for ( ; src; src = src->next) {
 256                struct ref *dst_peer;
 257                if (src->peer_ref)
 258                        continue;
 259                dst_peer = find_ref_by_name(dst, src->name);
 260                if ((dst_peer && dst_peer->peer_ref) || (!dst_peer && !all))
 261                        continue;
 262                if (!dst_peer) {
 263                        /* Create a new one and link it */
 264                        int len = strlen(src->name) + 1;
 265                        dst_peer = xcalloc(1, sizeof(*dst_peer) + len);
 266                        memcpy(dst_peer->name, src->name, len);
 267                        memcpy(dst_peer->new_sha1, src->new_sha1, 20);
 268                        link_dst_tail(dst_peer, dst_tail);
 269                }
 270                dst_peer->peer_ref = src;
 271        }
 272        return 0;
 273}
 274
 275enum protocol {
 276        PROTO_LOCAL = 1,
 277        PROTO_SSH,
 278        PROTO_GIT,
 279};
 280
 281static enum protocol get_protocol(const char *name)
 282{
 283        if (!strcmp(name, "ssh"))
 284                return PROTO_SSH;
 285        if (!strcmp(name, "git"))
 286                return PROTO_GIT;
 287        die("I don't handle protocol '%s'", name);
 288}
 289
 290#define STR_(s) # s
 291#define STR(s)  STR_(s)
 292
 293#ifndef NO_IPV6
 294
 295static int git_tcp_connect(int fd[2], const char *prog, char *host, char *path)
 296{
 297        int sockfd = -1;
 298        char *colon, *end;
 299        char *port = STR(DEFAULT_GIT_PORT);
 300        struct addrinfo hints, *ai0, *ai;
 301        int gai;
 302
 303        if (host[0] == '[') {
 304                end = strchr(host + 1, ']');
 305                if (end) {
 306                        *end = 0;
 307                        end++;
 308                        host++;
 309                } else
 310                        end = host;
 311        } else
 312                end = host;
 313        colon = strchr(end, ':');
 314
 315        if (colon) {
 316                *colon = 0;
 317                port = colon + 1;
 318        }
 319
 320        memset(&hints, 0, sizeof(hints));
 321        hints.ai_socktype = SOCK_STREAM;
 322        hints.ai_protocol = IPPROTO_TCP;
 323
 324        gai = getaddrinfo(host, port, &hints, &ai);
 325        if (gai)
 326                die("Unable to look up %s (%s)", host, gai_strerror(gai));
 327
 328        for (ai0 = ai; ai; ai = ai->ai_next) {
 329                sockfd = socket(ai->ai_family, ai->ai_socktype, ai->ai_protocol);
 330                if (sockfd < 0)
 331                        continue;
 332                if (connect(sockfd, ai->ai_addr, ai->ai_addrlen) < 0) {
 333                        close(sockfd);
 334                        sockfd = -1;
 335                        continue;
 336                }
 337                break;
 338        }
 339
 340        freeaddrinfo(ai0);
 341
 342        if (sockfd < 0)
 343                die("unable to connect a socket (%s)", strerror(errno));
 344
 345        fd[0] = sockfd;
 346        fd[1] = sockfd;
 347        packet_write(sockfd, "%s %s\n", prog, path);
 348        return 0;
 349}
 350
 351#else /* NO_IPV6 */
 352
 353static int git_tcp_connect(int fd[2], const char *prog, char *host, char *path)
 354{
 355        int sockfd = -1;
 356        char *colon, *end;
 357        char *port = STR(DEFAULT_GIT_PORT), *ep;
 358        struct hostent *he;
 359        struct sockaddr_in sa;
 360        char **ap;
 361        unsigned int nport;
 362
 363        if (host[0] == '[') {
 364                end = strchr(host + 1, ']');
 365                if (end) {
 366                        *end = 0;
 367                        end++;
 368                        host++;
 369                } else
 370                        end = host;
 371        } else
 372                end = host;
 373        colon = strchr(end, ':');
 374
 375        if (colon) {
 376                *colon = 0;
 377                port = colon + 1;
 378        }
 379
 380
 381        he = gethostbyname(host);
 382        if (!he)
 383                die("Unable to look up %s (%s)", host, hstrerror(h_errno));
 384        nport = strtoul(port, &ep, 10);
 385        if ( ep == port || *ep ) {
 386                /* Not numeric */
 387                struct servent *se = getservbyname(port,"tcp");
 388                if ( !se )
 389                        die("Unknown port %s\n", port);
 390                nport = se->s_port;
 391        }
 392
 393        for (ap = he->h_addr_list; *ap; ap++) {
 394                sockfd = socket(he->h_addrtype, SOCK_STREAM, 0);
 395                if (sockfd < 0)
 396                        continue;
 397
 398                memset(&sa, 0, sizeof sa);
 399                sa.sin_family = he->h_addrtype;
 400                sa.sin_port = htons(nport);
 401                memcpy(&sa.sin_addr, ap, he->h_length);
 402
 403                if (connect(sockfd, (struct sockaddr *)&sa, sizeof sa) < 0) {
 404                        close(sockfd);
 405                        sockfd = -1;
 406                        continue;
 407                }
 408                break;
 409        }
 410
 411        if (sockfd < 0)
 412                die("unable to connect a socket (%s)", strerror(errno));
 413
 414        fd[0] = sockfd;
 415        fd[1] = sockfd;
 416        packet_write(sockfd, "%s %s\n", prog, path);
 417        return 0;
 418}
 419
 420#endif /* NO_IPV6 */
 421
 422/*
 423 * Yeah, yeah, fixme. Need to pass in the heads etc.
 424 */
 425int git_connect(int fd[2], char *url, const char *prog)
 426{
 427        char command[1024];
 428        char *host, *path;
 429        char *colon;
 430        int pipefd[2][2];
 431        pid_t pid;
 432        enum protocol protocol;
 433
 434        host = NULL;
 435        path = url;
 436        colon = strchr(url, ':');
 437        protocol = PROTO_LOCAL;
 438        if (colon) {
 439                *colon = 0;
 440                host = url;
 441                path = colon+1;
 442                protocol = PROTO_SSH;
 443                if (!memcmp(path, "//", 2)) {
 444                        char *slash = strchr(path + 2, '/');
 445                        if (slash) {
 446                                int nr = slash - path - 2;
 447                                memmove(path, path+2, nr);
 448                                path[nr] = 0;
 449                                protocol = get_protocol(url);
 450                                host = path;
 451                                path = slash;
 452                        }
 453                }
 454        }
 455
 456        if (protocol == PROTO_GIT)
 457                return git_tcp_connect(fd, prog, host, path);
 458
 459        if (pipe(pipefd[0]) < 0 || pipe(pipefd[1]) < 0)
 460                die("unable to create pipe pair for communication");
 461        pid = fork();
 462        if (!pid) {
 463                snprintf(command, sizeof(command), "%s %s", prog,
 464                         sq_quote(path));
 465                dup2(pipefd[1][0], 0);
 466                dup2(pipefd[0][1], 1);
 467                close(pipefd[0][0]);
 468                close(pipefd[0][1]);
 469                close(pipefd[1][0]);
 470                close(pipefd[1][1]);
 471                if (protocol == PROTO_SSH) {
 472                        const char *ssh, *ssh_basename;
 473                        ssh = getenv("GIT_SSH");
 474                        if (!ssh) ssh = "ssh";
 475                        ssh_basename = strrchr(ssh, '/');
 476                        if (!ssh_basename)
 477                                ssh_basename = ssh;
 478                        else
 479                                ssh_basename++;
 480                        execlp(ssh, ssh_basename, host, command, NULL);
 481                }
 482                else
 483                        execlp("sh", "sh", "-c", command, NULL);
 484                die("exec failed");
 485        }               
 486        fd[0] = pipefd[0][0];
 487        fd[1] = pipefd[1][1];
 488        close(pipefd[0][1]);
 489        close(pipefd[1][0]);
 490        return pid;
 491}
 492
 493int finish_connect(pid_t pid)
 494{
 495        int ret;
 496
 497        for (;;) {
 498                ret = waitpid(pid, NULL, 0);
 499                if (!ret)
 500                        break;
 501                if (errno != EINTR)
 502                        break;
 503        }
 504        return ret;
 505}