DataMuseum.dk

top - metrics - download

    Length: 2615 (0xa37)
    Types: TextFile
    Names: »af-prn.py«

└─⟦3d0c2be1b⟧ Bits:30001254 ISODE-5.0 Tape
    └─⟦eba4602b1⟧ »./isode-5.0.tar.Z« 
        └─⟦d3ac74d73⟧ 
            └─⟦this⟧ »isode-5.0/dsap/x500as/af-prn.py« 

TextFile

-- af-prn.py - manually-augmented AuthenticationFramework module

-- $Header: /f/osi/dsap/x500as/RCS/af-prn.py,v 6.0 89/03/18 23:29:14 mrose Rel $
--
--
-- $Log:	af-prn.py,v $
-- Revision 6.0  89/03/18  23:29:14  mrose
-- Release 5.0
-- 

--
--				  NOTICE
--
--    Acquisition, use, and distribution of this module and related
--    materials are subject to the restrictions of a license agreement.
--    Consult the Preface in the User's Manual for the full terms of
--    this agreement.
--
--


AF
	{
	joint-iso-ccitt
	ds(5)
	modules(1)
	authenticationFramework(7)
	}

DEFINITIONS ::=

PREFIXES encode decode print

BEGIN

-- EXPORTS
-- 	AlgorithmIdentifier ,
-- 	Certificate ,
-- 	Certificates ,
-- 	CertificationPath;

IMPORTS
	Name
		FROM IF
			{
			joint-iso-ccitt
			ds(5)
			modules(1)
			informationFramework(1)
			};

PRINTER print

Version
	::=
	INTEGER
	{
	v1988(0)
	}

CertificateSerialNumber
	::=
	INTEGER

Validity
	::=
	SEQUENCE
	{
	notBefore
		UTCTime ,
	notAfter
		UTCTime
	}

AlgorithmIdentifier
	::=
	SEQUENCE
	{
	algorithm
		OBJECT IDENTIFIER ,
	parameters
		ANY DEFINED BY
			algorithm
		    OPTIONAL
	}

SubjectPublicKeyInfo
	::=
	SEQUENCE
	{
	algorithm
		AlgorithmIdentifier ,
	subjectPublicKey
		BIT STRING
	}

CertificateToSign
	::=
	SEQUENCE
	{
	version
		[0] Version
		    -- DEFAULT v1988 ,
		    OPTIONAL ,
	serialNumber
		CertificateSerialNumber ,
	signature
		AlgorithmIdentifier ,
	issuer
		Name ,
	validity
		Validity ,
	subject
		Name ,
	subjectPublicKeyInfo
		SubjectPublicKeyInfo
	}

Certificate
	::=
	SEQUENCE
	{
		CertificateToSign ,
		AlgorithmIdentifier ,
		BIT STRING
	}

CrossCertificates
	::=
	SET OF
		Certificate

ForwardCertificationPath
	::=
	SEQUENCE OF
		CrossCertificates

Certificates
	::=
	SEQUENCE
	{
	certificate
		Certificate ,
	certificationPath
		ForwardCertificationPath
		    OPTIONAL
	}

CertificatePair
	::=
	SEQUENCE
	{
	forward
		[0] Certificate
		    OPTIONAL ,
	reverse
		[1] Certificate
		    OPTIONAL
	}

CertificationPath
	::=
	SEQUENCE
	{
	userCertificate
		Certificate ,
	theCACertificates
		SEQUENCE OF
			CertificatePair
		    OPTIONAL
	}

CertificateListToSign
	::=
	SEQUENCE
	{
	signature
		AlgorithmIdentifier ,
	issuer
		Name ,
	lastUpdate
		UTCTime ,
	revokedCertificates
		SEQUENCE
		{
			SEQUENCE OF
				SEQUENCE
				{
				signature
					AlgorithmIdentifier ,
				issuer
					Name ,
				subject
					CertificateSerialNumber ,
				revokationDate
					UTCTime
				} ,
			AlgorithmIdentifier ,
			BIT STRING
		}
		    OPTIONAL
	}

CertificateList
	::=
	SEQUENCE
	{
		CertificateListToSign ,
		AlgorithmIdentifier ,
		BIT STRING
	}

END