Files
microser/mmslib/mmsl/mms_ced7.c
2026-06-15 15:48:16 +08:00

544 lines
20 KiB
C

/************************************************************************/
/* SISCO SOFTWARE MODULE HEADER *****************************************/
/************************************************************************/
/* (c) Copyright Systems Integration Specialists Company, Inc., */
/* 1986 - 2001, All Rights Reserved. */
/* */
/* PROPRIETARY AND CONFIDENTIAL */
/* */
/* MODULE NAME : mms_ced7.c */
/* PRODUCT(S) : MMSEASE, MMSEASE-LITE */
/* */
/* MODULE DESCRIPTION : */
/* This module contains common primitive encode/decode functions */
/* particular to getting and writing a list of modifiers. */
/* */
/* GLOBAL FUNCTIONS DEFINED IN THIS MODULE : */
/* */
/* MODIFICATION LOG : */
/* Date Who Rev Comments */
/* -------- --- ------ ------------------------------------------- */
/* 03/11/04 GLB 05 Remove "thisFileName" */
/* 08/28/03 EJV 04 Corr spelling for 'receive'. */
/* 03/31/03 JRB 03 asn1r_get_bitstr: add max_bits arg. */
/* 12/20/01 JRB 02 Converted to use ASN1R (re-entrant ASN1) */
/* 09/13/99 MDE 01 Added SD_CONST modifiers */
/* 04/02/97 DTL 7.00 MMSEASE 7.0 release. See MODL70.DOC for */
/* history. */
/************************************************************************/
#include "glbtypes.h"
#include "sysincs.h"
#include "mmsdefs.h"
#include "asn1defs.h"
#ifdef MOD_SUPPORT
/************************************************************************/
/************************************************************************/
/* global structures & functions */
/************************************************************************/
static ST_VOID modlist_attach_to_ec (ASN1_DEC_CTXT *aCtx);
static ST_VOID modlist_attach_to_sem (ASN1_DEC_CTXT *aCtx);
static ST_VOID modlist_modifier_done (ASN1_DEC_CTXT *aCtx);
static ST_VOID modlist_done (ASN1_DEC_CTXT *aCtx);
static ST_VOID atsem_get_priority (ASN1_DEC_CTXT *aCtx);
static ST_VOID atsem_get_acc_delay (ASN1_DEC_CTXT *aCtx);
static ST_VOID atsem_get_ctrl_timeout (ASN1_DEC_CTXT *aCtx);
static ST_VOID atsem_get_abrt_timeout (ASN1_DEC_CTXT *aCtx);
static ST_VOID atsem_get_rel_conn_lost (ASN1_DEC_CTXT *aCtx);
static ST_VOID atec_get_ct_done (ASN1_DEC_CTXT *aCtx);
static ST_VOID atsem_get_named_token (ASN1_DEC_CTXT *aCtx);
static ST_VOID atsem_sem_name_cstr_done (ASN1_DEC_CTXT *aCtx);
static ST_VOID atsem_objname_done (ASN1_DEC_CTXT *aCtx);
static ST_VOID atsem_sem_name_cstr (ASN1_DEC_CTXT *aCtx);
static ST_VOID atec_get_acc_delay (ASN1_DEC_CTXT *aCtx);
static ST_VOID atec_get_ct_prim (ASN1_DEC_CTXT *aCtx);
static ST_VOID atec_get_ct_cstr (ASN1_DEC_CTXT *aCtx);
static ST_VOID atec_ecname_cstr_done (ASN1_DEC_CTXT *aCtx);
static ST_VOID atec_ecname_done (ASN1_DEC_CTXT *aCtx);
static ST_VOID atec_ecname_cstr (ASN1_DEC_CTXT *aCtx);
static ST_VOID atec_eename_cstr_done (ASN1_DEC_CTXT *aCtx);
static ST_VOID atec_eename_done (ASN1_DEC_CTXT *aCtx);
static ST_VOID atec_eename_cstr (ASN1_DEC_CTXT *aCtx);
static ST_VOID (*get_mms_modlist_done) (ASN1_DEC_CTXT *aCtx);
static MODIFIER *mod_ptr;
static ST_INT *NUM_OF_MODS;
static ST_INT MAX_MODS;
static ST_RET ERROR_CODE;
/************************************************************************/
/************************************************************************/
/* _ms_get_mms_modlist */
/* Function to get an MMS list of modifiers from the received message. */
/************************************************************************/
ST_VOID _ms_get_mms_modlist (ASN1_DEC_CTXT *aCtx, MODIFIER *data_ptr, ST_INT *num_ptr,
ST_INT max_mods, ST_VOID (*done_fun) (ASN1_DEC_CTXT *ac))
{
/* set decode error for request or response */
if (_mmsdec_rslt->type == MMSRESP)
ERROR_CODE = RESP_BAD_VALUE;
else
ERROR_CODE = REQ_BAD_VALUE;
mod_ptr = data_ptr;
NUM_OF_MODS = num_ptr;
MAX_MODS = max_mods;
get_mms_modlist_done = done_fun;
ASN1R_TAG_ADD (aCtx, CTX | CONSTR, 0, modlist_attach_to_ec);
ASN1R_TAG_ADD (aCtx, CTX | CONSTR, 1, modlist_attach_to_sem);
aCtx->asn1r_c_done_fun [aCtx->asn1r_msg_level] = modlist_done;
}
/************************************************************************/
/************************************************************************/
/* modlist_attach_to_ec */
/* decoding list of modifiers: attach to event condition modifier cstr */
/* was encountered. */
/************************************************************************/
static ST_VOID modlist_attach_to_ec (ASN1_DEC_CTXT *aCtx)
{
MLOG_CDEC0 ("modlist_attach_to_ec");
(*NUM_OF_MODS)++; /* increment # of modifiers */
if (*NUM_OF_MODS > MAX_MODS)
asn1r_set_dec_err (aCtx, ERROR_CODE);
mod_ptr->modifier_tag = 0; /* set tag to attach to ec */
ASN1R_TAG_ADD (aCtx, CTX |CONSTR, 0, atec_eename_cstr);
}
/************************************************************************/
/* atec_eename_cstr */
/* decoding attach to event condition modifier: event enrollment name */
/* constructor was encountered. */
/************************************************************************/
static ST_VOID atec_eename_cstr (ASN1_DEC_CTXT *aCtx)
{
MLOG_CDEC0 ("atec_eename_cstr");
_ms_get_mms_objname (aCtx,&mod_ptr->mod.atec.evenroll_name, atec_eename_done);
}
/************************************************************************/
/* atec_eename_done */
/* decoding attach to event condition modifier: event enrollment name */
/* has been obtained. */
/************************************************************************/
static ST_VOID atec_eename_done (ASN1_DEC_CTXT *aCtx)
{
aCtx->asn1r_c_done_fun [aCtx->asn1r_msg_level] = atec_eename_cstr_done;
}
/************************************************************************/
/* atec_eename_cstr_done */
/* decoding attach to event condition modifier: event enrollment name */
/* constructor done was encountered. */
/************************************************************************/
static ST_VOID atec_eename_cstr_done (ASN1_DEC_CTXT *aCtx)
{
ASN1R_TAG_ADD (aCtx, CTX |CONSTR, 1, atec_ecname_cstr);
}
/************************************************************************/
/* atec_ecname_cstr */
/* decoding attach to event condition modifier: event condition name */
/* constructor was encountered. */
/************************************************************************/
static ST_VOID atec_ecname_cstr (ASN1_DEC_CTXT *aCtx)
{
MLOG_CDEC0 ("atec_ecname_cstr");
_ms_get_mms_objname (aCtx, &mod_ptr->mod.atec.evcon_name, atec_ecname_done);
}
/************************************************************************/
/* atec_ecname_done */
/* decoding attach to event condition modifier: event condition name */
/* has been obtained. */
/************************************************************************/
static ST_VOID atec_ecname_done (ASN1_DEC_CTXT *aCtx)
{
aCtx->asn1r_c_done_fun [aCtx->asn1r_msg_level] = atec_ecname_cstr_done;
}
/************************************************************************/
/* atec_ecname_cstr_done */
/* decoding attach to event condition modifier: event condition name */
/* constructor done was encountered. */
/************************************************************************/
static ST_VOID atec_ecname_cstr_done (ASN1_DEC_CTXT *aCtx)
{
ASN1R_TAG_ADD (aCtx, CTX, 2,atec_get_ct_prim);
ASN1R_TAG_ADD (aCtx, CTX|CONSTR,2,atec_get_ct_cstr);
}
/************************************************************************/
/* atec_get_ct_prim */
/* decoding attach to event condition modifier: causing transitions */
/* primitive was encountered. */
/************************************************************************/
static ST_VOID atec_get_ct_prim (ASN1_DEC_CTXT *aCtx)
{
MLOG_CDEC0 ("atec_get_ct_prim");
if (!asn1r_get_bitstr (aCtx, &mod_ptr->mod.atec.causing_transitions, 7))
atec_get_ct_done (aCtx); /* set up for the next data element */
else
asn1r_set_dec_err (aCtx, ERROR_CODE);
}
/************************************************************************/
/* atec_get_ct_cstr */
/* decoding attach to event condition modifier: causing transitions */
/* constructor was encountered. */
/************************************************************************/
static ST_VOID atec_get_ct_cstr (ASN1_DEC_CTXT *aCtx)
{
MLOG_CDEC0 ("atec_get_ct_cstr");
/* set up bitstring cstr done function */
aCtx->asn1r_c_done_fun[aCtx->asn1r_msg_level] = atec_get_ct_done;
asn1r_get_bitstr_cstr (aCtx, 7,&mod_ptr->mod.atec.causing_transitions);
}
/************************************************************************/
/* atec_get_ct_done */
/* decoding attach to event condition modifier: causing transitions */
/* constructor done was encountered. */
/************************************************************************/
static ST_VOID atec_get_ct_done (ASN1_DEC_CTXT *aCtx)
{
MLOG_CDEC0 ("atec_get_ct_done");
/* Check aCtx->asn1r_bitcount for correct # of bits */
if (aCtx->asn1r_bitcount != 7) /* should be 7 bits */
asn1r_set_dec_err (aCtx, ERROR_CODE);
else /* now get acceptable delay */
{
ASN1R_TAG_ADD (aCtx, CTX,3,atec_get_acc_delay);
aCtx->asn1r_c_done_fun [aCtx->asn1r_msg_level] = modlist_modifier_done;
}
}
/************************************************************************/
/* atec_get_acc_delay */
/* decoding attach to event condition modifier: decode acceptable delay */
/************************************************************************/
static ST_VOID atec_get_acc_delay (ASN1_DEC_CTXT *aCtx)
{
MLOG_CDEC0 ("atec_get_acc_dela");
mod_ptr->mod.atec.acc_delay_pres = SD_TRUE; /* accept delay present */
/* read acceptable delay from message */
if (asn1r_get_u32 (aCtx, &(mod_ptr->mod.atec.acc_delay)))
asn1r_set_dec_err (aCtx, ERROR_CODE);
}
/************************************************************************/
/************************************************************************/
/* modlist_attach_to_sem */
/* decoding list of modifiers: attach to semaphore modifier constructor */
/* was encountered. */
/************************************************************************/
static ST_VOID modlist_attach_to_sem (ASN1_DEC_CTXT *aCtx)
{
MLOG_CDEC0 ("modlist_attach_to_sem");
(*NUM_OF_MODS)++; /* increment # of modifiers */
if (*NUM_OF_MODS > MAX_MODS)
asn1r_set_dec_err (aCtx, ERROR_CODE);
mod_ptr->modifier_tag = 1; /* set tag to attach to sem */
ASN1R_TAG_ADD (aCtx, CTX |CONSTR, 0, atsem_sem_name_cstr);
}
/************************************************************************/
/* atsem_sem_name_cstr */
/* decoding attach to semaphore modifier: semaphore name constructor */
/* was encountered. */
/************************************************************************/
static ST_VOID atsem_sem_name_cstr (ASN1_DEC_CTXT *aCtx)
{
MLOG_CDEC0 ("atsem_sem_name_cstr");
mod_ptr->mod.atsem.priority = MMS_NORM_PRIORITY;
mod_ptr->mod.atsem.rel_conn_lost = SD_TRUE;
_ms_get_mms_objname (aCtx, &mod_ptr->mod.atsem.sem_name, atsem_objname_done);
}
/************************************************************************/
/* atsem_objname_done */
/* decoding attach to semaphore modifier: semaphore name has been */
/* obtained. */
/************************************************************************/
static ST_VOID atsem_objname_done (ASN1_DEC_CTXT *aCtx)
{
aCtx->asn1r_c_done_fun [aCtx->asn1r_msg_level] = atsem_sem_name_cstr_done;
}
/************************************************************************/
/* atsem_sem_name_cstr_done */
/* decoding attach to semaphore modifier: semaphore name constructor */
/* done was encountered. */
/************************************************************************/
static ST_VOID atsem_sem_name_cstr_done (ASN1_DEC_CTXT *aCtx)
{
ASN1R_TAG_ADD (aCtx, CTX, 1, atsem_get_named_token);
ASN1R_TAG_ADD (aCtx, CTX, 2, atsem_get_priority );
ASN1R_TAG_ADD (aCtx, CTX, 3, atsem_get_acc_delay );
ASN1R_TAG_ADD (aCtx, CTX, 4, atsem_get_ctrl_timeout);
ASN1R_TAG_ADD (aCtx, CTX, 5, atsem_get_abrt_timeout);
ASN1R_TAG_ADD (aCtx, CTX, 6, atsem_get_rel_conn_lost);
aCtx->asn1r_c_done_fun [aCtx->asn1r_msg_level] = modlist_modifier_done;
}
/************************************************************************/
/* atsem_get_named_token */
/* decoding attach to semaphore modifier: named token name was */
/* encountered. */
/************************************************************************/
static ST_VOID atsem_get_named_token (ASN1_DEC_CTXT *aCtx)
{
MLOG_CDEC0 ("atsem_get_named_token");
mod_ptr->mod.atsem.named_token_pres = SD_TRUE; /* named token present */
/* read named token from received message */
if (asn1r_get_identifier (aCtx, mod_ptr->mod.atsem.named_token))
asn1r_set_dec_err (aCtx, ERROR_CODE);
ASN1R_TAG_ADD (aCtx, CTX, 2, atsem_get_priority );
ASN1R_TAG_ADD (aCtx, CTX, 3, atsem_get_acc_delay );
ASN1R_TAG_ADD (aCtx, CTX, 4, atsem_get_ctrl_timeout);
ASN1R_TAG_ADD (aCtx, CTX, 5, atsem_get_abrt_timeout);
ASN1R_TAG_ADD (aCtx, CTX, 6, atsem_get_rel_conn_lost);
}
/************************************************************************/
/* atsem_get_priority */
/* decoding attach to semaphore modifier: decode the priority. */
/************************************************************************/
static ST_VOID atsem_get_priority (ASN1_DEC_CTXT *aCtx)
{
MLOG_CDEC0 ("atsem_get_priorit");
/* read priority from received message */
if (asn1r_get_u8 (aCtx, &(mod_ptr->mod.atsem.priority)))
asn1r_set_dec_err (aCtx, ERROR_CODE);
ASN1R_TAG_ADD (aCtx, CTX, 3, atsem_get_acc_delay );
ASN1R_TAG_ADD (aCtx, CTX, 4, atsem_get_ctrl_timeout);
ASN1R_TAG_ADD (aCtx, CTX, 5, atsem_get_abrt_timeout);
ASN1R_TAG_ADD (aCtx, CTX, 6, atsem_get_rel_conn_lost);
}
/************************************************************************/
/* atsem_get_acc_delay */
/* decoding attach to semaphore modifier: decode acceptable delay */
/************************************************************************/
static ST_VOID atsem_get_acc_delay (ASN1_DEC_CTXT *aCtx)
{
MLOG_CDEC0 ("atsem_get_acc_dela");
mod_ptr->mod.atsem.acc_delay_pres = SD_TRUE; /* accept delay present */
/* read acceptable delay from message */
if (asn1r_get_u32 (aCtx, &(mod_ptr->mod.atsem.acc_delay)))
asn1r_set_dec_err (aCtx, ERROR_CODE);
ASN1R_TAG_ADD (aCtx, CTX, 4, atsem_get_ctrl_timeout);
ASN1R_TAG_ADD (aCtx, CTX, 5, atsem_get_abrt_timeout);
ASN1R_TAG_ADD (aCtx, CTX, 6, atsem_get_rel_conn_lost);
}
/************************************************************************/
/* atsem_get_ctrl_timeout */
/* decoding attach to semaphore modifier: decode control timeout. */
/************************************************************************/
static ST_VOID atsem_get_ctrl_timeout (ASN1_DEC_CTXT *aCtx)
{
MLOG_CDEC0 ("atsem_get_ctrl_timeou");
mod_ptr->mod.atsem.ctrl_timeout_pres = SD_TRUE; /* ctrl timeout pres */
/* read control timeout from message */
if (asn1r_get_u32 (aCtx, &(mod_ptr->mod.atsem.ctrl_timeout)))
asn1r_set_dec_err (aCtx, ERROR_CODE);
ASN1R_TAG_ADD (aCtx, CTX, 5, atsem_get_abrt_timeout);
ASN1R_TAG_ADD (aCtx, CTX, 6, atsem_get_rel_conn_lost);
}
/************************************************************************/
/* atsem_get_abrt_timeout */
/* decoding attach to semaphore modifier: decode abort timeout. */
/************************************************************************/
static ST_VOID atsem_get_abrt_timeout (ASN1_DEC_CTXT *aCtx)
{
MLOG_CDEC0 ("atsem_get_abrt_timeout");
mod_ptr->mod.atsem.abrt_on_timeout_pres = SD_TRUE;
if (asn1r_get_bool (aCtx, &(mod_ptr->mod.atsem.abrt_on_timeout)))
asn1r_set_dec_err (aCtx, ERROR_CODE);
ASN1R_TAG_ADD (aCtx, CTX, 6, atsem_get_rel_conn_lost);
}
/************************************************************************/
/* atsem_get_rel_conn_lost */
/* decoding attach to semaphore modifier: decode relinquish if */
/* connection lost. */
/************************************************************************/
static ST_VOID atsem_get_rel_conn_lost (ASN1_DEC_CTXT *aCtx)
{
MLOG_CDEC0 ("atsem_get_rel_conn_lost");
if (asn1r_get_bool (aCtx, &(mod_ptr->mod.atsem.rel_conn_lost)))
asn1r_set_dec_err (aCtx, ERROR_CODE);
}
/************************************************************************/
/* modlist_modifier_done */
/* decoding attach to semaphore modifier: modifier constructor done */
/* was encountered */
/************************************************************************/
static ST_VOID modlist_modifier_done (ASN1_DEC_CTXT *aCtx)
{
mod_ptr++; /* point to where next will go */
ASN1R_TAG_ADD (aCtx, CTX | CONSTR, 0, modlist_attach_to_ec);
ASN1R_TAG_ADD (aCtx, CTX | CONSTR, 1, modlist_attach_to_sem);
}
/************************************************************************/
/* modlist_done */
/* decoding list of modifiers: list is done */
/************************************************************************/
static ST_VOID modlist_done (ASN1_DEC_CTXT *aCtx)
{
(*get_mms_modlist_done) (aCtx); /* all done, call user set fun */
}
/************************************************************************/
/************************************************************************/
/* _ms_wr_mms_modlist */
/* Function to write an MMS list of modifiers to the message. */
/************************************************************************/
ST_VOID _ms_wr_mms_modlist (ASN1_ENC_CTXT *aCtx, MODIFIER *data_ptr, ST_INT num_of_mods)
{
MODIFIER *modPtr;
ST_INT i;
modPtr = data_ptr;
modPtr += num_of_mods - 1; /* point to last in the list */
for (i = 0; i < num_of_mods; i++)
{
asn1r_strt_constr (aCtx); /* start ctx tag 0 or 1 cstr */
switch (modPtr->modifier_tag)
{
case (0) : /* write attach to event cond */
if (modPtr->mod.atec.acc_delay_pres)
{
asn1r_wr_u32 (aCtx, modPtr->mod.atec.acc_delay);
asn1r_fin_prim (aCtx, 3, CTX);
}
asn1r_wr_bitstr (aCtx, &modPtr->mod.atec.causing_transitions, 7);
asn1r_fin_prim (aCtx, 2, CTX);
asn1r_strt_constr (aCtx);
_ms_wr_mms_objname (aCtx, &modPtr->mod.atec.evcon_name);
asn1r_fin_constr (aCtx, 1, CTX, DEF);
asn1r_strt_constr (aCtx);
_ms_wr_mms_objname (aCtx, &modPtr->mod.atec.evenroll_name);
asn1r_fin_constr (aCtx, 0, CTX, DEF);
break;
case (1) : /* write attach to semaphore */
asn1r_wr_bool (aCtx, modPtr->mod.atsem.rel_conn_lost);
asn1r_fin_prim (aCtx, 6, CTX);
if (modPtr->mod.atsem.abrt_on_timeout_pres)
{
asn1r_wr_bool (aCtx, modPtr->mod.atsem.abrt_on_timeout);
asn1r_fin_prim (aCtx, 5, CTX);
}
if (modPtr->mod.atsem.ctrl_timeout_pres)
{
asn1r_wr_u32 (aCtx, modPtr->mod.atsem.ctrl_timeout);
asn1r_fin_prim (aCtx, 4, CTX);
}
if (modPtr->mod.atsem.acc_delay_pres)
{
asn1r_wr_u32 (aCtx, modPtr->mod.atsem.acc_delay);
asn1r_fin_prim (aCtx, 3, CTX);
}
if (modPtr->mod.atsem.priority != MMS_NORM_PRIORITY)
{
asn1r_wr_u8 (aCtx, modPtr->mod.atsem.priority);
asn1r_fin_prim (aCtx, 2, CTX);
}
if (modPtr->mod.atsem.named_token_pres)
{
asn1r_wr_vstr (aCtx, modPtr->mod.atsem.named_token);
asn1r_fin_prim (aCtx, 1, CTX);
}
asn1r_strt_constr (aCtx);
_ms_wr_mms_objname (aCtx, &modPtr->mod.atsem.sem_name);
asn1r_fin_constr (aCtx, 0, CTX, DEF);
break;
}
asn1r_fin_constr (aCtx, (ST_UINT16) modPtr->modifier_tag, CTX, DEF);
modPtr--; /* point to previous modifier */
}
}
#endif