--- builds_bin/update_repos	2008/06/26 20:48:23	1.45
+++ builds_bin/update_repos	2010/11/22 22:51:44	1.64
@@ -20,71 +20,69 @@ $opts{r} ||= '';
 my $rpm_flags = RPM2->vsf_nosha1header | RPM2->vsf_nomd5header | RPM2->vsf_nodsaheader | RPM2->vsf_norsaheader;
 $rpm_flags |= RPM2->vsf_nosha1 | RPM2->vsf_nomd5 | RPM2->vsf_nodsa | RPM2->vsf_norsa;
 
+my $osdir = 'SME';
+my $disttag = 'sme';
+my $repotag = 'sme';
+
 my @archs = ( 'i386', 'x86_64' );
 
-my $distrepo = { '7' => { active   => 1,
-			  centos   => 4,
-			  fedora   => 3,
-			  repo     => '/releases/7/',
-			  os       => 'RPMS/',
-			  builds   => '/builds/smeserver-7-core/',
-			  contribs => '/builds/smeserver-7-contribs/',
-			  stage    => '/stage/7/',
+my $distrepo = { '7' => { active    => 1,
+			  centos    => 4,
+			  repo      => '/releases/7/',
+			  os        => 'RPMS/',
+			  builds    => '/builds/smeserver-7-core/',
+			  community => '/builds/smeserver-7-contribs/',
+			  stage     => '/stage/7/',
 			},
-		 '8' => { active   => 1,
-			  centos   => 5,
-			  fedora   => 6,
-			  repo     => '/releases/testing/8/',
-			  os       => '',
-			  builds   => '/builds/smeserver-8-core/',
-			  contribs => '/builds/smeserver-8-contribs/',
-			  stage    => '/stage/8/',
+		 '8' => { active    => 1,
+			  centos    => 5,
+			  repo      => '/releases/testing/8/',
+			  os        => '',
+			  builds    => '/builds/smeserver-8-core/',
+			  community => '/builds/smeserver-8-contribs/',
+			  stage     => '/stage/8/',
 			},
 	       };
 
-my $repos = { 'smeos'              => { prio => 18, inc => 1, ver => 1, rel => 1, os => 1 },
-	      'smeupdates'         => { prio => 17, inc => 1, ver => 1, rel => 1 },
-	      'smeupdates-testing' => { prio => 16, inc => 1, ver => 1, rel => 1 },
-	      'smeextras'          => { prio => 15, inc => 0, ver => 1, rel => 1 },
-	      'smeaddons'          => { prio => 14, inc => 0, ver => 1, rel => 1 },
-	      'smecontribs'        => { prio => 13, inc => 0, ver => 1, rel => 1 },
-	      'smetest'            => { prio => 12, inc => 0, ver => 2, rel => 3, devel => 2 },
-	      'smedev'             => { prio => 11, inc => 0, ver => 1, rel => 1, devel => 1 },
-	      'centos'             => { prio => 10, inc => 0, ver => 0, rel => 0, orig => 1, base => 1 },
-	      'epel'               => { prio =>  9, inc => 0, ver => 0, rel => 0, orig => 1, base => 1 },
-	      'fedora-extras'      => { prio =>  8, inc => 0, ver => 0, rel => 0, orig => 1, base => 1 },
-	      'rpmforge'           => { prio =>  7, inc => 0, ver => 0, rel => 0, orig => 1, base => 1 },
-	      'atrpms'             => { prio =>  6, inc => 0, ver => 0, rel => 0, orig => 1, base => 1 },
-	      'fedora'             => { prio =>  5, inc => 0, ver => 0, rel => 0, orig => 1, base => 1 },
-	      'builds'             => { prio =>  4, inc => 0, ver => 0, rel => 0, orig => 1 },
-	      'contribs'           => { prio =>  2, inc => 0, ver => 0, rel => 0, orig => 1 },
-	      'stage'              => { prio =>  1, inc => 0, ver => 0, rel => 0, stage => 1, os => 1 },
+my $repos = { "${repotag}os"              => { prio => 18, inc => 1, ver => 1, rel => 1, os => 1 },
+	      "${repotag}updates"         => { prio => 17, inc => 1, ver => 1, rel => 1 },
+	      "${repotag}updates-testing" => { prio => 16, inc => 1, ver => 1, rel => 3 },
+	      "${repotag}extras"          => { prio => 15, inc => 0, ver => 1, rel => 1 },
+	      "${repotag}addons"          => { prio => 14, inc => 0, ver => 1, rel => 1 },
+	      "${repotag}contribs"        => { prio => 13, inc => 0, ver => 1, rel => 1 },
+	      "${repotag}test"            => { prio => 12, inc => 0, ver => 2, rel => 3, devel => 2 },
+	      "${repotag}dev"             => { prio => 11, inc => 0, ver => 1, rel => 1, devel => 1 },
+	      'centos'                    => { prio => 10, inc => 0, ver => 0, rel => 0, orig => 1, base => 1 },
+	      'epel'                      => { prio =>  9, inc => 0, ver => 0, rel => 0, orig => 1, base => 1 },
+	      'rpmforge'                  => { prio =>  7, inc => 0, ver => 0, rel => 0, orig => 1, base => 1 },
+	      'atrpms'                    => { prio =>  6, inc => 0, ver => 0, rel => 0, orig => 1, base => 1 },
+	      'builds'                    => { prio =>  4, inc => 0, ver => 0, rel => 0, orig => 1 },
+	      'community'                 => { prio =>  2, inc => 0, ver => 0, rel => 0, orig => 1 },
+	      'stage'                     => { prio =>  1, inc => 0, ver => 0, rel => 0, stage => 1, os => 1 },
 	    };
 
-my $baserepo = { '~Ssmeos/~A/SME/~O' => 'smeos',
-		 '~Ssmeupdates/~A/RPMS/' => 'smeupdates',
-		 '~Ssmeupdates-testing/~A/RPMS/' => 'smeupdates-testing',
-		 '~Ssmeextras/~A/RPMS/' => 'smeextras',
-		 '~Ssmeaddons/~A/RPMS/' => 'smeaddons',
-		 '~Ssmecontribs/~A/RPMS/' => 'smecontribs',
-		 '~Ssmetest/~A/RPMS/' => 'smetest',
-		 '~Ssmedev/~A/RPMS/' => 'smedev',
-		 '/stage/~s/~A/SME/~O' => 'stage',
+my $baserepo = { "~S${repotag}os/~A/$osdir/~O" => "${repotag}os",
+		 "~S${repotag}updates/~A/RPMS/" => "${repotag}updates",
+		 "~S${repotag}updates-testing/~A/RPMS/" => "${repotag}updates-testing",
+		 "~S${repotag}extras/~A/RPMS/" => "${repotag}extras",
+		 "~S${repotag}addons/~A/RPMS/" => "${repotag}addons",
+		 "~S${repotag}contribs/~A/RPMS/" => "${repotag}contribs",
+		 "~S${repotag}test/~A/RPMS/" => "${repotag}test",
+		 "~S${repotag}dev/~A/RPMS/" => "${repotag}dev",
+		 "/stage/~s/~A/$osdir/~O" => 'stage',
 		 '/mirrors/centos/~C/fasttrack/~A/RPMS/' => 'centos',
 		 '/mirrors/centos/~C/updates/~A/RPMS/' => 'centos',
 		 '/mirrors/centos/~C/os/~A/CentOS/~O' => 'centos',
 		 '/mirrors/centos/~C/extras/~A/RPMS/' => 'centos',
 		 '/mirrors/fedora/epel/~C/~A/' => 'epel',
 		 '/mirrors/fedora/epel/testing/~C/~A/' => 'epel',
-		 '/mirrors/fedora/extras/~F/~A/' => 'fedora-extras',
-		 '/mirrors/rpmforge/dag/redhat/el~C/en/~A/dag/RPMS/' => 'rpmforge',
-		 '/mirrors/rpmforge/dag/source/' => 'rpmforge',
+		 '/mirrors/rpmforge/redhat/el~C/en/~A/dag/RPMS/' => 'rpmforge',
+		 '/mirrors/rpmforge/redhat/el~C/en/~A/extras/RPMS/' => 'rpmforge',
+		 '/mirrors/rpmforge/source/' => 'rpmforge',
 		 '/mirrors/atrpms/el~C-~A/atrpms/stable/' => 'atrpms',
 		 '/mirrors/atrpms/el~C-~A/atrpms/testing/' => 'atrpms',
 		 '/mirrors/atrpms/src/el~C-~A/atrpms/stable/' => 'atrpms',
 		 '/mirrors/atrpms/src/el~C-~A/atrpms/testing/' => 'atrpms',
-		 '/mirrors/fedora/core/~F/~A/os/Fedora/RPMS/' => 'fedora',
-		 '/mirrors/fedora/core/updates/~F/~A/' => 'fedora',
 	       };
 
 if ( $opts{q} ) {
@@ -94,16 +92,15 @@ if ( $opts{q} ) {
     $baserepo->{'/mirrors/centos-qa/CentOS/~C/extras/~A/RPMS/'} = 'centos';
 }
 
-my $skippkg = { '7' => { 'centos'        => { map { $_ => 1 } ( 'horde', 'imp-h3', 'ingo-h3', 'turba-h3', 'vim' ) },
-			 'epel'          => { map { $_ => 1 } ( 'clamav', 'fping', 'perl-Razor-Agent', 'perl-Text-Iconv', 'proftpd' ) },
-			 'rpmforge'      => { map { $_ => 1 } ( 'perl-Test-Inline' ) },
+my $skippkg = { '7' => { 'centos'        => { map { $_ => 1 } ( 'horde', 'imp-h3', 'ingo-h3', 'turba-h3' ) },
+			 'epel'          => { map { $_ => 1 } ( 'clamav', 'fping', 'ocsinventory', 'perl-Compress-Bzip2', 'perl-Compress-Raw-Zlib', 'perl-Compress-Raw-Bzip2', 'perl-Crypt-OpenSSL-Bignum', 'perl-Crypt-OpenSSL-Random', 'perl-Crypt-OpenSSL-RSA', 'perl-DateTime', 'perl-Razor-Agent', 'perl-Text-Iconv' ) },
+			 'rpmforge'      => { map { $_ => 1 } ( 'mod_auth_tkt', 'perl-Test-Inline', 'spamassassin' ) },
 			 'atrpms'        => { map { $_ => 1 } ( 'check4updates', 'dovecot', 'trac', 'yum' ) },
 		       },
-		'8' => { 'centos'        => { map { $_ => 1 } ( 'horde', 'imp-h3', 'ingo-h3', 'turba-h3' ) },
-			 'fedora'        => { map { $_ => 1 } ( 'kernel-xen' ) },
-			 'epel'          => { map { $_ => 1 } ( 'clamav', 'perl-Razor-Agent', 'proftpd', 'smolt' ) },
-			 'fedora-extras' => { map { $_ => 1 } ( 'dstat', 'gocr', 'horde', 'oidentd', 'perl-Test-Inline', 'perl-Razor-Agent', 'smolt' ) },
-			 'rpmforge'      => { map { $_ => 1 } ( 'perl-Test-Inline' ) },
+		'8' => { 'atrpms'        => { map { $_ => 1 } ( 'gnupg' ) },
+			 'centos'        => { map { $_ => 1 } ( 'horde', 'imp-h3', 'ingo-h3', 'turba-h3' ) },
+			 'epel'          => { map { $_ => 1 } ( 'clamav', 'horde', 'libtalloc', 'libtdb', 'perl-Compress-Bzip2', 'perl-Compress-Raw-Zlib', 'perl-Compress-Raw-Bzip2', 'perl-Crypt-OpenSSL-Bignum', 'perl-Crypt-OpenSSL-Random', 'perl-Crypt-OpenSSL-RSA', 'perl-Razor-Agent', 'smolt' ) },
+			 'rpmforge'      => { map { $_ => 1 } ( 'libtalloc', 'mod_auth_tkt', 'perl-Test-Inline', 'spamassassin' ) },
 		       },
 	      };
 
@@ -112,8 +109,8 @@ my ($devel1, $devel2) = sort { $repos->{
 $devel2 ||= $devel1;
 
 my ($rpms, %base, %latest, %sources);
-foreach my $smever ( sort { $a <=> $b } keys %$distrepo ) {
-    next unless $distrepo->{$smever}->{active};
+foreach my $ver ( sort { $a <=> $b } keys %$distrepo ) {
+    next unless $distrepo->{$ver}->{active};
     my %repochg = ();
     $rpms = ();
     %latest = ();
@@ -122,27 +119,26 @@ foreach my $smever ( sort { $a <=> $b }
 
     foreach my $dir  ( sort { $repos->{$baserepo->{$b}}->{prio} <=> $repos->{$baserepo->{$a}}->{prio} || $a cmp $b } keys %$baserepo ) {
 	my $bdir = $dir;
-	$bdir =~ s/~O/$distrepo->{$smever}->{os}/;
-	$bdir =~ s/~S/$distrepo->{$smever}->{repo}/;
-	$bdir =~ s/~s/$smever/;
-	$bdir =~ s/~C/$distrepo->{$smever}->{centos}/;
-	$bdir =~ s/~F/$distrepo->{$smever}->{fedora}/;
+	$bdir =~ s/~O/$distrepo->{$ver}->{os}/;
+	$bdir =~ s/~S/$distrepo->{$ver}->{repo}/;
+	$bdir =~ s/~s/$ver/;
+	$bdir =~ s/~C/$distrepo->{$ver}->{centos}/;
 	for my $arch ( @archs, 'SRPMS/' ) {
 	    my $adir = $bdir;
 	    if ( $arch eq 'SRPMS/' ) {
-		$adir =~ s/~A.*/$arch/ if $arch eq 'SRPMS/';
+		$adir =~ s/~A.*/$arch/;
 	    } else {
 		$adir =~ s/~A/$arch/;
 	    }
 	    opendir DIR, $adir or next;
 	    next unless -d $adir;
-	    process_rpm("$adir$_", $smever, $baserepo->{$dir}) foreach readdir DIR;
+	    process_rpm("$adir$_", $ver, $baserepo->{$dir}) foreach readdir DIR;
 	    closedir DIR;
 	    last unless $dir =~ m{~A};
 	}
     }
-    find( { wanted => sub { process_rpm($_, $smever, 'builds'); }, no_chdir => 1, follow_fast => 1 }, $distrepo->{$smever}->{'builds'} );
-    find( { wanted => sub { process_rpm($_, $smever, 'contribs'); }, no_chdir => 1, follow_fast => 1 }, $distrepo->{$smever}->{'contribs'} );
+    find( { wanted => sub { process_rpm($_, $ver, 'builds'); }, no_chdir => 1, follow_fast => 1 }, $distrepo->{$ver}->{'builds'} );
+    find( { wanted => sub { process_rpm($_, $ver, 'community'); }, no_chdir => 1, follow_fast => 1 }, $distrepo->{$ver}->{'community'} ) if $distrepo->{$ver}->{'community'};
 
     foreach my $base ( sort keys %$rpms ) {
 	next unless $rpms->{$base}->{rpms};
@@ -157,18 +153,37 @@ foreach my $smever ( sort { $a <=> $b }
 	    next if $pkg->{done};
 
 	    my $tmp = $pkg->{svr};
+	    # srpm transformations to match up binary and source rpms
 	    SRC: {
-		$rpms->{$base}->{vers}->{$tmp} && last SRC;
-		($tmp = $pkg->{svr}) =~ s{\.el\d\.at$}{}                 && $rpms->{$base}->{vers}->{$tmp} && last SRC;
-		($tmp = $pkg->{svr}) =~ s{\.el\d\.at$}{}                 && $rpms->{$base}->{vers}->{$tmp} && last SRC;
-		($tmp = $pkg->{svr}) =~ s{\.el\d(\.rf)$}{$1}             && $rpms->{$base}->{vers}->{$tmp} && last SRC;
-		($tmp = $pkg->{svr}) =~ s{(\d+)\.\d+\.el\d(\.rf)$}{$1$2} && $rpms->{$base}->{vers}->{$tmp} && last SRC;
-		($tmp = $pkg->{svr}) =~ s{\.el\d\.rf$}{.dag}             && $rpms->{$base}->{vers}->{$tmp} && last SRC;
-		($tmp = $pkg->{svr}) =~ s{(\d+)\.\d+\.el\d\.rf$}{$1.dag} && $rpms->{$base}->{vers}->{$tmp} && last SRC;
-		($tmp = $pkg->{svr}) =~ s{\.el\d$}{}                     && $rpms->{$base}->{vers}->{$tmp} && last SRC;
-		($tmp = $pkg->{svr}) =~ s{(-\d+)\.\d+\.el\d$}{$1}        && $rpms->{$base}->{vers}->{$tmp} && last SRC;
-		($tmp = $pkg->{svr}) =~ s{\.centos\d$}{}                 && $rpms->{$base}->{vers}->{$tmp} && last SRC;
-		($tmp = $pkg->{svr}) =~ s{\.el\d\.sme$}{}                && $rpms->{$base}->{vers}->{$tmp} && last SRC;
+		# Try to find the name the binary wants (no changes)
+		$rpms->{$base}->{vers}->{$tmp}                       && last SRC;
+
+		# rpmforge (.el4.rf to .rf, with rf,rfb,rft,rfx endings)
+		($tmp = $pkg->{svr}) =~ s{\.el\d(\.rf[btx]?)$}{$1}   && $rpms->{$base}->{vers}->{$tmp} && last SRC;
+		# rpmforge (.el4.rfx to .rf, with rfb,rft,rfx switched to rf)
+		($tmp = $pkg->{svr}) =~ s{\.el\d(\.rf)[btx]$}{$1}    && $rpms->{$base}->{vers}->{$tmp} && last SRC;
+		# rpmforge (.el4.rf to .el5) TODO: remove when no longer needed
+		($tmp = $pkg->{svr}) =~ s{\.el\d\.rf$}{.el5}         && $rpms->{$base}->{vers}->{$tmp} && last SRC;
+		# rpmforge (.2.el4.rf to .rf, minor modification not pushed to source?) TODO: remove when no longer needed
+		($tmp = $pkg->{svr}) =~ s{\.2\.el\d(\.rf)$}{$1}      && $rpms->{$base}->{vers}->{$tmp} && last SRC;
+
+		# atrpms (remove .el4.at)
+		($tmp = $pkg->{svr}) =~ s{\.el\d\.at$}{}             && $rpms->{$base}->{vers}->{$tmp} && last SRC;
+		# atrpms (remove .el4)
+		($tmp = $pkg->{svr}) =~ s{\.el\d$}{}                 && $rpms->{$base}->{vers}->{$tmp} && last SRC;
+		# atrpms (remove .0.el5, minor modification not pushed to source?) TODO: remove when no longer needed
+		($tmp = $pkg->{svr}) =~ s{\.0\.el\d$}{}              && $rpms->{$base}->{vers}->{$tmp} && last SRC;
+
+		# Transformations that we hopefully won't have to use anymore TODO: remove if no issues
+		#($tmp = $pkg->{svr}) =~ s{(\.el\d)\.rf$}{$1}             && $rpms->{$base}->{vers}->{$tmp} && last SRC;
+		#($tmp = $pkg->{svr}) =~ s{(\d+)\.\d+(\.rf)$}{$1$2}       && $rpms->{$base}->{vers}->{$tmp} && last SRC;
+		#($tmp = $pkg->{svr}) =~ s{\.el\d\.rf$}{.dag}             && $rpms->{$base}->{vers}->{$tmp} && last SRC;
+		#($tmp = $pkg->{svr}) =~ s{(\d+)\.\d+\.el\d\.rf$}{$1.dag} && $rpms->{$base}->{vers}->{$tmp} && last SRC;
+		#($tmp = $pkg->{svr}) =~ s{\.el\d_}{_}                    && $rpms->{$base}->{vers}->{$tmp} && last SRC;
+		#($tmp = $pkg->{svr}) =~ s{(-\d+)\.\d+\.el\d$}{$1}        && $rpms->{$base}->{vers}->{$tmp} && last SRC;
+		#($tmp = $pkg->{svr}) =~ s{\.centos\d$}{}                 && $rpms->{$base}->{vers}->{$tmp} && last SRC;
+		#($tmp = $pkg->{svr}) =~ s{\.at$}{}                       && $rpms->{$base}->{vers}->{$tmp} && last SRC;
+		#($tmp = $pkg->{svr}) =~ s{\.el\d\.$disttag$}{            && $rpms->{$base}->{vers}->{$tmp} && last SRC;
 	    }
 	    if ( $rpms->{$base}->{vers}->{$tmp} ) {
 		foreach $tmp ( @{$rpms->{$base}->{vers}->{$tmp}} ) {
@@ -203,20 +218,51 @@ foreach my $smever ( sort { $a <=> $b }
 			    if ($repos->{$cmp->{repo}}->{stage} ) {
 				if ( $seen{$cmp->{nvra}}->{latest} ) {
 				    $seen{$cmp->{nvra}}->{latest}++;
+				    delete $cmp->{delete} if $cmp->{delete};
 				} else {
 				    $cmp->{delete}++;
 				}
-			    } elsif ( $repos->{$cmp->{repo}}->{orig}) {
+			    } elsif ( $repos->{$cmp->{repo}}->{orig} ) {
 				$orig{$cmp->{nvra}}++;
 				unless ( $repos->{$cmp->{repo}}->{base} ) {
-				    my $tag = sprintf '%s%s/%s-%s', $distrepo->{$smever}->{$cmp->{repo}}, $cmp->{name}, $cmp->{ver}, $cmp->{rel};
+				    my $tag = sprintf '%s%s/%s-%s', $distrepo->{$ver}->{$cmp->{repo}}, $cmp->{name}, $cmp->{ver}, $cmp->{rel};
 				    qx(touch $tag/PUSHED) if ! $opts{t} && -d $tag && ! -f "$tag/PUSHED";
 				}
-			    } elsif ( $cmp->{src} && $reposrc{$cmp->{repo}} ) {
-				$reposrc{$cmp->{repo}}->{srpm} = $cmp;
+			    } elsif ( $cmp->{src} ) {
+				if ( $cmp->{delete} && $cmp->{oldrepo} && $reposrc{$cmp->{oldrepo}}) {
+				    $cmp->{repo} = $cmp->{oldrepo};
+				    delete $cmp->{delete};
+				}
+				if ( $reposrc{$cmp->{repo}} ) {
+				    $reposrc{$cmp->{repo}}->{srpm} = $cmp;
+				    $srpm = $cmp if ! $srpm;
+				} elsif ( $seen{$cmp->{nvra}}->{repo} ne $cmp->{repo} && ! $cmp->{done} ) {
+				    $cmp->{delete}++;
+				}
 			    } elsif ( $seen{$cmp->{nvra}}->{repo} ne $cmp->{repo} ) {
 				$cmp->{delete}++;
 			    }
+			} elsif ( $cmp->{src} ) {
+			    if ( $reposrc{$cmp->{repo}} && $reposrc{$cmp->{repo}}->{srpm} && $reposrc{$cmp->{repo}}->{srpm}->{oldrepo} ne $cmp->{repo} ) {
+				$acnt->{$cmp->{repo}}->{$cmp->{rpm}->as_nvre}->{src} = [ 
+				    grep { $_ ne $reposrc{$cmp->{repo}}->{srpm} } @{$acnt->{$cmp->{repo}}->{$cmp->{rpm}->as_nvre}->{src}}
+				];
+
+				if ( @{$reposrc{$cmp->{repo}}->{srpm}->{repos}} == 1 ) {
+				    $reposrc{$cmp->{repo}}->{srpm}->{repo} = $reposrc{$cmp->{repo}}->{srpm}->{oldrepo};
+				    delete $reposrc{$cmp->{repo}}->{srpm}->{oldrepo};
+				    delete $reposrc{$cmp->{repo}}->{srpm}->{delete};
+				    delete $reposrc{$cmp->{repo}}->{srpm}->{repos};
+				    delete $reposrc{$cmp->{repo}}->{srpm}->{done};
+				    $seen{$cmp->{nvra}} = $cmp if $seen{$cmp->{nvra}} eq $reposrc{$cmp->{repo}}->{srpm};
+				} else {
+				    warn "How did I get here??";
+				}
+			    } else {
+				$seen{$cmp->{nvra}} = $cmp if $seen{$cmp->{nvra}}->{repo} ne $cmp->{repo};
+			    }
+			    $srpm = $cmp if ! $srpm && $cmp->{src};
+			    $reposrc{$cmp->{repo}}->{srpm} = $cmp if $reposrc{$cmp->{repo}};
 			}
 		    } elsif ($repos->{$cmp->{repo}}->{stage} ) {
 			$cmp->{delete}++;
@@ -230,7 +276,7 @@ foreach my $smever ( sort { $a <=> $b }
 			    if ( $repos->{$cmp->{repo}}->{orig} ) {
 				$orig{$cmp->{nvra}}++;
 				unless ( $repos->{$cmp->{repo}}->{base} ) {
-				    my $tag = sprintf '%s%s/%s-%s', $distrepo->{$smever}->{$cmp->{repo}}, $cmp->{name}, $cmp->{ver}, $cmp->{rel};
+				    my $tag = sprintf '%s%s/%s-%s', $distrepo->{$ver}->{$cmp->{repo}}, $cmp->{name}, $cmp->{ver}, $cmp->{rel};
 				    qx(touch $tag/PUSHED) if ! $opts{t} && -d $tag && ! -f "$tag/PUSHED";
 				}
 			    } elsif ( $cmp->{src} && $reposrc{$cmp->{repo}} ) {
@@ -264,20 +310,18 @@ foreach my $smever ( sort { $a <=> $b }
 			    my $dest = $repos->{$track{repo}}->{prio} > $repos->{$devel2}->{prio} ? $track{repo} : $devel2;
 			    $dest = pkgdest($cmp, $devel1, $dest, $rpms->{$base}->{rpms});
 			    $dest = $devel1 if verrel($cmp, $dest, \%counts);
-			    if ( $cmp->{src} && ! $reposrc{$dest} ) {
-				$cmp->{delete}++;
-			    } elsif ( $repos->{$dest}->{prio} >= $repos->{$track{repo}}->{prio} && ! verrel($cmp, $dest, \%counts) ) {
-				unless ( $repos->{$cmp->{repo}}->{base} ) {
-				    my $tag = sprintf '%s%s/%s-%s', $distrepo->{$smever}->{$cmp->{repo}}, $cmp->{name}, $cmp->{ver}, $cmp->{rel};
-				    qx(touch $tag/PUSHED) if ! $opts{t} && -d $tag && ! -f "$tag/PUSHED";
+			    unless ( $cmp->{src} && ! $reposrc{$dest} ) {
+				if ( $repos->{$dest}->{prio} >= $repos->{$track{repo}}->{prio} && ! verrel($cmp, $dest, \%counts) ) {
+				    unless ( $repos->{$cmp->{repo}}->{base} ) {
+					my $tag = sprintf '%s%s/%s-%s', $distrepo->{$ver}->{$cmp->{repo}}, $cmp->{name}, $cmp->{ver}, $cmp->{rel};
+					qx(touch $tag/PUSHED) if ! $opts{t} && -d $tag && ! -f "$tag/PUSHED";
+				    }
+				    push @{$cmp->{repos}}, $dest;
+				    $cmp->{oldrepo} = $cmp->{repo} unless $cmp->{oldrepo};
+				    $cmp->{repo} = $dest;
+				    $reposrc{$cmp->{repo}}->{srpm} = $cmp if $cmp->{src};
+				    $orig{$cmp->{nvra}}++;
 				}
-				push @{$cmp->{repos}}, $dest;
-				$cmp->{oldrepo} = $cmp->{repo} unless $cmp->{oldrepo};
-				$cmp->{repo} = $dest;
-				$reposrc{$cmp->{repo}}->{srpm} = $cmp if $cmp->{src};
-				$orig{$cmp->{nvra}}++;
-			    } else {
-				$cmp->{delete}++;
 			    }
 			} else {
 			    $cmp->{delete}++;
@@ -288,11 +332,11 @@ foreach my $smever ( sort { $a <=> $b }
 		    $pkgs{$cmp->{nvra}}++;
 		    $latest{$cmp->{base}} = $cmp->{svr} if $repos->{$cmp->{repo}}->{inc} && ! $latest{$cmp->{base}};
 		    $reposrc{$cmp->{repo}} = $cmp unless $reposrc{$cmp->{repo}} || $cmp->{src} || $repos->{$cmp->{repo}}->{stage};
-		    unless ( $seen{$cmp->{nvra}} ) {
-			$seen{$cmp->{nvra}} = $cmp;
-			$cmp->{latest}++ if $latest{$cmp->{base}} && $cmp->{svr} eq $latest{$cmp->{base}} && $repos->{$cmp->{repo}}->{inc};
+		    if ( $latest{$cmp->{base}} && $cmp->{svr} eq $latest{$cmp->{base}} && $repos->{$cmp->{repo}}->{inc} ) {
+			$cmp->{latest}++ if ! $seen{$cmp->{nvra}} || $cmp->{src};
 		    }
-		    push @{$acnt->{$cmp->{repo}}->{$cmp->{rpm}->as_nvre}->{$cmp->{src} ? 'src' : $cmp->{rpm}->arch}}, $cmp;
+		    $seen{$cmp->{nvra}} = $cmp unless $seen{$cmp->{nvra}};
+		    push @{$acnt->{$cmp->{repo}}->{$cmp->{rpm}->as_nvre}->{$cmp->{src} ? 'src' : $cmp->{rpm}->arch}}, $cmp unless $cmp->{done};
 		}
 		$cmp->{done}++;
 	    }
@@ -306,9 +350,9 @@ foreach my $smever ( sort { $a <=> $b }
 		    }
 		}
 	    } elsif ( scalar keys %pkgs && $opts{s} ) {
-		print "\n * missing source (sme$smever, ", $pkg->{repo}, ", ", $pkg->{svr}, ")\n";
+		print "\n * missing source ($disttag$ver, ", $pkg->{repo}, ", ", $pkg->{svr}, ")\n";
 	    }
-	    print "\n * missing originals (sme$smever, ", $pkg->{repo}, ", ", $pkg->{svr}, ")\n" if $opts{o} && scalar keys %orig != scalar keys %pkgs;
+	    print "\n * missing originals ($disttag$ver, ", $pkg->{repo}, ", ", $pkg->{svr}, ")\n" if $opts{o} && scalar keys %orig != scalar keys %pkgs;
 	}
 
 	foreach my $r ( keys %$acnt ) {
@@ -329,12 +373,14 @@ foreach my $smever ( sort { $a <=> $b }
 
 	foreach my $pkg ( sort { $a->{nvra} cmp $b->{nvra} } @{$rpms->{$base}->{rpms}} ) {
 	    if ( $pkg->{latest} && $pkg->{latest} == 1 ) {
-		$pkg->{oldrepo} = $pkg->{repo} unless $pkg->{oldrepo};
-		$pkg->{repo} = $stage;
-		push @{$pkg->{repos}}, $stage;
+		unless ( grep { $_->{rpm} eq $pkg->{rpm} && $_->{repo} eq $stage } @{$rpms->{$base}->{rpms}} ) {
+		    $pkg->{oldrepo} = $pkg->{repo} unless $pkg->{oldrepo};
+		    $pkg->{repo} = $stage;
+		    push @{$pkg->{repos}}, $stage;
+		}
 	    }
 	    if ( ! $print && ($pkg->{delete} || $pkg->{repos} || $pkg->{nosig} ) ) {
-		print "\n$base (sme$smever)\n", "=" x length("$base (sme$smever)"), "\n";
+		print "\n$base ($disttag$ver)\n", "=" x length("$base ($disttag$ver)"), "\n";
 		$print++;
 	    }
 
@@ -365,9 +411,9 @@ foreach my $smever ( sort { $a <=> $b }
 		    $pkg->{oldrepo} = $repo unless $pkg->{oldrepo} eq ${$pkg->{repos}}[0];
 
 		    my @d = ();
-		    my $head = $distrepo->{$smever}->{repo} . $repo . '/';
-		    $head = $distrepo->{$smever}->{stage} if $repos->{$repo}->{stage};
-		    my $tail = $repos->{$repo}->{os} ? 'SME/' . $distrepo->{$smever}->{os} : 'RPMS/';
+		    my $head = $distrepo->{$ver}->{repo} . $repo . '/';
+		    $head = $distrepo->{$ver}->{stage} if $repos->{$repo}->{stage};
+		    my $tail = $repos->{$repo}->{os} ? "$osdir/" . $distrepo->{$ver}->{os} : 'RPMS/';
 		    if ( $pkg->{src} ) {
 			push @d, "${head}SRPMS/" . basename($pkg->{rpm}->filename);
 		    } elsif ( $pkg->{rpm}->arch eq 'noarch' ) {
@@ -388,37 +434,64 @@ foreach my $smever ( sort { $a <=> $b }
 		qx(rm -f $src) unless $opts{t};
 		$repochg{$pkg->{repo}}++ unless $repos->{$pkg->{repo}}->{base} || $repos->{$pkg->{repo}}->{stage};
 		if ( $repos->{$pkg->{repo}}->{orig} && ! $repos->{$pkg->{repo}}->{base} ) {
-		    my $tag = sprintf '%s%s/%s-%s', $distrepo->{$smever}->{$pkg->{repo}}, $pkg->{name}, $pkg->{ver}, $pkg->{rel};
+		    my $tag = sprintf '%s%s/%s-%s', $distrepo->{$ver}->{$pkg->{repo}}, $pkg->{name}, $pkg->{ver}, $pkg->{rel};
 		    qx(rm -f $tag/PUSHED) if ! $opts{t} && -d $tag && -f "$tag/PUSHED";
 		}
 	    }
 	}
+
+	if ( $rpms->{$base}->{srpms} ) {
+	    foreach my $pkg ( sort { $b->{rpm} cmp $a->{rpm} } @{$rpms->{$base}->{srpms}} ) {
+		next if $pkg->{done} || $repos->{$pkg->{repo}}->{orig} || $repos->{$pkg->{repo}}->{base};
+		$pkg->{delete}++;
+		my $src = $pkg->{rpm}->filename;
+		if ( ! $print && ($pkg->{delete} || $pkg->{repos} || $pkg->{nosig} ) ) {
+		    print "\n$base ($disttag$ver)\n", "=" x length("$base ($disttag$ver)"), "\n";
+		    $print++;
+		}
+		print "delete from ", $pkg->{repo}, " (", $pkg->{arch}, ", ", basename($pkg->{rpm}->filename), ")\n";
+		qx(rm -f $src) unless $opts{t};
+		$repochg{$pkg->{repo}}++ unless $repos->{$pkg->{repo}}->{base} || $repos->{$pkg->{repo}}->{stage};
+	    }
+	}
     }
 
     if ( %repochg ) {
-	print "\nrebuild repo (sme$smever)\n", "=" x length("rebuild repo (sme$smever)"), "\n";
+	print "\nrebuild repo ($disttag$ver)\n", "=" x length("rebuild repo ($disttag$ver)"), "\n";
     }
     foreach my $repo ( sort { $repos->{$b}->{prio} <=> $repos->{$a}->{prio} } keys %repochg ) {
 	next if $repos->{$repo}->{orig} || $repos->{$repo}->{stage};
 	foreach my $arch ( @archs ) {
-	    my $dir = $distrepo->{$smever}->{repo} . "$repo/$arch";
+	    my $dir = $distrepo->{$ver}->{repo} . "$repo/$arch";
 	    $dir = qx(readlink -f $dir);
 	    chomp $dir;
 	    print "rebuild $repo/$arch\n";
 	    unless ( $opts{t} ) {
-		if ( -f "$dir/repodata/comps.xml" ) {
-		    qx(createrepo -g repodata/comps.xml $dir);
+		if ( $dir =~ m{test/|-testing/} ) {
+		    if ( -f "$dir/repodata/comps.xml" ) {
+			qx(createrepo --update --database --exclude *smeserver-release*.rpm --exclude *.src.rpm --exclude *-debuginfo-*.rpm --groupfile repodata/comps.xml $dir);
+		    } else {
+			qx(createrepo --update --database --exclude *smeserver-release*.rpm --exclude *.src.rpm --exclude *-debuginfo-*.rpm $dir);
+		    }
 		} else {
-		    qx(createrepo $dir);
+		    if ( -f "$dir/repodata/comps.xml" ) {
+			qx(createrepo --update --database --exclude *.src.rpm --exclude *-debuginfo-*.rpm --groupfile repodata/comps.xml $dir);
+		    } else {
+			qx(createrepo --update --database --exclude *.src.rpm --exclude *-debuginfo-*.rpm $dir);
+		    }
 		}
 		qx(repoview $dir);
 		qx(rm -rf $dir/.olddata) if -d "$dir/.olddata";
 		qx(rm -rf $dir/.repodata) if -d "$dir/.repodata";
+		qx(rm -rf $dir/repodata/index.html) if -f "$dir/repodata/index.html";
+		qx(rm -rf $dir/repodata/update-info) if -d "$dir/repodata/update-info";
+		qx(rm -rf $dir/repodata/repoview) if -d "$dir/repodata/repoview";
 	    }
 	}
     }
     unless ( $opts{t} ) {
-	finddepth(sub{rmdir}, $distrepo->{$smever}->{$_}) foreach ('builds','contribs');
+	finddepth(sub{rmdir}, $distrepo->{$ver}->{builds}) if -d "$distrepo->{$ver}->{builds}";
+	finddepth(sub{rmdir}, $distrepo->{$ver}->{community}) if -d "$distrepo->{$ver}->{community}";
     }
 }
 
@@ -455,7 +528,7 @@ sub pkgdest {
 
 sub process_rpm {
     my $rpm = shift;
-    my $smever = shift;
+    my $ver = shift;
     my $repo = shift;
     return unless $rpm =~ m{/([^/]*)-[^-]+-[^-]+\.\w+\.rpm$};
     my $base = $1;
@@ -474,7 +547,7 @@ sub process_rpm {
 	return if $repos->{$cmp->{repo}}->{base} && $repos->{$cmp->{repo}}->{prio} > $repos->{$repo}->{prio} && $pkg ge $cmp->{rpm};
     }
     my ($src, $version, $release) = ($pkg->is_source_package ? $pkg->filename : $pkg->sourcerpm) =~ m{(?:^|/)([^/]*)-([^-]+)-([^-]+)\.\w+\.rpm$};
-    return if $skippkg->{$smever}->{$repo} && ( $skippkg->{$smever}->{$repo}->{$src} || $skippkg->{$smever}->{$repo}->{$pkg->name} );
+    return if $skippkg->{$ver}->{$repo} && ( $skippkg->{$ver}->{$repo}->{$src} || $skippkg->{$ver}->{$repo}->{$pkg->name} );
     return if $repos->{$repo}->{base} && $nosig;
     if ( $nosig && ! -f "$HOME/.rpmpass" ) { print " * missing signature (" .$pkg->filename . ")\n"; return; }
     my $arch = 'unknown';