IPP Software Navigation Tools IPP Links Communication Pan-STARRS Links

Changeset 21932


Ignore:
Timestamp:
Feb 20, 2009, 10:49:49 AM (17 years ago)
Author:
eugene
Message:

update for svn: change cvsname to module; change location of extlibs and extperl

Location:
trunk/psconfig
Files:
5 edited

Legend:

Unmodified
Added
Removed
  • trunk/psconfig/psbuild

    r19883 r21932  
    218218
    219219    $stop_now = 0;
    220     for ($i = 0; !$stop_now && ($i < @cvsname); $i++) {
    221         if (($stop ne "") && ($stop eq $cvsname[$i])) { $stop_now = 1; }
    222         if (($start ne "") && ($start ne $cvsname[$i])) { next; }
     220    for ($i = 0; !$stop_now && ($i < @module); $i++) {
     221        if (($stop ne "") && ($stop eq $module[$i])) { $stop_now = 1; }
     222        if (($start ne "") && ($start ne $module[$i])) { next; }
    223223        $start = "";
    224224
     
    227227        if ($do_build eq "N") { next; }
    228228
    229         $workdir = "../$cvsname[$i]";
     229        $workdir = "../$module[$i]";
    230230
    231231        # XXX need to grab current value for cleanup
    232         print "\n ** psbuild: $cvsname[$i] ** \n";
    233         print "\033]0; ** psbuild: $cvsname[$i] ** \007";
     232        print "\n ** psbuild: $module[$i] ** \n";
     233        print "\033]0; ** psbuild: $module[$i] ** \007";
    234234
    235235        if (!-d $workdir || !-r $workdir || !-x $workdir) {
    236             print STDERR "WARNING: no directory for component $cvsname[$i], skipping\n";
     236            print STDERR "WARNING: no directory for component $module[$i], skipping\n";
    237237            next;
    238238        }
     
    248248        if (-e "Build.PL") {
    249249            vsystem ("$psperlbuild");
    250             if ($?) { &failure($cvsname[$i], "failure in perl Build.PL"); }
     250            if ($?) { &failure($module[$i], "failure in perl Build.PL"); }
    251251
    252252            vsystem ("./Build");
    253             if ($?) { &failure($cvsname[$i], "failure in Build"); }
     253            if ($?) { &failure($module[$i], "failure in Build"); }
    254254
    255255            vsystem ("./Build install");
    256             if ($?) { &failure($cvsname[$i], "failure in Build install"); }
     256            if ($?) { &failure($module[$i], "failure in Build install"); }
    257257
    258258            next;
     
    273273            $skip_configure = 1;
    274274            vsystem ("$psautogen $psopts");
    275             if ($?) { &failure($cvsname[$i], "failure in psautogen"); }
     275            if ($?) { &failure($module[$i], "failure in psautogen"); }
    276276        }
    277277
    278278        if ($rebuild_this && -e "configure" && !$skip_configure) {
    279279            vsystem ("$psconfigure $psopts");
    280             if ($?) { &failure($cvsname[$i], "failure in psconfigure"); }
    281         }
    282 
    283         if (! -e "Makefile") { &failure($cvsname[$i], "missing makefile: do you need to run the -dev developer build?"); }
     280            if ($?) { &failure($module[$i], "failure in psconfigure"); }
     281        }
     282
     283        if (! -e "Makefile") { &failure($module[$i], "missing makefile: do you need to run the -dev developer build?"); }
    284284
    285285        if ($clean) {
    286286            vsystem ("make clean");
    287             if ($?) { &failure($cvsname[$i], "failure in make clean"); }
     287            if ($?) { &failure($module[$i], "failure in make clean"); }
    288288        }
    289289
    290290        vsystem ("make");
    291         if ($?) { &failure($cvsname[$i], "failure in make"); }
     291        if ($?) { &failure($module[$i], "failure in make"); }
    292292
    293293        vsystem ("make install");
    294         if ($?) { &failure($cvsname[$i], "failure in make install"); }
    295 
    296         print "*** done with $cvsname[$i] ***\n";
     294        if ($?) { &failure($module[$i], "failure in make install"); }
     295
     296        print "*** done with $module[$i] ***\n";
    297297
    298298      success:
     
    359359sub load_distfile {
    360360    # open and read the distribution file
    361     # results go into @cvsname, @branchtag, @branchver, @mode
     361    # results go into @module, @branchtag, @branchver, @mode
    362362    open (FILE, $distribution) || die "ERROR: can't open distribution file $distribution\n";
    363363    @list = <FILE>;
     
    365365
    366366    @mode = ();
    367     @cvsname = ();
     367    @module = ();
    368368    @branchtag = ();
    369369    @branchver = ();
     
    374374        if ($line =~ m|^\s*\#|) { next; }
    375375
    376         ($mode, $cvsname, $branchtag, $branchver) = split (" ", $line);
    377 
    378         if ($cvsname eq "") { die "missing module name\n"; }
     376        ($mode, $module, $branchtag, $branchver) = split (" ", $line);
     377
     378        if ($module eq "") { die "missing module name\n"; }
    379379
    380380        ($do_tag, $do_build, $do_package, $do_update) = $mode =~ m|(\S)(\S)(\S)(\S)|;
     
    385385
    386386        if ($verbose) { print "tag: $do_tag, build: $do_build, package: $do_package, update: $do_update "; }
    387         if ($verbose) { print "module: $cvsname, branchtag: $branchtag, branchver: $branchver \n"; }
     387        if ($verbose) { print "module: $module, branchtag: $branchtag, branchver: $branchver \n"; }
    388388
    389389        push @mode, $mode;
    390         push @cvsname, $cvsname;
     390        push @module, $module;
    391391        push @branchtag, $branchtag;
    392392        push @branchver, $branchver;
  • trunk/psconfig/pschecklibs

    r20298 r21932  
    232232    print "psconfigure: $psconfigure";
    233233
    234     ## try to build the module from ../../extlibs/$tarball
     234    ## try to build the module ../extlibs/$tarball
    235235
    236236    # go to extlibs and unpack the tarball
    237     chdir "../../extlibs";
     237    chdir "../extlibs";
    238238
    239239    print "extract $name from $tarball\n";
  • trunk/psconfig/pscheckperl

    r17490 r21932  
    9090    }
    9191
    92     # try to build the module from ../../extperl/Module.*.tar.gz
    93     chdir "../../extperl" or die "Unable to find ../../extperl directory.";
     92    # try to build the module from ../extperl/Module.*.tar.gz
     93    chdir "../extperl" or die "Unable to find ../extperl directory.";
    9494
    9595    print "extract $module from $tarball\n";
  • trunk/psconfig/psdist

    r18806 r21932  
    100100sub difflist {
    101101
    102     for ($i = 0; $i < @cvsname; $i++) {
     102    for ($i = 0; $i < @module; $i++) {
    103103        # the base component cannot be rdiffed
    104         print STDERR "--- $cvsname[$i] ---\n";
    105         if ($cvsname[$i] eq "base") { next; }
     104        print STDERR "--- $module[$i] ---\n";
     105        if ($module[$i] eq "base") { next; }
    106106        if ($tag[$i] eq "") { next; }
    107         &vsystem ("cvs -q rdiff -s -r $tag[$i] $cvsname[$i]");
     107        &vsystem ("cvs -q rdiff -s -r $tag[$i] $module[$i]");
    108108        print STDERR "\n\n";
    109109    }
     
    114114    print STDERR "setting tags\n";
    115115    if ($settag_mode eq "") { die "-tag mode is not set\n"; }
    116     for ($i = 0; $i < @cvsname; $i++) {
    117         if (($module ne "") && ($module ne $cvsname[$i])) { next; }
     116    for ($i = 0; $i < @module; $i++) {
     117        if (($module ne "") && ($module ne $module[$i])) { next; }
    118118        ## XXX make this backwards compatible with pre-ipp-2.4 releases (with four, not five, entries)?
    119119        ($do_tag, $do_build, $do_dist, $do_update, $dev_build) = $mode[$i] =~ m|(\S)(\S)(\S)(\S)(\S)|;
    120120        if ($do_tag eq "N") {
    121             push @remind, $cvsname[$i];
    122             next;
    123         }
    124         if ($branchtag[$i] eq "") { die "branch tag missing for $cvsname[$i]\n"; }
     121            push @remind, $module[$i];
     122            next;
     123        }
     124        if ($branchtag[$i] eq "") { die "branch tag missing for $module[$i]\n"; }
    125125        if ($branchver[$i] eq "") { die "branch tag version missing\n"; }
    126126        $tag = "$branchtag[$i]$branchver[$i]";
    127127        if ($settag_mode eq "branch") {
    128             &vsystem ("cvs -q rtag -b $branchtag[$i] $cvsname[$i]");
     128            &vsystem ("cvs -q rtag -b $branchtag[$i] $module[$i]");
    129129            next;
    130130        }
    131131        if ($settag_mode eq "dev") {
    132             &vsystem ("cvs -q rtag $tag $cvsname[$i]");
     132            &vsystem ("cvs -q rtag $tag $module[$i]");
    133133            next;
    134134        }
    135135        if ($settag_mode eq "rev") {
    136             &vsystem ("cvs -q rtag -r $branchtag[$i] $tag $cvsname[$i]");
     136            &vsystem ("cvs -q rtag -r $branchtag[$i] $tag $module[$i]");
    137137            next;
    138138        }
     
    152152    chdir "..";
    153153
    154     for ($i = 0; $i < @cvsname; $i++) {
    155         if (($module ne "") && ($module ne $cvsname[$i])) { next; }
     154    for ($i = 0; $i < @module; $i++) {
     155        if (($module ne "") && ($module ne $module[$i])) { next; }
    156156        ($do_tag, $do_build, $do_dist, $do_update) = $mode[$i] =~ m|(\S)(\S)(\S)(\S)|;
    157157        if ($do_update eq "N") {
    158             push @remind, $cvsname[$i];
     158            push @remind, $module[$i];
    159159            next;
    160160        }
    161161        # only update modules with tags
    162         if ($branchtag[$i] eq "") { die "branch tag missing for $cvsname[$i]\n"; }
     162        if ($branchtag[$i] eq "") { die "branch tag missing for $module[$i]\n"; }
    163163        if ($branchver[$i] eq "") { die "branch tag version missing\n"; }
    164164        $tag = "$branchtag[$i]$branchver[$i]";
    165165        if ($update_mode eq "tags") {
    166             &vsystem ("cvs -q co -r $tag $cvsname[$i]");
     166            &vsystem ("cvs -q co -r $tag $module[$i]");
    167167            next;
    168168        }
    169169        if ($update_mode eq "head") {
    170             &vsystem ("cvs -q co -A $cvsname[$i]");
     170            &vsystem ("cvs -q co -A $module[$i]");
    171171            next;
    172172        }
     
    187187    mkdir $distribution;
    188188    chdir $distribution;
    189     for ($i = 0; $i < @cvsname; $i++) {
    190         if (($module ne "") && ($module ne $cvsname[$i])) { next; }
     189    for ($i = 0; $i < @module; $i++) {
     190        if (($module ne "") && ($module ne $module[$i])) { next; }
    191191        ($do_tag, $do_build, $do_dist, $do_update) = $mode[$i] =~ m|(\S)(\S)(\S)(\S)|;
    192192        if ($do_dist eq "N") { next; }
    193193
    194         if ($branchtag[$i] eq "") { die "branch tag missing for $cvsname[$i]\n"; }
     194        if ($branchtag[$i] eq "") { die "branch tag missing for $module[$i]\n"; }
    195195        if ($branchver[$i] eq "") { die "branch tag version missing\n"; }
    196196        $tag = "$branchtag[$i]$branchver[$i]";
    197197
    198198        if ($mkdist_head) {
    199             &vsystem ("cvs co $cvsname[$i]");
     199            &vsystem ("cvs co $module[$i]");
    200200            if ($status) { die "error running cvs"; }
    201201        } else {
    202             &vsystem ("cvs co -r $tag $cvsname[$i]");
     202            &vsystem ("cvs co -r $tag $module[$i]");
    203203            if ($status) { die "error running cvs"; }
    204204        }
     
    218218    # run autogen.sh, if present, to build a configure script
    219219    chdir $distribution;
    220     for ($i = 0; $i < @cvsname; $i++) {
    221         if (($module ne "") && ($module ne $cvsname[$i])) { next; }
     220    for ($i = 0; $i < @module; $i++) {
     221        if (($module ne "") && ($module ne $module[$i])) { next; }
    222222        ($do_tag, $do_build, $do_dist, $do_update) = $mode[$i] =~ m|(\S)(\S)(\S)(\S)|;
    223223        if ($do_dist eq "N") { next; }
    224224
    225         if (! -e "$cvsname[$i]/autogen.sh" || -e "$cvsname[$i]/Build.PL" ) { next; }
    226         chdir $cvsname[$i];
     225        if (! -e "$module[$i]/autogen.sh" || -e "$module[$i]/Build.PL" ) { next; }
     226        chdir $module[$i];
    227227
    228228        vsystem ("./autogen.sh --no-configure");
     
    255255sub load_distfile {
    256256    # open and read the distribution file
    257     # results go into @cvsname, @branchtag, @branchver, @mode
     257    # results go into @module, @branchtag, @branchver, @mode
    258258    $file = "$tagsets/$ARGV[0].dist";
    259259    open (FILE, $file) || die "ERROR: can't open distribution file $file\n";
     
    262262
    263263    @mode = ();
    264     @cvsname = ();
     264    @module = ();
    265265    @branchtag = ();
    266266    @branchver = ();
     
    271271        if ($line =~ m|^\s*\#|) { next; }
    272272
    273         ($mode, $cvsname, $branchtag, $branchver) = split (" ", $line);
    274 
    275         if ($cvsname eq "") { die "missing module name\n"; }
     273        ($mode, $my_module, $branchtag, $branchver) = split (" ", $line);
     274
     275        if ($my_module eq "") { die "missing module name\n"; }
    276276
    277277        ($do_tag, $do_build, $do_dist, $do_update) = $mode =~ m|(\S)(\S)(\S)(\S)|;
     
    281281        if (($do_update ne "Y") && ($do_update ne "N")) { die "invalid tag option $do_update\n"; }
    282282
    283         # print "module: $cvsname, branchtag: $branchtag, branchver: $branchver ";
     283        # print "module: $my_module, branchtag: $branchtag, branchver: $branchver ";
    284284        # print "tag: $do_tag, build: $do_build, dist: $do_dist, update: $do_update\n";
    285285
    286286        push @mode, $mode;
    287         push @cvsname, $cvsname;
     287        push @module, $my_module;
    288288        push @branchtag, $branchtag;
    289289        push @branchver, $branchver;
  • trunk/psconfig/tagsets/ipp-2.7.dist

    r21343 r21932  
    66# |||||-- build for developer?
    77# |||||
    8 # |||||  CVS module             CVS branch tag   CVS branch version   
     8# |||||  module                 branch name      tag version   
    99# |||||
    1010  YYNNY  Ohana                  ipp-2-7          -0
Note: See TracChangeset for help on using the changeset viewer.