#!/usr/local/bin/perl -w-- # -*- perl -*-
#
# $Id: find_library_names,v 1.2 1994/09/10 18:14:48 qjb Exp $
# $Source: /home/qjb/scripts/RCS/find_library_names,v $
# $Author: qjb $
#
# Given a program name, -L arguments, and -l arguments, generate
# a dependency on libraries suitable for appending to a makefile
# generated by imake
#

# This code, from the perl manual page, forces this to be run by perl from 
# perl, sh, or csh.  It must be first.
eval '(exit $?0)' && eval 'exec /usr/local/bin/perl -S $0 ${1+"$@"}'
& eval 'exec /usr/local/bin/perl -S $0 $argv:q'
    if 0;

$whoami = ($0 =~ m,([^/]*)$,) ? $1 : $0;

@libraries = ();
@loadpath = ();
@libfiles = ();

&usage if (scalar(@ARGV) < 1);

for (@ARGV)
{
    (s/^-L//) && push(@loadpath, $_);
    (s/^-l//) && push(@libraries, "lib$_.a");
}

foreach $lib (@libraries)
{
    foreach $dir (@loadpath)
    {
	if (-f "$dir/$lib")
	{
	    push(@libfiles, "$dir/$lib");
	}
    }
}

if (scalar(@libfiles) > 0)
{
    for (@libfiles)
    {
	print "$_\n";
    }
}

exit 0;

sub usage
{
    print STDERR "Usage: $whoami -L... -l...\n";
    exit(1);
}