361 lines
		
	
	
		
			10 KiB
		
	
	
	
		
			C++
		
	
	
	
			
		
		
	
	
			361 lines
		
	
	
		
			10 KiB
		
	
	
	
		
			C++
		
	
	
	
#include <stdio.h>
 | 
						|
#include <stdlib.h>
 | 
						|
#include <string.h>
 | 
						|
#include <unistd.h>
 | 
						|
#include <stdarg.h>
 | 
						|
#include "options.h"
 | 
						|
#include "files.h"
 | 
						|
#include "fs.h"
 | 
						|
#include <set>
 | 
						|
#include <iostream>
 | 
						|
#include <sstream>
 | 
						|
 | 
						|
using namespace std;
 | 
						|
 | 
						|
bool g_debug = getenv("ATREE_DEBUG") != NULL;
 | 
						|
vector<string> g_listFiles;
 | 
						|
vector<string> g_inputBases;
 | 
						|
map<string, string> g_variables;
 | 
						|
string g_outputBase;
 | 
						|
string g_dependency;
 | 
						|
bool g_useHardLinks = false;
 | 
						|
 | 
						|
const char* USAGE =
 | 
						|
"\n"
 | 
						|
"Usage: atree OPTIONS\n"
 | 
						|
"\n"
 | 
						|
"Options:\n"
 | 
						|
"  -f FILELIST    Specify one or more files containing the\n"
 | 
						|
"                 list of files to copy.\n"
 | 
						|
"  -I INPUTDIR    Specify one or more base directories in\n"
 | 
						|
"                 which to look for the files\n"
 | 
						|
"  -o OUTPUTDIR   Specify the directory to copy all of the\n"
 | 
						|
"                 output files to.\n"
 | 
						|
"  -l             Use hard links instead of copying the files.\n"
 | 
						|
"  -m DEPENDENCY  Output a make-formatted file containing the list.\n"
 | 
						|
"                 of files included.  It sets the variable ATREE_FILES.\n"
 | 
						|
"  -v VAR=VAL     Replaces ${VAR} by VAL when reading input files.\n"
 | 
						|
"  -d             Verbose debug mode.\n"
 | 
						|
"\n"
 | 
						|
"FILELIST file format:\n"
 | 
						|
"  The FILELIST files contain the list of files that will end up\n"
 | 
						|
"  in the final OUTPUTDIR.  Atree will look for files in the INPUTDIR\n"
 | 
						|
"  directories in the order they are specified.\n"
 | 
						|
"\n"
 | 
						|
"  In a FILELIST file, comment lines start with a #.  Other lines\n"
 | 
						|
"  are of the format:\n"
 | 
						|
"\n"
 | 
						|
"    [rm|strip] DEST\n"
 | 
						|
"    SRC [strip] DEST\n"
 | 
						|
"    -SRCPATTERN\n"
 | 
						|
"\n"
 | 
						|
"  DEST should be path relative to the output directory.\n"
 | 
						|
"  'rm DEST' removes the destination file and fails if it's missing.\n"
 | 
						|
"  'strip DEST' strips the binary destination file.\n"
 | 
						|
"  If SRC is supplied, the file names can be different.\n"
 | 
						|
"  SRCPATTERN is a pattern for the filenames.\n"
 | 
						|
"\n";
 | 
						|
 | 
						|
int usage()
 | 
						|
{
 | 
						|
    fwrite(USAGE, strlen(USAGE), 1, stderr);
 | 
						|
    return 1;
 | 
						|
}
 | 
						|
 | 
						|
static bool
 | 
						|
add_variable(const char* arg) {
 | 
						|
    const char* p = arg;
 | 
						|
    while (*p && *p != '=') p++;
 | 
						|
 | 
						|
    if (*p == 0 || p == arg || p[1] == 0) {
 | 
						|
        return false;
 | 
						|
    }
 | 
						|
 | 
						|
    ostringstream var;
 | 
						|
    var << "${" << string(arg, p-arg) << "}";
 | 
						|
    g_variables[var.str()] = string(p+1);
 | 
						|
    return true;
 | 
						|
}
 | 
						|
 | 
						|
static void
 | 
						|
