output stuff closer to what's needed for Makefiles...

This commit is contained in:
espie 2010-06-28 11:24:01 +00:00
parent 7c503fca0a
commit 8e755d35c1

View File

@ -1,5 +1,5 @@
#! /usr/bin/perl #! /usr/bin/perl
# $OpenBSD: make-plist,v 1.148 2010/06/25 12:02:18 espie Exp $ # $OpenBSD: make-plist,v 1.149 2010/06/28 11:24:01 espie Exp $
# Copyright (c) 2004-2008 Marc Espie <espie@openbsd.org> # Copyright (c) 2004-2008 Marc Espie <espie@openbsd.org>
# #
# Permission to use, copy, modify, and distribute this software for any # Permission to use, copy, modify, and distribute this software for any
@ -80,14 +80,19 @@ sub reverse
return $_; return $_;
} }
my $first_warn = 1;
sub reverse_with_lib sub reverse_with_lib
{ {
my ($self, $_) = @_; my ($self, $_) = @_;
if (m/^(.*?)lib([^\/]+)\.so\.(\d+\.\d+)$/) { if (m/^(.*?)lib([^\/]+)\.so\.(\d+\.\d+)$/) {
my ($path, $name, $version) = ($1, $2, $3); my ($path, $name, $version) = ($1, $2, $3);
if (!defined $self->{l}->{$name}) { if (!defined $self->{l}->{$name}) {
print STDERR "WARNING: unregistered shared lib: $name " if ($first_warn) {
. "(version: $version)\n"; print STDERR "WARNING: unregistered shared lib(s)\n";
$first_warn = 0;
}
print STDERR "SHARED_LIBS +=\t$name ",
' 'x (25-length($name)), "0.0 # $version\n";
$self->{l}->{$name} = $version; $self->{l}->{$name} = $version;
} elsif ($self->{l}->{$name} ne $version) { } elsif ($self->{l}->{$name} ne $version) {
print STDERR "WARNING: version mismatch for lib: $name " print STDERR "WARNING: version mismatch for lib: $name "