Subversion Repositories planix.SVN

/*
 * tarcat - concatenate tar archives into a single tar archive
 */

#include <u.h>
#include <libc.h>
#include <ctype.h>
#include "tar.h"

enum {
        Stdin,
        Stdout,
};

static int debug;

/* don't copy zero blocks at end */
static void
catenate(int in, char *inname)
{
        vlong len;
        static Hblock hdr;
        Hblock *hp = &hdr;

        if (debug)
                fprint(2, "%s: reading %s\n", inname, argv0);
        while (getdir(hp, in, &len)) {
                writetar(Stdout, (char *)hp, Tblock);  /* write dir block */
                passtar(hp, in, Stdout, len);
        }
}

void
main(int argc, char **argv)
{
        int errflg = 0;

        ARGBEGIN {
        case 'd':
                ++debug;
                break;
        default:
                errflg++;
                break;
        } ARGEND
        if (errflg) {
                fprint(2, "usage: %s [-d] [file]...\n", argv0);
                exits("usage");
        }

        if (argc <= 0)
                catenate(Stdin, "/fd/0");
        else
                for (; argc-- > 0; argv++) {
                        int in = open(argv[0], OREAD);

                        if (in < 0)
                                sysfatal("%s: %r", argv[0]);
                        catenate(in, argv[0]);
                        close(in);
                }
        closeout(Stdout, "/fd/1", 0);
        exits(0);
}