/usr/share/perl5/Debian/Debhelper/Buildsystem/makefile.pm is in debhelper 9.20150101+deb8u2.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
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 | # A debhelper build system class for handling simple Makefile based projects.
#
# Copyright: © 2008 Joey Hess
# © 2008-2009 Modestas Vainius
# License: GPL-2+
package Debian::Debhelper::Buildsystem::makefile;
use strict;
use Debian::Debhelper::Dh_Lib qw(escape_shell clean_jobserver_makeflags);
use base 'Debian::Debhelper::Buildsystem';
# make makes things difficult by not providing a simple way to test
# whether a Makefile target exists. Using -n and checking for a nonzero
# exit status is not good enough, because even with -n, make will
# run commands needed to eg, generate include files -- and those commands
# could fail even though the target exists -- and we should let the target
# run and propagate any failure.
#
# Using -n and checking for at least one line of output is better.
# That will indicate make either wants to run one command, or
# has output a "nothing to be done" message if the target exists but is a
# noop.
#
# However, that heuristic is also not good enough, because a Makefile
# could run code that outputs something, even though the -n is asking
# it not to run anything. (Again, done for includes.) To detect this false
# positive, there is unfortunately only one approach left: To
# look for the error message printed by make when a target does not exist.
#
# This could break if make's output changes. It would only break a minority
# of packages where this latter test is needed. The best way to avoid that
# problem would be to fix make to have this simple and highly useful
# missing feature.
#
# A final option would be to use -p and parse the output data base.
# It's more practical for dh to use that method, since it operates on
# only special debian/rules files, and not arbitrary Makefiles which
# can be arbitrarily complicated, use implicit targets, and so on.
sub exists_make_target {
my $this=shift;
my $target=shift;
my @opts=("-s", "-n", "--no-print-directory");
my $buildpath = $this->get_buildpath();
unshift @opts, "-C", $buildpath if $buildpath ne ".";
my $pid = open(MAKE, "-|");
defined($pid) || die "can't fork: $!";
if (! $pid) {
open(STDERR, ">&STDOUT");
$ENV{LC_ALL}='C';
exec($this->{makecmd}, @opts, $target, @_);
exit(1);
}
local $/=undef;
my $output=<MAKE>;
chomp $output;
close MAKE;
return defined $output
&& length $output
&& $output !~ /\*\*\* No rule to make target (`|')\Q$target\E'/;
}
sub do_make {
my $this=shift;
# Avoid possible warnings about unavailable jobserver,
# and force make to start a new jobserver.
clean_jobserver_makeflags();
# Note that this will override any -j settings in MAKEFLAGS.
unshift @_, "-j" . ($this->get_parallel() > 0 ? $this->get_parallel() : "");
$this->doit_in_builddir($this->{makecmd}, @_);
}
sub make_first_existing_target {
my $this=shift;
my $targets=shift;
foreach my $target (@$targets) {
if ($this->exists_make_target($target, @_)) {
$this->do_make($target, @_);
return $target;
}
}
return undef;
}
sub DESCRIPTION {
"simple Makefile"
}
sub new {
my $class=shift;
my $this=$class->SUPER::new(@_);
$this->{makecmd} = (exists $ENV{MAKE}) ? $ENV{MAKE} : "make";
return $this;
}
sub check_auto_buildable {
my $this=shift;
my ($step) = @_;
if (-e $this->get_buildpath("Makefile") ||
-e $this->get_buildpath("makefile") ||
-e $this->get_buildpath("GNUmakefile"))
{
# This is always called in the source directory, but generally
# Makefiles are created (or live) in the build directory.
return 1;
} elsif ($step eq "clean" && defined $this->get_builddir() &&
$this->check_auto_buildable("configure"))
{
# Assume that the package can be cleaned (i.e. the build directory can
# be removed) as long as it is built out-of-source tree and can be
# configured. This is useful for derivative buildsystems which
# generate Makefiles.
return 1;
}
return 0;
}
sub build {
my $this=shift;
$this->do_make(@_);
}
sub test {
my $this=shift;
$this->make_first_existing_target(['test', 'check'], @_);
}
sub install {
my $this=shift;
my $destdir=shift;
$this->make_first_existing_target(['install'],
"DESTDIR=$destdir",
"AM_UPDATE_INFO_DIR=no", @_);
}
sub clean {
my $this=shift;
if (!$this->rmdir_builddir()) {
$this->make_first_existing_target(['distclean', 'realclean', 'clean'], @_);
}
}
1
|