wdp.c

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

              xTraceAssign("ok := ");
#endif
              XBETWEEN_SYMBOLS(38, 5399, 721)

/*-----
* NEXTSTATE -
* #SDTREF(SDL,D:\WIP\Maintenance\4.x\System\SystemConfigurations\base_co\sdl\wdp\wdphandler.spr(2),1184(75,315),1)
------*/
              XAT_LAST_SYMBOL
              SDL_DASH_NEXTSTATE
            } else {
#ifdef XTRACE
            xTraceDecision("ELSE");
#endif
              XBETWEEN_SYMBOLS(39, 5400, 733)

/*-----
* TASK
* #SDTREF(SDL,D:\WIP\Maintenance\4.x\System\SystemConfigurations\base_co\sdl\wdp\bearerchoice.smc(1),158(80,55),1)
------*/
#ifdef XTRACE
              xTraceTask(" ");
#endif
  CLNTa_error (0, ERR_WDP_ErrorBearerNotSupported, ERRTYPE_INFORMATION);

              XBETWEEN_SYMBOLS(40, 5401, 744)

/*-----
* ASSIGNMENT ok := ...
* #SDTREF(SDL,D:\WIP\Maintenance\4.x\System\SystemConfigurations\base_co\sdl\wdp\bearerchoice.smc(1),176(80,100),1)
------*/
              yAssF_SDL_Boolean(yVarP->z46F_ok, PDU_rel(&(yVarP->z46G_dataReq.
                UserData)), XASS);
#ifdef XTRACE
              xTraceAssign("ok := ");
#endif
              XBETWEEN_SYMBOLS(41, 5402, 755)

/*-----
* NEXTSTATE -
* #SDTREF(SDL,D:\WIP\Maintenance\4.x\System\SystemConfigurations\base_co\sdl\wdp\bearerchoice.smc(1),179(80,145),1)
------*/
              XAT_LAST_SYMBOL
              SDL_DASH_NEXTSTATE
            }
          }
        }
      } else {
#ifdef XTRACE
      xTraceDecision("FALSE");
#endif
          /* Null transition */
      }
    } else {
#ifdef XTRACE
    xTraceDecision("FALSE");
#endif
        /* Null transition */
    }
    XBETWEEN_SYMBOLS(42, 5403, 778)

/*-----
* TASK error
* #SDTREF(SDL,D:\WIP\Maintenance\4.x\System\SystemConfigurations\base_co\sdl\wdp\wdphandler.spr(2),2699(10,190),1)
------*/
#ifdef XTRACE
    xTraceTask("error");
#endif
  CLNTa_error (0, ERR_WDP_ErrorInDatafromWSP, ERRTYPE_INFORMATION);

    XBETWEEN_SYMBOLS(43, 5404, 789)

/*-----
* ASSIGNMENT ok := ...
* #SDTREF(SDL,D:\WIP\Maintenance\4.x\System\SystemConfigurations\base_co\sdl\wdp\wdphandler.spr(2),1430(10,205),1)
------*/
    yAssF_SDL_Boolean(yVarP->z46F_ok, PDU_rel(&(yVarP->z46G_dataReq.UserData)),
      XASS);
#ifdef XTRACE
    xTraceAssign("ok := ");
#endif
    XBETWEEN_SYMBOLS(44, 5405, 800)

/*-----
* NEXTSTATE -
* #SDTREF(SDL,D:\WIP\Maintenance\4.x\System\SystemConfigurations\base_co\sdl\wdp\wdphandler.spr(2),1277(10,220),1)
------*/
    XAT_LAST_SYMBOL
    SDL_DASH_NEXTSTATE

/*-----
* INPUT ClosePort
* #SDTREF(SDL,D:\WIP\Maintenance\4.x\System\SystemConfigurations\base_co\sdl\wdp\wdphandler.spr(3),3443(35,45),1)
------*/
  case 4:
    XDEBUG_LABEL(IDLE_ClosePort)
    XAT_FIRST_SYMBOL(4, 5365)
    XOS_TRACE_INPUT("ClosePort")
    yAssF_SDL_Integer(yVarP->z46I_port,
      ((yPDef_z_Global_Declarations_0_ClosePort *)ySVarP)->Param1, XASS);
    yAssF_SDL_Natural(yVarP->z46K_stackconfig, yTstA_SDL_Natural(
      ((yPDef_z_Global_Declarations_0_ClosePort *)ySVarP)->Param2), XASS);
    XBETWEEN_SYMBOLS(45, 5406, 821)
    {

/*-----
* ASSIGNMENT ok := ...
* #SDTREF(SDL,D:\WIP\Maintenance\4.x\System\SystemConfigurations\base_co\sdl\wdp\wdphandler.spr(3),3797(35,80),1)
------*/
      yAssF_SDL_Boolean(yVarP->z46F_ok, wdp_porttbl_lookup(yVarP->z46I_port,
        &(yVarP->z46J_upperlayerPId), &(yVarP->z46K_stackconfig), &(yVarP->
        z46L_bearer), &(yVarP->z46M_viewID), &(yVarP->z46N_channelID)), XASS);
#ifdef XTRACE
      xTraceAssign("ok := ");
#endif
    }
    XBETWEEN_SYMBOLS(46, 5407, 835)

