portolis/portolis.cgi - diff

Return to portolis.cgi CVS log

Up to [Coherent Logic Development] / portolis

version 1.3, 2025/02/17 15:54:19	version 1.5, 2025/02/17 17:16:26
Line 10	Line 10
# Licensed AGPL-3.0	# Licensed AGPL-3.0
#	#
# $Log$	# $Log$
	# Revision 1.5 2025/02/17 17:16:26 snw
	# Make password changes apply to the actual dovecot users file, though hardcoded to NetBSD paths
	#
	# Revision 1.4 2025/02/17 15:55:49 snw
	# Fix password change form action URL
	#
# Revision 1.3 2025/02/17 15:54:19 snw	# Revision 1.3 2025/02/17 15:54:19 snw
# Add password change capability	# Add password change capability
#	#
Line 325 END_BADDAF	Line 331 END_BADDAF
$html = <<"END_EPW";	$html = <<"END_EPW";
<CENTER>	<CENTER>
<H1>Change Password</H1>	<H1>Change Password</H1>
<FORM METHOD=POST ACTION=/portolis.cgi?exec=pw>	<FORM METHOD=POST ACTION=/cgi-bin/portolis.cgi?exec=pw>
<TABLE CELLPADDING=3 CELLSPACING=0 BORDER=1>	<TABLE CELLPADDING=3 CELLSPACING=0 BORDER=1>
<TR>	<TR>
<TD><B>Password:</B></TD>	<TD><B>Password:</B></TD>
Line 373 END_EPW	Line 379 END_EPW
flock FH, 8;	flock FH, 8;
close FH;	close FH;

open(FH, '>', '/tmp/users.new');	open(FH, '>', '/usr/pkg/etc/dovecot/users');
flock(FH, 2);	flock(FH, 2);
seek(FH, 0, 0);	seek(FH, 0, 0);
truncate(FH, 0);	truncate(FH, 0);