megaco_text_parser_prev3a.yrl

OTP是开放电信平台的简称

signalList           -> 'SignalListToken' 'EQUAL' signalListId
                        'LBRKT' signalListParm signalListParms 'RBRKT'
			    : #'SeqSigList'{id = ensure_uint16('$3'),
					    signalList = ['$5' | '$6']} .

signalListParms      -> 'COMMA' signalListParm signalListParms : 
                        ['$2' | '$3'] .
signalListParms      -> '$empty' : [] .

signalListId         -> safeToken : ensure_uint16('$1') .

%% exactly once signalType,
%% at most once duration and every signal parameter
signalListParm       -> signalRequest  : '$1'.

signalName           -> pkgdName  : '$1'.

observedEventsDescriptor -> 'ObservedEventsToken' 'EQUAL' requestID
                            'LBRKT' observedEvent observedEvents 'RBRKT'
                      : #'ObservedEventsDescriptor'{requestId        = '$3',
						    observedEventLst = ['$5' | '$6']} .

observedEvents       -> 'COMMA' observedEvent observedEvents : ['$2' | '$3'] .
observedEvents       -> '$empty' : [] .

%%time per event, because it might be buffered

observedEvent        -> timeStamp optSep 'COLON' optSep pkgdName observedEventBody : 
                        merge_observed_event('$6', '$5', '$1') .
observedEvent        -> optSep pkgdName observedEventBody :
                        merge_observed_event('$3', '$2', asn1_NOVALUE) .

observedEventBody    -> 'LBRKT' observedEventParameter 
                                observedEventParameters 'RBRKT'
			 : ['$2' | '$3'] .
observedEventBody    -> '$empty' : [] .

observedEventParameters -> 'COMMA' observedEventParameter observedEventParameters : ['$2' | '$3'] .
observedEventParameters -> '$empty' : [] .

%%at-most-once eventStream, every eventParameterName at most once
observedEventParameter -> eventStreamOrOther : '$1' .

requestID            -> safeToken : ensure_requestID('$1') .

%% Deprecated as of Corr 1
modemDescriptor      -> 'ModemToken' 'EQUAL' modemType optPropertyParms .
modemDescriptor      -> 'ModemToken' 'LSBRKT' modemType modemTypeList 'RSBRKT' 
                        optPropertyParms.
modemTypeList 	     -> 'COMMA' modemType modemTypeList.
modemTypeList 	     -> '$empty'.
modemType            -> safeToken.
       
optPropertyParms     -> 'LBRKT' propertyParm propertyParms 'RBRKT' : 
                        ['$2' | '$3'] .
optPropertyParms     -> '$empty' : [] .
       
propertyParms  	     -> 'COMMA' propertyParm propertyParms :  ['$2' | '$3'] .
propertyParms 	     -> '$empty' : [] .

% parmName             -> safeToken : ensure_NAME('$1') .

%% The DigitMapDescriptorToken is specially treated by the scanner
digitMapDescriptor   -> 'DigitMapDescriptorToken' : 
                        ensure_DMD('$1') .

%% each parameter at-most-once, except auditItem
%% at most one of either serviceChangeAddress or serviceChangeMgcId but 
%% not both. serviceChangeMethod and serviceChangeReason are REQUIRED
serviceChangeDescriptor -> 'ServicesToken' 
                           'LBRKT' serviceChangeParm 
                                   serviceChangeParms 'RBRKT' :
                            merge_ServiceChangeParm(['$3' | '$4']) .

serviceChangeParms   -> 'COMMA' serviceChangeParm serviceChangeParms : 
                        ['$2' | '$3'] .
serviceChangeParms   -> '$empty' : [] .

serviceChangeParm    -> serviceChangeMethod  : {method,     '$1'} .
serviceChangeParm    -> serviceChangeReason  : {reason,     '$1'} .
serviceChangeParm    -> serviceChangeDelay   : {delay,      '$1'} .
serviceChangeParm    -> serviceChangeAddress : {address,    '$1'} .
serviceChangeParm    -> serviceChangeProfile : {profile,    '$1'} .
serviceChangeParm    -> extension            : {extension,  '$1'} .
serviceChangeParm    -> timeStamp            : {time_stamp, '$1'} .
serviceChangeParm    -> serviceChangeMgcId   : {mgc_id,     '$1'} .
serviceChangeParm    -> serviceChangeVersion : {version,    '$1'} .
serviceChangeParm    -> 'ServiceChangeIncompleteToken' : incomplete . % v3
serviceChangeParm    -> auditItem            : {audit_item, '$1'} . % v2