debug_printf(const char* format, ...)
 | 
						|
{
 | 
						|
    if (g_debug) {
 | 
						|
        fflush(stderr);
 | 
						|
        va_list ap;
 | 
						|
        va_start(ap, format);
 | 
						|
        vprintf(format, ap);
 | 
						|
        va_end(ap);
 | 
						|
        fflush(stdout);
 | 
						|
    }
 | 
						|
}
 | 
						|
 | 
						|
// Escape the filename so that it can be added to the makefile properly.
 | 
						|
static string
 | 
						|
escape_filename(const string& name)
 | 
						|
{
 | 
						|
    ostringstream new_name;
 | 
						|
    for (string::const_iterator iter = name.begin(); iter != name.end(); ++iter)
 | 
						|
    {
 | 
						|
        switch (*iter)
 | 
						|
        {
 | 
						|
            case '$':
 | 
						|
                new_name << "$$";
 | 
						|
                break;
 | 
						|
            default:
 | 
						|
                new_name << *iter;
 | 
						|
                break;
 | 
						|
        }
 | 
						|
    }
 | 
						|
    return new_name.str();
 | 
						|
}
 | 
						|
 | 
						|
int
 | 
						|
main(int argc, char* const* argv)
 | 
						|
{
 | 
						|
    int err;
 | 
						|
    bool done = false;
 | 
						|
    while (!done) {
 | 
						|
        int opt = getopt(argc, argv, "f:I:o:hlm:v:d");
 | 
						|
        switch (opt)
 | 
						|
        {
 | 
						|
            case -1:
 | 
						|
                done = true;
 | 
						|
                break;
 | 
						|
            case 'f':
 | 
						|
                g_listFiles.push_back(string(optarg));
 | 
						|
                break;
 | 
						|
            case 'I':
 | 
						|
                g_inputBases.push_back(string(optarg));
 | 
						|
                break;
 | 
						|
            case 'o':
 | 
						|
                if (g_outputBase.length() != 0) {
 | 
						|
                    fprintf(stderr, "%s: -o may only be supplied once -- "
 | 
						|
                                "-o %s\n", argv[0], optarg);
 | 
						|
                    return usage();
 | 
						|
                }
 | 
						|
                g_outputBase = optarg;
 | 
						|
                break;
 | 
						|
            case 'l':
 | 
						|
                g_useHardLinks = true;
 | 
						|
                break;
 | 
						|
            case 'm':
 | 
						|
                if (g_dependency.length() != 0) {
 | 
						|
                    fprintf(stderr, "%s: -m may only be supplied once -- "
 | 
						|
                                "-m %s\n", argv[0], optarg);
 | 
						|
                    return usage();
 | 
						|
                }
 | 
						|
                g_dependency = optarg;
 | 
						|
                break;
 | 
						|
            case 'v':
 | 
						|
                if (!add_variable(optarg)) {
 | 
						|
                    fprintf(stderr, "%s Invalid expression in '-v %s': "
 | 
						|
                            "expected format is '-v VAR=VALUE'.\n",
 | 
						|
                            argv[0], optarg);
 | 
						|
                    return usage();
 | 
						|
                }
 | 
						|
                break;
 | 
						|
            case 'd':
 | 
						|
                g_debug = true;
 | 
						|
                break;
 | 
						|
            default:
 | 
						|
            case '?':
 | 
						|
            case 'h':
 | 
						|
                return usage();
 | 
						|
        }
 | 
						|
    }
 | 
						|
    if (optind != argc) {
 | 
						|
        fprintf(stderr, "%s: invalid argument -- %s\n", argv[0], argv[optind]);
 | 
						|
        return usage();
 | 
						|
    }
 | 
						|
 | 
						|
    if (g_listFiles.size() == 0) {
 | 
						|
        fprintf(stderr, "%s: At least one -f option must be supplied.\n",
 | 
						|
                 argv[0]);
 | 
						|
        return usage();
 | 
						|
    }
 | 
						|
 | 
						|
    if (g_inputBases.size() == 0) {
 | 
						|
        fprintf(stderr, "%s: At least one -I option must be supplied.\n",
 | 
						|
                 argv[0]);
 | 
						|
        return usage();
 | 
						|
    }
 | 
						|
 | 
						|
    if (g_outputBase.length() == 0) {
 | 
						|
        fprintf(stderr, "%s: -o option must be supplied.\n", argv[0]);
 | 
						|
        return usage();
 | 
						|
    }
 | 
						|
 | 
						|
 | 
						|
#if 0
 | 
						|
    for (vector<string>::iterator it=g_listFiles.begin();
 | 
						|
                                it!=g_listFiles.end(); it++) {
 | 
						|
        printf("-f \"%s\"\n", it->c_str());
 | 
						|
    }
 | 
						|
    for (vector<string>::iterator it=g_inputBases.begin();
 | 
						|
                                it!=g_inputBases.end(); it++) {
 | 
						|
        printf("-I \"%s\"\n", it->c_str());
 | 
						|
    }
 | 
						|
    printf("-o \"%s\"\n", g_outputBase.c_str());
 | 
						|
    if (g_useHardLinks) {
 | 
						|
        printf("-l\n");
 | 
						|
    }
 | 
						|
#endif
 | 
						|
 | 
						|
    vector<FileRecord> files;
 | 
						|
    vector<FileRecord> more;
 | 
						|
    vector<string> excludes;
 | 
						|
    set<string> directories;
 | 
						|
    set<string> deleted;
 | 
						|
 | 
						|
    // read file lists
 | 
						|
    for (vector<string>::iterator it=g_listFiles.begin();
 | 
						|
                                 it!=g_listFiles.end(); it++) {
 | 
						|
        err = read_list_file(*it, g_variables, &files, &excludes);
 | 
						|
        if (err != 0) {
 | 
						|
            return err;
 | 
						|
        }
 | 
						|
    }
 | 
						|
 | 
						|
    // look for input files
 | 
						|
    err = 0;
 | 
						|
    for (vector<FileRecord>::iterator it=files.begin();
 | 
						|
                                it!=files.end(); it++) {
 | 
						|
        err |= locate(&(*it), g_inputBases);
 | 
						|
    }
 | 
						|
 | 
						|
    // expand the directories that we should copy into a list of files
 | 
						|
    for (vector<FileRecord>::iterator it=files.begin();
 | 
						|
                                it!=files.end(); it++) {
 | 
						|
        if (it->sourceIsDir) {
 | 
						|
            err |= list_dir(*it, excludes, &more);
 | 
						|
        }
 | 
						|
    }
 | 
						|
    for (vector<FileRecord>::iterator it=more.begin();
 | 
						|
                                it!=more.end(); it++) {
 | 
						|
        files.push_back(*it);
 | 
						|
    }
 | 
						|
 | 
						|
    // get the name and modtime of the output files
 | 
						|
    for (vector<FileRecord>::iterator it=files.begin();
 | 
						|
                                it!=files.end(); it++) {
 | 
						|
        stat_out(g_outputBase, &(*it));
 | 
						|
    }
 | 
						|
 | 
						|
    if (err != 0) {
 | 
						|
        return 1;
 | 
						|
    }
 | 
						|
 | 
						|
    // gather directories
 | 
						|
    for (vector<FileRecord>::iterator it=files.begin();
 | 
						|
                                it!=files.end(); it++) {
 | 
						|
        if (it->sourceIsDir) {
 | 
						|
            directories.insert(it->outPath);
 | 
						|
        } else {
 | 
						|
            string s = dir_part(it->outPath);
 | 
						|
            if (s != ".") {
 | 
						|
                directories.insert(s);
 | 
						|
            }
 | 
						|
        }
 | 
						|
    }
 | 
						|
 | 
						|
    // gather files that should become directores
 | 
						|
    // and directories that should become files
 | 
						|
    for (vector<FileRecord>::iterator it=files.begin();
 | 
						|
                                it!=files.end(); it++) {
 | 
						|
        if (it->outMod != 0 && it->sourceIsDir != it->outIsDir) {
 | 
						|
            deleted.insert(it->outPath);
 | 
						|
        }
 | 
						|
    }
 | 
						|
 | 
						|
    // delete files
 | 
						|
    for (set<string>::iterator it=deleted.begin();
 | 
						|
                                it!=deleted.end(); it++) {
 | 
						|
        debug_printf("deleting %s\n", it->c_str());
 | 
						|
        err = remove_recursively(*it);
 | 
						|
        if (err != 0) {
 | 
						|
            return err;
 | 
						|
        }
 | 
						|
    }
 | 
						|
 | 
						|
    // remove all files or directories as requested from the input atree file.
 | 
						|
    // must be done before create new directories.
 | 
						|
    for (vector<FileRecord>::iterator it=files.begin();
 | 
						|
                                it!=files.end(); it++) {
 | 
						|
        if (!it->sourceIsDir) {
 | 
						|
            if (it->fileOp == FILE_OP_REMOVE &&
 | 
						|
                    deleted.count(it->outPath) == 0) {
 | 
						|
                debug_printf("remove %s\n", it->outPath.c_str());
 | 
						|
                err = remove_recursively(it->outPath);
 | 
						|
                if (err != 0) {
 | 
						|
                    return err;
 | 
						|
                }
 | 
						|
            }
 | 
						|
        }
 | 
						|
    }
 | 
						|
 | 
						|
    // make directories
 | 
						|
    for (set<string>::iterator it=directories.begin();
 | 
						|
                                it!=directories.end(); it++) {
 | 
						|
        debug_printf("mkdir %s\n", it->c_str());
 | 
						|
        err = mkdir_recursively(*it);
 | 
						|
        if (err != 0) {
 | 
						|
            return err;
 | 
						|
        }
 | 
						|
    }
 | 
						|
 | 
						|
    // copy (or link) files that are newer or of different size
 | 
						|
    for (vector<FileRecord>::iterator it=files.begin();
 | 
						|
                                it!=files.end(); it++) {
 | 
						|
        if (!it->sourceIsDir) {
 | 
						|
            if (it->fileOp == FILE_OP_REMOVE) {
 | 
						|
                continue;
 | 
						|
            }
 | 
						|
 | 
						|
            debug_printf("copy %s(%ld) ==> %s(%ld)",
 | 
						|
                it->sourcePath.c_str(), it->sourceMod,
 | 
						|
                it->outPath.c_str(), it->outMod);
 | 
						|
 | 
						|
            if (it->outSize != it->sourceSize || it->outMod < it->sourceMod) {
 | 
						|
                err = copy_file(it->sourcePath, it->outPath);
 | 
						|
                debug_printf(" done.\n");
 | 
						|
                if (err != 0) {
 | 
						|
                    return err;
 | 
						|
                }
 | 
						|
            } else {
 | 
						|
                debug_printf(" skipping.\n");
 | 
						|
            }
 | 
						|
 | 
						|
            if (it->fileOp == FILE_OP_STRIP) {
 | 
						|
                debug_printf("strip %s\n", it->outPath.c_str());
 | 
						|
                err = strip_file(it->outPath);
 | 
						|
                if (err != 0) {
 | 
						|
                    return err;
 | 
						|
                }
 | 
						|
            }
 | 
						|
        }
 | 
						|
    }
 | 
						|
 | 
						|
    // output the dependency file
 | 
						|
    if (g_dependency.length() != 0) {
 | 
						|
        FILE *f = fopen(g_dependency.c_str(), "w");
 | 
						|
        if (f != NULL) {
 | 
						|
            fprintf(f, "ATREE_FILES := $(ATREE_FILES) \\\n");
 | 
						|
            for (vector<FileRecord>::iterator it=files.begin();
 | 
						|
                                it!=files.end(); it++) {
 | 
						|
                if (!it->sourceIsDir) {
 | 
						|
                    fprintf(f, "%s \\\n",
 | 
						|
                            escape_filename(it->sourcePath).c_str());
 | 
						|
                }
 | 
						|
            }
 | 
						|
            fprintf(f, "\n");
 | 
						|
            fclose(f);
 | 
						|
        } else {
 | 
						|
            fprintf(stderr, "error opening manifest file for write: %s\n",
 | 
						|
                    g_dependency.c_str());
 | 
						|
        }
 | 
						|
    }
 | 
						|
 | 
						|
    return 0;
 | 
						|
}
 |