wtpprvdr.c

是一个手机功能的模拟程序

/*-----
* INPUT TRInvokeReq
* #SDTREF(SDL,D:\WIP\Maintenance\4.x\System\SystemConfigurations\base_co\sdl\wtp\transactionmanager.spr(TRInvokeReq),173(55,30),1)
------*/
  case 2:
    XDEBUG_LABEL(IDLE_TRInvokeReq)
    XAT_FIRST_SYMBOL(2, 4725)
    XOS_TRACE_INPUT("TRInvokeReq")
    yAssF_TRInvokeReqType(yVarP->z300827_TRInvokeReqData,
      ((yPDef_z_WSPConnectionMode_WTP_0_TRInvokeReq *)ySVarP)->Param1, XASS);
    yAssF_SDL_Natural(yVarP->z30081X_pathfinder, yTstA_SDL_Natural(
      ((yPDef_z_WSPConnectionMode_WTP_0_TRInvokeReq *)ySVarP)->Param2), XASS);
    XBETWEEN_SYMBOLS(28, 4751, 1207)

/*-----
* ASSIGNMENT pid := ...
* #SDTREF(SDL,D:\WIP\Maintenance\4.x\System\SystemConfigurations\base_co\sdl\wtp\transactionmanager.spr(TRInvokeReq),11894(55,45),1)
------*/
    yAssF_SDL_PId(yVarP->z300823_pid, ttbl_find(yVarP->z30081I_transTbl, yVarP->
      z300827_TRInvokeReqData.Handle, &(yVarP->z30081H_tr)), XASS);
#ifdef XTRACE
    xTraceAssign("pid := ");
#endif
    XBETWEEN_SYMBOLS(29, 4752, 1218)

