IPP Software Navigation Tools IPP Links Communication Pan-STARRS Links

Ignore:
Timestamp:
Feb 9, 2007, 3:36:38 PM (19 years ago)
Author:
eugene
Message:

fixed up mkbuild, psconfig.sh

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/psconfig/mkbuild

    r11737 r11739  
    7676    $psperlbuild = `csh psconfig.sh --psperlbuild $version`;
    7777
    78     # alias  psconfigure configure --prefix={$PSCONFDIR}/{$PSCONFIG} --bindir=$bindir --libdir=$libdir --includedir={$PSCONFDIR}/{$PSCONFIG}/include --sysconfdir={$PSCONFDIR}/{$PSCONFIG}/etc --datadir={$PSCONFDIR}/share --mandir={$PSCONFDIR}/man
    79     # alias  psautogen autogen.sh --bindir=$bindir --libdir=$libdir --mandir=$mandir --includedir={$PSCONFDIR}/{$PSCONFIG}/include --sysconfdir={$PSCONFDIR}/{$PSCONFIG}/etc --datadir={$PSCONFDIR}/share
    80     # alias  psperlbuild perl Build.PL --prefix {$PSCONFDIR}/{$PSCONFIG} --install_path script=$bindir --install_path arch=$bindir --install_path bin=$bindir --install_path lib=$libdir --install_path bindoc={$PSCONFDIR}/man/man1 --install_path libdoc={$PSCONFDIR}/man/man3
    81 
    8278    print "psconfigure: $psconfigure\n";
    8379    print "psautogen: $psautogen\n";
    8480    print "psperlbuild: $psperlbuild\n";
    85 
    86     exit 1;
    8781
    8882    $psopts = "";
     
    107101        # - perl Build.PL : ./Build : ./Build install
    108102 
    109         if (-e Build.PL) {
     103        if (-e "Build.PL") {
    110104            print $PERL5LIB;
    111105
    112             # psperlbuild;
    113             # perl Build.PL --install_path script=$bindir --install_path lib=$libdir --install_path bindoc={$PSCONFDIR}/man/man1 --install_path libdoc={$PSCONFDIR}/man/man3
    114             if ($?) { &failure(); }
    115 
    116             # ./Build
    117             if ($?) { &failure(); }
    118 
    119             # ./Build install
    120             if ($?) { &failure(); }
     106            vsystem ("$psperlbuild");
     107            if ($?) { &failure($cvsname[$i], "failure in perl Build.PL"); }
     108
     109            vsystem ("./Build");
     110            if ($?) { &failure($cvsname[$i], "failure in Build"); }
     111
     112            vsystem ("./Build install");
     113            if ($?) { &failure($cvsname[$i], "failure in Build install"); }
    121114           
    122115            next;
     
    124117
    125118        if ($rebuild && $clean) {
    126             if (-e configure) { unlink "Makefile"; }
    127             if (-e configure.ac && -e autogen.sh) { unlink "configure"; }
     119            if (-e "configure") { unlink "Makefile"; }
     120            if (-e "configure.ac" && -e "autogen.sh") { unlink "configure"; }
    128121        }
    129122        $rebuild_this = $rebuild;
    130123
    131124        # set a local variable for this loop on rebuild;
    132         if (! -e Makefile) { $rebuild_this = 1; }
     125        if (! -e "Makefile") { $rebuild_this = 1; }
    133126
    134127        #  run autogen
    135128        $skip_configure = 0;
    136         if ($rebuild_this && ! -e configure && -e autogen.sh) {
     129        if ($rebuild_this && ! -e "configure" && -e "autogen.sh") {
    137130            $skip_configure = 1;
    138             print "psautogen $psopts\n";
    139             vsystem ("psautogen $psopts");
    140             if ($?) { &failure(); }
    141         }
    142 
    143         if ($rebuild_this && -e configure && !$skip_configure) {
    144             print "psconfigure $psopts\n";
    145             vsystem ("psconfigure $psopts");
    146             if ($?) { &failure(); }
    147         }
    148 
    149         if (! -e Makefile) { &failure(); }
     131            vsystem ("$psautogen $psopts");
     132            if ($?) { &failure($cvsname[$i], "failure in psautogen"); }
     133        }
     134
     135        if ($rebuild_this && -e "configure" && !$skip_configure) {
     136            vsystem ("$psconfigure $psopts");
     137            if ($?) { &failure($cvsname[$i], "failure in psconfigure"); }
     138        }
     139
     140        if (! -e "Makefile") { &failure($cvsname[$i], "missing makefile"); }
    150141
    151142        if ($clean) {
    152             print "make clean\n";
    153143            vsystem ("make clean");
    154             if ($?) { &failure(); }
     144            if ($?) { &failure($cvsname[$i], "failure in make clean"); }
    155145        }
    156146
    157147        vsystem ("make");
    158         if ($?) { &failure(); }
     148        if ($?) { &failure($cvsname[$i], "failure in make"); }
    159149
    160150        vsystem ("make install");
    161         if ($?) { &failure(); }
     151        if ($?) { &failure($cvsname[$i], "failure in make install"); }
    162152
    163153      success:
     
    171161sub vsystem {
    172162    print STDERR "@_\n";
    173     #$status = system ("@_");
    174     #$status;
     163    $status = system ("@_");
     164    $status;
    175165}
    176166
    177167sub list_distributions {
    178 
    179 
    180168    vsystem ("ls $tagsets/*.dst");
    181169    exit 2;
     
    210198        if (($do_update ne "Y") && ($do_update ne "N")) { die "invalid tag option $do_update\n"; }
    211199       
    212         print "module: $cvsname, branchtag: $branchtag, branchver: $branchver ";
    213         print "tag: $do_tag, build: $do_build, package: $do_package, update: $do_update\n";
     200        print "tag: $do_tag, build: $do_build, package: $do_package, update: $do_update ";
     201        print "module: $cvsname, branchtag: $branchtag, branchver: $branchver \n";
    214202
    215203        push @mode, $mode;
     
    218206        push @branchver, $branchver;
    219207    }
     208}
     209
     210sub failure {
     211    die "problem building $_[0] : $_[1]\n";
    220212}
    221213
Note: See TracChangeset for help on using the changeset viewer.