From: Michal Vaner <vorner@ucw.cz>
Date: Sun, 9 Nov 2008 18:05:42 +0000 (+0100)
Subject: Configure module to find the build system
X-Git-Tag: holmes-import~174
X-Git-Url: http://mj.ucw.cz/gitweb/?a=commitdiff_plain;h=164a0b401634867898318393df50f4e33ef0003c;p=libucw.git

Configure module to find the build system
---

diff --git a/ucw/perl/UCW/Configure/Build.pm b/ucw/perl/UCW/Configure/Build.pm
new file mode 100644
index 00000000..0d6f9d26
--- /dev/null
+++ b/ucw/perl/UCW/Configure/Build.pm
@@ -0,0 +1,26 @@
+# UCW Library configuration system: find UCW build system
+# (c) 2008 Michal Vaner <vorner@ucw.cz>
+
+# This module asks pkg-config for a path to UCW build system
+# and sets propper variables for it (or fails, as it is expected
+# the build system is crucial).
+
+package UCW::Configure::Build;
+use UCW::Configure;
+
+use strict;
+use warnings;
+
+if (!IsGiven("BUILDSYS_PATH")) {
+	Test("BUILDSYS_PATH", "Looking for UCW build system", sub {
+		my $path=`pkg-config libucw --variable=build_system`;
+		if($? || not defined $path) {
+			Fail("Not found (is libUCW installed and PKG_CONFIG_PATH set?)");
+		}
+		chomp $path;
+		return $path;
+	});
+}
+
+# We succeeded
+1;
diff --git a/ucw/perl/UCW/Configure/Makefile b/ucw/perl/UCW/Configure/Makefile
index 43ed4c3b..49679d3d 100644
--- a/ucw/perl/UCW/Configure/Makefile
+++ b/ucw/perl/UCW/Configure/Makefile
@@ -2,7 +2,7 @@
 
 DIRS+=ucw/perl/UCW/Configure
 EXTRA_RUNDIRS+=lib/perl5/UCW/Configure
-UCW_CONFIGURE_PERL_MODULES=$(addsuffix .pm, C Doc Paths Pkg)
+UCW_CONFIGURE_PERL_MODULES=$(addsuffix .pm, C Doc Paths Pkg Build)
 CONFIGURE_MODULES=$(addprefix $(o)/ucw/perl/UCW/Configure/,$(UCW_CONFIGURE_PERL_MODULES))
 PROGS+=$(CONFIGURE_MODULES)