@ -17,81 +17,98 @@ namespace storm {
void FormulaParserGrammar : : initialize ( ) {
void FormulaParserGrammar : : initialize ( ) {
// Register all variables so we can parse them in the expressions.
// Register all variables so we can parse them in the expressions.
for ( auto variableTypePair : * constManager ) {
for ( auto variableTypePair : * constManager ) {
identifiers_ . add ( variableTypePair . first . getName ( ) , variableTypePair . first ) ;
addIdentifierExpression ( variableTypePair . first . getName ( ) , variableTypePair . first ) ;
}
}
// Set the identifier mapping to actually generate expressions.
// Set the identifier mapping to actually generate expressions.
expressionParser . setIdentifierMapping ( & identifiers_ ) ;
expressionParser . setIdentifierMapping ( & identifiers_ ) ;
longRunAverageRewardFormula = ( qi : : lit ( " LRA " ) | qi : : lit ( " S " ) | qi : : lit ( " MP " ) ) [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createLongRunAverageRewardFormula , phoenix : : ref ( * this ) ) ] ;
longRunAverageRewardFormula . name ( " long run average reward formula " ) ;
instantaneousRewardFormula = ( qi : : lit ( " I= " ) > expressionParser ) [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createInstantaneousRewardFormula , phoenix : : ref ( * this ) , qi : : _1 ) ] ;
instantaneousRewardFormula . name ( " instantaneous reward formula " ) ;
cumulativeRewardFormula = ( qi : : lit ( " C " ) > > timeBounds ) [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createCumulativeRewardFormula , phoenix : : ref ( * this ) , qi : : _1 ) ] ;
cumulativeRewardFormula . name ( " cumulative reward formula " ) ;
totalRewardFormula = ( qi : : lit ( " C " ) ) [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createTotalRewardFormula , phoenix : : ref ( * this ) ) ] ;
totalRewardFormula . name ( " total reward formula " ) ;
rewardPathFormula = longRunAverageRewardFormula | conditionalFormula ( storm : : logic : : FormulaContext : : Reward ) | eventuallyFormula ( storm : : logic : : FormulaContext : : Reward ) | cumulativeRewardFormula | instantaneousRewardFormula | totalRewardFormula ;
rewardPathFormula . name ( " reward path formula " ) ;
expressionFormula = expressionParser [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createAtomicExpressionFormula , phoenix : : ref ( * this ) , qi : : _1 ) ] ;
expressionFormula . name ( " expression formula " ) ;
label = qi : : as_string [ qi : : raw [ qi : : lexeme [ ( ( qi : : alpha | qi : : char_ ( ' _ ' ) ) > > * ( qi : : alnum | qi : : char_ ( ' _ ' ) ) ) ] ] ] ;
keywords_ . name ( " keyword " ) ;
nonStandardKeywords_ . name ( " non-standard Storm-specific keyword " ) ;
relationalOperator_ . name ( " relational operator " ) ;
optimalityOperator_ . name ( " optimality operator " ) ;
rewardMeasureType_ . name ( " reward measure " ) ;
operatorKeyword_ . name ( " Operator keyword " ) ;
filterType_ . name ( " filter type " ) ;
// Auxiliary helpers
isPathFormula = qi : : eps ( qi : : _r1 = = FormulaKind : : Path ) ;
noAmbiguousNonAssociativeOperator = ! ( qi : : lit ( qi : : _r2 ) [ qi : : _pass = phoenix : : bind ( & FormulaParserGrammar : : raiseAmbiguousNonAssociativeOperatorError , phoenix : : ref ( * this ) , qi : : _r1 , qi : : _r2 ) ] ) ;
noAmbiguousNonAssociativeOperator . name ( " no ambiguous non-associative operator " ) ;
identifier % = qi : : as_string [ qi : : raw [ qi : : lexeme [ ( ( qi : : alpha | qi : : char_ ( ' _ ' ) | qi : : char_ ( ' . ' ) ) > > * ( qi : : alnum | qi : : char_ ( ' _ ' ) ) ) ] ] ] ;
identifier . name ( " identifier " ) ;
label % = qi : : as_string [ qi : : raw [ qi : : lexeme [ ( ( qi : : alpha | qi : : char_ ( ' _ ' ) ) > > * ( qi : : alnum | qi : : char_ ( ' _ ' ) ) ) ] ] ] ;
label . name ( " label " ) ;
label . name ( " label " ) ;
quotedString % = qi : : as_string [ qi : : lexeme [ qi : : omit [ qi : : char_ ( ' " ' ) ] > qi : : raw [ * ( ! qi : : char_ ( ' " ' ) > > qi : : char_ ) ] > qi : : omit [ qi : : lit ( ' " ' ) ] ] ] ;
quotedString . name ( " quoted string " ) ;
// PCTL-like Operator Formulas
operatorInformation = ( - optimalityOperator_ ) [ qi : : _a = qi : : _1 ] > >
( ( qi : : lit ( " = " ) > qi : : lit ( " ? " ) ) [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createOperatorInformation , phoenix : : ref ( * this ) , qi : : _a , boost : : none , boost : : none ) ]
| ( relationalOperator_ > expressionParser ) [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createOperatorInformation , phoenix : : ref ( * this ) , qi : : _a , qi : : _1 , qi : : _2 ) ]
) ;
operatorInformation . name ( " operator information " ) ;
operatorSubFormula = ( ( ( qi : : eps ( qi : : _r1 = = storm : : logic : : FormulaContext : : Probability ) > formula ( FormulaKind : : Path , qi : : _r1 ) )
| ( qi : : eps ( qi : : _r1 = = storm : : logic : : FormulaContext : : Reward ) > ( longRunAverageRewardFormula | eventuallyFormula ( qi : : _r1 ) | cumulativeRewardFormula | instantaneousRewardFormula | totalRewardFormula ) )
| ( qi : : eps ( qi : : _r1 = = storm : : logic : : FormulaContext : : Time ) > eventuallyFormula ( qi : : _r1 ) )
| ( qi : : eps ( qi : : _r1 = = storm : : logic : : FormulaContext : : LongRunAverage ) > formula ( FormulaKind : : State , storm : : logic : : FormulaContext : : LongRunAverage ) )
) > > - ( qi : : lit ( " || " ) > formula ( FormulaKind : : Path , storm : : logic : : FormulaContext : : Probability ) )
) [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createConditionalFormula , phoenix : : ref ( * this ) , qi : : _1 , qi : : _2 , qi : : _r1 ) ] ;
operatorSubFormula . name ( " operator subformula " ) ;
rewardModelName = qi : : eps ( qi : : _r1 = = storm : : logic : : FormulaContext : : Reward ) > > ( qi : : lit ( " { \" " ) > label > qi : : lit ( " \" } " ) ) ;
rewardModelName . name ( " reward model name " ) ;
rewardMeasureType = qi : : eps ( qi : : _r1 = = storm : : logic : : FormulaContext : : Reward | | qi : : _r1 = = storm : : logic : : FormulaContext : : Time ) > > qi : : lit ( " [ " ) > > rewardMeasureType_ > > qi : : lit ( " ] " ) ;
rewardMeasureType . name ( " reward measure type " ) ;
operatorFormula = ( operatorKeyword_ [ qi : : _a = qi : : _1 ] > - rewardMeasureType ( qi : : _a ) > - rewardModelName ( qi : : _a ) > operatorInformation > qi : : lit ( " [ " ) > operatorSubFormula ( qi : : _a ) > qi : : lit ( " ] " ) )
[ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createOperatorFormula , phoenix : : ref ( * this ) , qi : : _a , qi : : _2 , qi : : _3 , qi : : _4 , qi : : _5 ) ] ;
operatorFormula . name ( " operator formula " ) ;
// Atomic propositions
labelFormula = ( qi : : lit ( " \" " ) > > label > > qi : : lit ( " \" " ) ) [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createAtomicLabelFormula , phoenix : : ref ( * this ) , qi : : _1 ) ] ;
labelFormula = ( qi : : lit ( " \" " ) > > label > > qi : : lit ( " \" " ) ) [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createAtomicLabelFormula , phoenix : : ref ( * this ) , qi : : _1 ) ] ;
labelFormula . name ( " label formula " ) ;
labelFormula . name ( " label formula " ) ;
booleanLiteralFormula = ( qi : : lit ( " true " ) [ qi : : _a = true ] | qi : : lit ( " false " ) [ qi : : _a = false ] ) [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createBooleanLiteralFormula , phoenix : : ref ( * this ) , qi : : _a ) ] ;
booleanLiteralFormula = ( qi : : lit ( " true " ) [ qi : : _a = true ] | qi : : lit ( " false " ) [ qi : : _a = false ] ) [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createBooleanLiteralFormula , phoenix : : ref ( * this ) , qi : : _a ) ] ;
booleanLiteralFormula . name ( " boolean literal formula " ) ;
booleanLiteralFormula . name ( " boolean literal formula " ) ;
operatorFormula = probabilityOperator | rewardOperator | longRunAverageOperator | timeOperator ;
operatorFormula . name ( " operator formulas " ) ;
atomicStateFormula = booleanLiteralFormula | labelFormula | expressionFormula | ( qi : : lit ( " ( " ) > untilFormula ( qi : : _r1 ) > qi : : lit ( " ) " ) ) | operatorFormula ;
atomicStateFormula . name ( " atomic state formula " ) ;
atomicStateFormulaWithoutExpression = booleanLiteralFormula | labelFormula | ( qi : : lit ( " ( " ) > untilFormula ( qi : : _r1 ) > qi : : lit ( " ) " ) ) | operatorFormula ;
atomicStateFormula . name ( " atomic state formula without expression " ) ;
notStateFormula = ( unaryBooleanOperator_ > > atomicStateFormulaWithoutExpression ( qi : : _r1 ) ) [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createUnaryBooleanStateOrPathFormula , phoenix : : ref ( * this ) , qi : : _2 , qi : : _1 ) ] | atomicStateFormula ( qi : : _r1 ) [ qi : : _val = qi : : _1 ] ;
notStateFormula . name ( " negation formula " ) ;
eventuallyFormula = ( qi : : lit ( " F " ) > > ( - timeBounds ) > > pathFormulaWithoutUntil ( qi : : _r1 ) ) [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createEventuallyFormula , phoenix : : ref ( * this ) , qi : : _1 , qi : : _r1 , qi : : _2 ) ] ;
eventuallyFormula . name ( " eventually formula " ) ;
globallyFormula = ( qi : : lit ( " G " ) > > ( - timeBounds ) > > pathFormulaWithoutUntil ( qi : : _r1 ) ) [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createGloballyFormula , phoenix : : ref ( * this ) , qi : : _1 , qi : : _2 ) ] ;
globallyFormula . name ( " globally formula " ) ;
nextFormula = ( qi : : lit ( " X " ) > > pathFormulaWithoutUntil ( qi : : _r1 ) ) [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createNextFormula , phoenix : : ref ( * this ) , qi : : _1 ) ] ;
nextFormula . name ( " next formula " ) ;
pathFormulaWithoutUntil = eventuallyFormula ( qi : : _r1 ) | globallyFormula ( qi : : _r1 ) | nextFormula ( qi : : _r1 ) | stateFormula ( qi : : _r1 ) ;
pathFormulaWithoutUntil . name ( " path formula " ) ;
untilFormula = pathFormulaWithoutUntil ( qi : : _r1 ) [ qi : : _val = qi : : _1 ] > > * ( qi : : lit ( " U " ) > > ( - timeBounds ) > > pathFormulaWithoutUntil ( qi : : _r1 ) ) [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createUntilFormula , phoenix : : ref ( * this ) , qi : : _val , qi : : _1 , qi : : _2 ) ] ;
untilFormula . name ( " until formula " ) ;
hoaPathFormula = qi : : lit ( " HOA: " ) > qi : : lit ( " { " )
> quotedString [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createHOAPathFormula , phoenix : : ref ( * this ) , qi : : _1 ) ]
> > * ( qi : : lit ( " , " ) > quotedString > qi : : lit ( " -> " ) > stateFormula ( qi : : _r1 ) ) [ phoenix : : bind ( & FormulaParserGrammar : : addHoaAPMapping , phoenix : : ref ( * this ) , * qi : : _val , qi : : _1 , qi : : _2 ) ]
> qi : : lit ( " } " ) ;
basicPathFormula = ( hoaPathFormula ( qi : : _r1 ) [ qi : : _val = qi : : _1 ] ) | untilFormula ( qi : : _r1 ) [ qi : : _val = qi : : _1 ] ;
expressionFormula = expressionParser [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createAtomicExpressionFormula , phoenix : : ref ( * this ) , qi : : _1 ) ] ;
expressionFormula . name ( " expression formula " ) ;
atomicPropositionFormula = ( booleanLiteralFormula | labelFormula | expressionFormula ) ;
atomicPropositionFormula . name ( " atomic proposition " ) ;
// Propositional Logic operators
// To correctly parse the operator precedences (! binds stronger than & binds stronger than |), we run through different "precedence levels" starting with the weakest binding operator.
basicPropositionalFormula = ( qi : : lit ( " ( " ) > > ( formula ( qi : : _r1 , qi : : _r2 ) > qi : : lit ( " ) " ) ) )
| atomicPropositionFormula // Should be checked before operator formulas and others. Otherwise, e.g. variable "Random" would be parsed as reward operator 'R' (followed by andom)
| negationPropositionalFormula ( qi : : _r1 , qi : : _r2 )
| operatorFormula
| multiOperatorFormula
| quantileFormula
| gameFormula
| ( isPathFormula ( qi : : _r1 ) > > prefixOperatorPathFormula ( qi : : _r2 ) ) ; // Needed for e.g. F "a" & X "a" = F ("a" & (X "a"))
negationPropositionalFormula = ( qi : : lit ( " ! " ) > basicPropositionalFormula ( qi : : _r1 , qi : : _r2 ) ) [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createUnaryBooleanStateOrPathFormula , phoenix : : ref ( * this ) , qi : : _1 , storm : : logic : : UnaryBooleanOperatorType : : Not ) ] ;
basicPropositionalFormula . name ( " basic propositional formula " ) ;
andLevelPropositionalFormula = basicPropositionalFormula ( qi : : _r1 , qi : : _r2 ) [ qi : : _val = qi : : _1 ]
> > * ( qi : : lit ( " & " )
> basicPropositionalFormula ( qi : : _r1 , qi : : _r2 ) [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createBinaryBooleanStateOrPathFormula , phoenix : : ref ( * this ) , qi : : _val , qi : : _1 , storm : : logic : : BinaryBooleanStateFormula : : OperatorType : : And ) ] ) ;
andLevelPropositionalFormula . name ( " and precedence level propositional formula " ) ;
orLevelPropositionalFormula = andLevelPropositionalFormula ( qi : : _r1 , qi : : _r2 ) [ qi : : _val = qi : : _1 ]
> > * ( ( ! qi : : lit ( " || " ) > > qi : : lit ( " | " ) ) // Make sure to not confuse with conditional operator "||"
> andLevelPropositionalFormula ( qi : : _r1 , qi : : _r2 ) [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createBinaryBooleanStateOrPathFormula , phoenix : : ref ( * this ) , qi : : _val , qi : : _1 , storm : : logic : : BinaryBooleanStateFormula : : OperatorType : : Or ) ] ) ;
orLevelPropositionalFormula . name ( " or precedence level propositional formula " ) ;
propositionalFormula = orLevelPropositionalFormula ( qi : : _r1 , qi : : _r2 ) ;
// Path operators
// Again need to parse precedences correctly. Propositional formulae bind stronger than temporal operators.
basicPathFormula = propositionalFormula ( FormulaKind : : Path , qi : : _r1 ) // Bracketed case is handled here as well
| prefixOperatorPathFormula ( qi : : _r1 ) ; // Needs to be checked *after* atomic expression formulas. Otherwise e.g. variable Fail would be parsed as "F (ail)"
prefixOperatorPathFormula = eventuallyFormula ( qi : : _r1 )
| nextFormula ( qi : : _r1 )
| globallyFormula ( qi : : _r1 )
| hoaPathFormula ( qi : : _r1 )
| multiBoundedPathFormula ( qi : : _r1 ) ;
basicPathFormula . name ( " basic path formula " ) ;
basicPathFormula . name ( " basic path formula " ) ;
conditionalFormula = basicPathFormula ( qi : : _r1 ) [ qi : : _val = qi : : _1 ] > > * ( qi : : lit ( " || " ) > > basicPathFormula ( storm : : logic : : FormulaContext : : Probability ) ) [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createConditionalFormula , phoenix : : ref ( * this ) , qi : : _val , qi : : _1 , qi : : _r1 ) ] ;
conditionalFormula . name ( " conditional formula " ) ;
timeBoundReference = ( - qi : : lit ( " rew " ) > > rewardModelName ) [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createTimeBoundReference , phoenix : : ref ( * this ) , storm : : logic : : TimeBoundType : : Reward , qi : : _1 ) ]
timeBoundReference = ( - qi : : lit ( " rew " ) > > rewardModelName ( storm : : logic : : FormulaContext : : Reward ) ) [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createTimeBoundReference , phoenix : : ref ( * this ) , storm : : logic : : TimeBoundType : : Reward , qi : : _1 ) ]
| ( qi : : lit ( " steps " ) ) [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createTimeBoundReference , phoenix : : ref ( * this ) , storm : : logic : : TimeBoundType : : Steps , boost : : none ) ]
| ( qi : : lit ( " steps " ) ) [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createTimeBoundReference , phoenix : : ref ( * this ) , storm : : logic : : TimeBoundType : : Steps , boost : : none ) ]
| ( - qi : : lit ( " time " ) ) [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createTimeBoundReference , phoenix : : ref ( * this ) , storm : : logic : : TimeBoundType : : Time , boost : : none ) ] ;
| ( - qi : : lit ( " time " ) ) [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createTimeBoundReference , phoenix : : ref ( * this ) , storm : : logic : : TimeBoundType : : Time , boost : : none ) ] ;
timeBoundReference . name ( " time bound reference " ) ;
timeBoundReference . name ( " time bound reference " ) ;
timeBound = ( ( timeBoundReference > > qi : : lit ( " [ " ) ) > expressionParser > qi : : lit ( " , " ) > expressionParser > qi : : lit ( " ] " ) )
timeBound = ( ( timeBoundReference > > qi : : lit ( " [ " ) ) > expressionParser > qi : : lit ( " , " ) > expressionParser > qi : : lit ( " ] " ) )
[ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createTimeBoundFromInterval , phoenix : : ref ( * this ) , qi : : _2 , qi : : _3 , qi : : _1 ) ]
[ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createTimeBoundFromInterval , phoenix : : ref ( * this ) , qi : : _2 , qi : : _3 , qi : : _1 ) ]
| ( timeBoundReference > > ( qi : : lit ( " <= " ) [ qi : : _a = true , qi : : _b = false ] | qi : : lit ( " < " ) [ qi : : _a = true , qi : : _b = true ] | qi : : lit ( " >= " ) [ qi : : _a = false , qi : : _b = false ] | qi : : lit ( " > " ) [ qi : : _a = false , qi : : _b = true ] ) > > expressionParser )
| ( timeBoundReference > > ( qi : : lit ( " <= " ) [ qi : : _a = true , qi : : _b = false ] | qi : : lit ( " < " ) [ qi : : _a = true , qi : : _b = true ] | qi : : lit ( " >= " ) [ qi : : _a = false , qi : : _b = false ] | qi : : lit ( " > " ) [ qi : : _a = false , qi : : _b = true ] ) > > expressionParser )
@ -99,79 +116,63 @@ namespace storm {
| ( timeBoundReference > > qi : : lit ( " = " ) > > expressionParser )
| ( timeBoundReference > > qi : : lit ( " = " ) > > expressionParser )
[ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createTimeBoundFromInterval , phoenix : : ref ( * this ) , qi : : _2 , qi : : _2 , qi : : _1 ) ] ;
[ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createTimeBoundFromInterval , phoenix : : ref ( * this ) , qi : : _2 , qi : : _2 , qi : : _1 ) ] ;
timeBound . name ( " time bound " ) ;
timeBound . name ( " time bound " ) ;
timeBounds = ( timeBound % qi : : lit ( " , " ) ) | ( ( ( - qi : : lit ( " ^ " ) > > qi : : lit ( " { " ) ) > > ( timeBound % qi : : lit ( " , " ) ) ) > > qi : : lit ( " } " ) ) ;
timeBounds = ( timeBound % qi : : lit ( " , " ) ) | ( ( ( - qi : : lit ( " ^ " ) > > qi : : lit ( " { " ) ) > > ( timeBound % qi : : lit ( " , " ) ) ) > > qi : : lit ( " } " ) ) ;
timeBounds . name ( " time bounds " ) ;
timeBounds . name ( " time bounds " ) ;
pathFormula = conditionalFormula ( qi : : _r1 ) ;
eventuallyFormula = ( qi : : lit ( " F " ) > ( - timeBounds ) > basicPathFormula ( qi : : _r1 ) ) [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createEventuallyFormula , phoenix : : ref ( * this ) , qi : : _1 , qi : : _r1 , qi : : _2 ) ] ;
eventuallyFormula . name ( " eventually formula " ) ;
nextFormula = ( qi : : lit ( " X " ) > basicPathFormula ( qi : : _r1 ) ) [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createNextFormula , phoenix : : ref ( * this ) , qi : : _1 ) ] ;
nextFormula . name ( " next formula " ) ;
globallyFormula = ( qi : : lit ( " G " ) > basicPathFormula ( qi : : _r1 ) ) [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createGloballyFormula , phoenix : : ref ( * this ) , qi : : _1 ) ] ;
globallyFormula . name ( " globally formula " ) ;
hoaPathFormula = qi : : lit ( " HOA: " ) > qi : : lit ( " { " )
> quotedString [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createHOAPathFormula , phoenix : : ref ( * this ) , qi : : _1 ) ]
> > * ( qi : : lit ( " , " ) > quotedString > qi : : lit ( " -> " ) > formula ( FormulaKind : : Path , qi : : _r1 ) ) [ phoenix : : bind ( & FormulaParserGrammar : : addHoaAPMapping , phoenix : : ref ( * this ) , * qi : : _val , qi : : _1 , qi : : _2 ) ]
> qi : : lit ( " } " ) ;
multiBoundedPathFormulaOperand = pathFormula ( qi : : _r1 ) [ qi : : _pass = phoenix : : bind ( & FormulaParserGrammar : : isValidMultiBoundedPathFormulaOperand , phoenix : : ref ( * this ) , qi : : _val ) ] ;
multiBoundedPathFormulaOperand . name ( " multi bounded path formula operand " ) ;
multiBoundedPathFormula = ( qi : : lit ( " multi " ) > qi : : lit ( " ( " ) > > ( multiBoundedPathFormulaOperand ( qi : : _r1 ) % qi : : lit ( " , " ) ) > > qi : : lit ( " ) " ) ) [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createMultiBoundedPathFormula , phoenix : : ref ( * this ) , qi : : _1 ) ] ;
multiBoundedPathFormula . name ( " multi bounded path formula " ) ;
untilLevelPathFormula = basicPathFormula ( qi : : _r1 ) [ qi : : _val = qi : : _1 ]
> > - ( ( qi : : lit ( " U " )
> ( - timeBounds ) > basicPathFormula ( qi : : _r1 ) ) [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createUntilFormula , phoenix : : ref ( * this ) , qi : : _val , qi : : _1 , qi : : _2 ) ] )
> > ( qi : : eps > noAmbiguousNonAssociativeOperator ( qi : : _val , std : : string ( " U " ) ) ) ; // Do not parse a U b U c
untilLevelPathFormula . name ( " until precedence level path formula " ) ;
pathFormula = untilLevelPathFormula ( qi : : _r1 ) ;
pathFormula . name ( " path formula " ) ;
pathFormula . name ( " path formula " ) ;
rewardMeasureType = qi : : lit ( " [ " ) > > rewardMeasureType_ > > qi : : lit ( " ] " ) ;
rewardMeasureType . name ( " reward measure type " ) ;
operatorInformation = ( - optimalityOperator_ [ qi : : _a = qi : : _1 ] > > ( ( relationalOperator_ [ qi : : _b = qi : : _1 ] > expressionParser [ qi : : _c = qi : : _1 ] ) | ( qi : : lit ( " = " ) > qi : : lit ( " ? " ) ) ) ) [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createOperatorInformation , phoenix : : ref ( * this ) , qi : : _a , qi : : _b , qi : : _c ) ] ;
operatorInformation . name ( " operator information " ) ;
longRunAverageOperator = ( ( qi : : lit ( " LRA " ) | qi : : lit ( " S " ) ) > operatorInformation > qi : : lit ( " [ " ) > stateFormula ( storm : : logic : : FormulaContext : : LongRunAverage ) > qi : : lit ( " ] " ) ) [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createLongRunAverageOperatorFormula , phoenix : : ref ( * this ) , qi : : _1 , qi : : _2 ) ] ;
longRunAverageOperator . name ( " long-run average operator " ) ;
rewardModelName = qi : : lit ( " { \" " ) > label > qi : : lit ( " \" } " ) ;
rewardModelName . name ( " reward model name " ) ;
rewardOperator = ( qi : : lit ( " R " ) > - rewardMeasureType > - rewardModelName > operatorInformation > qi : : lit ( " [ " ) > rewardPathFormula > qi : : lit ( " ] " ) ) [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createRewardOperatorFormula , phoenix : : ref ( * this ) , qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ] ;
rewardOperator . name ( " reward operator " ) ;
timeOperator = ( qi : : lit ( " T " ) > - rewardMeasureType > operatorInformation > qi : : lit ( " [ " ) > eventuallyFormula ( storm : : logic : : FormulaContext : : Time ) > qi : : lit ( " ] " ) ) [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createTimeOperatorFormula , phoenix : : ref ( * this ) , qi : : _1 , qi : : _2 , qi : : _3 ) ] ;
timeOperator . name ( " time operator " ) ;
probabilityOperator = ( qi : : lit ( " P " ) > operatorInformation > qi : : lit ( " [ " ) > pathFormula ( storm : : logic : : FormulaContext : : Probability ) > qi : : lit ( " ] " ) ) [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createProbabilityOperatorFormula , phoenix : : ref ( * this ) , qi : : _1 , qi : : _2 ) ] ;
probabilityOperator . name ( " probability operator " ) ;
andStateFormula = notStateFormula ( qi : : _r1 ) [ qi : : _val = qi : : _1 ] > > * ( qi : : lit ( " & " ) > > notStateFormula ( qi : : _r1 ) ) [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createBinaryBooleanStateOrPathFormula , phoenix : : ref ( * this ) , qi : : _val , qi : : _1 , storm : : logic : : BinaryBooleanStateFormula : : OperatorType : : And ) ] ;
andStateFormula . name ( " and state formula " ) ;
orStateFormula = andStateFormula ( qi : : _r1 ) [ qi : : _val = qi : : _1 ] > > * ( qi : : lit ( " | " ) > > andStateFormula ( qi : : _r1 ) ) [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createBinaryBooleanStateOrPathFormula , phoenix : : ref ( * this ) , qi : : _val , qi : : _1 , storm : : logic : : BinaryBooleanStateFormula : : OperatorType : : Or ) ] ;
orStateFormula . name ( " or state formula " ) ;
multiFormula = ( qi : : lit ( " multi " ) > qi : : lit ( " ( " ) > > ( ( pathFormula ( storm : : logic : : FormulaContext : : Probability ) | stateFormula ( storm : : logic : : FormulaContext : : Probability ) ) % qi : : lit ( " , " ) ) > > qi : : lit ( " ) " ) ) [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createMultiFormula , phoenix : : ref ( * this ) , qi : : _1 ) ] ;
multiFormula . name ( " Multi formula " ) ;
identifier % = qi : : as_string [ qi : : raw [ qi : : lexeme [ ( ( qi : : alpha | qi : : char_ ( ' _ ' ) | qi : : char_ ( ' . ' ) ) > > * ( qi : : alnum | qi : : char_ ( ' _ ' ) ) ) ] ] ] ;
identifier . name ( " identifier " ) ;
quantileBoundVariable = ( - ( qi : : lit ( " min " ) [ qi : : _a = storm : : solver : : OptimizationDirection : : Minimize ] | qi : : lit ( " max " ) [ qi : : _a = storm : : solver : : OptimizationDirection : : Maximize ] ) > > identifier > > qi : : lit ( " , " ) ) [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createQuantileBoundVariables , phoenix : : ref ( * this ) , qi : : _a , qi : : _1 ) ] ;
quantileBoundVariable . name ( " quantile bound variable " ) ;
quantileFormula = ( qi : : lit ( " quantile " ) > qi : : lit ( " ( " ) > > * ( quantileBoundVariable ) > > stateFormula ( storm : : logic : : FormulaContext : : Undefined ) > qi : : lit ( " ) " ) ) [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createQuantileFormula , phoenix : : ref ( * this ) , qi : : _1 , qi : : _2 ) ] ;
quantileFormula . name ( " Quantile formula " ) ;
// Quantitative path formulae (reward)
longRunAverageRewardFormula = ( qi : : lit ( " LRA " ) | qi : : lit ( " S " ) | qi : : lit ( " MP " ) ) [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createLongRunAverageRewardFormula , phoenix : : ref ( * this ) ) ] ;
longRunAverageRewardFormula . name ( " long run average reward formula " ) ;
instantaneousRewardFormula = ( qi : : lit ( " I= " ) > expressionParser ) [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createInstantaneousRewardFormula , phoenix : : ref ( * this ) , qi : : _1 ) ] ;
instantaneousRewardFormula . name ( " instantaneous reward formula " ) ;
cumulativeRewardFormula = ( qi : : lit ( " C " ) > > timeBounds ) [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createCumulativeRewardFormula , phoenix : : ref ( * this ) , qi : : _1 ) ] ;
cumulativeRewardFormula . name ( " cumulative reward formula " ) ;
totalRewardFormula = ( qi : : lit ( " C " ) ) [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createTotalRewardFormula , phoenix : : ref ( * this ) ) ] ;
totalRewardFormula . name ( " total reward formula " ) ;
// Game Formulae
playerCoalition = ( - ( ( identifier [ phoenix : : push_back ( qi : : _a , qi : : _1 ) ] | qi : : uint_ [ phoenix : : push_back ( qi : : _a , qi : : _1 ) ] ) % ' , ' ) ) [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createPlayerCoalition , phoenix : : ref ( * this ) , qi : : _a ) ] ;
playerCoalition = ( - ( ( identifier [ phoenix : : push_back ( qi : : _a , qi : : _1 ) ] | qi : : uint_ [ phoenix : : push_back ( qi : : _a , qi : : _1 ) ] ) % ' , ' ) ) [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createPlayerCoalition , phoenix : : ref ( * this ) , qi : : _a ) ] ;
playerCoalition . name ( " player coalition " ) ;
playerCoalition . name ( " player coalition " ) ;
gameFormula = ( qi : : lit ( " << " ) > playerCoalition > qi : : lit ( " >> " ) > operatorFormula ) [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createGameFormula , phoenix : : ref ( * this ) , qi : : _1 , qi : : _2 ) ] ;
gameFormula = ( qi : : lit ( " << " ) > playerCoalition > qi : : lit ( " >> " ) > operatorFormula ) [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createGameFormula , phoenix : : ref ( * this ) , qi : : _1 , qi : : _2 ) ] ;
gameFormula . name ( " game formula " ) ;
gameFormula . name ( " game formula " ) ;
shieldExpression = ( qi : : lit ( " < " ) > label > qi : : lit ( " , " ) > shieldingType > - ( qi : : lit ( " , " ) > shieldComparison ) > qi : : lit ( " > " ) ) [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createShieldExpression , phoenix : : ref ( * this ) , qi : : _2 , qi : : _1 , qi : : _3 ) ] ;
shieldExpression . name ( " shield expression " ) ;
shieldingType = ( qi : : lit ( " PreSafety " ) [ qi : : _val = storm : : logic : : ShieldingType : : PreSafety ] |
qi : : lit ( " PostSafety " ) [ qi : : _val = storm : : logic : : ShieldingType : : PostSafety ] |
qi : : lit ( " Optimal " ) [ qi : : _val = storm : : logic : : ShieldingType : : Optimal ] ) > - qi : : lit ( " Shield " ) ;
shieldingType . name ( " shielding type " ) ;
probability = qi : : double_ [ qi : : _pass = ( qi : : _1 > = 0 ) & ( qi : : _1 < = 1.0 ) , qi : : _val = qi : : _1 ] ;
probability . name ( " double between 0 and 1 " ) ;
shieldComparison = ( ( qi : : lit ( " lambda " ) [ qi : : _a = storm : : logic : : ShieldComparison : : Relative ] |
qi : : lit ( " gamma " ) [ qi : : _a = storm : : logic : : ShieldComparison : : Absolute ] ) > qi : : lit ( " = " ) > probability ) [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createShieldComparisonStruct , phoenix : : ref ( * this ) , qi : : _a , qi : : _1 ) ] ;
shieldComparison . name ( " shield comparison type " ) ;
stateFormula = ( orStateFormula ( qi : : _r1 ) | multiFormula | quantileFormula ) ;
stateFormula . name ( " state formula " ) ;
quotedString % = qi : : as_string [ qi : : lexeme [ qi : : omit [ qi : : char_ ( ' " ' ) ] > qi : : raw [ * ( ! qi : : char_ ( ' " ' ) > > qi : : char_ ) ] > qi : : omit [ qi : : lit ( ' " ' ) ] ] ] ;
quotedString . name ( " quoted string " ) ;
// Multi-objective, quantiles
multiOperatorFormula = ( qi : : lit ( " multi " ) > qi : : lit ( " ( " )
> ( operatorFormula % qi : : lit ( " , " ) )
> qi : : lit ( " ) " ) ) [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createMultiOperatorFormula , phoenix : : ref ( * this ) , qi : : _1 ) ] ;
multiOperatorFormula . name ( " multi-objective operator formula " ) ;
quantileBoundVariable = ( - optimalityOperator_ > identifier > qi : : lit ( " , " ) ) [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createQuantileBoundVariables , phoenix : : ref ( * this ) , qi : : _1 , qi : : _2 ) ] ;
quantileBoundVariable . name ( " quantile bound variable " ) ;
quantileFormula = ( qi : : lit ( " quantile " ) > qi : : lit ( " ( " ) > * ( quantileBoundVariable ) > operatorFormula [ qi : : _pass = phoenix : : bind ( & FormulaParserGrammar : : isBooleanReturnType , phoenix : : ref ( * this ) , qi : : _1 , true ) ] > qi : : lit ( " ) " ) ) [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createQuantileFormula , phoenix : : ref ( * this ) , qi : : _1 , qi : : _2 ) ] ;
quantileFormula . name ( " Quantile formula " ) ;
// General formulae
formula = ( isPathFormula ( qi : : _r1 ) > > pathFormula ( qi : : _r2 ) | propositionalFormula ( qi : : _r1 , qi : : _r2 ) ) ;
formula . name ( " formula " ) ;
topLevelFormula = formula ( FormulaKind : : State , storm : : logic : : FormulaContext : : Undefined ) ;
topLevelFormula . name ( " top-level formula " ) ;
formulaName = qi : : lit ( " \" " ) > > identifier > > qi : : lit ( " \" " ) > > qi : : lit ( " : " ) ;
formulaName = qi : : lit ( " \" " ) > > identifier > > qi : : lit ( " \" " ) > > qi : : lit ( " : " ) ;
formulaName . name ( " formula name " ) ;
formulaName . name ( " formula name " ) ;
@ -182,8 +183,9 @@ namespace storm {
# pragma clang diagnostic push
# pragma clang diagnostic push
# pragma clang diagnostic ignored "-Woverloaded-shift-op-parentheses"
# pragma clang diagnostic ignored "-Woverloaded-shift-op-parentheses"
filterProperty = ( - formulaName > > qi : : lit ( " filter " ) > qi : : lit ( " ( " ) > filterType_ > qi : : lit ( " , " ) > stateFormula ( storm : : logic : : FormulaContext : : Undefined ) > qi : : lit ( " , " ) > stateFormula ( storm : : logic : : FormulaContext : : Undefined ) > qi : : lit ( " ) " ) ) [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createProperty , phoenix : : ref ( * this ) , qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ] | ( - formulaName > > stateFormula ( storm : : logic : : FormulaContext : : Undefined ) ) [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createPropertyWithDefaultFilterTypeAndStates , phoenix : : ref ( * this ) , qi : : _1 , qi : : _2 ) ] | ( - formulaName > > shieldExpression > > stateFormula ( storm : : logic : : FormulaContext : : Undefined ) ) [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createShieldingProperty , phoenix : : ref ( * this ) , qi : : _1 , qi : : _3 , qi : : _2 ) ] ;
filterProperty = ( - formulaName > > qi : : lit ( " filter " ) > qi : : lit ( " ( " ) > filterType_ > qi : : lit ( " , " ) > topLevelFormula > qi : : lit ( " , " ) > formula ( FormulaKind : : State , storm : : logic : : FormulaContext : : Undefined ) > qi : : lit ( " ) " ) ) [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createProperty , phoenix : : ref ( * this ) , qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ] |
( - formulaName > > topLevelFormula ) [ qi : : _val = phoenix : : bind ( & FormulaParserGrammar : : createPropertyWithDefaultFilterTypeAndStates , phoenix : : ref ( * this ) , qi : : _1 , qi : : _2 ) ] ;
filterProperty . name ( " filter property " ) ;
filterProperty . name ( " filter property " ) ;
# pragma clang diagnostic pop
# pragma clang diagnostic pop
@ -195,62 +197,91 @@ namespace storm {
start . name ( " start " ) ;
start . name ( " start " ) ;
// Enable the following lines to print debug output for most the rules.
// Enable the following lines to print debug output for most the rules.
//debug(start);
//debug(constantDefinition);
//debug(stateFormula);
//debug(orStateFormula);
//debug(andStateFormula);
//debug(probabilityOperator);
//debug(rewardOperator);
//debug(longRunAverageOperator);
//debug(timeOperator);
//debug(pathFormulaWithoutUntil);
//debug(pathFormula);
//debug(conditionalFormula);
//debug(nextFormula);
//debug(globallyFormula);
//debug(eventuallyFormula);
//debug(atomicStateFormula);
//debug(booleanLiteralFormula);
//debug(labelFormula);
//debug(expressionFormula);
//debug(rewardPathFormula);
//debug(cumulativeRewardFormula);
//debug(totalRewardFormula);
//debug(instantaneousRewardFormula);
//debug(multiFormula);
// debug(rewardModelName)
// debug(rewardMeasureType)
// debug(operatorFormula)
// debug(labelFormula)
// debug(expressionFormula)
// debug(booleanLiteralFormula)
// debug(atomicPropositionFormula)
// debug(basicPropositionalFormula)
// debug(negationPropositionalFormula)
// debug(andLevelPropositionalFormula)
// debug(orLevelPropositionalFormula)
// debug(propositionalFormula)
// debug(timeBoundReference)
// debug(timeBound)
// debug(timeBounds)
// debug(eventuallyFormula)
// debug(nextFormula)
// debug(globallyFormula)
// debug(hoaPathFormula)
// debug(multiBoundedPathFormula)
// debug(prefixOperatorPathFormula)
// debug(basicPathFormula)
// debug(untilLevelPathFormula)
// debug(pathFormula)
// debug(longRunAverageRewardFormula)
// debug(instantaneousRewardFormula)
// debug(cumulativeRewardFormula)
// debug(totalRewardFormula)
// debug(playerCoalition)
// debug(gameFormula)
// debug(multiOperatorFormula)
// debug(quantileBoundVariable)
// debug(quantileFormula)
// debug(formula)
// debug(topLevelFormula)
// debug(formulaName)
// debug(filterProperty)
// debug(constantDefinition )
// debug(start)
// Enable error reporting.
// Enable error reporting.
qi : : on_error < qi : : fail > ( start , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( stateFormula , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( orStateFormula , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( andStateFormula , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( probabilityOperator , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( rewardOperator , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( longRunAverageOperator , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( timeOperator , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( operatorInformation , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( pathFormulaWithoutUntil , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( pathFormula , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( conditionalFormula , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( untilFormula , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( hoaPathFormula , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( basicPathFormula , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( nextFormula , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( globallyFormula , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( eventuallyFormula , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( atomicStateFormula , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( booleanLiteralFormula , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( rewardModelName , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( rewardMeasureType , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( operatorFormula , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( labelFormula , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( labelFormula , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( expressionFormula , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( expressionFormula , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( rewardPathFormula , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( booleanLiteralFormula , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( atomicPropositionFormula , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( basicPropositionalFormula , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( negationPropositionalFormula , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( andLevelPropositionalFormula , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( orLevelPropositionalFormula , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( propositionalFormula , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( timeBoundReference , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( timeBound , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( timeBounds , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( eventuallyFormula , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( nextFormula , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( globallyFormula , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( hoaPathFormula , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( multiBoundedPathFormula , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( prefixOperatorPathFormula , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( basicPathFormula , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( untilLevelPathFormula , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( pathFormula , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( longRunAverageRewardFormula , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( instantaneousRewardFormula , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( cumulativeRewardFormula , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( cumulativeRewardFormula , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( totalRewardFormula , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( totalRewardFormula , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( instantaneousRewardFormula , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( multiFormula , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( playerCoalition , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( gameFormula , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( multiOperatorFormula , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( quantileBoundVariable , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( quantileFormula , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( formula , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( topLevelFormula , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( formulaName , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( filterProperty , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( constantDefinition , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
qi : : on_error < qi : : fail > ( start , handler ( qi : : _1 , qi : : _2 , qi : : _3 , qi : : _4 ) ) ;
}
}
void FormulaParserGrammar : : addIdentifierExpression ( std : : string const & identifier , storm : : expressions : : Expression const & expression ) {
void FormulaParserGrammar : : addIdentifierExpression ( std : : string const & identifier , storm : : expressions : : Expression const & expression ) {
STORM_LOG_WARN_COND ( keywords_ . find ( identifier ) = = nullptr , " Identifier ` " < < identifier < < " ' coincides with a reserved keyword or operator. Property expressions using the variable or constant ' " < < identifier < < " ' will not be parsed correctly. " ) ;
STORM_LOG_WARN_COND ( nonStandardKeywords_ . find ( identifier ) = = nullptr , " Identifier ` " < < identifier < < " ' coincides with a reserved keyword or operator. Property expressions using the variable or constant ' " < < identifier < < " ' might not be parsed correctly. " ) ;
this - > identifiers_ . add ( identifier , expression ) ;
this - > identifiers_ . add ( identifier , expression ) ;
}
}
@ -403,8 +434,13 @@ namespace storm {
hoaFormula_ . addAPMapping ( ap , expression ) ;
hoaFormula_ . addAPMapping ( ap , expression ) ;
}
}
std : : shared_ptr < storm : : logic : : Formula const > FormulaParserGrammar : : createConditionalFormula ( std : : shared_ptr < storm : : logic : : Formula const > const & leftSubformula , std : : shared_ptr < storm : : logic : : Formula const > const & rightSubformula , storm : : logic : : FormulaContext context ) const {
return std : : shared_ptr < storm : : logic : : Formula const > ( new storm : : logic : : ConditionalFormula ( leftSubformula , rightSubformula , context ) ) ;
std : : shared_ptr < storm : : logic : : Formula const > FormulaParserGrammar : : createConditionalFormula ( std : : shared_ptr < storm : : logic : : Formula const > const & leftSubformula , boost : : optional < std : : shared_ptr < storm : : logic : : Formula const > > const & rightSubformula , storm : : logic : : FormulaContext context ) const {
if ( rightSubformula ) {
return std : : shared_ptr < storm : : logic : : Formula const > ( new storm : : logic : : ConditionalFormula ( leftSubformula , rightSubformula . get ( ) , context ) ) ;
} else {
// If there is no rhs, just return the lhs
return leftSubformula ;
}
}
}
storm : : logic : : OperatorInformation FormulaParserGrammar : : createOperatorInformation ( boost : : optional < storm : : OptimizationDirection > const & optimizationDirection , boost : : optional < storm : : logic : : ComparisonType > const & comparisonType , boost : : optional < storm : : expressions : : Expression > const & threshold ) const {
storm : : logic : : OperatorInformation FormulaParserGrammar : : createOperatorInformation ( boost : : optional < storm : : OptimizationDirection > const & optimizationDirection , boost : : optional < storm : : logic : : ComparisonType > const & comparisonType , boost : : optional < storm : : expressions : : Expression > const & threshold ) const {
@ -415,7 +451,25 @@ namespace storm {
return storm : : logic : : OperatorInformation ( optimizationDirection , boost : : none ) ;
return storm : : logic : : OperatorInformation ( optimizationDirection , boost : : none ) ;
}
}
}
}
std : : shared_ptr < storm : : logic : : Formula const > FormulaParserGrammar : : createOperatorFormula ( storm : : logic : : FormulaContext const & context , boost : : optional < storm : : logic : : RewardMeasureType > const & rewardMeasureType , boost : : optional < std : : string > const & rewardModelName , storm : : logic : : OperatorInformation const & operatorInformation , std : : shared_ptr < storm : : logic : : Formula const > const & subformula ) {
switch ( context ) {
case storm : : logic : : FormulaContext : : Probability :
STORM_LOG_ASSERT ( ! rewardMeasureType & & ! rewardModelName , " Probability operator with reward information parsed " ) ;
return createProbabilityOperatorFormula ( operatorInformation , subformula ) ;
case storm : : logic : : FormulaContext : : Reward :
return createRewardOperatorFormula ( rewardMeasureType , rewardModelName , operatorInformation , subformula ) ;
case storm : : logic : : FormulaContext : : LongRunAverage :
STORM_LOG_ASSERT ( ! rewardMeasureType & & ! rewardModelName , " LRA operator with reward information parsed " ) ;
return createLongRunAverageOperatorFormula ( operatorInformation , subformula ) ;
case storm : : logic : : FormulaContext : : Time :
STORM_LOG_ASSERT ( ! rewardModelName , " Time operator with reward model name parsed " ) ;
return createTimeOperatorFormula ( rewardMeasureType , operatorInformation , subformula ) ;
default :
STORM_LOG_THROW ( false , storm : : exceptions : : WrongFormatException , " Unexpected formula context. " ) ;
}
}
std : : shared_ptr < storm : : logic : : Formula const > FormulaParserGrammar : : createLongRunAverageOperatorFormula ( storm : : logic : : OperatorInformation const & operatorInformation , std : : shared_ptr < storm : : logic : : Formula const > const & subformula ) const {
std : : shared_ptr < storm : : logic : : Formula const > FormulaParserGrammar : : createLongRunAverageOperatorFormula ( storm : : logic : : OperatorInformation const & operatorInformation , std : : shared_ptr < storm : : logic : : Formula const > const & subformula ) const {
return std : : shared_ptr < storm : : logic : : Formula const > ( new storm : : logic : : LongRunAverageOperatorFormula ( subformula , operatorInformation ) ) ;
return std : : shared_ptr < storm : : logic : : Formula const > ( new storm : : logic : : LongRunAverageOperatorFormula ( subformula , operatorInformation ) ) ;
}
}
@ -467,53 +521,58 @@ namespace storm {
std : : shared_ptr < storm : : logic : : Formula const > FormulaParserGrammar : : createBinaryBooleanStateOrPathFormula ( std : : shared_ptr < storm : : logic : : Formula const > const & leftSubformula , std : : shared_ptr < storm : : logic : : Formula const > const & rightSubformula , storm : : logic : : BinaryBooleanOperatorType operatorType ) {
std : : shared_ptr < storm : : logic : : Formula const > FormulaParserGrammar : : createBinaryBooleanStateOrPathFormula ( std : : shared_ptr < storm : : logic : : Formula const > const & leftSubformula , std : : shared_ptr < storm : : logic : : Formula const > const & rightSubformula , storm : : logic : : BinaryBooleanOperatorType operatorType ) {
if ( leftSubformula - > isStateFormula ( ) & & rightSubformula - > isStateFormula ( ) ) {
if ( leftSubformula - > isStateFormula ( ) & & rightSubformula - > isStateFormula ( ) ) {
return createBinaryBooleanStateFormula ( leftSubformula , rightSubformula , operatorType ) ;
return createBinaryBooleanStateFormula ( leftSubformula , rightSubformula , operatorType ) ;
} else {
} else if ( leftSubformula - > isPathFormula ( ) | | rightSubformula - > isPathFormula ( ) ) {
return createBinaryBooleanPathFormula ( leftSubformula , rightSubformula , operatorType ) ;
return createBinaryBooleanPathFormula ( leftSubformula , rightSubformula , operatorType ) ;
}
}
STORM_LOG_THROW ( false , storm : : exceptions : : WrongFormatException , " Subformulas have unexpected type. " ) ;
}
}
std : : shared_ptr < storm : : logic : : Formula const > FormulaParserGrammar : : createUnaryBooleanStateOrPathFormula ( std : : shared_ptr < storm : : logic : : Formula const > const & subformula , boost : : optional < storm : : logic : : UnaryBooleanOperatorType > const & operatorType ) {
std : : shared_ptr < storm : : logic : : Formula const > FormulaParserGrammar : : createUnaryBooleanStateOrPathFormula ( std : : shared_ptr < storm : : logic : : Formula const > const & subformula , boost : : optional < storm : : logic : : UnaryBooleanOperatorType > const & operatorType ) {
if ( subformula - > isStateFormula ( ) ) {
if ( subformula - > isStateFormula ( ) ) {
return createUnaryBooleanStateFormula ( subformula , operatorType ) ;
return createUnaryBooleanStateFormula ( subformula , operatorType ) ;
} else {
} else if ( subformula - > isPathFormula ( ) ) {
return createUnaryBooleanPathFormula ( subformula , operatorType ) ;
return createUnaryBooleanPathFormula ( subformula , operatorType ) ;
}
}
STORM_LOG_THROW ( false , storm : : exceptions : : WrongFormatException , " Subformulas have unexpected type. " ) ;
}
}
std : : shared_ptr < storm : : logic : : Formula const > FormulaParserGrammar : : createMultiFormula ( std : : vector < std : : shared_ptr < storm : : logic : : Formula const > > const & subformulas ) {
bool isMultiDimensionalBoundedUntilFormula = ! subformulas . empty ( ) ;
for ( auto const & subformula : subformulas ) {
if ( ! subformula - > isBoundedUntilFormula ( ) ) {
isMultiDimensionalBoundedUntilFormula = false ;
break ;
bool FormulaParserGrammar : : isValidMultiBoundedPathFormulaOperand ( std : : shared_ptr < storm : : logic : : Formula const > const & operand ) {
if ( operand - > isBoundedUntilFormula ( ) ) {
if ( ! operand - > asBoundedUntilFormula ( ) . isMultiDimensional ( ) ) {
return true ;
}
}
STORM_LOG_ERROR ( " Composition of multidimensional bounded until formula must consist of single dimension subformulas. Got ' " < < * operand < < " ' instead. " ) ;
}
}
return false ;
}
if ( isMultiDimensionalBoundedUntilFormula ) {
std : : vector < std : : shared_ptr < storm : : logic : : Formula const > > leftSubformulas , rightSubformulas ;
std : : vector < boost : : optional < storm : : logic : : TimeBound > > lowerBounds , upperBounds ;
std : : vector < storm : : logic : : TimeBoundReference > timeBoundReferences ;
for ( auto const & subformula : subformulas ) {
auto const & f = subformula - > asBoundedUntilFormula ( ) ;
STORM_LOG_THROW ( ! f . isMultiDimensional ( ) , storm : : exceptions : : WrongFormatException , " Composition of multidimensional bounded until formula must consist of single dimension subformulas. Got ' " < < f < < " ' instead. " ) ;
leftSubformulas . push_back ( f . getLeftSubformula ( ) . asSharedPointer ( ) ) ;
rightSubformulas . push_back ( f . getRightSubformula ( ) . asSharedPointer ( ) ) ;
if ( f . hasLowerBound ( ) ) {
lowerBounds . emplace_back ( storm : : logic : : TimeBound ( f . isLowerBoundStrict ( ) , f . getLowerBound ( ) ) ) ;
} else {
lowerBounds . emplace_back ( ) ;
}
if ( f . hasUpperBound ( ) ) {
upperBounds . emplace_back ( storm : : logic : : TimeBound ( f . isUpperBoundStrict ( ) , f . getUpperBound ( ) ) ) ;
} else {
upperBounds . emplace_back ( ) ;
}
timeBoundReferences . push_back ( f . getTimeBoundReference ( ) ) ;
std : : shared_ptr < storm : : logic : : Formula const > FormulaParserGrammar : : createMultiBoundedPathFormula ( std : : vector < std : : shared_ptr < storm : : logic : : Formula const > > const & subformulas ) {
std : : vector < std : : shared_ptr < storm : : logic : : Formula const > > leftSubformulas , rightSubformulas ;
std : : vector < boost : : optional < storm : : logic : : TimeBound > > lowerBounds , upperBounds ;
std : : vector < storm : : logic : : TimeBoundReference > timeBoundReferences ;
for ( auto const & subformula : subformulas ) {
STORM_LOG_THROW ( subformula - > isBoundedUntilFormula ( ) , storm : : exceptions : : WrongFormatException , " multi-path formulas require bounded until (or eventually) subformulae. Got ' " < < * subformula < < " ' instead. " ) ;
auto const & f = subformula - > asBoundedUntilFormula ( ) ;
STORM_LOG_THROW ( ! f . isMultiDimensional ( ) , storm : : exceptions : : WrongFormatException , " Composition of multidimensional bounded until formula must consist of single dimension subformulas. Got ' " < < f < < " ' instead. " ) ;
leftSubformulas . push_back ( f . getLeftSubformula ( ) . asSharedPointer ( ) ) ;
rightSubformulas . push_back ( f . getRightSubformula ( ) . asSharedPointer ( ) ) ;
if ( f . hasLowerBound ( ) ) {
lowerBounds . emplace_back ( storm : : logic : : TimeBound ( f . isLowerBoundStrict ( ) , f . getLowerBound ( ) ) ) ;
} else {
lowerBounds . emplace_back ( ) ;
}
}
return std : : shared_ptr < storm : : logic : : Formula const > ( new storm : : logic : : BoundedUntilFormula ( leftSubformulas , rightSubformulas , lowerBounds , upperBounds , timeBoundReferences ) ) ;
} else {
return std : : shared_ptr < storm : : logic : : Formula const > ( new storm : : logic : : MultiObjectiveFormula ( subformulas ) ) ;
if ( f . hasUpperBound ( ) ) {
upperBounds . emplace_back ( storm : : logic : : TimeBound ( f . isUpperBoundStrict ( ) , f . getUpperBound ( ) ) ) ;
} else {
upperBounds . emplace_back ( ) ;
}
timeBoundReferences . push_back ( f . getTimeBoundReference ( ) ) ;
}
}
return std : : shared_ptr < storm : : logic : : Formula const > ( new storm : : logic : : BoundedUntilFormula ( leftSubformulas , rightSubformulas , lowerBounds , upperBounds , timeBoundReferences ) ) ;
}
std : : shared_ptr < storm : : logic : : Formula const > FormulaParserGrammar : : createMultiOperatorFormula ( std : : vector < std : : shared_ptr < storm : : logic : : Formula const > > const & subformulas ) {
return std : : shared_ptr < storm : : logic : : Formula const > ( new storm : : logic : : MultiObjectiveFormula ( subformulas ) ) ;
}
}
storm : : expressions : : Variable FormulaParserGrammar : : createQuantileBoundVariables ( boost : : optional < storm : : solver : : OptimizationDirection > const & dir , std : : string const & variableName ) {
storm : : expressions : : Variable FormulaParserGrammar : : createQuantileBoundVariables ( boost : : optional < storm : : solver : : OptimizationDirection > const & dir , std : : string const & variableName ) {
@ -561,30 +620,7 @@ namespace storm {
return storm : : jani : : Property ( std : : to_string ( propertyCount ) , formula , this - > getUndefinedConstants ( formula ) ) ;
return storm : : jani : : Property ( std : : to_string ( propertyCount ) , formula , this - > getUndefinedConstants ( formula ) ) ;
}
}
}
}
std : : pair < storm : : logic : : ShieldComparison , double > FormulaParserGrammar : : createShieldComparisonStruct ( storm : : logic : : ShieldComparison comparisonType , double value ) {
return std : : make_pair ( comparisonType , value ) ;
}
std : : shared_ptr < storm : : logic : : ShieldExpression const > FormulaParserGrammar : : createShieldExpression ( storm : : logic : : ShieldingType type , std : : string name , boost : : optional < std : : pair < storm : : logic : : ShieldComparison , double > > comparisonStruct ) {
if ( comparisonStruct . is_initialized ( ) ) {
STORM_LOG_WARN_COND ( type ! = storm : : logic : : ShieldingType : : Optimal , " Comparison for optimal shield will be ignored. " ) ;
return std : : shared_ptr < storm : : logic : : ShieldExpression > ( new storm : : logic : : ShieldExpression ( type , name , comparisonStruct . get ( ) . first , comparisonStruct . get ( ) . second ) ) ;
} else {
STORM_LOG_THROW ( type = = storm : : logic : : ShieldingType : : Optimal , storm : : exceptions : : WrongFormatException , " Construction of safety shield needs a comparison parameter (lambda or gamma) " ) ;
return std : : shared_ptr < storm : : logic : : ShieldExpression > ( new storm : : logic : : ShieldExpression ( type , name ) ) ;
}
}
storm : : jani : : Property FormulaParserGrammar : : createShieldingProperty ( boost : : optional < std : : string > const & propertyName , std : : shared_ptr < storm : : logic : : Formula const > const & formula , std : : shared_ptr < storm : : logic : : ShieldExpression const > const & shieldExpression ) {
+ + propertyCount ;
if ( propertyName ) {
return storm : : jani : : Property ( propertyName . get ( ) , formula , this - > getUndefinedConstants ( formula ) , shieldExpression ) ;
} else {
return storm : : jani : : Property ( std : : to_string ( propertyCount ) , formula , this - > getUndefinedConstants ( formula ) , shieldExpression ) ;
}
}
storm : : logic : : PlayerCoalition FormulaParserGrammar : : createPlayerCoalition ( std : : vector < boost : : variant < std : : string , storm : : storage : : PlayerIndex > > const & playerIds ) const {
storm : : logic : : PlayerCoalition FormulaParserGrammar : : createPlayerCoalition ( std : : vector < boost : : variant < std : : string , storm : : storage : : PlayerIndex > > const & playerIds ) const {
return storm : : logic : : PlayerCoalition ( playerIds ) ;
return storm : : logic : : PlayerCoalition ( playerIds ) ;
}
}
@ -592,5 +628,19 @@ namespace storm {
std : : shared_ptr < storm : : logic : : Formula const > FormulaParserGrammar : : createGameFormula ( storm : : logic : : PlayerCoalition const & coalition , std : : shared_ptr < storm : : logic : : Formula const > const & subformula ) const {
std : : shared_ptr < storm : : logic : : Formula const > FormulaParserGrammar : : createGameFormula ( storm : : logic : : PlayerCoalition const & coalition , std : : shared_ptr < storm : : logic : : Formula const > const & subformula ) const {
return std : : shared_ptr < storm : : logic : : Formula const > ( new storm : : logic : : GameFormula ( coalition , subformula ) ) ;
return std : : shared_ptr < storm : : logic : : Formula const > ( new storm : : logic : : GameFormula ( coalition , subformula ) ) ;
}
}
bool FormulaParserGrammar : : isBooleanReturnType ( std : : shared_ptr < storm : : logic : : Formula const > const & formula , bool raiseErrorMessage ) {
if ( formula - > hasQualitativeResult ( ) ) {
return true ;
}
STORM_LOG_ERROR_COND ( ! raiseErrorMessage , " Formula " < < * formula < < " does not have a Boolean return type. " ) ;
return false ;
}
bool FormulaParserGrammar : : raiseAmbiguousNonAssociativeOperatorError ( std : : shared_ptr < storm : : logic : : Formula const > const & formula , std : : string const & op ) {
STORM_LOG_ERROR ( " Ambiguous use of non-associative operator ' " < < op < < " ' in formula ' " < < * formula < < " U ... ' " ) ;
return true ;
}
}
}
}
}