#!/usr/bin/perl
#
# SmoothWall CGIs
#
# This code is distributed under the terms of the GPL
#
# (c) The SmoothWall Team
#
# $Id: changepw.cgi,v 1.4.2.6 2005/03/07 21:28:03 eoberlander Exp $
#
use strict;
# enable only the following on debugging purpose
#use warnings;
#use CGI::Carp 'fatalsToBrowser';
require '/var/ipfire/general-functions.pl';
require "${General::swroot}/lang.pl";
require "${General::swroot}/header.pl";
my %cgiparams=();
my $errormessage='';
&Header::showhttpheaders();
$cgiparams{'ACTION_ADMIN'} = '';
$cgiparams{'ACTION_DIAL'} = '';
&Header::getcgihash(\%cgiparams);
if ($cgiparams{'ACTION_ADMIN'} eq $Lang::tr{'save'})
{
my $password1 = $cgiparams{'ADMIN_PASSWORD1'};
my $password2 = $cgiparams{'ADMIN_PASSWORD2'};
if ($password1 eq $password2)
{
if ($password1 =~ m/\s|\"/) {
$errormessage = $Lang::tr{'password contains illegal characters'};
}
elsif (length($password1) >= 6)
{
system('/usr/sbin/htpasswd', '-m', '-b', "${General::swroot}/auth/users", 'admin', "${password1}");
&General::log($Lang::tr{'admin user password has been changed'});
}
else {
$errormessage = $Lang::tr{'passwords must be at least 6 characters in length'}; }
}
else {
$errormessage = $Lang::tr{'passwords do not match'}; }
}
if ($cgiparams{'ACTION_DIAL'} eq $Lang::tr{'save'})
{
my $password1 = $cgiparams{'DIAL_PASSWORD1'};
my $password2 = $cgiparams{'DIAL_PASSWORD2'};
if ($password1 eq $password2)
{
if($password1 =~ m/\s|\"/) {
$errormessage = $Lang::tr{'password contains illegal characters'};
}
elsif (length($password1) >= 6)
{
system('/usr/sbin/htpasswd', '-m', '-b', "${General::swroot}/auth/users", 'dial', "${password1}");
&General::log($Lang::tr{'dial user password has been changed'});
}
else {
$errormessage = $Lang::tr{'passwords must be at least 6 characters in length'}; }
}
else {
$errormessage = $Lang::tr{'passwords do not match'}; }
}
&Header::openpage($Lang::tr{'change passwords'}, 1, '');
&Header::openbigbox('100%', 'left', '', $errormessage);
if ($errormessage) {
&Header::openbox('100%', 'left', $Lang::tr{'error messages'});
print "