Tom de Vries
825cf5a5da
* Remove python2 related PR29245 kfail. * Remove PR30518 kfail. * Remove yama ptrace_scope == 1 kfails. * Remove PR28065 kfail. - Patches added (swo#32081): * gdb-symtab-return-correct-reader-for-top-level-cu-in.patch - Add "BuildRequires: aaa_base-yama-enable-ptrace" on tumbleweed. - Maintenance script qa-local.sh: * Add SLFO and Leap 15.6, drop Leap 15.3 and 15.4 and ALP. OBS-URL: https://build.opensuse.org/package/show/devel:gcc/gdb?expand=0&rev=394
75 lines
1.8 KiB
Perl
75 lines
1.8 KiB
Perl
#!/usr/bin/perl
|
|
|
|
die "need gdb-Fedora directory" unless -d $ARGV[0];
|
|
|
|
my $gdbFedora = $ARGV[0];
|
|
my $dir = `pwd`;
|
|
chomp($dir);
|
|
|
|
system "rm \$(grep \"^Patch[0-9]\\{1,3\\}:\" gdb.spec | awk '{print \$2}') 2>/dev/null";
|
|
system "rm *.tar.bz2";
|
|
system "cp -p $gdbFedora/*.tar.bz2 ./";
|
|
system "pushd $gdbFedora ; sh $dir/patchname_get.sh -v gdb.spec 2>$dir/test.txt; popd";
|
|
system "grep \"^Patch\" test.txt > test2.txt";
|
|
|
|
my @patchliste = `cat test2.txt`;
|
|
my @patchdeklarationen = ();
|
|
my @patchstatements = ();
|
|
my %seenpatches = ();
|
|
my $blockcounter = 0;
|
|
my @patchcopy = ();
|
|
|
|
foreach my $line (@patchliste) {
|
|
chomp($line);
|
|
if ($line =~ /\((.*)\)/) {
|
|
$patchname = $1;
|
|
if (exists $seenpatches{$patchname}){
|
|
my $oldcount = $seenpatches{$patchname};
|
|
push @patchstatements, "%patch$oldcount -p1 -R\n";
|
|
}
|
|
else {
|
|
$count = $count + 1;
|
|
push @patchdeklarationen, "Patch$count: ". (($count < 10) ? " " : (($count < 100) ? " " : "")) ."$patchname\n";
|
|
push @patchstatements, "%patch$count -p1\n";
|
|
$seenpatches{$patchname} = $count;
|
|
push @patchcopy, $patchname;
|
|
}
|
|
}
|
|
}
|
|
|
|
foreach my $copy (@patchcopy) {
|
|
system "cp \"$gdbFedora/$copy\" ./";
|
|
}
|
|
|
|
open F, ">gdb.spec.new";
|
|
foreach my $line (`cat gdb.spec`) {
|
|
if ($line eq "#Fedora Packages begin\n") {
|
|
print F $line;
|
|
$blockcounter = 1;
|
|
}
|
|
elsif ($line eq "#Fedora Packages end\n") {
|
|
$blockcounter = 0;
|
|
}
|
|
elsif($line eq "#Fedora patching start\n") {
|
|
print F $line;
|
|
$blockcounter = 3;
|
|
}
|
|
elsif($line eq "#Fedora patching end\n") {
|
|
$blockcounter = 0;
|
|
}
|
|
if ($blockcounter == 0){
|
|
print F $line;
|
|
} elsif ($blockcounter == 1) {
|
|
print F @patchdeklarationen;
|
|
$blockcounter = 2;
|
|
} elsif ($blockcounter == 3) {
|
|
print F @patchstatements;
|
|
$blockcounter = 4;
|
|
}
|
|
}
|
|
close F;
|
|
|
|
system "mv gdb.spec.new gdb.spec";
|
|
system "rm test.txt test2.txt";
|
|
system "osc addremove";
|