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

352 lines
13 KiB
C

/************************************************************************/
/* SISCO SOFTWARE MODULE HEADER *****************************************/
/************************************************************************/
/* (c) Copyright Systems Integration Specialists Company, Inc., */
/* 1986 - 2001, All Rights Reserved. */
/* */
/* PROPRIETARY AND CONFIDENTIAL */
/* */
/* MODULE NAME : rq_fdir.c */
/* PRODUCT(S) : MMSEASE, MMSEASE-LITE */
/* */
/* MODULE DESCRIPTION : */
/* This module contains the requester portion of file directory. */
/* It decodes the file directory response (confirm) & encodes the */
/* file directory request. */
/* */
/* GLOBAL FUNCTIONS DEFINED IN THIS MODULE : */
/* */
/* MODIFICATION LOG : */
/* Date Who Rev Comments */
/* -------- --- ------ ------------------------------------------- */
/* 03/11/04 GLB 06 Remove "thisFileName" */
/* 12/20/01 JRB 05 Converted to use ASN1R (re-entrant ASN1) */
/* 09/13/99 MDE 04 Added SD_CONST modifiers */
/* 03/23/99 MDE 03 Changes to decode buffer allocation scheme */
/* 06/15/98 MDE 02 Changes to allow compile under C++ */
/* 07/03/97 MDE 01 Op-specific info buffer handling changes */
/* 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_pfil.h"
#include "asn1defs.h"
/************************************************************************/
/* variables global to the DECODE portion : */
static FDIR_RESP_INFO *fop_info;
static FDIR_DIR_ENT *ent_ptr;
static FDIR_DIR_ENT *dir_ptr;
static ST_INT max_dir_ents;
/************************************************************************/
/* variables global to the ENCODE portion : NONE */
static ST_VOID fdir_dir_entry (ASN1_DEC_CTXT *aCtx);
static ST_VOID fdir_more_follows (ASN1_DEC_CTXT *aCtx);
static ST_VOID fdir_get_fil_mtim (ASN1_DEC_CTXT *aCtx);
static ST_VOID fdir_dir_ent_done (ASN1_DEC_CTXT *aCtx);
static ST_VOID fdir_get_fil_siz (ASN1_DEC_CTXT *aCtx);
static ST_VOID fdir_get_fil_attr (ASN1_DEC_CTXT *aCtx);
static ST_VOID fdir_fname_cstr_done (ASN1_DEC_CTXT *aCtx);
static ST_VOID fdir_fname_cstr (ASN1_DEC_CTXT *aCtx);
static ST_VOID fdir_dir_list_done (ASN1_DEC_CTXT *aCtx);
static ST_VOID fdir_dir_seq (ASN1_DEC_CTXT *aCtx);
static ST_VOID fdir_dir_list (ASN1_DEC_CTXT *aCtx);
/************************************************************************/
/************************************************************************/
/* mms_file_dir_rsp */
/* This function is called from mmsdec when the opcode for this */
/* operation is decoded. Setup state machine function pointers, etc. */
/************************************************************************/
ST_VOID mms_file_dir_rsp (ASN1_DEC_CTXT *aCtx)
{
ST_INT rsp_size;
MLOG_CDEC0 ("File Directory Response");
#if defined(FIXED_DECBUF)
max_dir_ents = m_cl_max_file_directory;
rsp_size = mmsl_dec_info_size;
#else
max_dir_ents = _mmsdec_msglen/8; /* determine maximum size */
if (m_cl_max_file_directory && (max_dir_ents > m_cl_max_file_directory))
max_dir_ents = m_cl_max_file_directory;
/* get storage for resp info */
rsp_size = sizeof (FDIR_RESP_INFO)
+ (max_dir_ents * (sizeof (FDIR_DIR_ENT)))
+ (max_dir_ents * (sizeof (FILE_NAME)));
#endif
/* get storage for request information */
fop_info = (FDIR_RESP_INFO *) _m_get_dec_buf (aCtx, rsp_size);
fop_info->num_dir_ent = 0; /* set default values */
fop_info->more_follows = SD_FALSE;
ent_ptr = (FDIR_DIR_ENT *) (fop_info + 1);
ASN1R_TAG_ADD (aCtx, CTX | CONSTR, 0, fdir_dir_list);
}
/************************************************************************/
/* fdir_dir_list */
/* file directory response is being decoded: directory list constructor */
/* was encountered. */
/************************************************************************/
static ST_VOID fdir_dir_list (ASN1_DEC_CTXT *aCtx)
{
MLOG_CDEC0 ("fdir_dir_list");
ASN1R_TAG_ADD (aCtx, UNI | CONSTR, SEQ_CODE, fdir_dir_seq);
}
/************************************************************************/
/* fdir_dir_seq */
/* file directory response is being decoded: directory entry constr */
/* was encountered. */
/************************************************************************/
static ST_VOID fdir_dir_seq (ASN1_DEC_CTXT *aCtx)
{
MLOG_CDEC0 ("fdir_dir_seq");
ASN1R_TAG_ADD (aCtx, UNI | CONSTR, SEQ_CODE, fdir_dir_entry);
aCtx->asn1r_c_done_fun [aCtx->asn1r_msg_level] = NULL;
aCtx->asn1r_c_done_fun [aCtx->asn1r_msg_level - 1] = fdir_dir_list_done;
}
/************************************************************************/
/* fdir_dir_entry */
/* file directory response is being decoded: directory sequence was */
/* encountered. */
/************************************************************************/
static ST_VOID fdir_dir_entry (ASN1_DEC_CTXT *aCtx)
{
MLOG_CDEC0 ("fdir_dir_entry");
fop_info->num_dir_ent++; /* increment directory entry count */
if (fop_info->num_dir_ent > max_dir_ents)
asn1r_set_dec_err (aCtx, RESP_UNSPECIFIED);
ASN1R_TAG_ADD (aCtx, CTX|CONSTR,0,fdir_fname_cstr);
}
/************************************************************************/
/* fdir_fname_cstr */
/* request domain download request is being decoded: filename cstr was */
/* encountered. */
/************************************************************************/
static ST_VOID fdir_fname_cstr (ASN1_DEC_CTXT *aCtx)
{
MLOG_CDEC0 ("fdir_fname_cstr");
aCtx->asn1r_c_done_fun [aCtx->asn1r_msg_level] = fdir_fname_cstr_done;
_ms_get_mms_fname (aCtx, (FILE_NAME *)(ent_ptr + 1),
max_dir_ents, &ent_ptr->num_of_fname);
}
/************************************************************************/
/* fdir_fname_cstr_done */
/* request domain download request is being decoded: file name list */
/* constructor done was encountered. */
/************************************************************************/
static ST_VOID fdir_fname_cstr_done (ASN1_DEC_CTXT *aCtx)
{
ASN1R_TAG_ADD (aCtx, CTX | CONSTR, 1, fdir_get_fil_attr);
}
/************************************************************************/
/* fdir_get_fil_attr */
/* file directory response is being decoded: file attributes constr was */
/* encountered. */
/************************************************************************/
static ST_VOID fdir_get_fil_attr (ASN1_DEC_CTXT *aCtx)
{
MLOG_CDEC0 ("fdir_get_fil_attr");
ASN1R_TAG_ADD (aCtx, CTX, 0, fdir_get_fil_siz);
}
/************************************************************************/
/* fdir_get_fil_siz */
/* file directory response is being decoded: file size was found, */
/* modified time can be next, or can be done. */
/************************************************************************/
static ST_VOID fdir_get_fil_siz (ASN1_DEC_CTXT *aCtx)
{
MLOG_CDEC0 ("fdir_get_fil_si");
if (asn1r_get_u32 (aCtx, &(ent_ptr->fsize))) /* read the file size */
asn1r_set_dec_err (aCtx, RESP_BAD_VALUE);
ASN1R_TAG_ADD (aCtx, CTX,1,fdir_get_fil_mtim);
aCtx->asn1r_c_done_fun [aCtx->asn1r_msg_level] = NULL; /* ok for file attr to be done */
aCtx->asn1r_c_done_fun [aCtx->asn1r_msg_level-1] = fdir_dir_ent_done;
}
/************************************************************************/
/* fdir_get_fil_mtim */
/* file directory response is being decoded: directory entry was */
/* encountered, and modified time was found; creator can be next. */
/************************************************************************/
static ST_VOID fdir_get_fil_mtim (ASN1_DEC_CTXT *aCtx)
{
MLOG_CDEC0 ("fdir_get_fil_mtim");
ent_ptr->mtimpres = SD_TRUE; /* set modify time present */
if (asn1r_get_time (aCtx, &ent_ptr->mtime)) /* read the last modified time */
asn1r_set_dec_err (aCtx, RESP_BAD_VALUE);
}
/************************************************************************/
/* fdir_dir_ent_done */
/* DECODING file directory response: directory entry was completed. */
/* Re-initialize the valid states. */
/************************************************************************/
static ST_VOID fdir_dir_ent_done (ASN1_DEC_CTXT *aCtx)
{
MLOG_CDEC0 ("fdir_dir_ent_done");
/* point to where the next directory entry will start */
ent_ptr = (FDIR_DIR_ENT *)(((FILE_NAME *)(ent_ptr + 1))
+ (ent_ptr -> num_of_fname));
ASN1R_TAG_ADD (aCtx, UNI | CONSTR, SEQ_CODE, fdir_dir_entry);
}
/************************************************************************/
/* fdir_dir_list_done */
/* DECODING file directory response: directory list was completed. */
/* Re-initialize the valid states. */
/************************************************************************/
static ST_VOID fdir_dir_list_done (ASN1_DEC_CTXT *aCtx)
{
ST_INT resp_size;
ST_INT i;
ST_INT fname_count;
MLOG_CDEC0 ("fdir_dir_list_done");
fname_count = 0;
ASN1R_TAG_ADD (aCtx, CTX, 1, fdir_more_follows);
/* find the exact size of the storage used */
dir_ptr = (FDIR_DIR_ENT *)(fop_info + 1);
for (i=0; i < fop_info->num_dir_ent; ++i)
{
fname_count += dir_ptr->num_of_fname;
dir_ptr = (FDIR_DIR_ENT *)(((FILE_NAME *)(dir_ptr + 1))
+ (dir_ptr -> num_of_fname));
}
/* give back unused storage */
resp_size = sizeof (FDIR_RESP_INFO)
+ ((fop_info->num_dir_ent) * sizeof (FDIR_DIR_ENT))
+ (fname_count * sizeof (FILE_NAME));
_mms_dec_info = (*m_realloc_os_fun) (_mms_dec_info,resp_size);
fop_info = (FDIR_RESP_INFO *) _mms_dec_info;
_ms_set_cs_check (aCtx); /* check for Companion Standard info */
}
/************************************************************************/
/* fdir_more_follows */
/* file directory response is being decoded: more follows indicator */
/* has been encountered. */
/************************************************************************/
static ST_VOID fdir_more_follows (ASN1_DEC_CTXT *aCtx)
{
MLOG_CDEC0 ("fdir_more_follows");
if (asn1r_get_bool (aCtx, &(fop_info->more_follows))) /* read more follows */
asn1r_set_dec_err (aCtx, RESP_BAD_VALUE);
_ms_set_cs_check (aCtx); /* check for Companion Standard info */
}
#ifndef MMS_LITE
/************************************************************************/
/************************************************************************/
/* mp_fdir */
/* This function is called from either the application or the virtual */
/* machine to ENCODE the file directory request. */
/************************************************************************/
MMSREQ_PEND *mp_fdir (ST_INT chan, FDIR_REQ_INFO *info_ptr)
{
return (_mms_req_send (MMSOP_FILE_DIR,
M_CAST_MK_FUN (_ms_mk_fdir_req),
chan,(ST_CHAR *)info_ptr));
}
#else
/************************************************************************/
/************************************************************************/
/* mpl_fdir */
/* This function is called from either the application or the virtual */
/* machine to ENCODE the file directory request. */
/************************************************************************/
ST_RET mpl_fdir (FDIR_REQ_INFO *info_ptr)
{
return (_mms_req_fin (MMSOP_FILE_DIR,
M_CAST_MK_FUN (_ms_mk_fdir_req),
(ST_CHAR *)info_ptr));
}
#endif
/************************************************************************/
/************************************************************************/
/* _ms_mk_fdir_req */
/* ENCODE a file directory REQUEST: */
/************************************************************************/
ST_VOID _ms_mk_fdir_req (ASN1_ENC_CTXT *aCtx, FDIR_REQ_INFO *info)
{
FILE_NAME *fname_idx;
if (info->cont_after_pres)
{ /* write continue after name */
asn1r_strt_constr (aCtx);
fname_idx = (FILE_NAME *)(info + 1);
fname_idx += info->num_of_fs_fname;
_ms_wr_mms_fname (aCtx, fname_idx, info->num_of_ca_fname);
asn1r_fin_constr (aCtx, 1,CTX,DEF); /* context specific tag 1 */
}
if (info->filespec_pres)
{ /* write the file specification */
asn1r_strt_constr (aCtx);
fname_idx = (FILE_NAME *)(info + 1);
_ms_wr_mms_fname (aCtx, fname_idx, info->num_of_fs_fname);
asn1r_fin_constr (aCtx, 0,CTX,DEF); /* context specific tag 0 */
}
/* write the context specific tag for this opcode */
asn1r_fin_constr (aCtx, MMSOP_FILE_DIR,CTX,DEF);
}