Fix for bug 45579, making it so the editparams.cgi page is more secure

This commit is contained in:
tara%tequilarista.org 2002-11-07 20:46:22 +00:00
Родитель 8364187e66
Коммит 9c1c6dd167
1 изменённых файлов: 18 добавлений и 0 удалений

Просмотреть файл

@ -33,6 +33,24 @@ use vars @::param_desc,
print "Content-type: text/html\n\n"; print "Content-type: text/html\n\n";
#
# Check to ensure they've logged in properly
#
unless ((defined($::FORM{password})) && (CheckPassword($::FORM{password}))) {
print "<form method=post action=editparams.cgi><table>\n";
print "<H2>Sorry, you must enter a password to see Bonsai paramters.</H2>\n";
print "<hr><B>Enter password to access parameters:</B> <INPUT NAME=password TYPE=password> <BR>";
print "</form>\n";
print "<input type=submit value=\"Enter Password\">\n";
print "<hr>\n";
exit;
}
#
# We're verified, now bring everything up
#
PutsHeader("Edit parameters"); PutsHeader("Edit parameters");
print "This lets you edit the basic operating parameters of bonsai.\n"; print "This lets you edit the basic operating parameters of bonsai.\n";