Net2/usr/src/contrib/isode/acsap/dase.py

-- dase.py - co-resident DASE

-- $Header: /f/osi/acsap/RCS/dase.py,v 7.3 91/02/22 09:14:31 mrose Interim $
--
--
-- $Log:	dase.py,v $
-- Revision 7.3  91/02/22  09:14:31  mrose
-- Interim 6.8
-- 
-- Revision 7.2  90/12/11  10:52:03  mrose
-- lock-and-load
-- 
-- Revision 7.1  90/07/09  14:30:53  mrose
-- sync
-- 
-- Revision 7.0  90/07/07  16:11:33  mrose
-- *** empty log message ***
-- 

--
--				  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.
--
--


DASE DEFINITIONS ::=

%{
#ifndef	lint
static char *rcsid = "$Header: /f/osi/acsap/RCS/dase.py,v 7.3 91/02/22 09:14:31 mrose Interim $";
#endif
%}

BEGIN

Query-REQ ::=
    [0] IMPLICIT
	SEQUENCE {
	    name			-- e.g., "cs, ucl, gb"
		SEQUENCE OF
		    IA5String,

	    interactive			-- true IFF allow callbacks
		BOOLEAN,

	    envlist			-- search list
		SEQUENCE OF
		    Environment,

	    context			-- e.g., "iso ftam"
		IA5String,

	    userdn			-- DN for binding
		IA5String
		OPTIONAL,

	    passwd			-- for simple authentication
		IA5String
		OPTIONAL
	}

Environment ::=
	SEQUENCE {
	    upper
		INTEGER,

	    lower
		INTEGER,

	    path
		SEQUENCE OF
		    IA5String
	}

Callback-REQ ::=
    [1] IMPLICIT
	SEQUENCE {
	    string			-- e.g., "smith"
		IA5String,

	    choices			-- list of possible matches
		SEQUENCE OF
		    Pair
	}

Pair ::=
	SEQUENCE {
	    friendly
		IA5String,

	    complete
		IA5String
	}

Callback-RSP ::=
    [2] IMPLICIT
	SEQUENCE OF
	    IA5String

Query-RSP ::=
    [3] IMPLICIT
	SEQUENCE {
	    friendly[0]			-- friendly name
		IA5String
		OPTIONAL,

	    name[1]			-- a DN in Directory ASN
		ANY
		OPTIONAL,

	    value[2]			-- a PSAPaddr in Directory ASN
		ANY
		OPTIONAL,

	    diagnostic[3]		-- in case of error
		IA5String
		OPTIONAL
	}


-- auxiliary types to make coding easier

Message ::=
	CHOICE {
	    query-request
		Query-REQ,

	    callback-request
		Callback-REQ,

	    callback-response
		Callback-RSP,

	    query-response
		Query-RSP
	}

Provider-RSP ::=
	CHOICE {
	    callback
		Callback-REQ,

	    answer
		Query-RSP
	}

END