Disable shared linkage

PLplot build currently only supports building one of shared or static linkage, not both.
PDLPorters · Sep 28, 2021 · 571431e · 571431e
1 parent 1036bef
commit 571431e
Show file tree

Hide file tree

Showing 3 changed files with 53 additions and 34 deletions.
diff --git a/alienfile b/alienfile
@@ -41,6 +41,9 @@ share {
 				? ( '-DPKG_CONFIG_EXECUTABLE=' . File::Which::which('pkg-config'), )
 				: ()
 			),
+			qw(
+				-DBUILD_SHARED_LIBS=OFF
+			),
 			@{ meta->prop->{plugin_build_cmake}->{args} },
 			'%{.install.extract}'
 		],

diff --git a/t/basic.t b/t/basic.t
@@ -3,26 +3,10 @@ use Test::Alien;
 use Test::Alien::Diag;
 use Alien::PLplot;
 
-use Env qw(@LD_LIBRARY_PATH @DYLD_FALLBACK_LIBRARY_PATH @PATH);
-use DynaLoader;
-use File::Basename qw(dirname);
 
 alien_diag 'Alien::PLplot';
 alien_ok 'Alien::PLplot';
 
-if( Alien::PLplot->install_type('share') ) {
-	my $rpath = dirname( ( Alien::PLplot->dynamic_libs )[0] );
-	unshift @LD_LIBRARY_PATH, $rpath;
-	unshift @DYLD_FALLBACK_LIBRARY_PATH, $rpath;
-	unshift @PATH, $rpath;
-	unshift @DynaLoader::dl_library_path, $rpath;
-	# load shared object dependencies
-	for my $lib ( qw(-lcsirocsa -lqsastime -lplplot) ) {
-		my @files = DynaLoader::dl_findfile($lib);
-		DynaLoader::dl_load_file($files[0]) if @files;
-	}
-}
-
 my $version_re = qr/^(\d+)\.(\d+)\.(\d+)$/;
 
 my $xs = do { local $/; <DATA> };
@@ -31,24 +15,6 @@ xs_ok $xs, with_subtest {
 	like $module->version, $version_re;
 };
 
-ffi_ok { symbols => ['c_plgver'] }, with_subtest {
-	my ($ffi) = @_;
-	eval q{
-		use FFI::Platypus::Memory qw( malloc free );
-		use FFI::Platypus::Buffer qw( scalar_to_buffer );
-		1; } or skip "$@";
-	my $get_version = $ffi->function( c_plgver => ['opaque'] => 'void' );
-
-	my $buffer = malloc(80);
-	$get_version->call($buffer);
-	my $version = $ffi->cast( 'opaque' => 'string', $buffer );
-
-	note "version: $version";
-	like $version, $version_re;
-
-	free($buffer);
-};
-
 done_testing;
 __DATA__
 #include "EXTERN.h"

diff --git a/t/ffi.t b/t/ffi.t
@@ -0,0 +1,50 @@
+use Test2::V0;
+use Test::Alien;
+use Alien::PLplot;
+
+use Env qw(@LD_LIBRARY_PATH @DYLD_FALLBACK_LIBRARY_PATH @PATH);
+use DynaLoader;
+use File::Basename qw(dirname);
+
+if( Alien::PLplot->install_type('share') ) {
+	if( Alien::PLplot->dynamic_libs ) {
+		my $rpath = dirname( ( Alien::PLplot->dynamic_libs )[0] );
+		unshift @LD_LIBRARY_PATH, $rpath;
+		unshift @DYLD_FALLBACK_LIBRARY_PATH, $rpath;
+		unshift @PATH, $rpath;
+		unshift @DynaLoader::dl_library_path, $rpath;
+		# load shared object dependencies
+		for my $lib ( qw(-lcsirocsa -lqsastime -lplplot) ) {
+			my @files = DynaLoader::dl_findfile($lib);
+			DynaLoader::dl_load_file($files[0]) if @files;
+		}
+	} else {
+		plan skip_all => 'share install does not support dynamic linkage';
+	}
+
+}
+
+alien_ok 'Alien::PLplot';
+
+my $version_re = qr/^(\d+)\.(\d+)\.(\d+)$/;
+
+ffi_ok { symbols => ['c_plgver'] }, with_subtest {
+	my ($ffi) = @_;
+	eval q{
+		use FFI::Platypus::Memory qw( malloc free );
+		use FFI::Platypus::Buffer qw( scalar_to_buffer );
+		1; } or skip "$@";
+	my $get_version = $ffi->function( c_plgver => ['opaque'] => 'void' );
+
+	my $buffer = malloc(80);
+	$get_version->call($buffer);
+	my $version = $ffi->cast( 'opaque' => 'string', $buffer );
+
+	note "version: $version";
+	like $version, $version_re;
+
+	free($buffer);
+};
+
+
+done_testing;