ie_enroll.scp

Perl写的CA认证程序

// Enrollment Script for IE Explorer
// Free Available Version - IE 3.0
//
// OpenCA Released Software
// GPL Licensed

function checkField ( field, desc ) {
	if ( field == null ) {
		return false;
	}

	if ( (field == null ) || (field.value == "") ) {
		alert( desc + " has no Value!" );
		return false;
	}

	return true;
}

function GenReq ( myForm, ouNum )
{
	var objID		= "1.3.6.1.4.1.311.2.1.21";
	// var objID		= "1.3.6.1.5.7.2";
	var BASE_64		= 0x1;
	var PKCS_10		= 0x100;
	var KEYGEN		= 0x200;

	var beginREQ		= "-----BEGIN CERTIFICATE REQUEST-----\n";
	var endREQ		= "-----END CERTIFICATE REQUEST-----";

	var szName		= "";
	var szPurpose		= "ClientAuth";

	var REQ			= "";

	var myForm = document.GenReqForm;
	var i, elem, ouInput;

	if( objEnroll == null ) {
		alert("Impossible to generate a request.\n\n" +
			"Unrecoverable Browser Error!\n" );
		return false;
	}

	objEnroll.KeySpec = 1;
	// objEnroll.GenKeyFlags = BASE_64 || PKCS_10;
	// objEnroll.GenKeyFlags = BASE_64 || KEYGEN;
	// objEnroll.GenKeyFlags = 0x08000001;
	// objEnroll.GenKeyFlags = 0x0800;

	if( checkField( myForm.email, "E-Mail" )) {
		szName = "EMAIL=" + myForm.email.value;
	}

	if( checkField( myForm.first_name, "First Name") && 
			checkField( myForm.last_name, "Last Name" )) {
		szName += ", CN=" + myForm.first_name.value;
		szName += " " + myForm.last_name.value;
	} else {
		return false;
	}

	for ( i = 1; i <= ouNum; i++ ) {
		ouInput = i + ".ou";
		for( elem = 0 ; elem <= myForm.length; elem++ ) {
			var e = myForm.elements[elem];
			if( ( e != null ) && ( e.name == ouInput ) ) {
				if ( checkField( e, "Organization Unit")){
					szName += ", OU=" + e.value;
				} else {
					return false;
				}
			}
		}
	}
	
	if( checkField( myForm.organization, "Organization" )) {
		szName += ", O=" + myForm.organization.value;
	} else {
		return false;
	}

	if( checkField( myForm.locality, "Locality" )) {
		szName += ", L=" + myForm.organization.value;
	}

	if( checkField( myForm.state, "State" )) {
		szName += ", S=" + myForm.organization.value;
	}

	if( checkField( myForm.country, "Country" )) {
		szName += ", C=" + myForm.country.value;
	} else {
		return false;
	}

	alert( "Submitting Request:\n\n" + szName );
	REQ = objEnroll.createPKCS10(szName, "1.3.6.1.4.1.311.2.1.21" );
	// alert( REQ);

	if ( REQ != null ) {
		myForm.request.value = beginREQ + REQ + endREQ;
	} else {
		alert( "Key Pair Generation failed!" );
		return false;
	}

	myForm.submit();
}