自主协议库编译通过

mmslib/mmsle/rq_delpi.c

@@ -0,0 +1,96 @@
+/************************************************************************/
+/* SISCO SOFTWARE MODULE HEADER *****************************************/
+/************************************************************************/
+/*   (c) Copyright Systems Integration Specialists Company, Inc.,	*/
+/*      	  1986 - 2001, All Rights Reserved.		        */
+/*									*/
+/*		    PROPRIETARY AND CONFIDENTIAL			*/
+/*									*/
+/* MODULE NAME : rq_delpi.c						*/
+/* PRODUCT(S)  : MMSEASE, MMSEASE-LITE					*/
+/*									*/
+/* MODULE DESCRIPTION : 						*/
+/*	This module contains the requester portion of delete program	*/
+/*	invocation.  It decodes the delete program invocation response	*/
+/*	(confirm) & encodes the delete program invocation request.	*/
+/*									*/
+/* GLOBAL FUNCTIONS DEFINED IN THIS MODULE :				*/
+/*									*/
+/* MODIFICATION LOG :							*/
+/*  Date     Who   Rev			Comments			*/
+/* --------  ---  ------   -------------------------------------------	*/
+/* 12/20/01  JRB     02    Converted to use ASN1R (re-entrant ASN1)	*/
+/* 06/15/98  MDE     01    Changes to allow compile under C++		*/
+/* 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 "mms_pprg.h"
+#include "asn1defs.h"
+
+/************************************************************************/
+/* variables global to the DECODE portion : NONE			*/
+
+/************************************************************************/
+/* variables global to the ENCODE portion : NONE			*/
+
+/************************************************************************/
+/************************************************************************/
+/*			mms_delete_pi_rsp				*/
+/* NOTE: Since the mms_delete_pi_rsp is a NULL PDU, the decode is 	*/
+/* continued by '_mms_null_pdu_dec', which simply sets decode done = 1 	*/
+/* and sets the decode done function to point to the general decode 	*/
+/* done fun.  See mmsdec.c for the general functions. 			*/
+/************************************************************************/
+
+
+#ifndef MMS_LITE
+/************************************************************************/
+/************************************************************************/
+/*			mp_delpi					*/
+/* This function is called from either the application or the virtual	*/
+/* machine to ENCODE and send the delete program invocation request.	*/
+/************************************************************************/
+
+MMSREQ_PEND *mp_delpi (ST_INT chan, DELPI_REQ_INFO *info_ptr)
+  {
+  return (_mms_req_send (MMSOP_DELETE_PI,
+			M_CAST_MK_FUN (_ms_mk_delpi_req),
+			chan,(ST_CHAR *)info_ptr));
+  } 
+
+#else
+/************************************************************************/
+/************************************************************************/
+/*			mpl_delpi					*/
+/* This function is called from either the application or the virtual	*/
+/* machine to ENCODE and send the delete program invocation request.	*/
+/************************************************************************/
+
+ST_RET mpl_delpi (DELPI_REQ_INFO *info_ptr)
+  {
+  return (_mms_req_fin (MMSOP_DELETE_PI,
+			M_CAST_MK_FUN (_ms_mk_delpi_req),
+			(ST_CHAR *)info_ptr));
+  } 
+#endif
+
+
+/************************************************************************/
+/************************************************************************/
+/*			_ms_mk_delpi_req					*/
+/* construct a delete program invocation request			*/
+/************************************************************************/
+
+ST_VOID _ms_mk_delpi_req (ASN1_ENC_CTXT *aCtx, DELPI_REQ_INFO *info)
+  {
+
+  asn1r_wr_vstr (aCtx, info->piname);		/* write pgm invocation name	*/
+
+/* write the context specific explicit tag for this opcode.		*/
+  asn1r_fin_prim (aCtx, MMSOP_DELETE_PI,CTX);		/* tag = opcode, ctx prim	*/
+  }