Roxen.git / server / bin / setup_nsr.pike

version» Context lines:

Roxen.git/server/bin/setup_nsr.pike:1: - // $Id: setup_nsr.pike,v 1.2 2003/09/24 10:05:28 grubba Exp $ + // $Id: setup_nsr.pike,v 1.3 2003/09/24 10:55:47 grubba Exp $   //   // Setup .nsr (Networker) files for logfile directories if appropriate.   // NOTE: We must be paranoid; we must not alter files that the user   // has entered or changed!   //   // 2003-09-24 Henrik Grubbström      int verbose;      #define vwerror(ARGS ...) do { \
Roxen.git/server/bin/setup_nsr.pike:15:   void update_nsr_file(string directory)   {    vwerror("Checking for directory %O\n", directory);    Stdio.Stat st = file_stat(directory);    if (!st) {    vwerror("Not found\n");    return;    }       int this_rev = -1; -  if (sscanf("$Revision: 1.2 $", "$""Revision: 1.%d $", this_rev) != 1) { +  if (sscanf("$Revision: 1.3 $", "$""Revision: 1.%d $", this_rev) != 1) {    vwerror("Failed to parse own revision $Rev$\n");    return;    }       string nsr_file = directory + "/.nsr";    st = file_stat(nsr_file);    if (st) {    vwerror("nsr file %O exists.\n", nsr_file);    // File exists. Check if it's an old unmodified file.    string old_content = Stdio.read_file(nsr_file);
Roxen.git/server/bin/setup_nsr.pike:43:    csum, old_content) != 2) {    vwerror("No checksum.\n");    return;    }    if (Crypto.string_to_hex(Crypto.md5()->update(old_content)->digest()) !=    csum) {    vwerror("Bad checksum.\n");    return;    }    int rev = -1; -  if (sscanf(old_content, "# Roxen revision: 1.%d\n%s", +  if (sscanf(old_content, "# Roxen nsr-revision: 1.%d\n%s",    rev, old_content) != 2) {    vwerror("Bad revision.\n");    return;    }    if (this_rev <= rev) { -  vwerror("Newer revision.\n"); +  vwerror("Already up to date.\n");    return;    }    // The file seems to be an old version that we've generated.    }    // Generate the new nsrfile.    vwerror("Generating new file %O\n", nsr_file);       string new_content = sprintf( - #"# Roxen revision: 1.%d\n + #"# Roxen nsr-revision: 1.%d      # The output from the restart loop is named start_default.output.   +logasm: start_*.output      # Active debug log files are named default.1 or configurationdir.1   +logasm: *.1      # The default name for site logs is Log   +logasm: Log   ", this_rev);
Roxen.git/server/bin/setup_nsr.pike:100:    case "logdir":    update_nsr_file(value);    break;    case "debugdir":    update_nsr_file(value);    break;    case "verbose":    verbose++;    break;    case "version": -  write("$Id: setup_nsr.pike,v 1.2 2003/09/24 10:05:28 grubba Exp $\n"); +  write("$Id: setup_nsr.pike,v 1.3 2003/09/24 10:55:47 grubba Exp $\n");    break;    }    }   }