DataMuseum.dk

top - metrics - download

    Length: 3920 (0xf50)
    Types: TextFile
    Names: »qu-prn.py«

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

TextFile

-- quipu-prn.py - additional QUIPU directory type definitions module

-- $Header: /f/osi/dsap/x500as/RCS/qu-prn.py,v 6.0 89/03/18 23:29:57 mrose Rel $
--
--
-- $Log:	qu-prn.py,v $
-- Revision 6.0  89/03/18  23:29:57  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.
--
--


Quipu
	{
	ccitt
	data(9)
	pss(2342)
	ucl(19200300)
	quipu(99)
	directoryDefinitions(1)
	}

DEFINITIONS ::=

PREFIXES encode decode print

BEGIN

IMPORTS
	NameError ,
	ServiceError ,
	SecurityError
		FROM DAS
			{
			joint-iso-ccitt
			ds(5)
			modules(1)
			directoryAbstractService(2)
			}

	DistinguishedName ,
	RelativeDistinguishedName ,
	Attribute ,
	AttributeType
		FROM IF
			{
			joint-iso-ccitt
			ds(5)
			modules(1)
			informationFramework(1)
			};

-- ReliableROSData
-- 	::=
-- 	SEQUENCE
-- 	{
-- 	rosOperation
-- 		INTEGER ,
		-- the operation being applied
-- 	data
-- 		ANY ,
		-- the Operation Argument
-- 	oldVersion
-- 		ANY ,
		-- data version to which operation should be applied
-- 	newVersion
-- 		ANY
		-- version number which results from operation
-- 	}

PRINTER print

AccessSelector
        ::=
        CHOICE
        {
        entry
                [0] NULL ,
        other
                [2] NULL ,
        prefix
                [3] NameList ,
        group
                [4] NameList
        }

AccessCategories
        ::=
        ENUMERATED
        {
                none (0) ,
                detect (1) ,
                compare (2) ,
                read (3) ,
                add (4) ,
                write (5)
        }

ACLInfo
        ::=
        SET OF
                SEQUENCE
                {
                        AccessSelector ,
                        AccessCategories
                }

AttributeACL
        ::=
        SEQUENCE
        {
                SET OF
			-- AttributeType
                        OBJECT IDENTIFIER ,
                ACLInfo
                    -- DEFAULT {{other , read}, {entry, write}}
                    OPTIONAL
        }

ACLSyntax
        ::=
        SEQUENCE
        {
        childACL
                [0] ACLInfo
                    -- DEFAULT {{other , read}, {entry, write}} ,
                    OPTIONAL ,
        entryACL
                [1] ACLInfo
                    -- DEFAULT {{other , read}, {entry, write}} ,
                    OPTIONAL ,
        defaultAttributeACL
                [2] ACLInfo
                    -- DEFAULT {{other , read}, {entry, write}} ,
                    OPTIONAL ,
                [3] SET OF
                        AttributeACL
        }

NameList
        ::=
        SET OF
                DistinguishedName

EDBInfoSyntax
        ::=
        SEQUENCE
        {
        edb
                DistinguishedName ,
        getFromDSA
                DistinguishedName
		    OPTIONAL ,
        sendToDSAs
                NameList ,
	getEDBAllowed
		NameList
        }

TreeStructureSyntax
        ::=
        SET
	{
	mandatoryObjectClasses
		[1] SET OF
                	OBJECT IDENTIFIER ,
	optionalObjectClasses
		[2] SET OF
                	OBJECT IDENTIFIER
		    OPTIONAL ,
	permittedRDNs
		[3] SET OF
			SET OF
				AttributeType
	}

EntryDataBlock
        ::=
        SEQUENCE OF
                RelativeEntry

RelativeEntry
        ::=
        SEQUENCE
        {
                RelativeDistinguishedName ,
                SET OF
                        Attribute
        }

EDBVersion
	::=
	UTCTime

GetEntryDataBlockArgument
	::=
	SET
	{
	entry
		[0] DistinguishedName ,
	sendIfMoreRecentThan
		[1] EDBVersion
		    OPTIONAL
			-- if omitted, send in any case
	}

GetEntryDataBlockResult
	::=
	SEQUENCE
	{
	versionHeld
		[0] EDBVersion ,
		[1] EntryDataBlock
		    OPTIONAL
	}

END