diff options
author | Thierry Vignaud <tv@mageia.org> | 2012-12-03 02:20:35 +0000 |
---|---|---|
committer | Thierry Vignaud <tv@mageia.org> | 2012-12-03 02:20:35 +0000 |
commit | df8e76366d77c877391c667b811d720568c768f6 (patch) | |
tree | e0f693d12fdaa9f1d5a30a763cce9bdcc8181fce /URPM.pm | |
parent | 0c7a3cdf3e37b2855e16364c10e6c7d1f8b69a64 (diff) | |
download | perl-URPM-df8e76366d77c877391c667b811d720568c768f6.tar perl-URPM-df8e76366d77c877391c667b811d720568c768f6.tar.gz perl-URPM-df8e76366d77c877391c667b811d720568c768f6.tar.bz2 perl-URPM-df8e76366d77c877391c667b811d720568c768f6.tar.xz perl-URPM-df8e76366d77c877391c667b811d720568c768f6.zip |
(Db_traverse_tag_find) fix a rare segfault
found accidently
could be triggered by the following (calling enough times either
requires() or provides() while traversing rpm db) which resulting in
an "Invalid read of size 8":
use URPM;
my $db = URPM::DB::open()->traverse_tag_find('whatprovides', 'kernel',
sub {
my ($p) = @_;
warn $p->requires, $p->requires, $p->requires, $p->requires, $p->requires,
$p->requires, $p->requires, $p->requires, $p->requires, $p->requires, $p->requires,
$p->requires, $p->requires, $p->requires, $p->requires, $p->requires, $p->requires;
return 1;
});
bug introduced in commit r4947 on June 14 2012:
"(_run_cb_while_traversing) introduce this helper"
Diffstat (limited to 'URPM.pm')
0 files changed, 0 insertions, 0 deletions