mirror of
https://github.com/silverstripe/silverstripe-framework
synced 2024-09-08 10:41:25 +02:00
2444 lines
84 KiB
PHP
2444 lines
84 KiB
PHP
<?php
|
|
|
|
/*
|
|
WARNING: This file has been machine generated. Do not edit it, or your changes will be overwritten next time it is compiled.
|
|
*/
|
|
|
|
|
|
|
|
|
|
// We want this to work when run by hand too
|
|
if (defined(THIRDPARTY_PATH)) {
|
|
require THIRDPARTY_PATH . '/php-peg/Parser.php' ;
|
|
}
|
|
else {
|
|
$base = dirname(__FILE__);
|
|
require $base.'/../thirdparty/php-peg/Parser.php';
|
|
}
|
|
|
|
/**
|
|
This is the exception raised when failing to parse a template. Note that we don't currently do any static analysis, so we can't know
|
|
if the template will run, just if it's malformed. It also won't catch mistakes that still look valid.
|
|
*/
|
|
class SSTemplateParseException extends Exception {
|
|
|
|
function __construct($message, $parser) {
|
|
$prior = substr($parser->string, 0, $parser->pos);
|
|
|
|
preg_match_all('/\r\n|\r|\n/', $prior, $matches);
|
|
$line = count($matches[0])+1;
|
|
|
|
parent::__construct("Parse error in template on line $line. Error was: $message");
|
|
}
|
|
|
|
}
|
|
|
|
/**
|
|
This is the parser for the SilverStripe template language. It gets called on a string and uses a php-peg parser to match
|
|
that string against the language structure, building up the PHP code to execute that structure as it parses
|
|
|
|
The $result array that is built up as part of the parsing (see thirdparty/php-peg/README.md for more on how parsers
|
|
build results) has one special member, 'php', which contains the php equivalent of that part of the template tree.
|
|
|
|
Some match rules generate alternate php, or other variations, so check the per-match documentation too.
|
|
|
|
Terms used:
|
|
|
|
Marked: A string or lookup in the template that has been explictly marked as such - lookups by prepending with "$"
|
|
(like $Foo.Bar), strings by wrapping with single or double quotes ('Foo' or "Foo")
|
|
|
|
Bare: The opposite of marked. An argument that has to has it's type inferred by usage and 2.4 defaults.
|
|
Example of using a bare argument for a loop block: <% loop Foo %>
|
|
|
|
Block: One of two SS template structures. The special characters "<%" and "%>" are used to wrap the opening and
|
|
(required or forbidden depending on which block exactly) closing block marks.
|
|
|
|
Open Block: An SS template block that doesn't wrap any content or have a closing end tag (in fact, a closing end tag is
|
|
forbidden)
|
|
|
|
Closed Block: An SS template block that wraps content, and requires a counterpart <% end_blockname %> tag
|
|
|
|
*/
|
|
class SSTemplateParser extends Parser {
|
|
|
|
/**
|
|
* @var bool - Set true by SSTemplateParser::compileString if the template should include comments intended
|
|
* for debugging (template source, included files, etc)
|
|
*/
|
|
protected $includeDebuggingComments = false;
|
|
|
|
function construct($name) {
|
|
$result = parent::construct($name);
|
|
$result['tags'] = array();
|
|
return $result;
|
|
}
|
|
|
|
/* Word: / [A-Za-z_] [A-Za-z0-9_]* / */
|
|
function match_Word ($substack = array()) {
|
|
$result = array("name"=>"Word", "text"=>"");
|
|
$_0 = new ParserExpression( $this, $substack, $result );
|
|
if (( $subres = $this->rx( $_0->expand('/ [A-Za-z_] [A-Za-z0-9_]* /') ) ) !== FALSE) {
|
|
$result["text"] .= $subres;
|
|
return $result;
|
|
}
|
|
else { return FALSE; }
|
|
}
|
|
|
|
|
|
/* Number: / [0-9]+ / */
|
|
function match_Number ($substack = array()) {
|
|
$result = array("name"=>"Number", "text"=>"");
|
|
$_2 = new ParserExpression( $this, $substack, $result );
|
|
if (( $subres = $this->rx( $_2->expand('/ [0-9]+ /') ) ) !== FALSE) {
|
|
$result["text"] .= $subres;
|
|
return $result;
|
|
}
|
|
else { return FALSE; }
|
|
}
|
|
|
|
|
|
/* Value: / [A-Za-z0-9_]+ / */
|
|
function match_Value ($substack = array()) {
|
|
$result = array("name"=>"Value", "text"=>"");
|
|
$_4 = new ParserExpression( $this, $substack, $result );
|
|
if (( $subres = $this->rx( $_4->expand('/ [A-Za-z0-9_]+ /') ) ) !== FALSE) {
|
|
$result["text"] .= $subres;
|
|
return $result;
|
|
}
|
|
else { return FALSE; }
|
|
}
|
|
|
|
|
|
/* CallArguments: :Argument ( < "," < :Argument )* */
|
|
function match_CallArguments ($substack = array()) {
|
|
$result = $this->construct( "CallArguments" );
|
|
$_13 = NULL;
|
|
do {
|
|
$key = "Argument"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_Argument(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres, "Argument" );
|
|
}
|
|
else { $_13 = FALSE; break; }
|
|
while (true) {
|
|
$res_12 = $result;
|
|
$pos_12 = $this->pos;
|
|
$_11 = NULL;
|
|
do {
|
|
if (( $subres = $this->whitespace( ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
if (substr($this->string,$this->pos,1) == ",") {
|
|
$this->pos += 1;
|
|
$result["text"] .= ",";
|
|
}
|
|
else { $_11 = FALSE; break; }
|
|
if (( $subres = $this->whitespace( ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
$key = "Argument"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_Argument(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres, "Argument" );
|
|
}
|
|
else { $_11 = FALSE; break; }
|
|
$_11 = TRUE; break;
|
|
}
|
|
while(0);
|
|
if( $_11 === FALSE) {
|
|
$result = $res_12;
|
|
$this->pos = $pos_12;
|
|
unset( $res_12 );
|
|
unset( $pos_12 );
|
|
break;
|
|
}
|
|
}
|
|
$_13 = TRUE; break;
|
|
}
|
|
while(0);
|
|
if( $_13 === TRUE ) {
|
|
return $this->finalise( "CallArguments", $result );
|
|
}
|
|
if( $_13 === FALSE) { return FALSE; }
|
|
}
|
|
|
|
|
|
|
|
|
|
/**
|
|
* Values are bare words in templates, but strings in PHP. We rely on PHP's type conversion to back-convert strings
|
|
* to numbers when needed.
|
|
*/
|
|
function CallArguments_Argument(&$res, $sub) {
|
|
if (isset($res['php'])) $res['php'] .= ', ';
|
|
else $res['php'] = '';
|
|
|
|
$res['php'] .= ($sub['ArgumentMode'] == 'default') ? $sub['string_php'] : $sub['php'];
|
|
}
|
|
|
|
/* Call: Method:Word ( "(" < :CallArguments? > ")" )? */
|
|
function match_Call ($substack = array()) {
|
|
$result = $this->construct( "Call" );
|
|
$_23 = NULL;
|
|
do {
|
|
$key = "Word"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_Word(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres, "Method" );
|
|
}
|
|
else { $_23 = FALSE; break; }
|
|
$res_22 = $result;
|
|
$pos_22 = $this->pos;
|
|
$_21 = NULL;
|
|
do {
|
|
if (substr($this->string,$this->pos,1) == "(") {
|
|
$this->pos += 1;
|
|
$result["text"] .= "(";
|
|
}
|
|
else { $_21 = FALSE; break; }
|
|
if (( $subres = $this->whitespace( ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
$res_18 = $result;
|
|
$pos_18 = $this->pos;
|
|
$key = "CallArguments"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_CallArguments(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres, "CallArguments" );
|
|
}
|
|
else {
|
|
$result = $res_18;
|
|
$this->pos = $pos_18;
|
|
unset( $res_18 );
|
|
unset( $pos_18 );
|
|
}
|
|
if (( $subres = $this->whitespace( ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
if (substr($this->string,$this->pos,1) == ")") {
|
|
$this->pos += 1;
|
|
$result["text"] .= ")";
|
|
}
|
|
else { $_21 = FALSE; break; }
|
|
$_21 = TRUE; break;
|
|
}
|
|
while(0);
|
|
if( $_21 === FALSE) {
|
|
$result = $res_22;
|
|
$this->pos = $pos_22;
|
|
unset( $res_22 );
|
|
unset( $pos_22 );
|
|
}
|
|
$_23 = TRUE; break;
|
|
}
|
|
while(0);
|
|
if( $_23 === TRUE ) {
|
|
return $this->finalise( "Call", $result );
|
|
}
|
|
if( $_23 === FALSE) { return FALSE; }
|
|
}
|
|
|
|
|
|
/* LookupStep: :Call &"." */
|
|
function match_LookupStep ($substack = array()) {
|
|
$result = $this->construct( "LookupStep" );
|
|
$_27 = NULL;
|
|
do {
|
|
$key = "Call"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_Call(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres, "Call" );
|
|
}
|
|
else { $_27 = FALSE; break; }
|
|
$res_26 = $result;
|
|
$pos_26 = $this->pos;
|
|
if (substr($this->string,$this->pos,1) == ".") {
|
|
$this->pos += 1;
|
|
$result["text"] .= ".";
|
|
$result = $res_26;
|
|
$this->pos = $pos_26;
|
|
}
|
|
else {
|
|
$result = $res_26;
|
|
$this->pos = $pos_26;
|
|
$_27 = FALSE; break;
|
|
}
|
|
$_27 = TRUE; break;
|
|
}
|
|
while(0);
|
|
if( $_27 === TRUE ) {
|
|
return $this->finalise( "LookupStep", $result );
|
|
}
|
|
if( $_27 === FALSE) { return FALSE; }
|
|
}
|
|
|
|
|
|
/* LastLookupStep: :Call */
|
|
function match_LastLookupStep ($substack = array()) {
|
|
$result = $this->construct( "LastLookupStep" );
|
|
$key = "Call"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_Call(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres, "Call" );
|
|
return $this->finalise( "LastLookupStep", $result );
|
|
}
|
|
else { return FALSE; }
|
|
}
|
|
|
|
|
|
/* Lookup: LookupStep ("." LookupStep)* "." LastLookupStep | LastLookupStep */
|
|
function match_Lookup ($substack = array()) {
|
|
$result = $this->construct( "Lookup" );
|
|
$_41 = NULL;
|
|
do {
|
|
$res_30 = $result;
|
|
$pos_30 = $this->pos;
|
|
$_38 = NULL;
|
|
do {
|
|
$key = "LookupStep"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_LookupStep(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) { $this->store( $result, $subres ); }
|
|
else { $_38 = FALSE; break; }
|
|
while (true) {
|
|
$res_35 = $result;
|
|
$pos_35 = $this->pos;
|
|
$_34 = NULL;
|
|
do {
|
|
if (substr($this->string,$this->pos,1) == ".") {
|
|
$this->pos += 1;
|
|
$result["text"] .= ".";
|
|
}
|
|
else { $_34 = FALSE; break; }
|
|
$key = "LookupStep"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_LookupStep(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres );
|
|
}
|
|
else { $_34 = FALSE; break; }
|
|
$_34 = TRUE; break;
|
|
}
|
|
while(0);
|
|
if( $_34 === FALSE) {
|
|
$result = $res_35;
|
|
$this->pos = $pos_35;
|
|
unset( $res_35 );
|
|
unset( $pos_35 );
|
|
break;
|
|
}
|
|
}
|
|
if (substr($this->string,$this->pos,1) == ".") {
|
|
$this->pos += 1;
|
|
$result["text"] .= ".";
|
|
}
|
|
else { $_38 = FALSE; break; }
|
|
$key = "LastLookupStep"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_LastLookupStep(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) { $this->store( $result, $subres ); }
|
|
else { $_38 = FALSE; break; }
|
|
$_38 = TRUE; break;
|
|
}
|
|
while(0);
|
|
if( $_38 === TRUE ) { $_41 = TRUE; break; }
|
|
$result = $res_30;
|
|
$this->pos = $pos_30;
|
|
$key = "LastLookupStep"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_LastLookupStep(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres );
|
|
$_41 = TRUE; break;
|
|
}
|
|
$result = $res_30;
|
|
$this->pos = $pos_30;
|
|
$_41 = FALSE; break;
|
|
}
|
|
while(0);
|
|
if( $_41 === TRUE ) {
|
|
return $this->finalise( "Lookup", $result );
|
|
}
|
|
if( $_41 === FALSE) { return FALSE; }
|
|
}
|
|
|
|
|
|
|
|
|
|
function Lookup__construct(&$res) {
|
|
$res['php'] = '$item';
|
|
$res['LookupSteps'] = array();
|
|
}
|
|
|
|
/**
|
|
* The basic generated PHP of LookupStep and LastLookupStep is the same, except that LookupStep calls 'obj' to
|
|
* get the next ViewableData in the sequence, and LastLookupStep calls different methods (XML_val, hasValue, obj)
|
|
* depending on the context the lookup is used in.
|
|
*/
|
|
function Lookup_AddLookupStep(&$res, $sub, $method) {
|
|
$res['LookupSteps'][] = $sub;
|
|
|
|
$property = $sub['Call']['Method']['text'];
|
|
|
|
if (isset($sub['Call']['CallArguments']) && $arguments = $sub['Call']['CallArguments']['php']) {
|
|
$res['php'] .= "->$method('$property', array($arguments), true)";
|
|
}
|
|
else {
|
|
$res['php'] .= "->$method('$property', null, true)";
|
|
}
|
|
}
|
|
|
|
function Lookup_LookupStep(&$res, $sub) {
|
|
$this->Lookup_AddLookupStep($res, $sub, 'obj');
|
|
}
|
|
|
|
function Lookup_LastLookupStep(&$res, $sub) {
|
|
$this->Lookup_AddLookupStep($res, $sub, 'XML_val');
|
|
}
|
|
|
|
/* SimpleInjection: '$' :Lookup */
|
|
function match_SimpleInjection ($substack = array()) {
|
|
$result = $this->construct( "SimpleInjection" );
|
|
$_45 = NULL;
|
|
do {
|
|
if (substr($this->string,$this->pos,1) == '$') {
|
|
$this->pos += 1;
|
|
$result["text"] .= '$';
|
|
}
|
|
else { $_45 = FALSE; break; }
|
|
$key = "Lookup"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_Lookup(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres, "Lookup" );
|
|
}
|
|
else { $_45 = FALSE; break; }
|
|
$_45 = TRUE; break;
|
|
}
|
|
while(0);
|
|
if( $_45 === TRUE ) {
|
|
return $this->finalise( "SimpleInjection", $result );
|
|
}
|
|
if( $_45 === FALSE) { return FALSE; }
|
|
}
|
|
|
|
|
|
/* BracketInjection: '{$' :Lookup "}" */
|
|
function match_BracketInjection ($substack = array()) {
|
|
$result = $this->construct( "BracketInjection" );
|
|
$_51 = NULL;
|
|
do {
|
|
$_47 = new ParserExpression( $this, $substack, $result );
|
|
if (( $subres = $this->literal( $_47->expand('{$') ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
else { $_51 = FALSE; break; }
|
|
$key = "Lookup"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_Lookup(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres, "Lookup" );
|
|
}
|
|
else { $_51 = FALSE; break; }
|
|
if (substr($this->string,$this->pos,1) == "}") {
|
|
$this->pos += 1;
|
|
$result["text"] .= "}";
|
|
}
|
|
else { $_51 = FALSE; break; }
|
|
$_51 = TRUE; break;
|
|
}
|
|
while(0);
|
|
if( $_51 === TRUE ) {
|
|
return $this->finalise( "BracketInjection", $result );
|
|
}
|
|
if( $_51 === FALSE) { return FALSE; }
|
|
}
|
|
|
|
|
|
/* Injection: BracketInjection | SimpleInjection */
|
|
function match_Injection ($substack = array()) {
|
|
$result = $this->construct( "Injection" );
|
|
$_56 = NULL;
|
|
do {
|
|
$res_53 = $result;
|
|
$pos_53 = $this->pos;
|
|
$key = "BracketInjection"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_BracketInjection(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres );
|
|
$_56 = TRUE; break;
|
|
}
|
|
$result = $res_53;
|
|
$this->pos = $pos_53;
|
|
$key = "SimpleInjection"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_SimpleInjection(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres );
|
|
$_56 = TRUE; break;
|
|
}
|
|
$result = $res_53;
|
|
$this->pos = $pos_53;
|
|
$_56 = FALSE; break;
|
|
}
|
|
while(0);
|
|
if( $_56 === TRUE ) {
|
|
return $this->finalise( "Injection", $result );
|
|
}
|
|
if( $_56 === FALSE) { return FALSE; }
|
|
}
|
|
|
|
|
|
|
|
function Injection_STR(&$res, $sub) {
|
|
$res['php'] = '$val .= '. $sub['Lookup']['php'] . ';';
|
|
}
|
|
|
|
/* DollarMarkedLookup: SimpleInjection */
|
|
function match_DollarMarkedLookup ($substack = array()) {
|
|
$result = $this->construct( "DollarMarkedLookup" );
|
|
$key = "SimpleInjection"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_SimpleInjection(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres );
|
|
return $this->finalise( "DollarMarkedLookup", $result );
|
|
}
|
|
else { return FALSE; }
|
|
}
|
|
|
|
|
|
|
|
function DollarMarkedLookup_STR(&$res, $sub) {
|
|
$res['Lookup'] = $sub['Lookup'];
|
|
}
|
|
|
|
/* QuotedString: q:/['"]/ String:/ (\\\\ | \\. | [^$q\\])* / '$q' */
|
|
function match_QuotedString ($substack = array()) {
|
|
$result = $this->construct( "QuotedString" );
|
|
$_67 = NULL;
|
|
do {
|
|
$substack[] = $result;
|
|
$result = $this->construct( "q" );
|
|
$_59 = new ParserExpression( $this, $substack, $result );
|
|
if (( $subres = $this->rx( $_59->expand('/[\'"]/') ) ) !== FALSE) {
|
|
$result["text"] .= $subres;
|
|
$subres = $result ;
|
|
$result = array_pop( $substack ) ;
|
|
$this->store( $result, $subres, 'q' );
|
|
}
|
|
else {
|
|
$result = array_pop( $substack ) ;
|
|
$_67 = FALSE; break;
|
|
}
|
|
$substack[] = $result;
|
|
$result = $this->construct( "String" );
|
|
$_62 = new ParserExpression( $this, $substack, $result );
|
|
if (( $subres = $this->rx( $_62->expand('/ (\\\\\\\\ | \\\\. | [^$q\\\\])* /') ) ) !== FALSE) {
|
|
$result["text"] .= $subres;
|
|
$subres = $result ;
|
|
$result = array_pop( $substack ) ;
|
|
$this->store( $result, $subres, 'String' );
|
|
}
|
|
else {
|
|
$result = array_pop( $substack ) ;
|
|
$_67 = FALSE; break;
|
|
}
|
|
$_65 = new ParserExpression( $this, $substack, $result );
|
|
if (( $subres = $this->literal( $_65->expand('$q') ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
else { $_67 = FALSE; break; }
|
|
$_67 = TRUE; break;
|
|
}
|
|
while(0);
|
|
if( $_67 === TRUE ) {
|
|
return $this->finalise( "QuotedString", $result );
|
|
}
|
|
if( $_67 === FALSE) { return FALSE; }
|
|
}
|
|
|
|
|
|
/* FreeString: /[^,)%!=|&]+/ */
|
|
function match_FreeString ($substack = array()) {
|
|
$result = array("name"=>"FreeString", "text"=>"");
|
|
$_69 = new ParserExpression( $this, $substack, $result );
|
|
if (( $subres = $this->rx( $_69->expand('/[^,)%!=|&]+/') ) ) !== FALSE) {
|
|
$result["text"] .= $subres;
|
|
return $result;
|
|
}
|
|
else { return FALSE; }
|
|
}
|
|
|
|
|
|
/* Argument:
|
|
:DollarMarkedLookup |
|
|
:QuotedString |
|
|
:Lookup !(< FreeString)|
|
|
:FreeString */
|
|
function match_Argument ($substack = array()) {
|
|
$result = $this->construct( "Argument" );
|
|
$_88 = NULL;
|
|
do {
|
|
$res_71 = $result;
|
|
$pos_71 = $this->pos;
|
|
$key = "DollarMarkedLookup"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_DollarMarkedLookup(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres, "DollarMarkedLookup" );
|
|
$_88 = TRUE; break;
|
|
}
|
|
$result = $res_71;
|
|
$this->pos = $pos_71;
|
|
$_86 = NULL;
|
|
do {
|
|
$res_73 = $result;
|
|
$pos_73 = $this->pos;
|
|
$key = "QuotedString"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_QuotedString(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres, "QuotedString" );
|
|
$_86 = TRUE; break;
|
|
}
|
|
$result = $res_73;
|
|
$this->pos = $pos_73;
|
|
$_84 = NULL;
|
|
do {
|
|
$res_75 = $result;
|
|
$pos_75 = $this->pos;
|
|
$_81 = NULL;
|
|
do {
|
|
$key = "Lookup"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_Lookup(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres, "Lookup" );
|
|
}
|
|
else { $_81 = FALSE; break; }
|
|
$res_80 = $result;
|
|
$pos_80 = $this->pos;
|
|
$_79 = NULL;
|
|
do {
|
|
if (( $subres = $this->whitespace( ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
$key = "FreeString"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_FreeString(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres );
|
|
}
|
|
else { $_79 = FALSE; break; }
|
|
$_79 = TRUE; break;
|
|
}
|
|
while(0);
|
|
if( $_79 === TRUE ) {
|
|
$result = $res_80;
|
|
$this->pos = $pos_80;
|
|
$_81 = FALSE; break;
|
|
}
|
|
if( $_79 === FALSE) {
|
|
$result = $res_80;
|
|
$this->pos = $pos_80;
|
|
}
|
|
$_81 = TRUE; break;
|
|
}
|
|
while(0);
|
|
if( $_81 === TRUE ) { $_84 = TRUE; break; }
|
|
$result = $res_75;
|
|
$this->pos = $pos_75;
|
|
$key = "FreeString"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_FreeString(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres, "FreeString" );
|
|
$_84 = TRUE; break;
|
|
}
|
|
$result = $res_75;
|
|
$this->pos = $pos_75;
|
|
$_84 = FALSE; break;
|
|
}
|
|
while(0);
|
|
if( $_84 === TRUE ) { $_86 = TRUE; break; }
|
|
$result = $res_73;
|
|
$this->pos = $pos_73;
|
|
$_86 = FALSE; break;
|
|
}
|
|
while(0);
|
|
if( $_86 === TRUE ) { $_88 = TRUE; break; }
|
|
$result = $res_71;
|
|
$this->pos = $pos_71;
|
|
$_88 = FALSE; break;
|
|
}
|
|
while(0);
|
|
if( $_88 === TRUE ) {
|
|
return $this->finalise( "Argument", $result );
|
|
}
|
|
if( $_88 === FALSE) { return FALSE; }
|
|
}
|
|
|
|
|
|
|
|
|
|
/**
|
|
* If we get a bare value, we don't know enough to determine exactly what php would be the translation, because
|
|
* we don't know if the position of use indicates a lookup or a string argument.
|
|
*
|
|
* Instead, we record 'ArgumentMode' as a member of this matches results node, which can be:
|
|
* - lookup if this argument was unambiguously a lookup (marked as such)
|
|
* - string is this argument was unambiguously a string (marked as such, or impossible to parse as lookup)
|
|
* - default if this argument needs to be handled as per 2.4
|
|
*
|
|
* In the case of 'default', there is no php member of the results node, but instead 'lookup_php', which
|
|
* should be used by the parent if the context indicates a lookup, and 'string_php' which should be used
|
|
* if the context indicates a string
|
|
*/
|
|
|
|
function Argument_DollarMarkedLookup(&$res, $sub) {
|
|
$res['ArgumentMode'] = 'lookup';
|
|
$res['php'] = $sub['Lookup']['php'];
|
|
}
|
|
|
|
function Argument_QuotedString(&$res, $sub) {
|
|
$res['ArgumentMode'] = 'string';
|
|
$res['php'] = "'" . $sub['String']['text'] . "'";
|
|
}
|
|
|
|
function Argument_Lookup(&$res, $sub) {
|
|
if (count($sub['LookupSteps']) == 1 && !isset($sub['LookupSteps'][0]['Call']['Arguments'])) {
|
|
$res['ArgumentMode'] = 'default';
|
|
$res['lookup_php'] = $sub['php'];
|
|
$res['string_php'] = "'".$sub['LookupSteps'][0]['Call']['Method']['text']."'";
|
|
}
|
|
else {
|
|
$res['ArgumentMode'] = 'lookup';
|
|
$res['php'] = $sub['php'];
|
|
}
|
|
}
|
|
|
|
function Argument_FreeString(&$res, $sub) {
|
|
$res['ArgumentMode'] = 'string';
|
|
$res['php'] = "'" . $sub['text'] . "'";
|
|
}
|
|
|
|
/* ComparisonOperator: "==" | "!=" | "=" */
|
|
function match_ComparisonOperator ($substack = array()) {
|
|
$result = $this->construct( "ComparisonOperator" );
|
|
$_99 = NULL;
|
|
do {
|
|
$res_90 = $result;
|
|
$pos_90 = $this->pos;
|
|
$_91 = new ParserExpression( $this, $substack, $result );
|
|
if (( $subres = $this->literal( $_91->expand("==") ) ) !== FALSE) {
|
|
$result["text"] .= $subres;
|
|
$_99 = TRUE; break;
|
|
}
|
|
$result = $res_90;
|
|
$this->pos = $pos_90;
|
|
$_97 = NULL;
|
|
do {
|
|
$res_93 = $result;
|
|
$pos_93 = $this->pos;
|
|
$_94 = new ParserExpression( $this, $substack, $result );
|
|
if (( $subres = $this->literal( $_94->expand("!=") ) ) !== FALSE) {
|
|
$result["text"] .= $subres;
|
|
$_97 = TRUE; break;
|
|
}
|
|
$result = $res_93;
|
|
$this->pos = $pos_93;
|
|
if (substr($this->string,$this->pos,1) == "=") {
|
|
$this->pos += 1;
|
|
$result["text"] .= "=";
|
|
$_97 = TRUE; break;
|
|
}
|
|
$result = $res_93;
|
|
$this->pos = $pos_93;
|
|
$_97 = FALSE; break;
|
|
}
|
|
while(0);
|
|
if( $_97 === TRUE ) { $_99 = TRUE; break; }
|
|
$result = $res_90;
|
|
$this->pos = $pos_90;
|
|
$_99 = FALSE; break;
|
|
}
|
|
while(0);
|
|
if( $_99 === TRUE ) {
|
|
return $this->finalise( "ComparisonOperator", $result );
|
|
}
|
|
if( $_99 === FALSE) { return FALSE; }
|
|
}
|
|
|
|
|
|
/* Comparison: Argument < ComparisonOperator > Argument */
|
|
function match_Comparison ($substack = array()) {
|
|
$result = $this->construct( "Comparison" );
|
|
$_106 = NULL;
|
|
do {
|
|
$key = "Argument"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_Argument(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) { $this->store( $result, $subres ); }
|
|
else { $_106 = FALSE; break; }
|
|
if (( $subres = $this->whitespace( ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
$key = "ComparisonOperator"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_ComparisonOperator(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) { $this->store( $result, $subres ); }
|
|
else { $_106 = FALSE; break; }
|
|
if (( $subres = $this->whitespace( ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
$key = "Argument"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_Argument(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) { $this->store( $result, $subres ); }
|
|
else { $_106 = FALSE; break; }
|
|
$_106 = TRUE; break;
|
|
}
|
|
while(0);
|
|
if( $_106 === TRUE ) {
|
|
return $this->finalise( "Comparison", $result );
|
|
}
|
|
if( $_106 === FALSE) { return FALSE; }
|
|
}
|
|
|
|
|
|
|
|
function Comparison_Argument(&$res, $sub) {
|
|
if ($sub['ArgumentMode'] == 'default') {
|
|
if (isset($res['php'])) $res['php'] .= $sub['string_php'];
|
|
else $res['php'] = $sub['lookup_php'];
|
|
}
|
|
else {
|
|
if (!isset($res['php'])) $res['php'] = '';
|
|
$res['php'] .= $sub['php'];
|
|
}
|
|
}
|
|
|
|
function Comparison_ComparisonOperator(&$res, $sub) {
|
|
$res['php'] .= ($sub['text'] == '=' ? '==' : $sub['text']);
|
|
}
|
|
|
|
/* PresenceCheck: Argument */
|
|
function match_PresenceCheck ($substack = array()) {
|
|
$result = $this->construct( "PresenceCheck" );
|
|
$key = "Argument"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_Argument(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres );
|
|
return $this->finalise( "PresenceCheck", $result );
|
|
}
|
|
else { return FALSE; }
|
|
}
|
|
|
|
|
|
|
|
function PresenceCheck_Argument(&$res, $sub) {
|
|
if ($sub['ArgumentMode'] == 'string') {
|
|
$res['php'] = '((bool)'.$sub['php'].')';
|
|
}
|
|
else {
|
|
$php = ($sub['ArgumentMode'] == 'default' ? $sub['lookup_php'] : $sub['php']);
|
|
// TODO: kinda hacky - maybe we need a way to pass state down the parse chain so
|
|
// Lookup_LastLookupStep and Argument_BareWord can produce hasValue instead of XML_val
|
|
$res['php'] = str_replace('->XML_val', '->hasValue', $php);
|
|
}
|
|
}
|
|
|
|
/* IfArgumentPortion: Comparison | PresenceCheck */
|
|
function match_IfArgumentPortion ($substack = array()) {
|
|
$result = $this->construct( "IfArgumentPortion" );
|
|
$_112 = NULL;
|
|
do {
|
|
$res_109 = $result;
|
|
$pos_109 = $this->pos;
|
|
$key = "Comparison"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_Comparison(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres );
|
|
$_112 = TRUE; break;
|
|
}
|
|
$result = $res_109;
|
|
$this->pos = $pos_109;
|
|
$key = "PresenceCheck"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_PresenceCheck(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres );
|
|
$_112 = TRUE; break;
|
|
}
|
|
$result = $res_109;
|
|
$this->pos = $pos_109;
|
|
$_112 = FALSE; break;
|
|
}
|
|
while(0);
|
|
if( $_112 === TRUE ) {
|
|
return $this->finalise( "IfArgumentPortion", $result );
|
|
}
|
|
if( $_112 === FALSE) { return FALSE; }
|
|
}
|
|
|
|
|
|
|
|
function IfArgumentPortion_STR(&$res, $sub) {
|
|
$res['php'] = $sub['php'];
|
|
}
|
|
|
|
/* BooleanOperator: "||" | "&&" */
|
|
function match_BooleanOperator ($substack = array()) {
|
|
$result = $this->construct( "BooleanOperator" );
|
|
$_119 = NULL;
|
|
do {
|
|
$res_114 = $result;
|
|
$pos_114 = $this->pos;
|
|
$_115 = new ParserExpression( $this, $substack, $result );
|
|
if (( $subres = $this->literal( $_115->expand("||") ) ) !== FALSE) {
|
|
$result["text"] .= $subres;
|
|
$_119 = TRUE; break;
|
|
}
|
|
$result = $res_114;
|
|
$this->pos = $pos_114;
|
|
$_117 = new ParserExpression( $this, $substack, $result );
|
|
if (( $subres = $this->literal( $_117->expand("&&") ) ) !== FALSE) {
|
|
$result["text"] .= $subres;
|
|
$_119 = TRUE; break;
|
|
}
|
|
$result = $res_114;
|
|
$this->pos = $pos_114;
|
|
$_119 = FALSE; break;
|
|
}
|
|
while(0);
|
|
if( $_119 === TRUE ) {
|
|
return $this->finalise( "BooleanOperator", $result );
|
|
}
|
|
if( $_119 === FALSE) { return FALSE; }
|
|
}
|
|
|
|
|
|
/* IfArgument: :IfArgumentPortion ( < :BooleanOperator < :IfArgumentPortion )* */
|
|
function match_IfArgument ($substack = array()) {
|
|
$result = $this->construct( "IfArgument" );
|
|
$_128 = NULL;
|
|
do {
|
|
$key = "IfArgumentPortion"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_IfArgumentPortion(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres, "IfArgumentPortion" );
|
|
}
|
|
else { $_128 = FALSE; break; }
|
|
while (true) {
|
|
$res_127 = $result;
|
|
$pos_127 = $this->pos;
|
|
$_126 = NULL;
|
|
do {
|
|
if (( $subres = $this->whitespace( ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
$key = "BooleanOperator"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_BooleanOperator(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres, "BooleanOperator" );
|
|
}
|
|
else { $_126 = FALSE; break; }
|
|
if (( $subres = $this->whitespace( ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
$key = "IfArgumentPortion"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_IfArgumentPortion(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres, "IfArgumentPortion" );
|
|
}
|
|
else { $_126 = FALSE; break; }
|
|
$_126 = TRUE; break;
|
|
}
|
|
while(0);
|
|
if( $_126 === FALSE) {
|
|
$result = $res_127;
|
|
$this->pos = $pos_127;
|
|
unset( $res_127 );
|
|
unset( $pos_127 );
|
|
break;
|
|
}
|
|
}
|
|
$_128 = TRUE; break;
|
|
}
|
|
while(0);
|
|
if( $_128 === TRUE ) {
|
|
return $this->finalise( "IfArgument", $result );
|
|
}
|
|
if( $_128 === FALSE) { return FALSE; }
|
|
}
|
|
|
|
|
|
|
|
function IfArgument__construct(&$res){
|
|
$res['php'] = '';
|
|
}
|
|
function IfArgument_IfArgumentPortion(&$res, $sub) {
|
|
$res['php'] .= $sub['php'];
|
|
}
|
|
|
|
function IfArgument_BooleanOperator(&$res, $sub) {
|
|
$res['php'] .= $sub['text'];
|
|
}
|
|
|
|
/* IfPart: '<%' < 'if' < :IfArgument > '%>' :Template? */
|
|
function match_IfPart ($substack = array()) {
|
|
$result = $this->construct( "IfPart" );
|
|
$_141 = NULL;
|
|
do {
|
|
$_130 = new ParserExpression( $this, $substack, $result );
|
|
if (( $subres = $this->literal( $_130->expand('<%') ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
else { $_141 = FALSE; break; }
|
|
if (( $subres = $this->whitespace( ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
$_133 = new ParserExpression( $this, $substack, $result );
|
|
if (( $subres = $this->literal( $_133->expand('if') ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
else { $_141 = FALSE; break; }
|
|
if (( $subres = $this->whitespace( ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
$key = "IfArgument"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_IfArgument(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres, "IfArgument" );
|
|
}
|
|
else { $_141 = FALSE; break; }
|
|
if (( $subres = $this->whitespace( ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
$_138 = new ParserExpression( $this, $substack, $result );
|
|
if (( $subres = $this->literal( $_138->expand('%>') ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
else { $_141 = FALSE; break; }
|
|
$res_140 = $result;
|
|
$pos_140 = $this->pos;
|
|
$key = "Template"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_Template(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres, "Template" );
|
|
}
|
|
else {
|
|
$result = $res_140;
|
|
$this->pos = $pos_140;
|
|
unset( $res_140 );
|
|
unset( $pos_140 );
|
|
}
|
|
$_141 = TRUE; break;
|
|
}
|
|
while(0);
|
|
if( $_141 === TRUE ) {
|
|
return $this->finalise( "IfPart", $result );
|
|
}
|
|
if( $_141 === FALSE) { return FALSE; }
|
|
}
|
|
|
|
|
|
/* ElseIfPart: '<%' < 'else_if' < :IfArgument > '%>' :Template? */
|
|
function match_ElseIfPart ($substack = array()) {
|
|
$result = $this->construct( "ElseIfPart" );
|
|
$_154 = NULL;
|
|
do {
|
|
$_143 = new ParserExpression( $this, $substack, $result );
|
|
if (( $subres = $this->literal( $_143->expand('<%') ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
else { $_154 = FALSE; break; }
|
|
if (( $subres = $this->whitespace( ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
$_146 = new ParserExpression( $this, $substack, $result );
|
|
if (( $subres = $this->literal( $_146->expand('else_if') ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
else { $_154 = FALSE; break; }
|
|
if (( $subres = $this->whitespace( ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
$key = "IfArgument"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_IfArgument(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres, "IfArgument" );
|
|
}
|
|
else { $_154 = FALSE; break; }
|
|
if (( $subres = $this->whitespace( ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
$_151 = new ParserExpression( $this, $substack, $result );
|
|
if (( $subres = $this->literal( $_151->expand('%>') ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
else { $_154 = FALSE; break; }
|
|
$res_153 = $result;
|
|
$pos_153 = $this->pos;
|
|
$key = "Template"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_Template(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres, "Template" );
|
|
}
|
|
else {
|
|
$result = $res_153;
|
|
$this->pos = $pos_153;
|
|
unset( $res_153 );
|
|
unset( $pos_153 );
|
|
}
|
|
$_154 = TRUE; break;
|
|
}
|
|
while(0);
|
|
if( $_154 === TRUE ) {
|
|
return $this->finalise( "ElseIfPart", $result );
|
|
}
|
|
if( $_154 === FALSE) { return FALSE; }
|
|
}
|
|
|
|
|
|
/* ElsePart: '<%' < 'else' > '%>' :Template? */
|
|
function match_ElsePart ($substack = array()) {
|
|
$result = $this->construct( "ElsePart" );
|
|
$_165 = NULL;
|
|
do {
|
|
$_156 = new ParserExpression( $this, $substack, $result );
|
|
if (( $subres = $this->literal( $_156->expand('<%') ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
else { $_165 = FALSE; break; }
|
|
if (( $subres = $this->whitespace( ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
$_159 = new ParserExpression( $this, $substack, $result );
|
|
if (( $subres = $this->literal( $_159->expand('else') ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
else { $_165 = FALSE; break; }
|
|
if (( $subres = $this->whitespace( ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
$_162 = new ParserExpression( $this, $substack, $result );
|
|
if (( $subres = $this->literal( $_162->expand('%>') ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
else { $_165 = FALSE; break; }
|
|
$res_164 = $result;
|
|
$pos_164 = $this->pos;
|
|
$key = "Template"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_Template(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres, "Template" );
|
|
}
|
|
else {
|
|
$result = $res_164;
|
|
$this->pos = $pos_164;
|
|
unset( $res_164 );
|
|
unset( $pos_164 );
|
|
}
|
|
$_165 = TRUE; break;
|
|
}
|
|
while(0);
|
|
if( $_165 === TRUE ) {
|
|
return $this->finalise( "ElsePart", $result );
|
|
}
|
|
if( $_165 === FALSE) { return FALSE; }
|
|
}
|
|
|
|
|
|
/* If: IfPart ElseIfPart* ElsePart? '<%' < 'end_if' > '%>' */
|
|
function match_If ($substack = array()) {
|
|
$result = $this->construct( "If" );
|
|
$_178 = NULL;
|
|
do {
|
|
$key = "IfPart"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_IfPart(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) { $this->store( $result, $subres ); }
|
|
else { $_178 = FALSE; break; }
|
|
while (true) {
|
|
$res_168 = $result;
|
|
$pos_168 = $this->pos;
|
|
$key = "ElseIfPart"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_ElseIfPart(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) { $this->store( $result, $subres ); }
|
|
else {
|
|
$result = $res_168;
|
|
$this->pos = $pos_168;
|
|
unset( $res_168 );
|
|
unset( $pos_168 );
|
|
break;
|
|
}
|
|
}
|
|
$res_169 = $result;
|
|
$pos_169 = $this->pos;
|
|
$key = "ElsePart"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_ElsePart(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) { $this->store( $result, $subres ); }
|
|
else {
|
|
$result = $res_169;
|
|
$this->pos = $pos_169;
|
|
unset( $res_169 );
|
|
unset( $pos_169 );
|
|
}
|
|
$_170 = new ParserExpression( $this, $substack, $result );
|
|
if (( $subres = $this->literal( $_170->expand('<%') ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
else { $_178 = FALSE; break; }
|
|
if (( $subres = $this->whitespace( ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
$_173 = new ParserExpression( $this, $substack, $result );
|
|
if (( $subres = $this->literal( $_173->expand('end_if') ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
else { $_178 = FALSE; break; }
|
|
if (( $subres = $this->whitespace( ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
$_176 = new ParserExpression( $this, $substack, $result );
|
|
if (( $subres = $this->literal( $_176->expand('%>') ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
else { $_178 = FALSE; break; }
|
|
$_178 = TRUE; break;
|
|
}
|
|
while(0);
|
|
if( $_178 === TRUE ) {
|
|
return $this->finalise( "If", $result );
|
|
}
|
|
if( $_178 === FALSE) { return FALSE; }
|
|
}
|
|
|
|
|
|
|
|
function If_IfPart(&$res, $sub) {
|
|
$res['php'] =
|
|
'if (' . $sub['IfArgument']['php'] . ') { ' . PHP_EOL .
|
|
$sub['Template']['php'] . PHP_EOL .
|
|
'}';
|
|
}
|
|
|
|
function If_ElseIfPart(&$res, $sub) {
|
|
$res['php'] .=
|
|
'else if (' . $sub['IfArgument']['php'] . ') { ' . PHP_EOL .
|
|
$sub['Template']['php'] . PHP_EOL .
|
|
'}';
|
|
}
|
|
|
|
function If_ElsePart(&$res, $sub) {
|
|
$res['php'] .=
|
|
'else { ' . PHP_EOL .
|
|
$sub['Template']['php'] . PHP_EOL .
|
|
'}';
|
|
}
|
|
|
|
/* Require: '<%' < 'require' [ Call:(Method:Word "(" < :CallArguments > ")") > '%>' */
|
|
function match_Require ($substack = array()) {
|
|
$result = $this->construct( "Require" );
|
|
$_198 = NULL;
|
|
do {
|
|
$_180 = new ParserExpression( $this, $substack, $result );
|
|
if (( $subres = $this->literal( $_180->expand('<%') ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
else { $_198 = FALSE; break; }
|
|
if (( $subres = $this->whitespace( ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
$_183 = new ParserExpression( $this, $substack, $result );
|
|
if (( $subres = $this->literal( $_183->expand('require') ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
else { $_198 = FALSE; break; }
|
|
if (( $subres = $this->whitespace( ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
else { $_198 = FALSE; break; }
|
|
$substack[] = $result;
|
|
$result = $this->construct( "Call" );
|
|
$_192 = NULL;
|
|
do {
|
|
$key = "Word"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_Word(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres, "Method" );
|
|
}
|
|
else { $_192 = FALSE; break; }
|
|
if (substr($this->string,$this->pos,1) == "(") {
|
|
$this->pos += 1;
|
|
$result["text"] .= "(";
|
|
}
|
|
else { $_192 = FALSE; break; }
|
|
if (( $subres = $this->whitespace( ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
$key = "CallArguments"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_CallArguments(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres, "CallArguments" );
|
|
}
|
|
else { $_192 = FALSE; break; }
|
|
if (( $subres = $this->whitespace( ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
if (substr($this->string,$this->pos,1) == ")") {
|
|
$this->pos += 1;
|
|
$result["text"] .= ")";
|
|
}
|
|
else { $_192 = FALSE; break; }
|
|
$_192 = TRUE; break;
|
|
}
|
|
while(0);
|
|
if( $_192 === TRUE ) {
|
|
$subres = $result ;
|
|
$result = array_pop( $substack ) ;
|
|
$this->store( $result, $subres, 'Call' );
|
|
}
|
|
if( $_192 === FALSE) {
|
|
$result = array_pop( $substack ) ;
|
|
$_198 = FALSE; break;
|
|
}
|
|
if (( $subres = $this->whitespace( ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
$_196 = new ParserExpression( $this, $substack, $result );
|
|
if (( $subres = $this->literal( $_196->expand('%>') ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
else { $_198 = FALSE; break; }
|
|
$_198 = TRUE; break;
|
|
}
|
|
while(0);
|
|
if( $_198 === TRUE ) {
|
|
return $this->finalise( "Require", $result );
|
|
}
|
|
if( $_198 === FALSE) { return FALSE; }
|
|
}
|
|
|
|
|
|
|
|
function Require_Call(&$res, $sub) {
|
|
$res['php'] = "Requirements::".$sub['Method']['text'].'('.$sub['CallArguments']['php'].');';
|
|
}
|
|
|
|
/* BlockArguments: :Argument ( < "," < :Argument)* */
|
|
function match_BlockArguments ($substack = array()) {
|
|
$result = $this->construct( "BlockArguments" );
|
|
$_207 = NULL;
|
|
do {
|
|
$key = "Argument"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_Argument(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres, "Argument" );
|
|
}
|
|
else { $_207 = FALSE; break; }
|
|
while (true) {
|
|
$res_206 = $result;
|
|
$pos_206 = $this->pos;
|
|
$_205 = NULL;
|
|
do {
|
|
if (( $subres = $this->whitespace( ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
if (substr($this->string,$this->pos,1) == ",") {
|
|
$this->pos += 1;
|
|
$result["text"] .= ",";
|
|
}
|
|
else { $_205 = FALSE; break; }
|
|
if (( $subres = $this->whitespace( ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
$key = "Argument"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_Argument(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres, "Argument" );
|
|
}
|
|
else { $_205 = FALSE; break; }
|
|
$_205 = TRUE; break;
|
|
}
|
|
while(0);
|
|
if( $_205 === FALSE) {
|
|
$result = $res_206;
|
|
$this->pos = $pos_206;
|
|
unset( $res_206 );
|
|
unset( $pos_206 );
|
|
break;
|
|
}
|
|
}
|
|
$_207 = TRUE; break;
|
|
}
|
|
while(0);
|
|
if( $_207 === TRUE ) {
|
|
return $this->finalise( "BlockArguments", $result );
|
|
}
|
|
if( $_207 === FALSE) { return FALSE; }
|
|
}
|
|
|
|
|
|
/* NotBlockTag: "end_" | (("if" | "else_if" | "else" | "require") ] ) */
|
|
function match_NotBlockTag ($substack = array()) {
|
|
$result = $this->construct( "NotBlockTag" );
|
|
$_234 = NULL;
|
|
do {
|
|
$res_209 = $result;
|
|
$pos_209 = $this->pos;
|
|
$_210 = new ParserExpression( $this, $substack, $result );
|
|
if (( $subres = $this->literal( $_210->expand("end_") ) ) !== FALSE) {
|
|
$result["text"] .= $subres;
|
|
$_234 = TRUE; break;
|
|
}
|
|
$result = $res_209;
|
|
$this->pos = $pos_209;
|
|
$_232 = NULL;
|
|
do {
|
|
$_229 = NULL;
|
|
do {
|
|
$_227 = NULL;
|
|
do {
|
|
$res_212 = $result;
|
|
$pos_212 = $this->pos;
|
|
$_213 = new ParserExpression( $this, $substack, $result );
|
|
if (( $subres = $this->literal( $_213->expand("if") ) ) !== FALSE) {
|
|
$result["text"] .= $subres;
|
|
$_227 = TRUE; break;
|
|
}
|
|
$result = $res_212;
|
|
$this->pos = $pos_212;
|
|
$_225 = NULL;
|
|
do {
|
|
$res_215 = $result;
|
|
$pos_215 = $this->pos;
|
|
$_216 = new ParserExpression( $this, $substack, $result );
|
|
if (( $subres = $this->literal( $_216->expand("else_if") ) ) !== FALSE) {
|
|
$result["text"] .= $subres;
|
|
$_225 = TRUE; break;
|
|
}
|
|
$result = $res_215;
|
|
$this->pos = $pos_215;
|
|
$_223 = NULL;
|
|
do {
|
|
$res_218 = $result;
|
|
$pos_218 = $this->pos;
|
|
$_219 = new ParserExpression( $this, $substack, $result );
|
|
if (( $subres = $this->literal( $_219->expand("else") ) ) !== FALSE) {
|
|
$result["text"] .= $subres;
|
|
$_223 = TRUE; break;
|
|
}
|
|
$result = $res_218;
|
|
$this->pos = $pos_218;
|
|
$_221 = new ParserExpression( $this, $substack, $result );
|
|
if (( $subres = $this->literal( $_221->expand("require") ) ) !== FALSE) {
|
|
$result["text"] .= $subres;
|
|
$_223 = TRUE; break;
|
|
}
|
|
$result = $res_218;
|
|
$this->pos = $pos_218;
|
|
$_223 = FALSE; break;
|
|
}
|
|
while(0);
|
|
if( $_223 === TRUE ) { $_225 = TRUE; break; }
|
|
$result = $res_215;
|
|
$this->pos = $pos_215;
|
|
$_225 = FALSE; break;
|
|
}
|
|
while(0);
|
|
if( $_225 === TRUE ) { $_227 = TRUE; break; }
|
|
$result = $res_212;
|
|
$this->pos = $pos_212;
|
|
$_227 = FALSE; break;
|
|
}
|
|
while(0);
|
|
if( $_227 === FALSE) { $_229 = FALSE; break; }
|
|
$_229 = TRUE; break;
|
|
}
|
|
while(0);
|
|
if( $_229 === FALSE) { $_232 = FALSE; break; }
|
|
if (( $subres = $this->whitespace( ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
else { $_232 = FALSE; break; }
|
|
$_232 = TRUE; break;
|
|
}
|
|
while(0);
|
|
if( $_232 === TRUE ) { $_234 = TRUE; break; }
|
|
$result = $res_209;
|
|
$this->pos = $pos_209;
|
|
$_234 = FALSE; break;
|
|
}
|
|
while(0);
|
|
if( $_234 === TRUE ) {
|
|
return $this->finalise( "NotBlockTag", $result );
|
|
}
|
|
if( $_234 === FALSE) { return FALSE; }
|
|
}
|
|
|
|
|
|
/* ClosedBlock: '<%' < !NotBlockTag BlockName:Word ( [ :BlockArguments ] )? > Zap:'%>' :Template? '<%' < 'end_' '$BlockName' > '%>' */
|
|
function match_ClosedBlock ($substack = array()) {
|
|
$result = $this->construct( "ClosedBlock" );
|
|
$_261 = NULL;
|
|
do {
|
|
$_236 = new ParserExpression( $this, $substack, $result );
|
|
if (( $subres = $this->literal( $_236->expand('<%') ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
else { $_261 = FALSE; break; }
|
|
if (( $subres = $this->whitespace( ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
$res_239 = $result;
|
|
$pos_239 = $this->pos;
|
|
$key = "NotBlockTag"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_NotBlockTag(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres );
|
|
$result = $res_239;
|
|
$this->pos = $pos_239;
|
|
$_261 = FALSE; break;
|
|
}
|
|
else {
|
|
$result = $res_239;
|
|
$this->pos = $pos_239;
|
|
}
|
|
$key = "Word"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_Word(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres, "BlockName" );
|
|
}
|
|
else { $_261 = FALSE; break; }
|
|
$res_245 = $result;
|
|
$pos_245 = $this->pos;
|
|
$_244 = NULL;
|
|
do {
|
|
if (( $subres = $this->whitespace( ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
else { $_244 = FALSE; break; }
|
|
$key = "BlockArguments"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_BlockArguments(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres, "BlockArguments" );
|
|
}
|
|
else { $_244 = FALSE; break; }
|
|
if (( $subres = $this->whitespace( ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
else { $_244 = FALSE; break; }
|
|
$_244 = TRUE; break;
|
|
}
|
|
while(0);
|
|
if( $_244 === FALSE) {
|
|
$result = $res_245;
|
|
$this->pos = $pos_245;
|
|
unset( $res_245 );
|
|
unset( $pos_245 );
|
|
}
|
|
if (( $subres = $this->whitespace( ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
$substack[] = $result;
|
|
$result = $this->construct( "Zap" );
|
|
$_247 = new ParserExpression( $this, $substack, $result );
|
|
if (( $subres = $this->literal( $_247->expand('%>') ) ) !== FALSE) {
|
|
$result["text"] .= $subres;
|
|
$subres = $result ;
|
|
$result = array_pop( $substack ) ;
|
|
$this->store( $result, $subres, 'Zap' );
|
|
}
|
|
else {
|
|
$result = array_pop( $substack ) ;
|
|
$_261 = FALSE; break;
|
|
}
|
|
$res_250 = $result;
|
|
$pos_250 = $this->pos;
|
|
$key = "Template"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_Template(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres, "Template" );
|
|
}
|
|
else {
|
|
$result = $res_250;
|
|
$this->pos = $pos_250;
|
|
unset( $res_250 );
|
|
unset( $pos_250 );
|
|
}
|
|
$_251 = new ParserExpression( $this, $substack, $result );
|
|
if (( $subres = $this->literal( $_251->expand('<%') ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
else { $_261 = FALSE; break; }
|
|
if (( $subres = $this->whitespace( ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
$_254 = new ParserExpression( $this, $substack, $result );
|
|
if (( $subres = $this->literal( $_254->expand('end_') ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
else { $_261 = FALSE; break; }
|
|
$_256 = new ParserExpression( $this, $substack, $result );
|
|
if (( $subres = $this->literal( $_256->expand('$BlockName') ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
else { $_261 = FALSE; break; }
|
|
if (( $subres = $this->whitespace( ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
$_259 = new ParserExpression( $this, $substack, $result );
|
|
if (( $subres = $this->literal( $_259->expand('%>') ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
else { $_261 = FALSE; break; }
|
|
$_261 = TRUE; break;
|
|
}
|
|
while(0);
|
|
if( $_261 === TRUE ) {
|
|
return $this->finalise( "ClosedBlock", $result );
|
|
}
|
|
if( $_261 === FALSE) { return FALSE; }
|
|
}
|
|
|
|
|
|
|
|
|
|
/**
|
|
* As mentioned in the parser comment, block handling is kept fairly generic for extensibility. The match rule
|
|
* builds up two important elements in the match result array:
|
|
* 'ArgumentCount' - how many arguments were passed in the opening tag
|
|
* 'Arguments' an array of the Argument match rule result arrays
|
|
*
|
|
* Once a block has successfully been matched against, it will then look for the actual handler, which should
|
|
* be on this class (either defined or decorated on) as ClosedBlock_Handler_Name(&$res), where Name is the
|
|
* tag name, first letter captialized (i.e Control, Loop, With, etc).
|
|
*
|
|
* This function will be called with the match rule result array as it's first argument. It should return
|
|
* the php result of this block as it's return value, or throw an error if incorrect arguments were passed.
|
|
*/
|
|
|
|
function ClosedBlock__construct(&$res) {
|
|
$res['ArgumentCount'] = 0;
|
|
}
|
|
|
|
function ClosedBlock_BlockArguments(&$res, $sub) {
|
|
if (isset($sub['Argument']['ArgumentMode'])) {
|
|
$res['Arguments'] = array($sub['Argument']);
|
|
$res['ArgumentCount'] = 1;
|
|
}
|
|
else {
|
|
$res['Arguments'] = $sub['Argument'];
|
|
$res['ArgumentCount'] = count($res['Arguments']);
|
|
}
|
|
}
|
|
|
|
function ClosedBlock__finalise(&$res) {
|
|
$blockname = $res['BlockName']['text'];
|
|
|
|
$method = 'ClosedBlock_Handle_'.ucfirst(strtolower($blockname));
|
|
if (method_exists($this, $method)) $res['php'] = $this->$method($res);
|
|
else {
|
|
throw new SSTemplateParseException('Unknown closed block "'.$blockname.'" encountered. Perhaps you are not supposed to close this block, or have mis-spelled it?', $this);
|
|
}
|
|
}
|
|
|
|
/**
|
|
* This is an example of a block handler function. This one handles the control tag.
|
|
*/
|
|
function ClosedBlock_Handle_Control(&$res) {
|
|
if ($res['ArgumentCount'] != 1) {
|
|
throw new SSTemplateParseException('Either no or too many arguments in control block. Must be one argument only.', $this);
|
|
}
|
|
|
|
$arg = $res['Arguments'][0];
|
|
if ($arg['ArgumentMode'] == 'string') {
|
|
throw new SSTemplateParseException('Control block cant take string as argument.', $this);
|
|
}
|
|
|
|
$on = str_replace('->XML_val', '->obj', ($arg['ArgumentMode'] == 'default') ? $arg['lookup_php'] : $arg['php']);
|
|
return
|
|
'array_push($itemStack, $item); if($loop = '.$on.') foreach($loop as $key => $item) {' . PHP_EOL .
|
|
$res['Template']['php'] . PHP_EOL .
|
|
'} $item = array_pop($itemStack); ';
|
|
}
|
|
|
|
/* OpenBlock: '<%' < !NotBlockTag BlockName:Word ( [ :BlockArguments ] )? > '%>' */
|
|
function match_OpenBlock ($substack = array()) {
|
|
$result = $this->construct( "OpenBlock" );
|
|
$_276 = NULL;
|
|
do {
|
|
$_263 = new ParserExpression( $this, $substack, $result );
|
|
if (( $subres = $this->literal( $_263->expand('<%') ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
else { $_276 = FALSE; break; }
|
|
if (( $subres = $this->whitespace( ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
$res_266 = $result;
|
|
$pos_266 = $this->pos;
|
|
$key = "NotBlockTag"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_NotBlockTag(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres );
|
|
$result = $res_266;
|
|
$this->pos = $pos_266;
|
|
$_276 = FALSE; break;
|
|
}
|
|
else {
|
|
$result = $res_266;
|
|
$this->pos = $pos_266;
|
|
}
|
|
$key = "Word"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_Word(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres, "BlockName" );
|
|
}
|
|
else { $_276 = FALSE; break; }
|
|
$res_272 = $result;
|
|
$pos_272 = $this->pos;
|
|
$_271 = NULL;
|
|
do {
|
|
if (( $subres = $this->whitespace( ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
else { $_271 = FALSE; break; }
|
|
$key = "BlockArguments"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_BlockArguments(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres, "BlockArguments" );
|
|
}
|
|
else { $_271 = FALSE; break; }
|
|
if (( $subres = $this->whitespace( ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
else { $_271 = FALSE; break; }
|
|
$_271 = TRUE; break;
|
|
}
|
|
while(0);
|
|
if( $_271 === FALSE) {
|
|
$result = $res_272;
|
|
$this->pos = $pos_272;
|
|
unset( $res_272 );
|
|
unset( $pos_272 );
|
|
}
|
|
if (( $subres = $this->whitespace( ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
$_274 = new ParserExpression( $this, $substack, $result );
|
|
if (( $subres = $this->literal( $_274->expand('%>') ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
else { $_276 = FALSE; break; }
|
|
$_276 = TRUE; break;
|
|
}
|
|
while(0);
|
|
if( $_276 === TRUE ) {
|
|
return $this->finalise( "OpenBlock", $result );
|
|
}
|
|
if( $_276 === FALSE) { return FALSE; }
|
|
}
|
|
|
|
|
|
|
|
function OpenBlock__construct(&$res) {
|
|
$res['ArgumentCount'] = 0;
|
|
}
|
|
|
|
function OpenBlock_BlockArguments(&$res, $sub) {
|
|
if (isset($sub['Argument']['ArgumentMode'])) {
|
|
$res['Arguments'] = array($sub['Argument']);
|
|
$res['ArgumentCount'] = 1;
|
|
}
|
|
else {
|
|
$res['Arguments'] = $sub['Argument'];
|
|
$res['ArgumentCount'] = count($res['Arguments']);
|
|
}
|
|
}
|
|
|
|
function OpenBlock__finalise(&$res) {
|
|
$blockname = $res['BlockName']['text'];
|
|
|
|
$method = 'OpenBlock_Handle_'.ucfirst(strtolower($blockname));
|
|
if (method_exists($this, $method)) $res['php'] = $this->$method($res);
|
|
else {
|
|
throw new SSTemplateParseException('Unknown open block "'.$blockname.'" encountered. Perhaps you missed the closing tag or have mis-spelled it?', $this);
|
|
}
|
|
}
|
|
|
|
/**
|
|
* This is an open block handler, for the <% include %> tag
|
|
*/
|
|
function OpenBlock_Handle_Include(&$res) {
|
|
if ($res['ArgumentCount'] != 1) throw new SSTemplateParseException('Include takes exactly one argument', $this);
|
|
|
|
$arg = $res['Arguments'][0];
|
|
$php = ($arg['ArgumentMode'] == 'default') ? $arg['string_php'] : $arg['php'];
|
|
|
|
if($this->includeDebuggingComments) { // Add include filename comments on dev sites
|
|
return
|
|
'$val .= \'<!-- include '.$php.' -->\';'. "\n".
|
|
'$val .= SSViewer::parse_template('.$php.', $item);'. "\n".
|
|
'$val .= \'<!-- end include '.$php.' -->\';'. "\n";
|
|
}
|
|
else {
|
|
return
|
|
'$val .= SSViewer::execute_template('.$php.', $item);'. "\n";
|
|
}
|
|
}
|
|
|
|
/**
|
|
* This is an open block handler, for the <% debug %> utility tag
|
|
*/
|
|
function OpenBlock_Handle_Debug(&$res) {
|
|
if ($res['ArgumentCount'] == 0) return 'Debug::show($item);';
|
|
else if ($res['ArgumentCount'] == 1) {
|
|
$arg = $res['Arguments'][0];
|
|
|
|
if ($arg['ArgumentMode'] == 'string') return 'Debug::show('.$arg['php'].');';
|
|
|
|
$php = ($arg['ArgumentMode'] == 'default') ? $arg['lookup_php'] : $arg['php'];
|
|
return '$val .= Debug::show('.str_replace('FINALGET!', 'cachedCall', $php).');';
|
|
}
|
|
else {
|
|
throw new SSTemplateParseException('Debug takes 0 or 1 argument only.', $this);
|
|
}
|
|
}
|
|
|
|
/**
|
|
* This is an open block handler, for the <% base_tag %> tag
|
|
*/
|
|
function OpenBlock_Handle_Base_tag(&$res) {
|
|
if ($res['ArgumentCount'] != 0) throw new SSTemplateParseException('Base_tag takes no arguments', $this);
|
|
return '$val .= SSViewer::get_base_tag($val);';
|
|
}
|
|
|
|
/**
|
|
* This is an open block handler, for the <% current_page %> tag
|
|
*/
|
|
function OpenBlock_Handle_Current_page(&$res) {
|
|
if ($res['ArgumentCount'] != 0) throw new SSTemplateParseException('Current_page takes no arguments', $this);
|
|
return '$val .= $_SERVER[SCRIPT_URL];';
|
|
}
|
|
|
|
/* MismatchedEndBlock: '<%' < 'end_' Word > '%>' */
|
|
function match_MismatchedEndBlock ($substack = array()) {
|
|
$result = $this->construct( "MismatchedEndBlock" );
|
|
$_287 = NULL;
|
|
do {
|
|
$_278 = new ParserExpression( $this, $substack, $result );
|
|
if (( $subres = $this->literal( $_278->expand('<%') ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
else { $_287 = FALSE; break; }
|
|
if (( $subres = $this->whitespace( ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
$_281 = new ParserExpression( $this, $substack, $result );
|
|
if (( $subres = $this->literal( $_281->expand('end_') ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
else { $_287 = FALSE; break; }
|
|
$key = "Word"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_Word(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) { $this->store( $result, $subres ); }
|
|
else { $_287 = FALSE; break; }
|
|
if (( $subres = $this->whitespace( ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
$_285 = new ParserExpression( $this, $substack, $result );
|
|
if (( $subres = $this->literal( $_285->expand('%>') ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
else { $_287 = FALSE; break; }
|
|
$_287 = TRUE; break;
|
|
}
|
|
while(0);
|
|
if( $_287 === TRUE ) {
|
|
return $this->finalise( "MismatchedEndBlock", $result );
|
|
}
|
|
if( $_287 === FALSE) { return FALSE; }
|
|
}
|
|
|
|
|
|
|
|
function MismatchedEndBlock__finalise(&$res) {
|
|
$blockname = $res['Word']['text'];
|
|
throw new SSTemplateParseException('Unexpected close tag end_'.$blockname.' encountered. Perhaps you have mis-nested blocks, or have mis-spelled a tag?', $this);
|
|
}
|
|
|
|
/* MalformedOpenTag: '<%' < !NotBlockTag Tag:Word !( ( [ :BlockArguments ] )? > '%>' ) */
|
|
function match_MalformedOpenTag ($substack = array()) {
|
|
$result = $this->construct( "MalformedOpenTag" );
|
|
$_304 = NULL;
|
|
do {
|
|
$_289 = new ParserExpression( $this, $substack, $result );
|
|
if (( $subres = $this->literal( $_289->expand('<%') ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
else { $_304 = FALSE; break; }
|
|
if (( $subres = $this->whitespace( ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
$res_292 = $result;
|
|
$pos_292 = $this->pos;
|
|
$key = "NotBlockTag"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_NotBlockTag(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres );
|
|
$result = $res_292;
|
|
$this->pos = $pos_292;
|
|
$_304 = FALSE; break;
|
|
}
|
|
else {
|
|
$result = $res_292;
|
|
$this->pos = $pos_292;
|
|
}
|
|
$key = "Word"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_Word(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres, "Tag" );
|
|
}
|
|
else { $_304 = FALSE; break; }
|
|
$res_303 = $result;
|
|
$pos_303 = $this->pos;
|
|
$_302 = NULL;
|
|
do {
|
|
$res_298 = $result;
|
|
$pos_298 = $this->pos;
|
|
$_297 = NULL;
|
|
do {
|
|
if (( $subres = $this->whitespace( ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
else { $_297 = FALSE; break; }
|
|
$key = "BlockArguments"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_BlockArguments(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres, "BlockArguments" );
|
|
}
|
|
else { $_297 = FALSE; break; }
|
|
if (( $subres = $this->whitespace( ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
else { $_297 = FALSE; break; }
|
|
$_297 = TRUE; break;
|
|
}
|
|
while(0);
|
|
if( $_297 === FALSE) {
|
|
$result = $res_298;
|
|
$this->pos = $pos_298;
|
|
unset( $res_298 );
|
|
unset( $pos_298 );
|
|
}
|
|
if (( $subres = $this->whitespace( ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
$_300 = new ParserExpression( $this, $substack, $result );
|
|
if (( $subres = $this->literal( $_300->expand('%>') ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
else { $_302 = FALSE; break; }
|
|
$_302 = TRUE; break;
|
|
}
|
|
while(0);
|
|
if( $_302 === TRUE ) {
|
|
$result = $res_303;
|
|
$this->pos = $pos_303;
|
|
$_304 = FALSE; break;
|
|
}
|
|
if( $_302 === FALSE) {
|
|
$result = $res_303;
|
|
$this->pos = $pos_303;
|
|
}
|
|
$_304 = TRUE; break;
|
|
}
|
|
while(0);
|
|
if( $_304 === TRUE ) {
|
|
return $this->finalise( "MalformedOpenTag", $result );
|
|
}
|
|
if( $_304 === FALSE) { return FALSE; }
|
|
}
|
|
|
|
|
|
|
|
function MalformedOpenTag__finalise(&$res) {
|
|
$tag = $res['Tag']['text'];
|
|
throw new SSTemplateParseException("Malformed opening block tag $tag. Perhaps you have tried to use operators?", $this);
|
|
}
|
|
|
|
/* MalformedCloseTag: '<%' < Tag:('end_' :Word ) !( > '%>' ) */
|
|
function match_MalformedCloseTag ($substack = array()) {
|
|
$result = $this->construct( "MalformedCloseTag" );
|
|
$_320 = NULL;
|
|
do {
|
|
$_306 = new ParserExpression( $this, $substack, $result );
|
|
if (( $subres = $this->literal( $_306->expand('<%') ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
else { $_320 = FALSE; break; }
|
|
if (( $subres = $this->whitespace( ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
$substack[] = $result;
|
|
$result = $this->construct( "Tag" );
|
|
$_312 = NULL;
|
|
do {
|
|
$_309 = new ParserExpression( $this, $substack, $result );
|
|
if (( $subres = $this->literal( $_309->expand('end_') ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
else { $_312 = FALSE; break; }
|
|
$key = "Word"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_Word(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres, "Word" );
|
|
}
|
|
else { $_312 = FALSE; break; }
|
|
$_312 = TRUE; break;
|
|
}
|
|
while(0);
|
|
if( $_312 === TRUE ) {
|
|
$subres = $result ;
|
|
$result = array_pop( $substack ) ;
|
|
$this->store( $result, $subres, 'Tag' );
|
|
}
|
|
if( $_312 === FALSE) {
|
|
$result = array_pop( $substack ) ;
|
|
$_320 = FALSE; break;
|
|
}
|
|
$res_319 = $result;
|
|
$pos_319 = $this->pos;
|
|
$_318 = NULL;
|
|
do {
|
|
if (( $subres = $this->whitespace( ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
$_316 = new ParserExpression( $this, $substack, $result );
|
|
if (( $subres = $this->literal( $_316->expand('%>') ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
else { $_318 = FALSE; break; }
|
|
$_318 = TRUE; break;
|
|
}
|
|
while(0);
|
|
if( $_318 === TRUE ) {
|
|
$result = $res_319;
|
|
$this->pos = $pos_319;
|
|
$_320 = FALSE; break;
|
|
}
|
|
if( $_318 === FALSE) {
|
|
$result = $res_319;
|
|
$this->pos = $pos_319;
|
|
}
|
|
$_320 = TRUE; break;
|
|
}
|
|
while(0);
|
|
if( $_320 === TRUE ) {
|
|
return $this->finalise( "MalformedCloseTag", $result );
|
|
}
|
|
if( $_320 === FALSE) { return FALSE; }
|
|
}
|
|
|
|
|
|
|
|
function MalformedCloseTag__finalise(&$res) {
|
|
$tag = $res['Tag']['text'];
|
|
throw new SSTemplateParseException("Malformed closing block tag $tag. Perhaps you have tried to pass an argument to one?", $this);
|
|
}
|
|
|
|
/* MalformedBlock: MalformedOpenTag | MalformedCloseTag */
|
|
function match_MalformedBlock ($substack = array()) {
|
|
$result = $this->construct( "MalformedBlock" );
|
|
$_325 = NULL;
|
|
do {
|
|
$res_322 = $result;
|
|
$pos_322 = $this->pos;
|
|
$key = "MalformedOpenTag"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_MalformedOpenTag(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres );
|
|
$_325 = TRUE; break;
|
|
}
|
|
$result = $res_322;
|
|
$this->pos = $pos_322;
|
|
$key = "MalformedCloseTag"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_MalformedCloseTag(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres );
|
|
$_325 = TRUE; break;
|
|
}
|
|
$result = $res_322;
|
|
$this->pos = $pos_322;
|
|
$_325 = FALSE; break;
|
|
}
|
|
while(0);
|
|
if( $_325 === TRUE ) {
|
|
return $this->finalise( "MalformedBlock", $result );
|
|
}
|
|
if( $_325 === FALSE) { return FALSE; }
|
|
}
|
|
|
|
|
|
|
|
|
|
/* Comment: "<%--" (!"--%>" /./)+ "--%>" */
|
|
function match_Comment ($substack = array()) {
|
|
$result = $this->construct( "Comment" );
|
|
$_337 = NULL;
|
|
do {
|
|
$_327 = new ParserExpression( $this, $substack, $result );
|
|
if (( $subres = $this->literal( $_327->expand("<%--") ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
else { $_337 = FALSE; break; }
|
|
$count = 0;
|
|
while (true) {
|
|
$res_334 = $result;
|
|
$pos_334 = $this->pos;
|
|
$_333 = NULL;
|
|
do {
|
|
$res_330 = $result;
|
|
$pos_330 = $this->pos;
|
|
$_329 = new ParserExpression( $this, $substack, $result );
|
|
if (( $subres = $this->literal( $_329->expand("--%>") ) ) !== FALSE) {
|
|
$result["text"] .= $subres;
|
|
$result = $res_330;
|
|
$this->pos = $pos_330;
|
|
$_333 = FALSE; break;
|
|
}
|
|
else {
|
|
$result = $res_330;
|
|
$this->pos = $pos_330;
|
|
}
|
|
$_331 = new ParserExpression( $this, $substack, $result );
|
|
if (( $subres = $this->rx( $_331->expand('/./') ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
else { $_333 = FALSE; break; }
|
|
$_333 = TRUE; break;
|
|
}
|
|
while(0);
|
|
if( $_333 === FALSE) {
|
|
$result = $res_334;
|
|
$this->pos = $pos_334;
|
|
unset( $res_334 );
|
|
unset( $pos_334 );
|
|
break;
|
|
}
|
|
$count += 1;
|
|
}
|
|
if ($count > 0) { }
|
|
else { $_337 = FALSE; break; }
|
|
$_335 = new ParserExpression( $this, $substack, $result );
|
|
if (( $subres = $this->literal( $_335->expand("--%>") ) ) !== FALSE) { $result["text"] .= $subres; }
|
|
else { $_337 = FALSE; break; }
|
|
$_337 = TRUE; break;
|
|
}
|
|
while(0);
|
|
if( $_337 === TRUE ) {
|
|
return $this->finalise( "Comment", $result );
|
|
}
|
|
if( $_337 === FALSE) { return FALSE; }
|
|
}
|
|
|
|
|
|
|
|
function Comment__construct(&$res) {
|
|
$res['php'] = '';
|
|
}
|
|
|
|
/* Text: /
|
|
(
|
|
(\\.) | # Any escaped character
|
|
([^<${]) | # Any character that isn't <, $ or {
|
|
(<[^%]) | # < if not followed by %
|
|
($[^A-Za-z_]) | # $ if not followed by A-Z, a-z or _
|
|
({[^$]) | # { if not followed by $
|
|
({$[^A-Za-z_]) # {$ if not followed A-Z, a-z or _
|
|
)+
|
|
/ */
|
|
function match_Text ($substack = array()) {
|
|
$result = array("name"=>"Text", "text"=>"");
|
|
$_339 = new ParserExpression( $this, $substack, $result );
|
|
if (( $subres = $this->rx( $_339->expand('/
|
|
(
|
|
(\\\\.) | # Any escaped character
|
|
([^<${]) | # Any character that isn\'t <, $ or {
|
|
(<[^%]) | # < if not followed by %
|
|
($[^A-Za-z_]) | # $ if not followed by A-Z, a-z or _
|
|
({[^$]) | # { if not followed by $
|
|
({$[^A-Za-z_]) # {$ if not followed A-Z, a-z or _
|
|
)+
|
|
/') ) ) !== FALSE) {
|
|
$result["text"] .= $subres;
|
|
return $result;
|
|
}
|
|
else { return FALSE; }
|
|
}
|
|
|
|
|
|
/* Template: (Comment | If | Require | ClosedBlock | OpenBlock | MalformedBlock | Injection | Text)+ */
|
|
function match_Template ($substack = array()) {
|
|
$result = $this->construct( "Template" );
|
|
$count = 0;
|
|
while (true) {
|
|
$res_371 = $result;
|
|
$pos_371 = $this->pos;
|
|
$_370 = NULL;
|
|
do {
|
|
$_368 = NULL;
|
|
do {
|
|
$res_341 = $result;
|
|
$pos_341 = $this->pos;
|
|
$key = "Comment"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_Comment(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres );
|
|
$_368 = TRUE; break;
|
|
}
|
|
$result = $res_341;
|
|
$this->pos = $pos_341;
|
|
$_366 = NULL;
|
|
do {
|
|
$res_343 = $result;
|
|
$pos_343 = $this->pos;
|
|
$key = "If"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_If(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres );
|
|
$_366 = TRUE; break;
|
|
}
|
|
$result = $res_343;
|
|
$this->pos = $pos_343;
|
|
$_364 = NULL;
|
|
do {
|
|
$res_345 = $result;
|
|
$pos_345 = $this->pos;
|
|
$key = "Require"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_Require(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres );
|
|
$_364 = TRUE; break;
|
|
}
|
|
$result = $res_345;
|
|
$this->pos = $pos_345;
|
|
$_362 = NULL;
|
|
do {
|
|
$res_347 = $result;
|
|
$pos_347 = $this->pos;
|
|
$key = "ClosedBlock"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_ClosedBlock(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres );
|
|
$_362 = TRUE; break;
|
|
}
|
|
$result = $res_347;
|
|
$this->pos = $pos_347;
|
|
$_360 = NULL;
|
|
do {
|
|
$res_349 = $result;
|
|
$pos_349 = $this->pos;
|
|
$key = "OpenBlock"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_OpenBlock(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres );
|
|
$_360 = TRUE; break;
|
|
}
|
|
$result = $res_349;
|
|
$this->pos = $pos_349;
|
|
$_358 = NULL;
|
|
do {
|
|
$res_351 = $result;
|
|
$pos_351 = $this->pos;
|
|
$key = "MalformedBlock"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_MalformedBlock(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres );
|
|
$_358 = TRUE; break;
|
|
}
|
|
$result = $res_351;
|
|
$this->pos = $pos_351;
|
|
$_356 = NULL;
|
|
do {
|
|
$res_353 = $result;
|
|
$pos_353 = $this->pos;
|
|
$key = "Injection"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_Injection(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres );
|
|
$_356 = TRUE; break;
|
|
}
|
|
$result = $res_353;
|
|
$this->pos = $pos_353;
|
|
$key = "Text"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_Text(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres );
|
|
$_356 = TRUE; break;
|
|
}
|
|
$result = $res_353;
|
|
$this->pos = $pos_353;
|
|
$_356 = FALSE; break;
|
|
}
|
|
while(0);
|
|
if( $_356 === TRUE ) { $_358 = TRUE; break; }
|
|
$result = $res_351;
|
|
$this->pos = $pos_351;
|
|
$_358 = FALSE; break;
|
|
}
|
|
while(0);
|
|
if( $_358 === TRUE ) { $_360 = TRUE; break; }
|
|
$result = $res_349;
|
|
$this->pos = $pos_349;
|
|
$_360 = FALSE; break;
|
|
}
|
|
while(0);
|
|
if( $_360 === TRUE ) { $_362 = TRUE; break; }
|
|
$result = $res_347;
|
|
$this->pos = $pos_347;
|
|
$_362 = FALSE; break;
|
|
}
|
|
while(0);
|
|
if( $_362 === TRUE ) { $_364 = TRUE; break; }
|
|
$result = $res_345;
|
|
$this->pos = $pos_345;
|
|
$_364 = FALSE; break;
|
|
}
|
|
while(0);
|
|
if( $_364 === TRUE ) { $_366 = TRUE; break; }
|
|
$result = $res_343;
|
|
$this->pos = $pos_343;
|
|
$_366 = FALSE; break;
|
|
}
|
|
while(0);
|
|
if( $_366 === TRUE ) { $_368 = TRUE; break; }
|
|
$result = $res_341;
|
|
$this->pos = $pos_341;
|
|
$_368 = FALSE; break;
|
|
}
|
|
while(0);
|
|
if( $_368 === FALSE) { $_370 = FALSE; break; }
|
|
$_370 = TRUE; break;
|
|
}
|
|
while(0);
|
|
if( $_370 === FALSE) {
|
|
$result = $res_371;
|
|
$this->pos = $pos_371;
|
|
unset( $res_371 );
|
|
unset( $pos_371 );
|
|
break;
|
|
}
|
|
$count += 1;
|
|
}
|
|
if ($count > 0) {
|
|
return $this->finalise( "Template", $result );
|
|
}
|
|
else { return FALSE; }
|
|
}
|
|
|
|
|
|
|
|
function Template__construct(&$res) {
|
|
$res['php'] = '';
|
|
}
|
|
|
|
function Template_Text(&$res, $sub) {
|
|
$text = $sub['text'];
|
|
$text = preg_replace(
|
|
'/href\s*\=\s*\"\#/',
|
|
'href="<?= SSViewer::{dlr}options[\'rewriteHashlinks\'] ? Convert::raw2att( {dlr}_SERVER[\'REQUEST_URI\'] ) : "" ?>#',
|
|
$text
|
|
);
|
|
|
|
// TODO: using heredocs means any left over $ symbols will trigger PHP lookups, as will any escapes
|
|
// Will it break backwards compatibility to use ' quoted strings, and escape just the ' characters?
|
|
|
|
$res['php'] .=
|
|
'$val .= <<<SSVIEWER' . PHP_EOL .
|
|
$text . PHP_EOL .
|
|
'SSVIEWER;' . PHP_EOL ;
|
|
}
|
|
|
|
function Template_STR(&$res, $sub) {
|
|
$res['php'] .= $sub['php'] . PHP_EOL ;
|
|
}
|
|
|
|
/* TopTemplate: (Comment | If | Require | ClosedBlock | OpenBlock | MalformedBlock | MismatchedEndBlock | Injection | Text)+ */
|
|
function match_TopTemplate ($substack = array()) {
|
|
$result = $this->construct( "TopTemplate" );
|
|
$count = 0;
|
|
while (true) {
|
|
$res_406 = $result;
|
|
$pos_406 = $this->pos;
|
|
$_405 = NULL;
|
|
do {
|
|
$_403 = NULL;
|
|
do {
|
|
$res_372 = $result;
|
|
$pos_372 = $this->pos;
|
|
$key = "Comment"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_Comment(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres );
|
|
$_403 = TRUE; break;
|
|
}
|
|
$result = $res_372;
|
|
$this->pos = $pos_372;
|
|
$_401 = NULL;
|
|
do {
|
|
$res_374 = $result;
|
|
$pos_374 = $this->pos;
|
|
$key = "If"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_If(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres );
|
|
$_401 = TRUE; break;
|
|
}
|
|
$result = $res_374;
|
|
$this->pos = $pos_374;
|
|
$_399 = NULL;
|
|
do {
|
|
$res_376 = $result;
|
|
$pos_376 = $this->pos;
|
|
$key = "Require"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_Require(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres );
|
|
$_399 = TRUE; break;
|
|
}
|
|
$result = $res_376;
|
|
$this->pos = $pos_376;
|
|
$_397 = NULL;
|
|
do {
|
|
$res_378 = $result;
|
|
$pos_378 = $this->pos;
|
|
$key = "ClosedBlock"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_ClosedBlock(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres );
|
|
$_397 = TRUE; break;
|
|
}
|
|
$result = $res_378;
|
|
$this->pos = $pos_378;
|
|
$_395 = NULL;
|
|
do {
|
|
$res_380 = $result;
|
|
$pos_380 = $this->pos;
|
|
$key = "OpenBlock"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_OpenBlock(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres );
|
|
$_395 = TRUE; break;
|
|
}
|
|
$result = $res_380;
|
|
$this->pos = $pos_380;
|
|
$_393 = NULL;
|
|
do {
|
|
$res_382 = $result;
|
|
$pos_382 = $this->pos;
|
|
$key = "MalformedBlock"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_MalformedBlock(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres );
|
|
$_393 = TRUE; break;
|
|
}
|
|
$result = $res_382;
|
|
$this->pos = $pos_382;
|
|
$_391 = NULL;
|
|
do {
|
|
$res_384 = $result;
|
|
$pos_384 = $this->pos;
|
|
$key = "MismatchedEndBlock"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_MismatchedEndBlock(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres );
|
|
$_391 = TRUE; break;
|
|
}
|
|
$result = $res_384;
|
|
$this->pos = $pos_384;
|
|
$_389 = NULL;
|
|
do {
|
|
$res_386 = $result;
|
|
$pos_386 = $this->pos;
|
|
$key = "Injection"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_Injection(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres );
|
|
$_389 = TRUE; break;
|
|
}
|
|
$result = $res_386;
|
|
$this->pos = $pos_386;
|
|
$key = "Text"; $pos = $this->pos;
|
|
$subres = ( $this->packhas( $key, $pos ) ? $this->packread( $key, $pos ) : $this->packwrite( $key, $pos, $this->match_Text(array_merge($substack, array($result))) ) );
|
|
if ($subres !== FALSE) {
|
|
$this->store( $result, $subres );
|
|
$_389 = TRUE; break;
|
|
}
|
|
$result = $res_386;
|
|
$this->pos = $pos_386;
|
|
$_389 = FALSE; break;
|
|
}
|
|
while(0);
|
|
if( $_389 === TRUE ) { $_391 = TRUE; break; }
|
|
$result = $res_384;
|
|
$this->pos = $pos_384;
|
|
$_391 = FALSE; break;
|
|
}
|
|
while(0);
|
|
if( $_391 === TRUE ) { $_393 = TRUE; break; }
|
|
$result = $res_382;
|
|
$this->pos = $pos_382;
|
|
$_393 = FALSE; break;
|
|
}
|
|
while(0);
|
|
if( $_393 === TRUE ) { $_395 = TRUE; break; }
|
|
$result = $res_380;
|
|
$this->pos = $pos_380;
|
|
$_395 = FALSE; break;
|
|
}
|
|
while(0);
|
|
if( $_395 === TRUE ) { $_397 = TRUE; break; }
|
|
$result = $res_378;
|
|
$this->pos = $pos_378;
|
|
$_397 = FALSE; break;
|
|
}
|
|
while(0);
|
|
if( $_397 === TRUE ) { $_399 = TRUE; break; }
|
|
$result = $res_376;
|
|
$this->pos = $pos_376;
|
|
$_399 = FALSE; break;
|
|
}
|
|
while(0);
|
|
if( $_399 === TRUE ) { $_401 = TRUE; break; }
|
|
$result = $res_374;
|
|
$this->pos = $pos_374;
|
|
$_401 = FALSE; break;
|
|
}
|
|
while(0);
|
|
if( $_401 === TRUE ) { $_403 = TRUE; break; }
|
|
$result = $res_372;
|
|
$this->pos = $pos_372;
|
|
$_403 = FALSE; break;
|
|
}
|
|
while(0);
|
|
if( $_403 === FALSE) { $_405 = FALSE; break; }
|
|
$_405 = TRUE; break;
|
|
}
|
|
while(0);
|
|
if( $_405 === FALSE) {
|
|
$result = $res_406;
|
|
$this->pos = $pos_406;
|
|
unset( $res_406 );
|
|
unset( $pos_406 );
|
|
break;
|
|
}
|
|
$count += 1;
|
|
}
|
|
if ($count > 0) {
|
|
return $this->finalise( "TopTemplate", $result );
|
|
}
|
|
else { return FALSE; }
|
|
}
|
|
|
|
|
|
|
|
|
|
/**
|
|
* The TopTemplate also includes the opening stanza to start off the template
|
|
*/
|
|
function TopTemplate__construct(&$res) {
|
|
$res['php'] = "<?php" . PHP_EOL;
|
|
}
|
|
|
|
/**
|
|
* But otherwise handles producing the php the same as every other template block
|
|
*/
|
|
function TopTemplate_Text(&$res, $sub) { return $this->Template_Text($res, $sub); }
|
|
function TopTemplate_STR(&$res, $sub) { return $this->Template_STR($res, $sub); }
|
|
|
|
|
|
/******************
|
|
* Here ends the parser itself. Below are utility methods to use the parser
|
|
*/
|
|
|
|
/**
|
|
* Compiles some passed template source code into the php code that will execute as per the template source.
|
|
*
|
|
* @static
|
|
* @throws SSTemplateParseException
|
|
* @param $string - The source of the template
|
|
* @param string $templateName - The name of the template, normally the filename the template source was loaded from
|
|
* @param bool $includeDebuggingComments - True is debugging comments should be included in the output
|
|
* @return mixed|string - The php that, when executed (via include or exec) will behave as per the template source
|
|
*/
|
|
static function compileString($string, $templateName = "", $includeDebuggingComments=false) {
|
|
// Construct a parser instance
|
|
$parser = new SSTemplateParser($string);
|
|
$parser->includeDebuggingComments = $includeDebuggingComments;
|
|
|
|
// Ignore UTF8 BOM at begining of string. TODO: Confirm this is needed, make sure SSViewer handles UTF (and other encodings) properly
|
|
if(substr($string, 0,3) == pack("CCC", 0xef, 0xbb, 0xbf)) $parser->pos = 3;
|
|
|
|
// Match the source against the parser
|
|
$result = $parser->match_TopTemplate();
|
|
if(!$result) throw new SSTemplateParseException('Unexpected problem parsing template', $parser);
|
|
|
|
// Get the result
|
|
$code = $result['php'];
|
|
|
|
// Include top level debugging comments if desired
|
|
if($includeDebuggingComments && $templateName && stripos($code, "<?xml") === false) {
|
|
// If this template is a full HTML page, then put the comments just inside the HTML tag to prevent any IE glitches
|
|
if(stripos($code, "<html") !== false) {
|
|
$code = preg_replace('/(<html[^>]*>)/i', "\\1<!-- template $templateName -->", $code);
|
|
$code = preg_replace('/(<\/html[^>]*>)/i', "<!-- end template $templateName -->\\1", $code);
|
|
} else {
|
|
$code = "<!-- template $templateName -->\n" . $code . "\n<!-- end template $templateName -->";
|
|
}
|
|
}
|
|
|
|
return $code;
|
|
}
|
|
|
|
/**
|
|
* Compiles some file that contains template source code, and returns the php code that will execute as per that
|
|
* source
|
|
*
|
|
* @static
|
|
* @param $template - A file path that contains template source code
|
|
* @return mixed|string - The php that, when executed (via include or exec) will behave as per the template source
|
|
*/
|
|
static function compileFile($template) {
|
|
return self::compileString(file_get_contents($template), $template);
|
|
}
|
|
}
|