/[smeserver]/builds_bin/update_dev_repo
ViewVC logotype

Diff of /builds_bin/update_dev_repo

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

Revision 1.2 by slords, Tue Dec 12 03:54:21 2006 UTC Revision 1.5 by slords, Sat Apr 14 21:21:23 2007 UTC
# Line 7  use Data::Dumper; Line 7  use Data::Dumper;
7    
8  sub compare($$);  sub compare($$);
9    
10    my $test_repo = '/releases/7/smedev';
11  my $releases = 2;  my $releases = 2;
12    
13  my $rpm_flags =  RPM2->vsf_nodsa;  my $rpm_flags =  RPM2->vsf_nodsa;
 my $test_repo = '/releases/7/smedev';  
14  my @repositories = qw(  my @repositories = qw(
                 /releases/7/smeupdates/i386/RPMS/  
15                  /releases/7/smeos/i386/CentOS/RPMS/                  /releases/7/smeos/i386/CentOS/RPMS/
16                    /releases/7/smeupdates/i386/RPMS/
17                  /releases/7/smeupdates-testing/i386/RPMS/                  /releases/7/smeupdates-testing/i386/RPMS/
18                    /releases/7/smeextras/i386/RPMS/
19                    /releases/7/smetest/i386/RPMS/
20                  /builds/rpms/RPMS/i386/                  /builds/rpms/RPMS/i386/
21                  /builds/rpms/RPMS/i586/                  /builds/rpms/RPMS/i586/
22                  /builds/rpms/RPMS/i686/                  /builds/rpms/RPMS/i686/
# Line 54  foreach my $rpm (keys %repos) { Line 56  foreach my $rpm (keys %repos) {
56          }          }
57  }  }
58    
59    my $changed = 0;
60  my @pushed;  my @pushed;
61  foreach my $package (sort keys %pushed)  foreach my $package (sort keys %pushed)
62  {  {
# Line 65  foreach my $package (sort keys %pushed) Line 68  foreach my $package (sort keys %pushed)
68                  unless (grep { ! compare($_, $rpm) } @testing) {                  unless (grep { ! compare($_, $rpm) } @testing) {
69                          print "adding ".$rpm->filename."\n";                          print "adding ".$rpm->filename."\n";
70                          system(qw(cp -a), $rpm->filename, "$test_repo/i386/RPMS/");                          system(qw(cp -a), $rpm->filename, "$test_repo/i386/RPMS/");
71                            $changed++;
72                  }                  }
73          }          }
74  }  }
# Line 74  foreach my $rpm (sort compare @testing) Line 78  foreach my $rpm (sort compare @testing)
78          unless (grep { ! compare($_,$rpm) } @pushed) {          unless (grep { ! compare($_,$rpm) } @pushed) {
79                  print "removing ".$rpm->filename."\n";                  print "removing ".$rpm->filename."\n";
80                  unlink $rpm->filename;                  unlink $rpm->filename;
81                    $changed++;
82          }          }
83  }  }
84    
85  system(qw(rm -rf), "$test_repo/i386/headers", "$test_repo/i386/repodata");  if ($changed) {
86  system(qw(createrepo), "$test_repo/i386");          system(qw(/builds/bin/linksource -s), "$test_repo/i386/RPMS", '-d', "$test_repo/SRPMS");
87  system(qw(yum-arch), "$test_repo/i386");          system(qw(createrepo), "$test_repo/i386");
88            system(qw(repoview), "$test_repo/i386");
89    }
90    
91  sub compare($$) {  sub compare($$) {
92          my ($a, $b) = @_;          my ($a, $b) = @_;

Legend:
Removed lines/characters  
Changed lines/characters
  Added lines/characters
admin@koozali.org
 ViewVC Help
Powered by ViewVC 1.2.1 RSS 2.0 feed