serviceChangeMethod  -> 'MethodToken' 'EQUAL' safeToken : 
                        ensure_serviceChangeMethod('$3') .    

serviceChangeReason  -> 'ReasonToken' 'EQUAL' value : ['$3'] .

serviceChangeDelay   -> 'DelayToken'  'EQUAL' safeToken : ensure_uint32('$3').

serviceChangeAddress -> 'ServiceChangeAddressToken' 'EQUAL' mId : '$3' .
serviceChangeAddress -> 'ServiceChangeAddressToken' 'EQUAL' portNumber : 
                        {portNumber, '$3'} .

serviceChangeMgcId   -> 'MgcIdToken'   'EQUAL' mId       : '$3' .

serviceChangeProfile -> 'ProfileToken' 'EQUAL' safeToken : ensure_profile('$3').

serviceChangeVersion -> 'VersionToken' 'EQUAL' safeToken : ensure_version('$3') .

extension            ->  extensionParameter parmValue
			     : setelement(#'PropertyParm'.name, '$2', '$1') .

%% at most once. Version is REQUIRED on first ServiceChange response
%% at most of either serviceChangeAddress or serviceChangeMgcId but not both 
serviceChangeReplyDescriptor -> 'ServicesToken'
                                'LBRKT' servChgReplyParm 
                                        servChgReplyParms 'RBRKT' :
                                merge_ServiceChangeResParm(['$3' | '$4']) .

servChgReplyParms    -> 'COMMA' servChgReplyParm servChgReplyParms : 
                        ['$2' | '$3'] .
servChgReplyParms    -> '$empty' :  [] .

servChgReplyParm     -> serviceChangeAddress : {address,   '$1'} .
servChgReplyParm     -> serviceChangeMgcId   : {mgc_id,    '$1'} .
servChgReplyParm     -> serviceChangeProfile : {profile,   '$1'} .
servChgReplyParm     -> serviceChangeVersion : {version,   '$1'} .
servChgReplyParm     -> timeStamp            : {time_stamp,'$1'} .

packagesDescriptor   -> 'PackagesToken' 'LBRKT' packagesItem 
                                                packagesItems 'RBRKT'
                        : ['$3' | '$4'] .

packagesItems        -> 'COMMA' packagesItem packagesItems  : ['$2' | '$3'] .
packagesItems        -> '$empty' : [] .

packagesItem         -> safeToken : ensure_packagesItem('$1') .

timeStamp            -> TimeStampToken : ensure_timeStamp('$1') .

statisticsDescriptor -> 'StatsToken'
                        'LBRKT' statisticsParameter 
                                statisticsParameters 'RBRKT'
                        : ['$3' | '$4'] .

statisticsParameters -> 'COMMA' statisticsParameter statisticsParameters  : ['$2' | '$3'] .
statisticsParameters -> '$empty' : [] .

%%at-most-once per item
statisticsParameter  -> pkgdName 
                            : #'StatisticsParameter'{statName  = '$1',
                                                     statValue = asn1_NOVALUE} .
statisticsParameter  -> pkgdName 'EQUAL' value
                            : #'StatisticsParameter'{statName  = '$1',
                                                     statValue = ['$3']} .

topologyDescriptor   -> 'TopologyToken' 'LBRKT' topologyTriple
                        topologyTripleList 'RBRKT' : ['$3' | '$4'] .

terminationA         -> terminationID  : '$1' .

terminationB         -> terminationID  : '$1' .

topologyTriple       -> terminationA 'COMMA' 
                        terminationB 'COMMA' 
                        topologyDirection :
                          #'TopologyRequest'{terminationFrom   = '$1',
                                             terminationTo     = '$3',
                                             topologyDirection = '$5'} .

topologyTripleList   -> '$empty' : [] .
topologyTripleList   -> 'COMMA' topologyTriple topologyTripleList :
                          ['$2' | '$3'] .

topologyDirection    -> 'BothwayToken' : bothway .
topologyDirection    -> 'IsolateToken' : isolate .
topologyDirection    -> 'OnewayToken'  : oneway .

priority             -> 'PriorityToken' 'EQUAL' safeToken : ensure_uint16('$3') .

extensionParameter   -> safeToken : ensure_extensionParameter('$1') .

value                -> 'QuotedChars' : ensure_value('$1') .
value                -> safeToken     : ensure_value('$1').

