s_dl_discmod.c

这是一个c＋＋编写的WCDMA链路采用RAKE接收的方针源代码

/*
 | Project:     WCDMA simulation environment
 | Module:      
 | Author:      
 | Date:        February 23, 1999
 |
 | History:
 | 
 |              February 23,  1999 Maarit Melvasalo 
 |                      Initial version. 
 |              March 11,  1999 Maarit Melvasalo 
 |                      Comments added and extra code removed
 |              May 3, 1999 Maarit Melvasalo  
 |                      Downlink and uplink separated and sample changed 
 |                      to internal
 |
 |  File    : s_dl_discmod.c
 |  Abstract:
 |
 | USER GIVEN PARAMETERS
 |
 | 1: B  = the number of real input chips 
 | 2: C  = the spreading code 
 | 3: SF = spreading factor
 |
 | 
 | DEPENDS ON FILES 
 |            discmod.c 
 |            qpsk_ints.c 
 |            spreading.c 
 |            mealy.c  
 |            bitroutines.c
 |            conversions.c  
 |            utility.c      
 | 
 |
 | Copyright disclaimer:
 |   This software was developed at the National Institute of Standards
 |   and Technology by employees of the Federal Government in the course
 |   of their official duties. Pursuant to title 17 Section 105 of the
 |   United States Code this software is not subject to copyright
 |   protection and is in the public domain.
 |
 |   We would appreciate acknowledgement if the software is used.
 |
 |
 */

#define S_FUNCTION_NAME s_dl_discmod
#define S_FUNCTION_LEVEL 2

#include <math.h>
#include "simstruc.h"
#include "tmwtypes.h"
#include "config_wcdma.h"
#include "wcdma_simulink.h"

/* USER GIVEN PARAMETERS AND DEFINITIONS /**/

/*Number of input and output ports/**/
#define NINPUTS   1
#define NOUTPUTS  2

/* Number of user given parameters/**/  
#define NPARAMS 4      

/* Spreading code parameter /**/
#define C_PARAM(S) ssGetSFcnParam(S,1)            /* Code */
#define nC   mxGetN(C_PARAM(S))                   /* Code length */ 

#define SF_PARAM(S) ssGetSFcnParam(S,2)            /* Spreading factor*/
#define SF (int_T)(mxGetPr(SF_PARAM(S))[0])   

/* Number of slots in each frame /**/
#define SLOTS(S)  ssGetSFcnParam(S,3)
#define nSlots (int_T)(mxGetPr(SLOTS(S))[0]) 

/* Input and Output Size parameters /**/
#define B_DLmod(S) ssGetSFcnParam(S,0)            
#define inDLmod (int_T)(mxGetPr(B_DLmod(S))[0])   

/* Output block size  /**/
#define outDLmod (int_T)(inDLmod * SF / 2)        

/* Pointer to Input Port */
#define U(element) (*uPtrs[element])              

/* Sampletime -- defined in config_cdma /**/
#define td  TD_FRAME / (real_T)nSlots  

/*====================*
 * S-function methods *
 *====================*/

/* Function: mdlInitializeSizes ===============================================
 * Abstract:
 *    The sizes information is used by Simulink to determine the S-function
 *    block's characteristics (number of inputs, outputs, states, etc.).
 */
static void mdlInitializeSizes(SimStruct *S)
{
 /* Number of expected parameters */
  ssSetNumSFcnParams(S, NPARAMS);  

  if (ssGetNumSFcnParams(S) != ssGetSFcnParamsCount(S)) 
 {
      return;
 }
  
    /* Initialize the input and output port sizes/**/
  if (!ssSetNumInputPorts(S, NINPUTS)) return;  
    ssSetInputPortWidth(S, 0, inDLmod);
    ssSetInputPortDirectFeedThrough(S, 0, 1);

    if (!ssSetNumOutputPorts(S, NOUTPUTS)) return; /* TWO output port/**/
    ssSetOutputPortWidth(S, 0,outDLmod);
    ssSetOutputPortWidth(S, 1,outDLmod);

   /* Initialize number of sample times and simulink work vectors /**/ 
     ssSetNumSampleTimes(S, 1);
    ssSetNumIWork(S, nC);

    /* To Speeds up the simulations/**/
    ssSetSFcnParamNotTunable(S,0); 
    ssSetSFcnParamNotTunable(S,1); 
    ssSetSFcnParamNotTunable(S,2); 
    ssSetSFcnParamNotTunable(S,3); 

    /* Take care when specifying exception free code - see sfuntmpl.doc */
    ssSetOptions(S, SS_OPTION_EXCEPTION_FREE_CODE);
}   /* do not use mxCalloc or  mexErrMsgTxt functions */


/* Function: mdlInitializeSampleTimes =========================================
 * Abstract:
 *    Specify the sample time
 */
static void mdlInitializeSampleTimes(SimStruct *S)
{   
     ssSetSampleTime(S, 0, td); 
     ssSetOffsetTime(S, 0, 0.0);
}


#define MDL_INITIALIZE_CONDITIONS
/* Function: mdlInitializeConditions ========================================
 * Abstract:
 *           Stores the spreading code to IWork vector 
 */
static void mdlInitializeConditions(SimStruct *S)
{
    int_T             *iwork = ssGetIWork(S);
    real_T            *cpr  = mxGetPr(C_PARAM(S));
    int_T  i;

    for (i =0; i<nC;i++){
      iwork[i] = (int_T)cpr[i];
    }
    i = wcdma_mod_init(); /*is a empty function*/
}


/* Function: mdlOutputs =======================================================
 * Abstract:
 * 
 */
static void mdlOutputs(SimStruct *S, int_T tid)
{
    real_T            *yI    = ssGetOutputPortRealSignal(S,0);
    real_T            *yQ    = ssGetOutputPortRealSignal(S,1);
    InputRealPtrsType uPtrs = ssGetInputPortRealSignalPtrs(S,0);
    int_T             I_out[outDLmod]; 
    int_T             Q_out[outDLmod]; 
    int_T             inputs[inDLmod]; 
    int_T             *iwork = ssGetIWork(S); /*spreading code/**/
    int_T             lp,tmp;

    /* save the inputs to a int vector /**/    
    for (lp=0; lp<inDLmod; lp++){
      inputs[lp]=(int_T)U(lp);
    }  

    tmp = wcdma_dl_mod(inputs,inDLmod,iwork,nC,SF,I_out,Q_out ); 
                  /*   int inputs[],	/* input bit vector */
		  /*   int inDLmod,	/* input vector size */
		  /*   int code[],      /* spreading code */
		  /*   int code_len,	/* length of spreading code */
		  /*   int sf,		/* spreadign factor */
		  /*   int I_out[],	/* modulated I output */
		  /*   int Q_out[])	/* modulated Q output */

    /* 
       Output update/**/
    for (lp=0; lp < outDLmod; lp++){ 
      yI[lp] = (real_T)I_out[lp];
      yQ[lp] = (real_T)Q_out[lp];
    }
}


/* Function: mdlTerminate =====================================================
 * Abstract:
 */
static void mdlTerminate(SimStruct *S)
{ int_T tmp;  
 
 tmp = wcdma_dl_mod_free(); /*is a empty function*/
}

#ifdef  MATLAB_MEX_FILE    /* Is this file being compiled as a MEX-file? */
#include "simulink.c"      /* MEX-file interface mechanism */
#else
#include "cg_sfun.h"       /* Code generation registration function */
#endif