#!/usr/bin/perl
if ($^O !~ /freebsd/i) {exit();}

exec '/scripts/setupmakeconf';

# Will only execute the code below if /scripts/setupmakeconf does not exist.

my $makec .= <<EOM;
BATCH=YES
OPENSSL_OVERWRITE_BASE=YES
WITH_OPENSSL_BASE=YES
WITHOUT_X11=YES
SKIP_DNS_CHECK=YES
CRYPT_DES=0
PORT_REPLACES_BASE_BIND8=YES
PORT_REPLACES_BASE_BIND9=YES
EOM

my @MC = split(/\n/, $makec);

foreach my $line (@MC) {
	chomp($line);
	my($name,$var) = split(/=/, $line);
	$MC{$name} = $var;
}

open(MC,"/etc/make.conf");
while(<MC>) {
	chomp($_);
	my($name,$var) = split(/=/, $_);
	$CURRENTMC{$name} = $var;
}
close(MC);

foreach my $mc (sort keys %CURRENTMC) {
	delete $MC{$mc};
}

my $left = scalar keys %MC;

if ($left == 0) { print "/etc/make.conf is up to date!\n"; exit(); }

print "Updating make.conf...";
open(MC,">>/etc/make.conf");
foreach my $mc (sort keys %MC) {
	print MC "$mc=$MC{$mc}\n";
}
close(MC);
print "Done\n";