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
|
# A debhelper build system class for building PostgreSQL extension modules using PGXS
#
# Copyright: © 2020 Christoph Berg
# License: GPL-2+
package Debian::Debhelper::pgxs;
use strict;
use warnings;
use Exporter 'import';
our @EXPORT = qw(package_pattern);
=head1 package_pattern()
From C<debian/control.in>, look for the package name containing the
B<PGVERSION> placeholder, and return it in the format suitable for passing to
B<pg_buildext>, i.e. with B<PGVERSION> replaced by B<%v>.
For B<Package: postgresql-PGVERSION-unit> it will return B<postgresql-%v-unit>.
Errors out if more than one package with the B<PGVERSION> placeholder is found.
=cut
sub package_pattern () {
open F, "debian/control.in" or die "debian/control.in: $!";
my $pattern;
while (<F>) {
if (/^Package: (.*)PGVERSION(.*)/) {
die "More than one Package with PGVERSION placeholder found in debian/control.in, cannot build with dh --buildsystem=pgxs. Use pg_buildext manually." if ($pattern);
$pattern = "$1%v$2";
}
}
close F;
return $pattern;
}
1;
|
