authpolicy.c

来自「ftam等标准协议服务器和客户端的源代码。」· C语言 代码 · 共 210 行

/* authpolicy.c - authentication policy routines */

#ifndef	lint
static char *rcsid = "$Header: /xtel/isode/isode/dsap/common/RCS/authpolicy.c,v 9.0 1992/06/16 12:12:39 isode Rel $";
#endif

/* 
 * $Header: /xtel/isode/isode/dsap/common/RCS/authpolicy.c,v 9.0 1992/06/16 12:12:39 isode Rel $
 *
 *
 * $Log: authpolicy.c,v $
 * Revision 9.0  1992/06/16  12:12:39  isode
 * Release 8.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.
 *
 */


/* LINTLIBRARY */

#include "quipu/util.h"
#include "quipu/entry.h"
#include "quipu/syntaxes.h"

/*
 * These routines implement the AuthenticationPolicySyntax.  The EDB
 * representation of this syntax is as follows:
 *
 *  AuthenticationPolicySyntax ::= <modpolicy> '#' <readandcomparepolicy>
 *					'#' <listandsearchpolicy>
 *
 *  <modpolicy> ::= <authpolicy>
 *
 *  <readandcomparepolicy> ::= <authpolicy>
 *
 *  <listandsearchpolicy> ::= <authpolicy>
 *
 *  <authpolicy> ::= 'TRUST' | 'SIMPLE' | 'STRONG'
 */

short authp_sntx;

authp_cmp( a, b )
Authpolicy	a;
Authpolicy	b;
{
	if ( a == NULLAUTHP && b == NULLAUTHP )
		return( 0 );

	if ( a == NULLAUTHP )
		return( 1 );

	if ( b == NULLAUTHP )
		return( -1 );

	if ( a->ap_modification != b->ap_modification )
		return( a->ap_modification > b->ap_modification ? 1 : -1 );

	if ( a->ap_readandcompare != b->ap_readandcompare )
		return( a->ap_readandcompare > b->ap_readandcompare ? 1 : -1 );

	if ( a->ap_listandsearch != b->ap_listandsearch )
		return( a->ap_listandsearch > b->ap_listandsearch ? 1 : -1 );

	return( 0 );
}

static Authpolicy authp_cpy( ap )
Authpolicy	ap;
{
	Authpolicy	new;

	new = authp_alloc();
	*new = *ap;

	return( new );
}

static Authpolicy authp_decode( pe )
PE	pe;
{
	Authpolicy	ap;

	if ( decode_Quipu_AuthenticationPolicySyntax( pe, 1, NULLIP, NULLVP,
	    &ap ) == NOTOK ) {
		return( NULLAUTHP );
	}

	return( ap );
}

static PE authp_enc( ap )
Authpolicy ap;
{
	PE ret_pe;

	(void) encode_Quipu_AuthenticationPolicySyntax( &ret_pe, 0, 0, NULLCP,
	    ap );

	return( ret_pe );
}

static get_policy( str )
char	*str;
{
	/* get modification policy */
	if ( lexnequ( str, "trust", 5 ) == 0 ) {
		return( AP_TRUST );
	} else if ( lexnequ( str, "simple", 6 ) == 0 ) {
		return( AP_SIMPLE );
	} else if ( lexnequ( str, "strong", 6 ) == 0 ) {
		return( AP_STRONG );
	} else {
		parse_error( "unknown authentication policy '%s'", str );
		return( NOTOK );
	}
}


static Authpolicy str2authp( str )
char	*str;
{
	Authpolicy	new;
	char		save, *s;

	if ( (s = index( str, '#' )) == NULL ) {
		parse_error( "# missing in authentication policy '%s'", str );
		return( NULLAUTHP );
	}
	save = *s;
	*s = '\0';
	while ( isspace( *str ) )
		str++;

	new = authp_alloc();

	new->ap_modification = get_policy( str );

	/* skip past next # */
	*s++ = save;
	str = s;
	if ( (s = index( str, '#' )) == NULL ) {
		parse_error( "# missing in authentication policy '%s'", str );
		free( (char *) new );
		return( NULLAUTHP );
	}
	save = *s;
	*s = '\0';
	while ( isspace( *str ) )
		str++;

	new->ap_readandcompare = get_policy( str );

	/* skip past next # */
	*s++ = save;
	str = s;
	while ( isspace( *str ) )
		str++;

	new->ap_listandsearch = get_policy( str );

	return( new );
}

static char *policy[] = {
	"trust",
	"simple",
	"strong"
};

authp_print( ps, ap, format )
PS		ps;
Authpolicy	ap;
int		format;
{
	if ( format == READOUT ) {
		ps_printf( ps, "modification policy: %s\n",
		    policy[ap->ap_modification] );
		ps_printf( ps, "\t\t\tread and compare policy: %s\n",
		    policy[ap->ap_readandcompare] );
		ps_printf( ps, "\t\t\tlist and search policy: %s",
		    policy[ap->ap_listandsearch] );
	} else {
		ps_printf( ps, "%s # %s # %s", policy[ap->ap_modification],
		    policy[ap->ap_readandcompare],
		    policy[ap->ap_listandsearch] );
	}
}

authp_syntax()
{
	extern	sfree();

	authp_sntx = add_attribute_syntax ("AuthenticationPolicySyntax",
		(IFP) authp_enc,	(IFP) authp_decode,
		(IFP) str2authp,	authp_print,
		(IFP) authp_cpy,	authp_cmp,
		sfree,			NULLCP,
		NULLIFP,		TRUE);
}