diff options
Diffstat (limited to 'make')
| -rw-r--r-- | make/utilities.pm | 86 |
1 files changed, 86 insertions, 0 deletions
diff --git a/make/utilities.pm b/make/utilities.pm new file mode 100644 index 000000000..a7e0eb794 --- /dev/null +++ b/make/utilities.pm @@ -0,0 +1,86 @@ +package make::utilities; +use Exporter 'import'; +@EXPORT = qw(make_rpath pkgconfig_get_include_dirs pkgconfig_get_lib_dirs); + +# Parse the output of a *_config program, +# such as pcre_config, take out the -L +# directive and return an rpath for it. + +sub make_rpath($) +{ + my ($executable) = @_; + $data = `$executable`; + $data =~ /-L(\S+)\s/; + $libpath = $1; + return "-Wl,--rpath -Wl,$libpath"; +} + +sub extend_pkg_path() +{ + if (!exists $ENV{PKG_CONFIG_PATH}) + { + $ENV{PKG_CONFIG_PATH} = "/usr/lib/pkgconfig:/usr/local/lib/pkgconfig:/usr/local/libdata/pkgconfig:/usr/X11R6/libdata/pkgconfig"; + } + else + { + $ENV{PKG_CONFIG_PATH} .= ":/usr/local/lib/pkgconfig:/usr/local/libdata/pkgconfig:/usr/X11R6/libdata/pkgconfig"; + } +} + +sub pkgconfig_get_include_dirs($$$) +{ + my ($packagename, $headername, $defaults) = @_; + extend_pkg_path(); + + $ret = `pkg-config --cflags $packagename 2>/dev/null`; + if ((!defined $ret) || ($ret eq "")) + { + $foo = `locate "$headername" | head -n 1`; + $foo =~ /(.+)\Q$headername\E/; + if (defined $1) + { + $foo = "-I$1"; + } + else + { + $foo = ""; + } + $ret = "$foo"; + } + if (($defaults ne "") && (($ret eq "") || (!defined $ret))) + { + $ret = "$foo " . $defaults; + } + return $ret; +} + +sub pkgconfig_get_lib_dirs($$$) +{ + my ($packagename, $libname, $defaults) = @_; + extend_pkg_path(); + + $ret = `pkg-config --libs $packagename 2>/dev/null`; + if ((!defined $ret) || ($ret eq "")) + { + $foo = `locate "$libname" | head -n 1`; + $foo =~ /(.+)\Q$libname\E/; + if (defined $1) + { + $foo = "-L$1"; + } + else + { + $foo = ""; + } + $ret = "$foo"; + } + + if (($defaults ne "") && (($ret eq "") || (!defined $ret))) + { + $ret = "$foo " . $defaults; + } + return $ret; +} + +1; + |