changes to get enrpm working
authorivan <ivan>
Fri, 9 Jul 2010 22:34:09 +0000 (22:34 +0000)
committerivan <ivan>
Fri, 9 Jul 2010 22:34:09 +0000 (22:34 +0000)
rpm/build/BOOTSTRAP
rpm/build/enrpm
rpm/build/native/ovid2flute

index 3fe8d0f..6ddf5b5 100644 (file)
@@ -120,6 +120,26 @@ mkdir -p public_html/repo/centos/5/freeside-1.7/testing/x86_64/
 mkdir public_html/repo/centos/5/freeside-1.7/testing/i686
 
 ###
+# and for enrpm!
+###
+
+vserver centos5 enter
+yum install perl-libwww-perl make
+cpan
+install RPM::Specfile
+#if it fails, might need to go to /root/.cpan/build/RPM-Specfile-* and do it manually
+install YAML
+
+#for user cpan-ability
+mkdir .cpan
+mkdir .cpan/CPAN
+cp /usr/lib/perl5/5.8.8/CPAN/Config.pm  .cpan/CPAN/MyConfig.pm
+vi .cpan/CPAN/MyConfig.pm #and just leave and change the /root ones
+chmod a+rx .cpan/CPAN/MyConfig.pm
+
+#edit ovid2flue and set user
+
+###
 # references
 ###
 
index 11f69ba..3e674bc 100755 (executable)
@@ -93,22 +93,13 @@ sub usage {
 }
 
 # Feeble excuse for not having a real configuration file
-my $user = 'rsiddall';
-my $buildsys = '/home/rsiddall/work';
-my $rembuild = '/home/rsiddall/work/cvs';
-my $remdeps = '/home/rsiddall';
-my $rpmtopdir = '/home/rsiddall/work/redhat';
-my $packager = 'Richard Siddall <richard.siddall@elirion.net>';
-my $server = 'grosbeak';
-
-if (hostname =~ /wavetail/i) {
-       $buildsys = '/home/rsiddall/buildsys';
-       $rembuild = '/home/rsiddall/buildsys/ref';
-       $remdeps = '/home/rsiddall';
-       $rpmtopdir = '/home/rsiddall/redhat';
-       $packager = 'Ivan Kohler <ivan@freeside.biz>';
-       $server = '10.5.4.5';
-}
+my $user = 'ivan';
+my $buildsys = "/home/$user/buildsys";
+#my $rembuild = '/home/rsiddall/buildsys/ref';
+my $remdeps = '/home/ivan';
+my $rpmtopdir = "/home/$user/redhat";
+my $packager = 'Ivan Kohler <ivan@freeside.biz>';
+my $server = '10.5.4.5';
 
 $server = $opts{server} if defined($opts{server});
 $user = $1 if $server =~ /(\w+)\@[\w\d\.]+/;
@@ -169,11 +160,11 @@ for my $file (@ARGV) {
        }
        my $olddir = getcwd();
        do_cmd("$buildsys/build-freeside");
-       if (-x "$buildsys/refresh-repo") {
+#      if (-x "$buildsys/refresh-repo") {
                do_cmd("$buildsys/refresh-repo");
-       } else {
-               do_cmd("ssh $user\@$server $rembuild/refresh-repo");
-       }
+#      } else {
+#              do_cmd("ssh $user\@$server $rembuild/refresh-repo");
+#      }
 }
 
 sub do_cmd {
index 5e26711..5bb8361 100755 (executable)
@@ -36,10 +36,10 @@ $opts{packager} = 'Richard Siddall <richard.siddall@elirion.net>' if !defined($o
 #my @extramods= qw/Crypt::SSLeay/;
 my @extramods= qw/IPC::ShareLite/;
 
-my $specfiledir="/home/rsiddall/work/redhat/SPECS";
-$specfiledir = "/home/rsiddall/redhat/SPECS" if ! -d $specfiledir;
-my $srpmdir="/home/rsiddall/work/redhat/SRPMS";
-$srpmdir = "/home/rsiddall/redhat/SRPMS" if ! -d $srpmdir;
+my $specfiledir="/home/ivan/work/redhat/SPECS";
+$specfiledir = "/home/ivan/redhat/SPECS" if ! -d $specfiledir;
+my $srpmdir="/home/ivan/work/redhat/SRPMS";
+$srpmdir = "/home/ivan/redhat/SRPMS" if ! -d $srpmdir;
 
 foreach (reverse <STDIN>) {
        next if !defined($_);
@@ -80,7 +80,7 @@ foreach my $name (@extramods) {
 sub touchsrpms {
        my ($name, $rpm) = @_;
        my $repofolder ="/var/www/html/repo/sles/10/freeside-1.9/stable/x86_64";
-       my $srpmfolder ="/home/rsiddall/work/redhat/SRPMS";
+       my $srpmfolder ="/home/ivan/work/redhat/SRPMS";
        my @files = glob "$repofolder/perl-$rpm-*.rpm";
        if (! scalar(@files)) {
                print "Can't find $rpm in $repofolder\n";