- Timestamp:
- 12/04/12 17:04:26 (12 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/debbuild
r175 r176 1567 1567 my %reqs; 1568 1568 my $reqlibs = ''; 1569 my %reqliblist; 1569 1570 1570 1571 foreach (@reqlist) { … … 1575 1576 next if /linux-vdso.so/; # More kernel hackery. Whee! 1576 1577 1578 # Whee! more hackery to detect provided-here libs. Some apparently return from ldd as "not found". 1579 my ($a,$b) = split / => /; 1580 $a =~ s/\s*//g; 1581 if ($b =~ /not found/) { 1582 next if qx { find $specglobals{buildroot} -name "*$a" }; 1583 } 1584 1577 1585 my ($req) = (m|=\>\s+([a-zA-Z0-9._/+-]+)|); # dig out the actual library (so)name. 1578 1586 # And feh, we need the *path*, since I've discovered a new edge case where … … 1586 1594 1587 1595 $reqlibs .= " $req"; 1596 $reqliblist{$req} = 1; 1588 1597 } 1589 1598 1590 if ($reqlibs ne '') { 1591 foreach (qx { dpkg -S $reqlibs }) { 1592 my ($libpkg,undef) = split /:/; 1599 if (%reqliblist) { 1600 foreach my $rlib (keys %reqliblist) { 1601 my $libpkg = qx { dpkg -S $rlib }; 1602 ($libpkg,undef) = split /:/, $libpkg; 1593 1603 $reqs{$libpkg} = 1; 1594 1604 }
Note:
See TracChangeset
for help on using the changeset viewer.