OXIESEC PANEL

Name	Size	Modified	Perms
📁 ..	-	10/28/2024 06:50:08 AM	rwxr-xr-x
📄 ant.pm	1.03 KB	05/10/2018 09:11:57 AM	rw-r--r--
📄 autoconf.pm	2.42 KB	05/10/2018 09:11:57 AM	rw-r--r--
📄 cmake.pm	3.73 KB	05/10/2018 09:11:57 AM	rw-r--r--
📄 makefile.pm	5.62 KB	05/10/2018 09:11:57 AM	rw-r--r--
📄 meson.pm	2.46 KB	05/10/2018 09:11:57 AM	rw-r--r--
📄 ninja.pm	2.04 KB	05/10/2018 09:11:57 AM	rw-r--r--
📄 perl_build.pm	1.65 KB	05/10/2018 09:11:57 AM	rw-r--r--
📄 perl_makemaker.pm	2.15 KB	05/10/2018 09:11:57 AM	rw-r--r--
📄 pybuild.pm	7.5 KB	03/26/2018 07:42:23 PM	rw-r--r--
📄 python_distutils.pm	5.3 KB	05/10/2018 09:11:57 AM	rw-r--r--
📄 qmake.pm	4.45 KB	05/10/2018 09:11:57 AM	rw-r--r--
📄 qmake_qt4.pm	220 bytes	05/10/2018 09:11:57 AM	rw-r--r--

Editing: meson.pm

# A debhelper build system class for handling Meson based projects.
#
# Copyright: © 2017 Michael Biebl
# License: GPL-2+

package Debian::Debhelper::Buildsystem::meson;

use strict;
use warnings;
use Debian::Debhelper::Dh_Lib qw(dpkg_architecture_value is_cross_compiling doit warning error generated_file);
use parent qw(Debian::Debhelper::Buildsystem::ninja);

sub DESCRIPTION {
	"Meson (meson.build)"
}

sub check_auto_buildable {
	my $this=shift;
	my ($step)=@_;

return 0 unless -e $this->get_sourcepath("meson.build");

# Handle configure explicitly; inherit the rest
	return 1 if $step eq "configure";
	return $this->SUPER::check_auto_buildable(@_);
}

sub new {
	my $class=shift;
	my $this=$class->SUPER::new(@_);
	$this->prefer_out_of_source_building(@_);
	return $this;
}

sub configure {
	my $this=shift;

# Standard set of options for meson.
	my @opts = (
		'--wrap-mode=nodownload',
	);
	push @opts, "--buildtype=plain";
	push @opts, "--prefix=/usr";
	push @opts, "--sysconfdir=/etc";
	push @opts, "--localstatedir=/var";
	my $multiarch=dpkg_architecture_value("DEB_HOST_MULTIARCH");
	push @opts, "--libdir=lib/$multiarch";
	push @opts, "--libexecdir=lib/$multiarch";

if (is_cross_compiling()) {
		# http://mesonbuild.com/Cross-compilation.html
		my $cross_file = $ENV{'DH_MESON_CROSS_FILE'};
		if (not $cross_file) {
			my $debcrossgen = '/usr/share/meson/debcrossgen';
			if (not -x $debcrossgen) {
				warning("Missing debcrossgen (${debcrossgen}) cannot generate a meson cross file and non was provided");
				error("Cannot cross-compile: Please use meson (>= 0.42.1) or provide a cross file via DH_MESON_CROSS_FILE");
			}
			my $filename = generated_file('_source', 'meson-cross-file.conf');
			my %options = (
				stdout => '/dev/null',
				update_env => { LC_ALL => 'C.UTF-8'},
			);
			doit(\%options, $debcrossgen, "-o${filename}");
			$cross_file = $filename;
		}
		if ($cross_file !~ m{^/}) {
			# Make the file name absolute as meson will be called from the build dir.
			require Cwd;
			$cross_file =~ s{^\./}{};
			$cross_file = Cwd::cwd() . "/${cross_file}";
		}
		push(@opts, '--cross-file', $cross_file);
	}

$this->mkdir_builddir();
	eval {
		my %options = (
			update_env => { LC_ALL => 'C.UTF-8'},
		);
		$this->doit_in_builddir(\%options, "meson", $this->get_source_rel2builddir(), @opts, @_);
	};
	if ($@) {
		if (-e $this->get_buildpath("meson-logs/meson-log.txt")) {
			$this->doit_in_builddir('tail', '-v', '-n', '+0', 'meson-logs/meson-log.txt');
		}
		die $@;
	}
}