/*-----
* DECISION
* #SDTREF(SDL,D:\WIP\Maintenance\4.x\System\SystemConfigurations\base_co\sdl\wdp\wdphandler.spr(3),3800(35,95),1)
------*/
#ifdef XTRACE
    yAssF_SDL_Boolean(yDcn_SDL_Boolean, yVarP->z46F_ok, XASS);
    if (yDcn_SDL_Boolean) {
#else
    if (yVarP->z46F_ok) {
#endif
#ifdef XTRACE
    xTraceDecision("TRUE");
#endif
      XBETWEEN_SYMBOLS(47, 5408, 850)
      {

/*-----
* CALL wdp_porttbl_delete
* #SDTREF(SDL,D:\WIP\Maintenance\4.x\System\SystemConfigurations\base_co\sdl\wdp\wdphandler.spr(3),3791(35,110),1)
------*/
#ifdef XTRACE
        xTraceAlg("CALL EXTERNAL PROCEDURE wdp_porttbl_delete");
#endif
#ifdef XMSCE
        xMSCETask("CALL EXTERNAL wdp_porttbl_delete");
#endif
        wdp_porttbl_delete(yVarP->z46I_port);
      }
      XBETWEEN_SYMBOLS(48, 5409, 865)

/*-----
* TASK close connection
* #SDTREF(SDL,D:\WIP\Maintenance\4.x\System\SystemConfigurations\base_co\sdl\wdp\wdphandler.spr(3),3779(35,125),1)
------*/
#ifdef XTRACE
      xTraceTask("close connection");
#endif
  {
    UINT8  errorCode;
    DB_ref ref;
    INT32  online;

    if ((yVarP->z46L_bearer == BEARER_ANY_UDP) ||
        (yVarP->z46L_bearer == BEARER_GSM_CSD) ||
        (yVarP->z46L_bearer == BEARER_GSM_GPRS) ||
        (yVarP->z46L_bearer == BEARER_BT)) {
      do {
        ref = getChannelRef (yVarP->z46M_viewID, yVarP->z46N_channelID);
        if (ref != DB_null) {
          online = db_getInt (ref, ONLINE, FALSE, &errorCode);
          if ((errorCode == DB_err_success) && online)
            break;
        }
        CLNTa_closeConnection (yVarP->z46M_viewID, yVarP->z46N_channelID);
      } while (0);
    }
  }

    } else {
#ifdef XTRACE
    xTraceDecision("FALSE");
#endif
        /* Null transition */
    }
    XBETWEEN_SYMBOLS(49, 5410, 901)

/*-----
* NEXTSTATE -
* #SDTREF(SDL,D:\WIP\Maintenance\4.x\System\SystemConfigurations\base_co\sdl\wdp\wdphandler.spr(3),3449(35,145),1)
------*/
    XAT_LAST_SYMBOL
    SDL_DASH_NEXTSTATE

/*-----
* INPUT OpenPort
* #SDTREF(SDL,D:\WIP\Maintenance\4.x\System\SystemConfigurations\base_co\sdl\wdp\wdphandler.spr(3),3482(115,45),1)
------*/
  case 5:
    XDEBUG_LABEL(IDLE_OpenPort)
    XAT_FIRST_SYMBOL(5, 5366)
    XOS_TRACE_INPUT("OpenPort")
    yAssF_SDL_Integer(yVarP->z46I_port, ((yPDef_z_WDP_UpperLayer_1_OpenPort *)
      ySVarP)->Param1, XASS);
    yAssF_SDL_PId(yVarP->z46J_upperlayerPId,
      ((yPDef_z_WDP_UpperLayer_1_OpenPort *)ySVarP)->Param2, XASS);
    yAssF_SDL_Natural(yVarP->z46K_stackconfig, yTstA_SDL_Natural(
      ((yPDef_z_WDP_UpperLayer_1_OpenPort *)ySVarP)->Param3), XASS);
    XBETWEEN_SYMBOLS(50, 5411, 924)
    {

/*-----
* CALL wdp_porttbl_update
* #SDTREF(SDL,D:\WIP\Maintenance\4.x\System\SystemConfigurations\base_co\sdl\wdp\wdphandler.spr(3),3488(115,65),1)
------*/
#ifdef XTRACE
      xTraceAlg("CALL EXTERNAL PROCEDURE wdp_porttbl_update");
#endif
#ifdef XMSCE
      xMSCETask("CALL EXTERNAL wdp_porttbl_update");
#endif
      wdp_porttbl_update(yVarP->z46I_port, yVarP->z46J_upperlayerPId,
        yTstA_SDL_Natural(yVarP->z46K_stackconfig), xI2O_SDL_Octet(
        SDL_INTEGER_LIT(0)), xI2O_SDL_Octet(SDL_INTEGER_LIT(0)), xI2O_SDL_Octet(
        SDL_INTEGER_LIT(0)));
    }
    XBETWEEN_SYMBOLS(51, 5412, 942)

/*-----
* NEXTSTATE -
* #SDTREF(SDL,D:\WIP\Maintenance\4.x\System\SystemConfigurations\base_co\sdl\wdp\wdphandler.spr(3),3491(115,85),1)
------*/
    XAT_LAST_SYMBOL
    SDL_DASH_NEXTSTATE

/*-----
* INPUT TerminateWDPh
* #SDTREF(SDL,D:\WIP\Maintenance\4.x\System\SystemConfigurations\base_co\sdl\wdp\wdphandler.spr(4),3884(40,55),1)
------*/
  case 6:
    XDEBUG_LABEL(IDLE_TerminateWDPh)
    XAT_FIRST_SYMBOL(6, 5367)
    XOS_TRACE_INPUT("TerminateWDPh")
    XBETWEEN_SYMBOLS(52, 5413, 959)
    {

/*-----
* CALL wdp_porttbl_clear
* #SDTREF(SDL,D:\WIP\Maintenance\4.x\System\SystemConfigurations\base_co\sdl\wdp\wdphandler.spr(4),3887(40,70),1)
------*/
#ifdef XTRACE
      xTraceAlg("CALL EXTERNAL PROCEDURE wdp_porttbl_clear");
#endif
#ifdef XMSCE
      xMSCETask("CALL EXTERNAL wdp_porttbl_clear");
#endif
      wdp_porttbl_clear();
    }
    XBETWEEN_SYMBOLS(53, 5414, 974)

/*-----
* OUTPUT WDPhTerminated
* #SDTREF(SDL,D:\WIP\Maintenance\4.x\System\SystemConfigurations\base_co\sdl\wdp\terminateanswer.smc(1),305(80,40),1)
------*/
    ALLOC_SIGNAL_NPAR(WDPhTerminated, z_WDPpckg_6_WDPhTerminated,
      XSIGNALHEADERTYPE)
    SDL_OUTP_NPAR(xDefaultPrioSignal, WDPhTerminated,
      z_WDPpckg_6_WDPhTerminated, TO_PROCESS(WDPmanagement, z47_WDPmanagement),
      0, "WDPhTerminated")
    XBETWEEN_SYMBOLS(54, 5415, 985)

/*-----
* OUTPUT SegmentationTerminated
* #SDTREF(SDL,D:\WIP\Maintenance\4.x\System\SystemConfigurations\base_co\sdl\wdp\terminateanswer.smc(1),287(80,55),1)
------*/
    ALLOC_SIGNAL_NPAR(SegmentationTerminated,
      z_WDPpckg_8_SegmentationTerminated, XSIGNALHEADERTYPE)
    SDL_OUTP_NPAR(xDefaultPrioSignal, SegmentationTerminated,
      z_WDPpckg_8_SegmentationTerminated, TO_PROCESS(WDPmanagement,
      z47_WDPmanagement), 0, "SegmentationTerminated")
    XBETWEEN_SYMBOLS(55, 5416, 996)

/*-----
* OUTPUT ReassembleTerminated
* #SDTREF(SDL,D:\WIP\Maintenance\4.x\System\SystemConfigurations\base_co\sdl\wdp\terminateanswer.smc(1),293(80,70),1)
------*/
    ALLOC_SIGNAL_NPAR(ReassembleTerminated, z_WDPpckg_7_ReassembleTerminated,
      XSIGNALHEADERTYPE)
    SDL_OUTP_NPAR(xDefaultPrioSignal, ReassembleTerminated,
      z_WDPpckg_7_ReassembleTerminated, TO_PROCESS(WDPmanagement,
      z47_WDPmanagement), 0, "ReassembleTerminated")
    XBETWEEN_SYMBOLS(56, 5417, 1007)

/*-----
* NEXTSTATE AwaitStart
* #SDTREF(SDL,D:\WIP\Maintenance\4.x\System\SystemConfigurations\base_co\sdl\wdp\wdphandler.spr(4),3893(40,105),1)
------*/
    XAT_LAST_SYMBOL
    SDL_NEXTSTATE(AwaitStart, z465_AwaitStart, "AwaitStart")

/*-----
* INPUT UDPErrorInd
* #SDTREF(SDL,D:\WIP\Maintenance\4.x\System\SystemConfigurations\base_co\sdl\wdp\wdphandler.spr(4),3908(110,55),1)
------*/
  case 7:
    XDEBUG_LABEL(IDLE_UDPErrorInd)
    XAT_FIRST_SYMBOL(7, 5368)
    XOS_TRACE_INPUT("UDPErrorInd")
    yAssF_SDL_Integer(yVarP->z46C_dstPort, ((yPDef_z_WDP_UDP_1_UDPErrorInd *)
      ySVarP)->Param1, XASS);
    yAssF_SDL_Natural(yVarP->z46E_FaultCode, yTstA_SDL_Natural(
      ((yPDef_z_WDP_UDP_1_UDPErrorInd *)ySVarP)->Param2), XASS);
    XBETWEEN_SYMBOLS(57, 5418, 1028)

/*-----
* TASK log external
* #SDTREF(SDL,D:\WIP\Maintenance\4.x\System\SystemConfigurations\base_co\sdl\wdp\wdphandler.spr(4),3914(110,75),1)
------*/
#ifdef XTRACE
    xTraceTask("log external");
#endif
#if defined LOG_EXTERNAL
  CLNTa_log (0, log_wdp_UDPErrorInd, "\n");
#endif

    XBETWEEN_SYMBOLS(58, 5419, 1041)

/*-----
* TASK error
* #SDTREF(SDL,D:\WIP\Maintenance\4.x\System\SystemConfigurations\base_co\sdl\wdp\wdphandler.spr(4),3920(110,90),1)
------*/
#ifdef XTRACE
    xTraceTask("error");
#endif
  CLNTa_error (0, (INT16)yVarP->z46E_FaultCode, ERRTYPE_BEARER);

    XBETWEEN_SYMBOLS(59, 5420, 1052)

/*-----
* NEXTSTATE -
* #SDTREF(SDL,D:\WIP\Maintenance\4.x\System\SystemConfigurations\base_co\sdl\wdp\wdphandler.spr(4),3926(110,105),1)
------*/
    XAT_LAST_SYMBOL
    SDL_DASH_NEXTSTATE

/*-----
* INPUT RecUDPDatagram
* #SDTREF(SDL,D:\WIP\Maintenance\4.x\System\SystemConfigurations\base_co\sdl\wdp\wdphandler.spr(5),3347(55,45),1)
------*/
  case 8:
    XDEBUG_LABEL(IDLE_RecUDPDatagram)
    XAT_FIRST_SYMBOL(8, 5369)
    XOS_TRACE_INPUT("RecUDPDatagram")
    yAssF_z_ctypes_4_VoidStar(yVarP->z467_UDPData,
      ((yPDef_z_WDP_UDP_0_RecUDPDatagram *)ySVarP)->Param1, XASS);
    yAssF_SDL_Natural(yVarP->z46D_DataLen, yTstA_SDL_Natural(
      ((yPDef_z_WDP_UDP_0_RecUDPDatagram *)ySVarP)->Param2), XASS);
    yAssF_DeviceAddress(yVarP->z468_dstAddr,
      ((yPDef_z_WDP_UDP_0_RecUDPDatagram *)ySVarP)->Param3, XASS);
    yAssF_DeviceAddress(yVarP->z469_srcAddr,
      ((yPDef_z_WDP_UDP_0_RecUDPDatagram *)ySVarP)->Param4, XASS);
    yAssF_SDL_Integer(yVarP->z46C_dstPort, ((yPDef_z_WDP_UDP_0_RecUDPDatagram *)
      ySVarP)->Param5, XASS);
    yAssF_SDL_Integer(yVarP->z46B_srcPort, ((yPDef_z_WDP_UDP_0_RecUDPDatagram *)
      ySVarP)->Param6, XASS);
    yAssF_SDL_Octet(yVarP->z46O_newChannelID,
      ((yPDef_z_WDP_UDP_0_RecUDPDatagram *)ySVarP)->Param7, XASS);
    XBETWEEN_SYMBOLS(60, 5421, 1083)

/*-----