###############################################################################
# #
# IPFire.org - A linux based firewall #
-# Copyright (C) 2007 Michael Tremer & Christian Schmidt #
+# Copyright (C) 2010 IPFire Team <info@ipfire.org> #
# #
# This program is free software: you can redistribute it and/or modify #
# it under the terms of the GNU General Public License as published by #
my $refresh = "";
my $ipaddr='';
+
&Header::showhttpheaders();
$cgiparams{'ACTION'} = '';
my $connstate = &Header::connectionstatus();
+ if ( -e "/var/ipfire/main/gpl-acceted" ) {
if ($cgiparams{'ACTION'} eq $Lang::tr{'shutdown'} || $cgiparams{'ACTION'} eq $Lang::tr{'reboot'}) {
$refresh = "<meta http-equiv='refresh' content='300;'>";
} elsif ($connstate =~ /$Lang::tr{'connecting'}/ || /$Lang::tr{'connection closed'}/ ){
} elsif ($connstate =~ /$Lang::tr{'dod waiting'}/ || -e "${General::swroot}/main/refreshindex") {
$refresh = "<meta http-equiv='refresh' content='30;'>";
}
+}
if ($cgiparams{'ACTION'} eq $Lang::tr{'dial profile'})
{
&Header::openpage($Lang::tr{'main page'}, 1, $refresh);
&Header::openbigbox('', 'center');
-&Header::openbox('100%', 'center', &Header::cleanhtml(`/bin/uname -n`,"y"));
+# licence agreement
+if ($cgiparams{'ACTION'} eq $Lang::tr{'yes'} && $cgiparams{'gpl_accepted'} eq '1') {
+ system('touch /var/ipfire/main/gpl_accepted')
+}
+if ( -e "/var/ipfire/main/gpl_accepted" ) {
+&Header::openbox('100%', 'center', &Header::cleanhtml(`/bin/uname -n`,"y"));
if ( ( $pppsettings{'VALID'} eq 'yes' && $modemsettings{'VALID'} eq 'yes' ) || ( $netsettings{'CONFIG_TYPE'} =~ /^(1|2|3|4)$/ && $netsettings{'RED_TYPE'} =~ /^(DHCP|STATIC)$/ )) {
}
}
+
if ($warnmessage) {
print "<tr><td align='center' bgcolor=$Header::colourred colspan='3'><font color='white'>$warnmessage</font></table>";
}
;
&Pakfire::dblist("upgrade", "notice");
print <<END;
-
END
+if ( -e "/var/run/need_reboot" ) {
+ print "<br /><br /><font color='red'>$Lang::tr{'needreboot'}!</font>";
+}
} else {
my $message='';
if ($death) {
}
&Header::closebox();
+}
+
+else {
+&Header::openbox('100%', 'left', $Lang::tr{'gpl license agreement'});
+print <<END;
+ $Lang::tr{'gpl please read carefully the general public license and accept it below'}.
+ <br /><br />
+END
+;
+if ( -e "/usr/share/doc/licenses/GPLv3" ) {
+ print '<textarea rows=\'25\' cols=\'75\' readonly=\'true\'>';
+ print `cat /usr/share/doc/licenses/GPLv3`;
+ print '</textarea>';
+}
+else {
+ print '<br /><a href=\'http://www.gnu.org/licenses/gpl-3.0.txt\' target=\'_blank\'>GNU GENERAL PUBLIC LICENSE</a><br />';
+}
+print <<END;
+ <p>
+ <form method='post' action='$ENV{'SCRIPT_NAME'}'>
+ <input type='checkbox' name='gpl_accepted' value='1'/> $Lang::tr{'gpl i accept these terms and conditions'}.
+ <br/ >
+ <input type='submit' name='ACTION' value=$Lang::tr{'yes'} />
+ </form>
+ </p>
+ <a href='http://www.gnu.org/licenses/translations.html' target='_blank'>$Lang::tr{'gpl unofficial translation of the general public license v3'}</a>
+
+END
+
+&Header::closebox();
+}
+
&Header::closebigbox();
&Header::closepage();