safeToken            -> 'SafeChars'             : make_safe_token('$1') .
%% BMK BMK safeToken            -> 'AddToken'              : make_safe_token('$1') .
safeToken            -> 'AuditToken'            : make_safe_token('$1') .
safeToken            -> 'AuditCapToken'         : make_safe_token('$1') .
safeToken            -> 'AuditValueToken'       : make_safe_token('$1') .
safeToken            -> 'AuthToken'             : make_safe_token('$1') .
%% v3-safeToken            -> 'BothToken'             : make_safe_token('$1') . % v3
safeToken            -> 'BothwayToken'          : make_safe_token('$1') .
safeToken            -> 'BriefToken'            : make_safe_token('$1') .
safeToken            -> 'BufferToken'           : make_safe_token('$1') .
safeToken            -> 'CtxToken'              : make_safe_token('$1') .
%% v3-safeToken            -> 'ContextAttrToken'      : make_safe_token('$1') . % v3
safeToken            -> 'ContextAuditToken'     : make_safe_token('$1') .
%% v2-safeToken            -> 'DigitMapToken'         : make_safe_token('$1') .
%% safeToken         -> 'DigitMapDescriptorToken' : make_safe_token('$1') .
%% v3-
safeToken            -> 'DirectionToken'        : make_safe_token('$1') . % v3
safeToken            -> 'DiscardToken'          : make_safe_token('$1') .
safeToken            -> 'DisconnectedToken'     : make_safe_token('$1') .
safeToken            -> 'DelayToken'            : make_safe_token('$1') .
safeToken            -> 'DurationToken'         : make_safe_token('$1') .
safeToken            -> 'EmbedToken'            : make_safe_token('$1') .
%% BMK BMK safeToken            -> 'EmergencyToken'        : make_safe_token('$1') .
%% BMK BMK safeToken            -> 'EmergencyOffToken'     : make_safe_token('$1') .
safeToken            -> 'ErrorToken'            : make_safe_token('$1') .
%% v2-safeToken            -> 'EventBufferToken'      : make_safe_token('$1') .
%% v2-safeToken            -> 'EventsToken'           : make_safe_token('$1') .
%% v3-safeToken            -> 'ExternalToken'         : make_safe_token('$1') . % v3
safeToken            -> 'FailoverToken'         : make_safe_token('$1') .
safeToken            -> 'ForcedToken'           : make_safe_token('$1') .
safeToken            -> 'GracefulToken'         : make_safe_token('$1') .
safeToken            -> 'H221Token'             : make_safe_token('$1') .
safeToken            -> 'H223Token'             : make_safe_token('$1') .
safeToken            -> 'H226Token'             : make_safe_token('$1') .
safeToken            -> 'HandOffToken'          : make_safe_token('$1') .
%% v3-safeToken            -> 'IEPSToken'             : make_safe_token('$1') . % v3
safeToken            -> 'ImmAckRequiredToken'   : make_safe_token('$1') .
safeToken            -> 'InactiveToken'         : make_safe_token('$1') .
%% v3-safeToken            -> 'InternalToken'         : make_safe_token('$1') . % v3
safeToken            -> 'InterruptByEventToken' : make_safe_token('$1') .
safeToken            -> 'InterruptByNewSignalsDescrToken' : make_safe_token('$1') .
safeToken            -> 'IsolateToken'          : make_safe_token('$1') .
safeToken            -> 'InSvcToken'            : make_safe_token('$1') .
safeToken            -> 'KeepActiveToken'       : make_safe_token('$1') .
%% safeToken         -> 'LocalToken'            : make_safe_token('$1') .
%% safeToken         -> 'LocalDescriptorToken'  : make_safe_token('$1') .
safeToken            -> 'LocalControlToken'     : make_safe_token('$1') .
safeToken            -> 'LoopbackToken'         : make_safe_token('$1') .
safeToken            -> 'LockStepToken'         : make_safe_token('$1') .
%% v2-safeToken            -> 'MediaToken'            : make_safe_token('$1') .
%% safeToken         -> 'MegacopToken'          : make_safe_token('$1') .
safeToken            -> 'MethodToken'           : make_safe_token('$1') .
safeToken            -> 'MgcIdToken'            : make_safe_token('$1') .
safeToken            -> 'ModeToken'             : make_safe_token('$1') .
%% BMK BMK safeToken            -> 'ModifyToken'           : make_safe_token('$1') .
%% v2-safeToken            -> 'ModemToken'            : make_safe_token('$1') .
%% BMK BMK safeToken            -> 'MoveToken'             : make_safe_token('$1') .
%% safeToken         -> 'MtpToken'              : make_safe_token('$1') .
%% safeToken         -> 'MtpAddressToken'       : make_safe_token('$1') .
%% v2-safeToken            -> 'MuxToken'              : make_safe_token('$1') .
safeToken            -> 'NotifyToken'           : make_safe_token('$1') .
safeToken            -> 'NotifyCompletionToken' : make_safe_token('$1') .
safeToken            -> 'Nx64Token'             : make_safe_token('$1') .
%% v2-safeToken            -> 'ObservedEventsToken'   : make_safe_token('$1') .
safeToken            -> 'OnewayToken'           : make_safe_token('$1') .
safeToken            -> 'OffToken'              : make_safe_token('$1') .
safeToken            -> 'OnToken'               : make_safe_token('$1') .
safeToken            -> 'OnOffToken'            : make_safe_token('$1') .
safeToken            -> 'OutOfSvcToken'         : make_safe_token('$1') .
safeToken            -> 'OtherReasonToken'      : make_safe_token('$1') .
%% v2-safeToken            -> 'PackagesToken'         : make_safe_token('$1') .
safeToken            -> 'PendingToken'          : make_safe_token('$1') .
%% BMK BMK safeToken            -> 'PriorityToken'         : make_safe_token('$1') .
safeToken            -> 'ProfileToken'          : make_safe_token('$1') .
safeToken            -> 'ReasonToken'           : make_safe_token('$1') .
safeToken            -> 'RecvonlyToken'         : make_safe_token('$1') .
safeToken            -> 'ReplyToken'            : make_safe_token('$1') .
%% v3-
safeToken            -> 'RequestIDToken'        : make_safe_token('$1') . % v3
safeToken            -> 'ResponseAckToken'      : make_safe_token('$1') .
safeToken            -> 'RestartToken'          : make_safe_token('$1') .
%% safeToken         -> 'RemoteToken'           : make_safe_token('$1') .
%% safeToken         -> 'RemoteDescriptorToken' : make_safe_token('$1') .
safeToken            -> 'ReservedGroupToken'    : make_safe_token('$1') .
safeToken            -> 'ReservedValueToken'    : make_safe_token('$1') .
safeToken            -> 'SendonlyToken'         : make_safe_token('$1') .
safeToken            -> 'SendrecvToken'         : make_safe_token('$1') .
safeToken            -> 'ServicesToken'         : make_safe_token('$1') .
safeToken            -> 'ServiceStatesToken'    : make_safe_token('$1') .
safeToken            -> 'ServiceChangeToken'    : make_safe_token('$1') .
%% v3-safeToken            -> 'ServiceChangeIncompleteToken' : make_safe_token('$1') . % v3 
safeToken            -> 'ServiceChangeAddressToken' : make_safe_token('$1') .
safeToken            -> 'SignalListToken'       : make_safe_token('$1') .
%% v2-safeToken            -> 'SignalsToken'          : make_safe_token('$1') .
safeToken            -> 'SignalTypeToken'       : make_safe_token('$1') .
%% v2-safeToken            -> 'StatsToken'            : make_safe_token('$1') .
safeToken            -> 'StreamToken'           : make_safe_token('$1') .
%% BMK BMK safeToken            -> 'SubtractToken'         : make_safe_token('$1') .
safeToken            -> 'SynchISDNToken'        : make_safe_token('$1') .
safeToken            -> 'TerminationStateToken' : make_safe_token('$1') .
safeToken            -> 'TestToken'             : make_safe_token('$1') .
safeToken            -> 'TimeOutToken'          : make_safe_token('$1') .
%% BMK BMK safeToken            -> 'TopologyToken'         : make_safe_token('$1') .
safeToken            -> 'TransToken'            : make_safe_token('$1') .
safeToken            -> 'V18Token'              : make_safe_token('$1') .
safeToken            -> 'V22Token'              : make_safe_token('$1') .
safeToken            -> 'V22bisToken'           : make_safe_token('$1') .
safeToken            -> 'V32Token'              : make_safe_token('$1') .
safeToken            -> 'V32bisToken'           : make_safe_token('$1') .
safeToken            -> 'V34Token'              : make_safe_token('$1') .
safeToken            -> 'V76Token'              : make_safe_token('$1') .
safeToken            -> 'V90Token'              : make_safe_token('$1') .
safeToken            -> 'V91Token'              : make_safe_token('$1') .
safeToken            -> 'VersionToken'          : make_safe_token('$1') .

Erlang code.

%% The following directive is needed for (significantly) faster compilation
%% of the generated .erl file by the HiPE compiler.  Please do not remove.
-compile([{hipe,[{regalloc,linear_scan}]}]).

-include("megaco_text_parser_prev3a.hrl").