mirror of
https://github.com/opnsense/src.git
synced 2026-03-18 00:25:50 -04:00
Do not backup master.passwd if pwd_mkdb returned an error. This
was to paranoid, pwd_mkdb(8) is carefully enough to not corrupt master.passwd on failure. Submitted by: joerg
This commit is contained in:
parent
728999c8b2
commit
896f207c80
1 changed files with 3 additions and 13 deletions
|
|
@ -24,7 +24,7 @@
|
|||
# OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
|
||||
# SUCH DAMAGE.
|
||||
#
|
||||
# $Id: adduser.perl,v 1.16 1996/08/28 17:54:14 adam Exp $
|
||||
# $Id: adduser.perl,v 1.17 1996/09/11 08:36:54 jkh Exp $
|
||||
|
||||
|
||||
# read variables
|
||||
|
|
@ -538,19 +538,9 @@ sub new_users_pwdmkdb {
|
|||
|
||||
system("$pwd_mkdb $etc_passwd");
|
||||
if ($?) {
|
||||
local($crash) = "$etc_passwd.crash$$";
|
||||
warn "$last\n";
|
||||
warn "``$pwd_mkdb'' failed, try to restore ...\n";
|
||||
|
||||
open(R, "> $crash") || die "Sorry, give up\n";
|
||||
$j = join("\n", @passwd_backup);
|
||||
$j =~ s/\n//;
|
||||
print R $j . "\n";
|
||||
close R;
|
||||
|
||||
system("$pwd_mkdb $crash");
|
||||
die "Sorry, give up\n" if $?;
|
||||
die "Successfully restore $etc_passwd. Exit.\n";
|
||||
warn "``$pwd_mkdb'' failed\n";
|
||||
exit($? >> 8);
|
||||
}
|
||||
}
|
||||
|
||||
|
|
|
|||
Loading…
Reference in a new issue