Initial implemntation of evaluation methods (8ba9d5e3) · Commits · Progetti / IfAuthEx DokuWiki Plugin

parse.php

+133 −23

Original line number	Diff line number	Diff line
		@@ -250,7 +250,11 @@ class ElementInstance {
		} else {
		$values = array();
		foreach ($this->args() as $arg) {
		if ($arg instanceof ElementInstance) {
		$values[] = $arg->evaluate();
		} else {
		$values[] = $arg;
		}
		}
		return $this->definition()->evaluate($values);
		}
		@@ -582,27 +586,6 @@ class ElementDefinition {
		}
		}

		$T_AT = new TokenDefinition('@', 'AT');
		$T_EXCL = new TokenDefinition('!', 'EXCL');
		$T_AND = new TokenDefinition('&&', 'AND');
		$T_OR = new TokenDefinition('\|\|', 'OR');
		$T_OPEN_PAREN = new TokenDefinition('(', 'OPENP');
		$T_CLOSE_PAREN = new TokenDefinition(')', 'CLOSEP');
		$T_LITERAL = new TokenDefinition(null, 'LIT', '/\w+/');
		$T_SPACE = new TokenDefinition(' ', 'SPC', '/\s+/');

		$ALL_TOKENS = array($T_AT, $T_EXCL, $T_AND, $T_OR, $T_OPEN_PAREN, $T_CLOSE_PAREN, $T_LITERAL, $T_SPACE);
		$IGNORE_TOKENS = array($T_SPACE);

		$ELM_LITERAL = new ElementDefinition('Literal', Fixing::None, $T_LITERAL, 0);
		$ELM_SUBEXPR = new ElementDefinition('Subexpr', Fixing::Wrap, array($T_OPEN_PAREN, $T_CLOSE_PAREN), 1, null, true);
		$ELM_GROUP = new ElementDefinition('InGroup', Fixing::Prefix, $T_AT, 2);
		$ELM_NEG = new ElementDefinition('Not', Fixing::Prefix, $T_EXCL, 3);
		$ELM_AND = new ElementDefinition('And', Fixing::Infix, $T_AND, 4);
		$ELM_OR = new ElementDefinition('Or', Fixing::Infix, $T_OR, 5);

		$ALL_ELEMENTS = array($ELM_LITERAL, $ELM_SUBEXPR, $ELM_GROUP, $ELM_NEG, $ELM_AND, $ELM_OR);

		function tokenize(string $text, array $tokDefs, array $stripTokDefs) {
		$tokInsts = array();
		$foundTokInst = null;
		@@ -636,8 +619,135 @@ function parse(array $tokInsts, array $elmDefs) {
		return $root;
		}


		class Literal extends ElementDefinition {
		public function __construct() {
		$T_LITERAL = new TokenDefinition(null, 'LIT', '/\w+/');
		parent::__construct('Literal', Fixing::None, $T_LITERAL, 0);
		}
		public function evaluate($argValues) {
		if (count($argValues) != 1
		\|\| !($argValues[0] instanceof TokenInstance)
		\|\| $argValues[0]->definition() != $this->tokenDefs()[0]
		) {
		throw new InvalidArgumentException();
		}
		return $argValues[0]->match();
		}
		}

		class SubExpr extends ElementDefinition {
		public function __construct() {
		$T_OPEN_PAREN = new TokenDefinition('(', 'OPENP');
		$T_CLOSE_PAREN = new TokenDefinition(')', 'CLOSEP');
		parent::__construct('SubExpr', Fixing::Wrap, array($T_OPEN_PAREN, $T_CLOSE_PAREN), 1, null, true);
		}
		public function evaluate($argValues) {
		if (count($argValues) != 1
		\|\| !is_bool($argValues[0])
		) {
		throw new InvalidArgumentException();
		}
		return $argValues[0];
		}
		}

		class OpInGroup extends ElementDefinition {
		public function __construct() {
		$T_AT = new TokenDefinition('@', 'AT');
		parent::__construct('InGroup', Fixing::Prefix, $T_AT, 2);
		}
		public function evaluate($argValues) {
		if (count($argValues) != 1
		\|\| !($argValues[0] instanceof string)
		) {
		throw new InvalidArgumentException();
		}
		global $INFO;
		if (is_array($INFO['userinfo'])) {
		return in_array($argValues[0], $INFO['userinfo']['grps']);
		}
		}
		}

		class OpNot extends ElementDefinition {
		public function __construct() {
		$T_EXCL = new TokenDefinition('!', 'EXCL');
		parent::__construct('Not', Fixing::Prefix, $T_EXCL, 3);
		}
		public function evaluate($argValues) {
		var_dump($argValues);
		if (count($argValues) != 1
		\|\| !is_bool($argValues[0])
		) {
		throw new InvalidArgumentException();
		}
		return !$argValues[0];
		}
		}

		class OpAnd extends ElementDefinition {
		public function __construct() {
		$T_AND = new TokenDefinition('&&', 'AND');
		parent::__construct('And', Fixing::Infix, $T_AND, 4);
		}
		public function evaluate($argValues) {
		if (count($argValues) == 0) {
		throw new InvalidArgumentException();
		}
		foreach ($argValues as $arg) {
		if (!is_bool($arg)) {
		throw new InvalidArgumentException();
		}
		if (!$arg) {
		return false;
		}
		}
		return true;
		}
		}

		class OpOr extends ElementDefinition {
		public function __construct() {
		$T_OR = new TokenDefinition('\|\|', 'OR');
		parent::__construct('Or', Fixing::Infix, $T_OR, 5);
		}
		public function evaluate($argValues) {
		if (count($argValues) == 0) {
		throw new InvalidArgumentException();
		}
		foreach ($argValues as $arg) {
		if (!is_bool($arg)) {
		throw new InvalidArgumentException();
		}
		if (!$arg) {
		return false;
		}
		}
		return true;
		}
		}

		$ALL_ELEMENTS = array(
		new Literal(),
		new SubExpr(),
		new OpInGroup(),
		new OpNot(),
		new OpAnd(),
		new OpOr()
		);

		$IGNORE_TOKENS = array(new TokenDefinition(' ', 'SPC', '/\s+/'));
		$ALL_TOKENS = array_merge($IGNORE_TOKENS);
		foreach ($ALL_ELEMENTS as $ELM) {
		$ALL_TOKENS = array_merge($ALL_TOKENS, $ELM->tokenDefs());
		}


		$text = 'usr1 \|\|(!usr2&&@group \|\| !usr3)';
		echo 'Parsing "' . $text . '".' . "\n";
		parse(tokenize($text, $ALL_TOKENS, $IGNORE_TOKENS), $ALL_ELEMENTS)->print();
		$expr = parse(tokenize($text, $ALL_TOKENS, $IGNORE_TOKENS), $ALL_ELEMENTS);
		$expr->print();
		var_dump($expr->evaluate());

		?>
		No newline at end of file