#!/usr/bin/perl

if (defined($ENV{'GIT_COMMIT_IGNORE'})) {
	exit(0);
}

my $log = $ARGV[0];
my $firstline = "blah";

open(LOG, "< $log") or die "Could not open commit msg file";

while (<LOG>) {
	next if /^#/;
	chomp;

	$firstline = $_;
	last;
}

if ($firstline =~ /^Merge branch/) {
	exit(0);
}

if ($firstline !~ /^UBUNTU: /) {
	print STDERR "This is not a valid UBUNTU commit.\n";
	exit(1);
}

if ($firstline =~ /^UBUNTU: *$/) {
	print STDERR "This commit has an empty message\n";
	exit(1);
}

$signedoff = 0;

while (<LOG>) {
	$signedoff = 1 if /^Signed-off-by: .*/;
}

if (! $signedoff) {
	print STDERR "This commit is not signed off on\n";
	exit(1);
}

exit(0);
