X-Git-Url: http://git.ipfire.org/?p=ipfire-2.x.git;a=blobdiff_plain;f=html%2Fcgi-bin%2Fgpl.cgi;h=94187ce7a3dc7daf9b8d4ada0a60225a2f43d654;hp=7589054b642de19894f5cf0431cac3b5894a4159;hb=9f52e35066b3fa8603e85784b7ede0532afc66e6;hpb=d99f0ff8c620a7fa832354d403cf701120273d40 diff --git a/html/cgi-bin/gpl.cgi b/html/cgi-bin/gpl.cgi index 7589054b64..94187ce7a3 100644 --- a/html/cgi-bin/gpl.cgi +++ b/html/cgi-bin/gpl.cgi @@ -29,28 +29,29 @@ require "${General::swroot}/lang.pl"; require "${General::swroot}/header.pl"; require "/opt/pakfire/lib/functions.pl"; - -my %cgiparams; -my $refresh; - +# If the license has already been accepted. if ( -e "/var/ipfire/main/gpl_accepted" ) { - print "Status: 302 Moved Temporarily\n"; - print "Location: index.cgi\n\n"; - exit (0); + &redirect(); } -&Header::showhttpheaders(); +my %cgiparams; $cgiparams{'ACTION'} = ''; + &Header::getcgihash(\%cgiparams); -&Header::openpage($Lang::tr{'main page'}, 1, $refresh); -&Header::openbigbox('', 'center'); +# Check if the license agreement has been accepted. +if ($cgiparams{'ACTION'} eq "$Lang::tr{'yes'}" && $cgiparams{'gpl_accepted'} eq '1') { + open(FILE, ">/var/ipfire/main/gpl_accepted"); + close(FILE); -# licence agreement -if ($cgiparams{'ACTION'} eq $Lang::tr{'yes'} && $cgiparams{'gpl_accepted'} eq '1') { - system('touch /var/ipfire/main/gpl_accepted'); + &redirect(); } +&Header::showhttpheaders(); + +&Header::openpage($Lang::tr{'main page'}, 1); +&Header::openbigbox('', 'center'); + &Header::openbox('100%', 'left', $Lang::tr{'gpl license agreement'}); print <'; + print ''; } @@ -80,3 +81,9 @@ END &Header::closebox(); &Header::closebigbox(); &Header::closepage(); + +sub redirect { + print "Status: 302 Moved Temporarily\n"; + print "Location: index.cgi\n\n"; + exit (0); +}