267 lines
8.8 KiB
C
267 lines
8.8 KiB
C
/************************************************************************/
|
|
/* SISCO SOFTWARE MODULE HEADER *****************************************/
|
|
/************************************************************************/
|
|
/* (c) Copyright Systems Integration Specialists Company, Inc., */
|
|
/* 1986 - 2007, All Rights Reserved. */
|
|
/* */
|
|
/* PROPRIETARY AND CONFIDENTIAL */
|
|
/* */
|
|
/* MODULE NAME : rs_init.c */
|
|
/* PRODUCT(S) : MMSEASE, MMSEASE-LITE */
|
|
/* */
|
|
/* MODULE DESCRIPTION : */
|
|
/* This module contains the responder portion of the initiate */
|
|
/* operation. It decodes the initiate request (indication) and */
|
|
/* encodes the initiate response. */
|
|
/* */
|
|
/* GLOBAL FUNCTIONS DEFINED IN THIS MODULE : */
|
|
/* */
|
|
/* MODIFICATION LOG : */
|
|
/* Date Who Rev Comments */
|
|
/* -------- --- ------ ------------------------------------------- */
|
|
/* 11/01/07 EJV 09 Rem obsolete LLC30... code. */
|
|
/* 03/09/05 EJV 08 Fixed thisFileName for MMS-EASE */
|
|
/* 03/11/04 GLB 07 Cleaned up "thisFileName" */
|
|
/* 12/20/01 JRB 06 Converted to use ASN1R (re-entrant ASN1) */
|
|
/* 09/08/00 RKR 05 Log error response for negative initiate resp*/
|
|
/* instead of calling m_log_resp_info_fun. */
|
|
/* 09/13/99 MDE 04 Added SD_CONST modifiers */
|
|
/* 04/07/98 MDE 01 Minor restructure to eliminate warnings */
|
|
/* 04/02/97 DTL 7.00 MMSEASE 7.0 release. See MODL70.DOC for */
|
|
/* history. */
|
|
/************************************************************************/
|
|
|
|
#include "glbtypes.h"
|
|
#include "sysincs.h"
|
|
#include "glbsem.h"
|
|
|
|
#include "mmsdefs.h"
|
|
#include "mms_pcon.h"
|
|
#include "asn1defs.h"
|
|
|
|
/************************************************************************/
|
|
/* For debug version, use a static pointer to avoid duplication of */
|
|
/* __FILE__ strings. */
|
|
|
|
#if defined(DEBUG_SISCO) && (defined(S_MT_SUPPORT) || !defined(MMS_LITE))
|
|
SD_CONST static ST_CHAR *SD_CONST thisFileName = __FILE__;
|
|
#endif
|
|
|
|
/************************************************************************/
|
|
/************************************************************************/
|
|
/* mms_init_req */
|
|
/* Function called to decode an Initiate request PDU after the PDU type */
|
|
/* has been determined. Sets up the parse of the next data element and */
|
|
/* returns, letting the ASN.1 tools take over. */
|
|
/* */
|
|
/* NOTE : This functionality has been moved to mmsinit.c, because the */
|
|
/* request and response are identical. The call to mms_init_req was */
|
|
/* put back to better support MMSEASE-LITE. */
|
|
/************************************************************************/
|
|
|
|
ST_VOID mms_init_req (ASN1_DEC_CTXT *aCtx)
|
|
{
|
|
MLOG_CDEC0 ("decode initiate request");
|
|
_mms_init_dec (aCtx, SD_TRUE);
|
|
}
|
|
|
|
|
|
#ifndef MMS_LITE
|
|
/************************************************************************/
|
|
/************************************************************************/
|
|
/* mp_init_resp */
|
|
/* create and send an initiate response */
|
|
/************************************************************************/
|
|
|
|
ST_RET mp_init_resp (MMSREQ_IND *indptr, INIT_INFO *info)
|
|
{
|
|
ST_UCHAR *msg_ptr;
|
|
ST_RET ret;
|
|
ST_INT i;
|
|
ST_INT num_ui;
|
|
INIT_UI *ui;
|
|
INIT_UI *ui_ptr;
|
|
ST_INT cs_count;
|
|
CS_INIT_INFO *cs_info_ptr;
|
|
ST_UCHAR *cs_build_bufs[MAX_INIT_CONTEXTS];
|
|
ST_UCHAR *buf;
|
|
ST_BOOLEAN context_accepted;
|
|
ST_RET result;
|
|
ST_INT16 reason;
|
|
ST_INT16 eclass;
|
|
ST_INT16 code;
|
|
ASN1_ENC_CTXT localEncCtx; /* For readability, use "aCtx" to access this.*/
|
|
ASN1_ENC_CTXT *aCtx = &localEncCtx;
|
|
|
|
if (info->num_cs_init > MAX_INIT_CONTEXTS)
|
|
return (ME_TOO_MANY_CONTEXTS);
|
|
|
|
S_LOCK_COMMON_RESOURCES ();
|
|
context_accepted = SD_FALSE; /* clear flag */
|
|
|
|
if (!(ret = _ms_check_ind_actv (indptr)))
|
|
{
|
|
num_ui = info->num_cs_init;
|
|
if (info->mms_p_context_pres)
|
|
num_ui++;
|
|
|
|
if (num_ui)
|
|
ui = ui_ptr = (INIT_UI *) chk_calloc (num_ui, sizeof (INIT_UI));
|
|
else
|
|
ui = NULL;
|
|
|
|
cs_count = 0;
|
|
cs_info_ptr = (CS_INIT_INFO *) (info + 1);
|
|
for (i = 0; i < num_ui; ++i, ++ui_ptr)
|
|
{
|
|
/* build the core initiate, if used and position reached or if no */
|
|
/* companion standard initiates are to be sent */
|
|
|
|
if ((info->mms_p_context_pres && i == info->core_position) ||
|
|
!info->num_cs_init)
|
|
{
|
|
if (info->rslt.accept_context)
|
|
{
|
|
context_accepted = SD_TRUE; /* set flag */
|
|
msg_ptr = _ms_mk_init (aCtx, m_build_buf,mms_max_msgsize,info,MMSINITRESP,SD_FALSE);
|
|
}
|
|
else
|
|
{
|
|
msg_ptr = _ms_mk_err_resp (aCtx, m_build_buf,mms_max_msgsize,indptr->op,indptr->id,
|
|
info->rslt.err.eclass,info->rslt.err.code);
|
|
eclass = info->rslt.err.eclass;
|
|
code = info->rslt.err.code;
|
|
}
|
|
ui_ptr->context = MMS_PCI;
|
|
if (info->rslt.accept_context)
|
|
ui_ptr->reject = SD_FALSE;
|
|
else
|
|
ui_ptr->reject = SD_TRUE;
|
|
ui_ptr->ui_len = M_BUILD_BUF_END - msg_ptr;
|
|
}
|
|
else
|
|
{
|
|
buf = cs_build_bufs[cs_count++] = (ST_UCHAR *)
|
|
chk_calloc (1,M_INIT_BUILD_LEN);
|
|
if (cs_info_ptr->rslt.accept_context)
|
|
{
|
|
context_accepted = SD_TRUE; /* set flag */
|
|
msg_ptr = _ms_mk_init (aCtx, buf,M_INIT_BUILD_LEN,
|
|
(INIT_INFO *) cs_info_ptr,MMSINITRESP,SD_TRUE);
|
|
}
|
|
else
|
|
{
|
|
msg_ptr = _ms_mk_err_resp (aCtx, buf,M_INIT_BUILD_LEN,indptr->op,indptr->id,
|
|
cs_info_ptr->rslt.err.eclass,cs_info_ptr->rslt.err.code);
|
|
eclass = cs_info_ptr->rslt.err.eclass;
|
|
code = cs_info_ptr->rslt.err.code;
|
|
}
|
|
|
|
ui_ptr->context = cs_info_ptr->p_context;
|
|
if (cs_info_ptr->rslt.accept_context)
|
|
ui_ptr->reject = SD_FALSE;
|
|
else
|
|
ui_ptr->reject = SD_TRUE;
|
|
ui_ptr->ui_len = (buf + M_INIT_BUILD_LEN) - msg_ptr;
|
|
}
|
|
ui_ptr->ui_ptr = msg_ptr;
|
|
}
|
|
|
|
/* Now set up the ACSE result & reason parameteds */
|
|
if (context_accepted) /* if any context accepted */
|
|
{
|
|
result = 0;
|
|
reason = 0;
|
|
}
|
|
else /* no context was accepted */
|
|
{
|
|
result = 1;
|
|
reason = 1;
|
|
}
|
|
|
|
/* If a response logging function is installed, call it */
|
|
|
|
if (result==0)
|
|
{
|
|
if (m_log_resp_info_fun && (mms_debug_sel & MMS_LOG_RESP))
|
|
(*m_log_resp_info_fun) (indptr, info);
|
|
}
|
|
else
|
|
{
|
|
if (m_log_error_resp_fun && (mms_debug_sel & MMS_LOG_RESP))
|
|
(*m_log_error_resp_fun) (indptr, eclass, code);
|
|
}
|
|
|
|
ret = _mllp_init_resp (indptr->chan,result,reason,
|
|
num_ui, ui,indptr->add_addr_info);
|
|
|
|
_ms_ind_serve_done (indptr);
|
|
|
|
if (ui)
|
|
chk_free (ui);
|
|
|
|
for (i = 0; i < info->num_cs_init; ++i) /* free CS build buffers */
|
|
chk_free (cs_build_bufs[i]);
|
|
}
|
|
S_UNLOCK_COMMON_RESOURCES ();
|
|
return (ret);
|
|
}
|
|
|
|
#else
|
|
/************************************************************************/
|
|
/************************************************************************/
|
|
/* mpl_init_resp */
|
|
/* create an initiate response */
|
|
/************************************************************************/
|
|
|
|
ST_RET mpl_init_resp (INIT_INFO *info_ptr)
|
|
{
|
|
ST_RET ret;
|
|
ASN1_ENC_CTXT localEncCtx; /* For readability, use "aCtx" to access this.*/
|
|
ASN1_ENC_CTXT *aCtx = &localEncCtx;
|
|
|
|
S_LOCK_COMMON_RESOURCES ();
|
|
|
|
mmsl_msg_start = _ms_mk_init (aCtx, mmsl_enc_buf, mmsl_enc_buf_size,
|
|
info_ptr,MMSINITRESP,SD_FALSE);
|
|
mmsl_msg_len = (mmsl_enc_buf + mmsl_enc_buf_size) - mmsl_msg_start;
|
|
|
|
if (!aCtx->asn1r_encode_overrun) /* Check for encode overrun */
|
|
ret = SD_SUCCESS;
|
|
else
|
|
ret = ME_ASN1_ENCODE_OVERRUN;
|
|
|
|
S_UNLOCK_COMMON_RESOURCES ();
|
|
return (ret);
|
|
}
|
|
|
|
#ifdef CS_SUPPORT
|
|
/************************************************************************/
|
|
/************************************************************************/
|
|
/* mpl_cs_init_resp */
|
|
/* create a companion standard initiate response */
|
|
/************************************************************************/
|
|
|
|
ST_RET mpl_cs_init_resp (CS_INIT_INFO *info_ptr)
|
|
{
|
|
ASN1_ENC_CTXT localEncCtx; /* For readability, use "aCtx" to access this.*/
|
|
ASN1_ENC_CTXT *aCtx = &localEncCtx;
|
|
|
|
mmsl_msg_start = _ms_mk_init (aCtx, mmsl_enc_buf, mmsl_enc_buf_size,
|
|
(INIT_INFO *) info_ptr,MMSINITRESP,SD_TRUE);
|
|
mmsl_msg_len = (mmsl_enc_buf + mmsl_enc_buf_size) - mmsl_msg_start;
|
|
|
|
if (aCtx->asn1r_encode_overrun) /* Check for encode overrun */
|
|
return (ME_ASN1_ENCODE_OVERRUN);
|
|
return (SD_SUCCESS);
|
|
}
|
|
#endif
|
|
|
|
#endif
|
|
|
|
/************************************************************************/
|
|
/* mk_initiate */
|
|
/* Note that there is only one mk_initiate function, and it is listed */
|
|
/* in the mmsinit.c module. */
|
|
/************************************************************************/
|