/*-----
* DECISION
* #SDTREF(SDL,D:\WIP\Maintenance\4.x\System\SystemConfigurations\base_co\sdl\wtp\transactionmanager.spr(TRInvokeReq),11900(55,60),1)
------*/
#ifdef XTRACE
    yAssF_SDL_PId(yDcn_SDL_PId, yVarP->z300823_pid, XASS);
    if (yEqF_SDL_PId(yDcn_SDL_PId, SDL_NULL)) {
#else
    if (yEqF_SDL_PId(yVarP->z300823_pid, SDL_NULL)) {
#endif
#ifdef XTRACE
    xTraceDecision("PATH: PId");
#endif
        /* Null transition */
    } else {
#ifdef XTRACE
    xTraceDecision("ELSE");
#endif
      XBETWEEN_SYMBOLS(30, 4753, 1238)

/*-----
* TASK log internal
* #SDTREF(SDL,D:\WIP\Maintenance\4.x\System\SystemConfigurations\base_co\sdl\wtp\transactionmanager.spr(TRInvokeReq),11990(125,80),1)
------*/
#ifdef XTRACE
      xTraceTask("log internal");
#endif
#ifdef LOG_INTERNAL
  CLNTa_log (0, 0, "WTP-TM: received additional TRInvokeReq\n");
#endif

      XBETWEEN_SYMBOLS(31, 4754, 1251)

/*-----
* OUTPUT SegmInvoke
* #SDTREF(SDL,D:\WIP\Maintenance\4.x\System\SystemConfigurations\base_co\sdl\wtp\transactionmanager.spr(TRInvokeReq),11909(125,95),1)
------*/
      ALLOC_SIGNAL_PAR(SegmInvoke, z_WTPpckg_1_SegmInvoke,
        yPDef_z_WTPpckg_1_SegmInvoke)
      yAssF_TRInvokeReqType(((yPDef_z_WTPpckg_1_SegmInvoke *)OUTSIGNAL_DATA_PTR)->Param1,
        yVarP->z300827_TRInvokeReqData, XASSPARA);
      SDL_OUTP_PAR(xDefaultPrioSignal, SegmInvoke, z_WTPpckg_1_SegmInvoke,
        yVarP->z300823_pid, yPDef_z_WTPpckg_1_SegmInvoke, "SegmInvoke")
      XBETWEEN_SYMBOLS(32, 4755, 1263)

/*-----
* NEXTSTATE -
* #SDTREF(SDL,D:\WIP\Maintenance\4.x\System\SystemConfigurations\base_co\sdl\wtp\transactionmanager.spr(TRInvokeReq),11915(125,110),1)
------*/
      XAT_LAST_SYMBOL
      SDL_DASH_NEXTSTATE
    }

  L_RESUME:;
    XBETWEEN_SYMBOLS(33, 4756, 1274)

/*-----
* TASK log internal
* #SDTREF(SDL,D:\WIP\Maintenance\4.x\System\SystemConfigurations\base_co\sdl\wtp\transactionmanager.spr(TRInvokeReq),6725(55,80),1)
------*/
#ifdef XTRACE
    xTraceTask("log internal");
#endif
#if defined LOG_INTERNAL
  {
    char *srcaddr = OctetString2HexString (yVarP->
  z300827_TRInvokeReqData.SourceAddress.Address.data,
                                           yVarP->
  z300827_TRInvokeReqData.SourceAddress.Address.length);
    char *dstaddr = OctetString2HexString (yVarP->
  z300827_TRInvokeReqData.DestinationAddress.Address.data,
                                           yVarP->
  z300827_TRInvokeReqData.DestinationAddress.Address.length);
    char *srcaddr2 = OctetString2HexString (yVarP->
  z300827_TRInvokeReqData.SourceAddress.SecondAddress.data,
                                            yVarP->
  z300827_TRInvokeReqData.SourceAddress.SecondAddress.length);
    char *dstaddr2 = OctetString2HexString (yVarP->
  z300827_TRInvokeReqData.DestinationAddress.SecondAddress.data,
                                            yVarP->
  z300827_TRInvokeReqData.DestinationAddress.SecondAddress.length);
    char *strpdu = pdubuf_getStart (yVarP->z300827_TRInvokeReqData.UserData);
    char *pdu = OctetString2HexString ((CHAR*)strpdu, pdubuf_getLength (yVarP->
  z300827_TRInvokeReqData.UserData));

    CLNTa_log (0, 0, "WTP-TM: received TRInvokeReq\n"
                     "\tMode = %d\n"
                     "\tClient Address:\n"
                     "\t\tBearer = %d\n"
                     "\t\tSecondAddressFormat = %d\n"
                     "\t\tPort Number = %d\n"
                     "\t\tAddress = %s\n"
                     "\t\tSecondAddress = %s\n"
                    "\tServer Address:\n"
                     "\t\tBearer = %d\n"
                     "\t\tSecondAddressFormat = %d\n"
                     "\t\tPort Number = %d\n"
                     "\t\tAddress = %s\n"
                     "\t\tSecondAddress = %s\n"
                     "\tData:\n%s\n",
      yVarP->z30081X_pathfinder,
      yVarP->z300827_TRInvokeReqData.SourceAddress.Bearer,
      yVarP->z300827_TRInvokeReqData.SourceAddress.SecondAddressFormat,
      yVarP->z300827_TRInvokeReqData.SourceAddress.PortNumber,
      srcaddr ? srcaddr : "", srcaddr2 ? srcaddr2 : "",
      yVarP->z300827_TRInvokeReqData.DestinationAddress.Bearer,
      yVarP->z300827_TRInvokeReqData.DestinationAddress.SecondAddressFormat,
      yVarP->z300827_TRInvokeReqData.DestinationAddress.PortNumber,
      dstaddr ? dstaddr : "", dstaddr2 ? dstaddr2 : "",
      pdu);
    OSConnectorFree (srcaddr);
  OSConnectorFree (srcaddr2);
  OSConnectorFree (dstaddr);
  OSConnectorFree (dstaddr2);
  OSConnectorFree (pdu);
    }
#endif

    XBETWEEN_SYMBOLS(34, 4757, 1338)

/*-----
* DECISION
* #SDTREF(SDL,D:\WIP\Maintenance\4.x\System\SystemConfigurations\base_co\sdl\wtp\transactionmanager.spr(TRInvokeReq),3746(55,100),1)
------*/
#ifdef XTRACE
    yAssF_SDL_Boolean(yDcn_SDL_Boolean, yVarP->z30081V_suspended, XASS);
    if (yDcn_SDL_Boolean) {
#else
    if (yVarP->z30081V_suspended) {
#endif
#ifdef XTRACE
    xTraceDecision("TRUE");
#endif
      XBETWEEN_SYMBOLS(35, 4758, 1353)

/*-----
* OUTPUT Suspend
* #SDTREF(SDL,D:\WIP\Maintenance\4.x\System\SystemConfigurations\base_co\sdl\wtp\transactionmanager.spr(TRInvokeReq),3770(5,115),1)
------*/
      ALLOC_SIGNAL_PAR(Suspend, z30081D_Suspend, yPDef_z30081D_Suspend)
      yAssF_TRInvokeReqType(((yPDef_z30081D_Suspend *)OUTSIGNAL_DATA_PTR)->Param1,
        yVarP->z300827_TRInvokeReqData, XASSPARA);
      yAssF_SDL_Natural(((yPDef_z30081D_Suspend *)OUTSIGNAL_DATA_PTR)->Param2,
        yTstA_SDL_Natural(yVarP->z30081X_pathfinder), XASSPARA);
      SDL_OUTP_PAR(xDefaultPrioSignal, Suspend, z30081D_Suspend,
        TO_PROCESS(TransactionManager, z3008_TransactionManager),
        yPDef_z30081D_Suspend, "Suspend")
      XBETWEEN_SYMBOLS(36, 4759, 1367)

/*-----
* NEXTSTATE -
* #SDTREF(SDL,D:\WIP\Maintenance\4.x\System\SystemConfigurations\base_co\sdl\wtp\transactionmanager.spr(TRInvokeReq),3767(5,145),1)
------*/
      XAT_LAST_SYMBOL
      SDL_DASH_NEXTSTATE
    } else {
#ifdef XTRACE
    xTraceDecision("FALSE");
#endif
      XBETWEEN_SYMBOLS(37, 4760, 1379)

/*-----
* DECISION
* #SDTREF(SDL,D:\WIP\Maintenance\4.x\System\SystemConfigurations\base_co\sdl\wtp\transactionmanager.spr(TRInvokeReq),1253(55,125),1)
------*/
#ifdef XTRACE
      yAssF_SDL_Boolean(yDcn_SDL_Boolean, xLT_SDL_Integer(yVarP->
        z300825_noIniTrans, MAXTRANS), XASS);
      if (yDcn_SDL_Boolean) {
#else
      if (xLT_SDL_Integer(yVarP->z300825_noIniTrans, MAXTRANS)) {
#endif
#ifdef XTRACE
      xTraceDecision("TRUE");
#endif

/*-----
* JOIN NEW_INITIATOR
* #SDTREF(SDL,D:\WIP\Maintenance\4.x\System\SystemConfigurations\base_co\sdl\wtp\transactionmanager.spr(TRInvokeReq),9047(60,145),1)
------*/
        goto L_NEW_INITIATOR;
      } else {
#ifdef XTRACE
      xTraceDecision("FALSE");
#endif

/*-----
* JOIN TOO_MANY_TRANSACTIONS
* #SDTREF(SDL,D:\WIP\Maintenance\4.x\System\SystemConfigurations\base_co\sdl\wtp\transactionmanager.spr(TRInvokeReq),8996(120,145),1)
------*/
        goto L_TOO_MANY_TRANSACTIONS;
      }
    }

/*-----
* INPUT TRAckReq
* #SDTREF(SDL,D:\WIP\Maintenance\4.x\System\SystemConfigurations\base_co\sdl\wtp\transactionmanager.spr(TRAckReq),11939(55,45),1)
------*/
  case 3:
    XDEBUG_LABEL(IDLE_TRAckReq)
    XAT_FIRST_SYMBOL(3, 4726)
    XOS_TRACE_INPUT("TRAckReq")
    yAssF_SDL_Integer(yVarP->z30081Q_handle,
      ((yPDef_z_WSPConnectionMode_WTP_4_TRAckReq *)ySVarP)->Param1, XASS);
    XBETWEEN_SYMBOLS(58, 4781, 1424)

/*-----
* ASSIGNMENT pid := ...
* #SDTREF(SDL,D:\WIP\Maintenance\4.x\System\SystemConfigurations\base_co\sdl\wtp\transactionmanager.spr(TRAckReq),11942(55,60),1)
------*/
    yAssF_SDL_PId(yVarP->z300823_pid, ttbl_find(yVarP->z30081I_transTbl, yVarP->
      z30081Q_handle, &(yVarP->z30081H_tr)), XASS);
#ifdef XTRACE
    xTraceAssign("pid := ");
#endif
    XBETWEEN_SYMBOLS(59, 4782, 1435)

/*-----
* DECISION
* #SDTREF(SDL,D:\WIP\Maintenance\4.x\System\SystemConfigurations\base_co\sdl\wtp\transactionmanager.spr(TRAckReq),11945(55,75),1)
------*/
#ifdef XTRACE
    yAssF_SDL_PId(yDcn_SDL_PId, yVarP->z300823_pid, XASS);
    if (yEqF_SDL_PId(yDcn_SDL_PId, SDL_NULL)) {
#else
    if (yEqF_SDL_PId(yVarP->z300823_pid, SDL_NULL)) {
#endif
#ifdef XTRACE
    xTraceDecision("PATH: PId");
#endif
        /* Null transition */
    } else {
#ifdef XTRACE
    xTraceDecision("ELSE");
#endif
      XBETWEEN_SYMBOLS(60, 4783, 1455)

/*-----
* OUTPUT TRAckReq
* #SDTREF(SDL,D:\WIP\Maintenance\4.x\System\SystemConfigurations\base_co\sdl\wtp\transactionmanager.spr(TRAckReq),11954(55,95),1)
------*/
      ALLOC_SIGNAL_PAR(TRAckReq, z_WSPConnectionMode_WTP_4_TRAckReq,
        yPDef_z_WSPConnectionMode_WTP_4_TRAckReq)
      yAssF_SDL_Integer(((yPDef_z_WSPConnectionMode_WTP_4_TRAckReq *)OUTSIGNAL_DATA_PTR)->Param1,
        yVarP->z30081Q_handle, XASSPARA);
      SDL_OUTP_PAR(xDefaultPrioSignal, TRAckReq,
        z_WSPConnectionMode_WTP_4_TRAckReq, yVarP->z300823_pid,
        yPDef_z_WSPConnectionMode_WTP_4_TRAckReq, "TRAckReq")
    }
    XBETWEEN_SYMBOLS(61, 4784, 1469)

/*-----
* NEXTSTATE -
* #SDTREF(SDL,D:\WIP\Maintenance\4.x\System\SystemConfigurations\base_co\sdl\wtp\transactionmanager.spr(TRAckReq),11957(55,115),1)
------*/
    XAT_LAST_SYMBOL
    SDL_DASH_NEXTSTATE

/*-----
* INPUT TDUnitDataInd
* #SDTREF(SDL,D:\WIP\Maintenance\4.x\System\SystemConfigurations\base_co\sdl\wtp\transactionmanager.spr(TDUnitDataInd),8561(70,35),1)
------*/
  case 4:
    XDEBUG_LABEL(IDLE_TDUnitDataInd)
    XAT_FIRST_SYMBOL(4, 4727)
    XOS_TRACE_INPUT("TDUnitDataInd")
    yAssF_TDUnitdataIndType(yVarP->z300828_TDUnitDataIndData,
      ((yPDef_z_WDP_UpperLayer_2_TDUnitDataInd *)ySVarP)->Param1, XASS);
    yAssF_SDL_Natural(yVarP->z30081X_pathfinder, yTstA_SDL_Natural(
      ((yPDef_z_WDP_UpperLayer_2_TDUnitDataInd *)ySVarP)->Param2), XASS);
    XBETWEEN_SYMBOLS(67, 4790, 1490)

/*-----
* TASK log external
* #SDTREF(SDL,D:\WIP\Maintenance\4.x\System\SystemConfigurations\base_co\sdl\wtp\transactionmanager.spr(TDUnitDataInd),8570(70,50),1)
------*/