updateldap

Perl写的CA认证程序

## OpenCA - RA Server Command
## (c) 1998-2001 by Massimiliano Pala and OpenCA Group
##
##   File Name: updateLDAP
##       Brief: Updates LDAP server
## Description: Add issued certificates to LDAP server
##  Parameters: 

if ( $cmd !~ /updateLDAP/i ) {
        configError( "Wrong Command Usage ($cmd/importReqs)!" );
        exit 1;
}

print startLogPage( "LDAP Updating" );
print addLogSection( "Adding Certificates ... ");

if( (addCertsUsers( $tmpdir ) ) == -1 ) {
	print addLogLine("Failed!") ;
}

print closeLogSection();
closePage();

1;