1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
|
use strict;
use warnings;
use PDL::Core::Dev; # Pick up development utilities
use ExtUtils::MakeMaker;
use Config;
## Search for hdf5 library and include file
$ENV{HDF5_PATH} ||= '';
sub macos_get_lib_path {
return if $^O ne 'darwin';
my $pref = `brew --prefix hdf5`;
return if !$pref;
chomp $pref;
"$pref/lib";
}
sub get_lib_paths {
permutate(grep $_, (
macos_get_lib_path(),
$ENV{HDF5_PATH}."/lib",
$ENV{HDF5_PATH}."/lib64",
$ENV{HDF5_LIBDIR},
split(/ /, $Config{libpth}), # TODO: This will break for paths with spaces
'/usr/local/hdf5/lib',
'/usr/local/lib',
'/opt/local/lib',
'/usr/lib',
'/opt/lib',
'/usr/lib64',
split(":",$ENV{LD_LIBRARY_PATH}||''),
));
}
sub permutate {
(
@_,
(map "$_/serial", @_),
(map "$_/hdf5/serial", @_),
);
}
my @lib_base = qw(hdf5 hdf5_serial);
my ($hdf5_lib_path, $hdf5_lib_base);
DIR: foreach my $libdir ( get_lib_paths() ) {
for my $extension (".$Config{dlext}", $Config{_a}, ".dll.a") {
for my $base (@lib_base) {
my $shortfile = "lib$base$extension";
my $file = "$libdir/$shortfile";
next if !-e $file;
$hdf5_lib_path = $libdir;
$hdf5_lib_base = $base;
print "Found $shortfile at $file\n";
last DIR;
}
}
}
# We don't do a die here, because we would get bogus emails from CPAN testers
unless(defined ($hdf5_lib_path) ){
print "####### Cannot find hdf5 library, libhdf5.so or libhdf5.a.
####### Please add the correct library path to Makefile.PL or install HDF\n";
exit();
}
my $hdf5_include_path;
foreach my $incdir (
permutate($Config{usrinc}),
(map { my $s = $_; $s =~ s/\/lib[^\/]*/\/include/; $s } get_lib_paths()),
) {
my $shortfile = "hdf5.h";
my $file = "$incdir/$shortfile";
if (-e $file) {
$hdf5_include_path = $incdir;
print "Found $shortfile at $file\n";
last;
}
}
# We don't do a die here, because we would get bogus emails from CPAN testers
unless ( defined ($hdf5_include_path) ){
print "####### Cannot find hdf5 header file, hdf5.h.
####### Please add the correct include path to Makefile.PL or install HDF5\n";
exit();
}
# Flags to include jpeg and/or zlib during compilation
my $jpegLib = 0;
my $zLib = 0;
if( -e "$hdf5_include_path/H5config.h"){
open( H5CONFIG, "$hdf5_include_path/H5config.h") or
die("Can't Open Include File '$hdf5_include_path/H5config.h'\n");
while(defined( $_ = <H5CONFIG>)){
$jpegLib = 1 if( /^\s*\#define\s+HAVE_LIBJPEG\s+1/ );
$zLib = 1 if( /^\s*\#define\s+HAVE_LIBZ\s+1/ );
}
}
#If in win32, add the required defined for the HDF5 libs to work:
my $define_win32HDF = '';
if ($Config{'osname'} =~ /win32/i) {
$define_win32HDF = '-D _HDF5USEDLL_ -D HASATTRIBUTE ';
print "Defining _HDF5USEDLL_ for win32\n";
}
my $LIBS = "-L$hdf5_lib_path -l$hdf5_lib_base ";
$LIBS .= " -lz" if($zLib);
$LIBS .= " -ljpeg" if($jpegLib);
$LIBS .= " -lm";
my $package = ["hdf5.pd",'HDF5','PDL::IO::HDF5'];
my $meta_merge = {
'name' => 'PDL-IO-HDF5',
'abstract' => 'PDL Interface to the HDF5 Data Format',
'release_status' => 'stable', # 'testing',
'author' => [
'John Cerney <j-cerney1 AT raytheon.com>',
'Andrew Benson <abenson AT obs.carnegiescience.edu>',
],
'license' => [ 'perl_5' ],
'meta_spec' => {
'version' => '2',
'url' => 'http://search.cpan.org/perldoc?CPAN::Meta::Spec',
},
'prereqs' => {
'runtime' => {
'requires' => {
'PDL' => '2.064',
},
},
'build' => {
'requires' => {
'ExtUtils::MakeMaker' => '0',
'PDL' => '2.064',
},
},
test => {
requires => {
'Test::More' => '0.88', # done_testing
},
},
'configure' => {
'requires' => {
'ExtUtils::MakeMaker' => '0',
'PDL' => '2.064', # new types like ULL, CLD
},
},
},
resources => {
license => [ 'http://dev.perl.org/licenses/' ],
homepage => 'http://pdl.perl.org/',
bugtracker => {
web => 'https://github.com/PDLPorters/pdl-io-hdf5/issues',
},
repository => {
url => 'git@github.com:PDLPorters/pdl-io-hdf5.git',
web => 'https://github.com/PDLPorters/pdl-io-hdf5',
type => 'git',
},
},
'dynamic_config' => 1,
'meta-spec' => {
'version' => '2',
'url' => 'http://search.cpan.org/perldoc?CPAN::Meta::Spec',
},
};
# create GENERATED subdir with *.pm files during 'make dist' (to make metacpan.org happy)
my $preop = '$(PERL) -I$(INST_ARCHLIB) -I$(INST_LIB) -MPDL::Core::Dev -e pdlpp_mkgen $(DISTVNAME)';
WriteMakefile(
'NAME' => 'PDL::IO::HDF5',
'CCFLAGS' => "$Config{ccflags} $define_win32HDF -DH5_USE_16_API -g",
'CONFIGURE_REQUIRES' => { PDL => '2.004' },
'BUILD_REQUIRES' => { PDL => '2.004' },
# 'TEST_REQUIRES' => { PDL => '2.004' },
'PREREQ_PM' => { PDL => '2.004' },
'LICENSE' => 'perl',
'VERSION_FROM' => 'hdf5.pd',
'META_MERGE' => $meta_merge,
'TYPEMAPS' => [&PDL_TYPEMAP()],
'OBJECT' => 'HDF5.o ',
'PM' => { 'HDF5.pm' => '$(INST_LIBDIR)/HDF5.pm',
'HDF5/Group.pm' => '$(INST_LIBDIR)/HDF5/Group.pm',
'HDF5/Dataset.pm' => '$(INST_LIBDIR)/HDF5/Dataset.pm',
'HDF5/tkview.pm' => '$(INST_LIBDIR)/HDF5/tkview.pm',
},
'INC' => &PDL_INCLUDE()." -I$hdf5_include_path",
'LIBS' => [$LIBS],
'clean' => {'FILES' =>
'HDF5.pm HDF5.xs HDF5.o HDF5.c newFile.hdf5'},
'dist' => { COMPRESS => 'gzip', SUFFIX => 'gz', PREOP => $preop },
);
sub MY::postamble { pdlpp_postamble($package); }
|
