/[smeserver]/builds_bin/update_repos
ViewVC logotype

Diff of /builds_bin/update_repos

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

Revision 1.21 by slords, Mon Nov 5 03:01:24 2007 UTC Revision 1.22 by slords, Mon Nov 5 03:10:02 2007 UTC
# Line 293  foreach my $smever ( sort { $a <=> $b } Line 293  foreach my $smever ( sort { $a <=> $b }
293          printline('white', 0, "Finished copying/moving.\n");          printline('white', 0, "Finished copying/moving.\n");
294    
295          foreach my $repo ( sort keys %repochg ) {          foreach my $repo ( sort keys %repochg ) {
296              next if ! $repos->{$repo} || $repos->{$repo}->{base} || $repos->{$repo}->{builds};              next if ! $repos->{$repo} || $repos->{$repo}->{base} || $repos->{$repo}->{builds} || $repos->{$repo}->{stage};
297              foreach my $arch ( @archs ) {              foreach my $arch ( @archs ) {
298                  my $dir = $distrepo->{$rel}->{repo} . "$repo/$arch";                  my $dir = $distrepo->{$rel}->{repo} . "$repo/$arch";
299                  $dir = qx(readlink -f $dir);                  $dir = qx(readlink -f $dir);
# Line 336  sub dest { Line 336  sub dest {
336      my ($pkg, @repos) = @_;      my ($pkg, @repos) = @_;
337      my @d = ();      my @d = ();
338      foreach my $repo ( @repos ) {      foreach my $repo ( @repos ) {
339          my $base = $distrepo->{$rel}->{repo};          my $base = $distrepo->{$rel}->{repo} . $repo;
340          $base = $distrepo->{$rel}->{stage} if $repos->{$repo}->{stage};          $base = $distrepo->{$rel}->{stage} if $repos->{$repo}->{stage};
341          if ( $pkg->{arch} eq 'noarch' ) {          if ( $pkg->{arch} eq 'noarch' ) {
342              push @d, "$base$repo/i386/" .              push @d, "$base/i386/" .
343                       ( $repos->{$repo}->{os} ? $distrepo->{$rel}->{os} : 'RPMS/' ) .                       ( $repos->{$repo}->{os} ? $distrepo->{$rel}->{os} : 'RPMS/' ) .
344                       basename $pkg->{rpm}->filename;                       basename $pkg->{rpm}->filename;
345              push @d, "$base$repo/x86_64/" .              push @d, "$base/x86_64/" .
346                       ( $repos->{$repo}->{os} ? $distrepo->{$rel}->{os} : 'RPMS/' ) .                       ( $repos->{$repo}->{os} ? $distrepo->{$rel}->{os} : 'RPMS/' ) .
347                       basename $pkg->{rpm}->filename;                       basename $pkg->{rpm}->filename;
348          } elsif ( $pkg->{arch} =~ m{^(i[356]86)$} ) {          } elsif ( $pkg->{arch} =~ m{^(i[356]86)$} ) {
349              push @d, "$base$repo/i386/" .              push @d, "$base/i386/" .
350                       ( $repos->{$repo}->{os} ? $distrepo->{$rel}->{os} : 'RPMS/' ) .                       ( $repos->{$repo}->{os} ? $distrepo->{$rel}->{os} : 'RPMS/' ) .
351                       basename $pkg->{rpm}->filename;                       basename $pkg->{rpm}->filename;
352          } elsif ( $pkg->{arch} eq 'x86_64' ) {          } elsif ( $pkg->{arch} eq 'x86_64' ) {
353              push @d, "$base$repo/x86_64/" .              push @d, "$base/x86_64/" .
354                       ( $repos->{$repo}->{os} ? $distrepo->{$rel}->{os} : 'RPMS/' ) .                       ( $repos->{$repo}->{os} ? $distrepo->{$rel}->{os} : 'RPMS/' ) .
355                       basename $pkg->{rpm}->filename;                       basename $pkg->{rpm}->filename;
356          } elsif ( $pkg->{arch} eq 'zsrc' ) {          } elsif ( $pkg->{arch} eq 'zsrc' ) {
357              push @d, "$base$repo/SRPMS/" .              push @d, "$base/SRPMS/" .
358                       basename $pkg->{rpm}->filename;                       basename $pkg->{rpm}->filename;
359          } else {          } else {
360              printline('bold yellow on_red', 1, ' - ', $pkg->{rpm}->filename, ' (bad arch: ', $pkg->{arch}, ')');              printline('bold yellow on_red', 1, ' - ', $pkg->{rpm}->filename, ' (bad arch: ', $pkg->{arch}, ')');

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