haanga/lexer.lex

   1 <?php
   2 /*
   3   +---------------------------------------------------------------------------------+
   4   | Copyright (c) 2010 Haanga                                                       |
   5   +---------------------------------------------------------------------------------+
   6   | Redistribution and use in source and binary forms, with or without              |
   7   | modification, are permitted provided that the following conditions are met:     |
   8   | 1. Redistributions of source code must retain the above copyright               |
   9   |    notice, this list of conditions and the following disclaimer.                |
  10   |                                                                                 |
  11   | 2. Redistributions in binary form must reproduce the above copyright            |
  12   |    notice, this list of conditions and the following disclaimer in the          |
  13   |    documentation and/or other materials provided with the distribution.         |
  14   |                                                                                 |
  15   | 3. All advertising materials mentioning features or use of this software        |
  16   |    must display the following acknowledgement:                                  |
  17   |    This product includes software developed by César D. Rodas.                  |
  18   |                                                                                 |
  19   | 4. Neither the name of the César D. Rodas nor the                               |
  20   |    names of its contributors may be used to endorse or promote products         |
  21   |    derived from this software without specific prior written permission.        |
  22   |                                                                                 |
  23   | THIS SOFTWARE IS PROVIDED BY CÉSAR D. RODAS ''AS IS'' AND ANY                   |
  24   | EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED       |
  25   | WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE          |
  26   | DISCLAIMED. IN NO EVENT SHALL CÉSAR D. RODAS BE LIABLE FOR ANY                  |
  27   | DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES      |
  28   | (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;    |
  29   | LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND     |
  30   | ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT      |
  31   | (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS   |
  32   | SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE                     |
  33   +---------------------------------------------------------------------------------+
  34   | Authors: César Rodas <crodas@php.net>                                           |
  35   +---------------------------------------------------------------------------------+
  36 */
  37
  38 require dirname(__FILE__)."/parser.php";
  39
  40 function do_parsing($template, $ignore_whitespace=FALSE)
  41 {
  42     $lexer  = new Haanga_Lexer($template, $ignore_whitespace);
  43     $parser = new Parser;
  44     try {
  45         for($i=0; ; $i++) {
  46             if  (!$lexer->yylex()) {
  47                 break;
  48             }
  49             //var_dump(array($lexer->token, $lexer->value));
  50             $parser->doParse($lexer->token, $lexer->value);
  51         }
  52     } catch (Exception $e) {
  53         throw new CompilerException($e->getMessage(). ' on line '.$lexer->getLine());
  54     }
  55     $parser->doParse(0, 0);
  56     return $parser->body;
  57 }
  58
  59 class Haanga_Lexer
  60 {
  61     private $data;
  62     private $N;
  63     public $token;
  64     public $value;
  65     private $line;
  66     private $state = 1;
  67     private $ignore_whitespace;
  68
  69     function __construct($data, $whitespace=FALSE)
  70     {
  71         $this->data              = $data;
  72         $this->N                 = 0;
  73         $this->ignore_whitespace = $whitespace;
  74         $this->line              = 1;
  75     }
  76
  77     function getLine()
  78     {
  79         return $this->line;
  80     }
  81
  82     public $custom_tags=array();
  83
  84     function is_custom_tag()
  85     {
  86         static $tag=NULL;
  87         if (!$tag) {
  88             $tag = Extensions::getInstance('Haanga_tag');
  89         }
  90         $value = $tag->isValid($this->value);
  91         $this->token = $value ? $value : Parser::T_ALPHA;
  92     }
  93
  94 /*!lex2php
  95 %input          $this->data
  96 %counter        $this->N
  97 %token          $this->token
  98 %value          $this->value
  99 %line           $this->line
 100 alpha           = /([a-zA-Z_][a-zA-Z_0-9]*)/
 101 number          = /[0-9]/
 102 numerals        = /([0-9])+/
 103 whitespace      = /[ \r\t\n]+/
 104 html            = /([^{]+(.[^%{#])?)+/
 105 comment         = /([^\#]+\#\})+/
 106 custom_tag_end  = /end([a-zA-Z][a-zA-Z0-9]*)/
 107 token_end       = /[^a-zA-Z0-9]/
 108 single_string   = /[^'\\]+/
 109 double_string   = /[^"\\]+/
 110 */
 111 /*!lex2php
 112 %statename IN_HTML
 113 "{%" {
 114     $this->token = Parser::T_OPEN_TAG;
 115     $this->yypushstate(self::IN_CODE);
 116 }
 117
 118 "{#" {
 119     $this->token = Parser::T_COMMENT_OPEN;
 120     $this->yypushstate(self::IN_COMMENT);
 121 }
 122
 123
 124 "{{" {
 125     $this->token = Parser::T_PRINT_OPEN;
 126     $this->yypushstate(self::IN_PRINT);
 127 }
 128
 129 html {
 130     $this->token = Parser::T_HTML;
 131 }
 132
 133 */
 134 /*!lex2php
 135 %statename IN_CODE
 136 "%}" {
 137     $this->token = Parser::T_CLOSE_TAG;
 138     $this->yypopstate();
 139 }
 140
 141 "." {
 142     $this->token = Parser::T_DOT;
 143 }
 144
 145 "for" token_end {
 146     $this->token = Parser::T_FOR;
 147 }
 148
 149 "empty" token_end {
 150     $this->token = Parser::T_EMPTY;
 151 }
 152
 153 "firstof" token_end {
 154     $this->token = Parser::T_FIRST_OF;
 155 }
 156
 157 "block" token_end {
 158     $this->token = Parser::T_BLOCK;
 159 }
 160
 161 "&&" {
 162     $this->token = Parser::T_AND;
 163 }
 164
 165 "AND" {
 166     $this->token = Parser::T_AND;
 167 }
 168
 169 "||" {
 170     $this->token = Parser::T_OR;
 171 }
 172
 173 "OR" {
 174     $this->token = Parser::T_OR;
 175 }
 176
 177 "==" {
 178     $this->token = Parser::T_EQ;
 179 }
 180
 181 "!=" {
 182     $this->token = Parser::T_NE;
 183 }
 184
 185 ">=" {
 186     $this->token = Parser::T_GE;
 187 }
 188
 189 "[" {
 190     $this->token = Parser::T_BRACKETS_OPEN;
 191 }
 192
 193 "]" {
 194     $this->token = Parser::T_BRACKETS_CLOSE;
 195 }
 196
 197 ">" {
 198     $this->token = Parser::T_GT;
 199 }
 200
 201 "<" {
 202     $this->token = Parser::T_LT;
 203 }
 204 "=<" {
 205     $this->token = Parser::T_LE;
 206 }
 207
 208 "|" {
 209     $this->token = Parser::T_PIPE;
 210 }
 211
 212 ":" {
 213     $this->token = Parser::T_COLON;
 214 }
 215
 216 "filter" token_end {
 217     $this->token = Parser::T_FILTER;
 218 }
 219
 220 "regroup" token_end {
 221     $this->token = Parser::T_REGROUP;
 222 }
 223
 224 "endfilter" token_end {
 225     $this->token = Parser::T_END_FILTER;
 226 }
 227
 228 "autoescape" token_end {
 229     $this->token = Parser::T_AUTOESCAPE;
 230 }
 231
 232
 233 "endautoescape" token_end {
 234     $this->token = Parser::T_END_AUTOESCAPE;
 235 }
 236
 237
 238 "endblock" token_end {
 239     $this->token = Parser::T_END_BLOCK;
 240 }
 241
 242 "ifchanged" token_end {
 243     $this->token = Parser::T_IFCHANGED;
 244 }
 245
 246 "else" token_end {
 247     $this->token = Parser::T_ELSE;
 248 }
 249
 250 "endifchanged" token_end {
 251     $this->token = Parser::T_ENDIFCHANGED;
 252 }
 253
 254
 255 "in" token_end {
 256     $this->token = Parser::T_IN;
 257 }
 258
 259 "endfor" token_end {
 260     $this->token = Parser::T_CLOSEFOR;
 261 }
 262
 263 "with" token_end {
 264     $this->token = Parser::T_WITH;
 265 }
 266
 267 "endwith" token_end {
 268     $this->token = Parser::T_ENDWITH;
 269 }
 270
 271 "as" {
 272     $this->token = Parser::T_AS;
 273 }
 274
 275 "on" {
 276     $this->token = Parser::T_ON;
 277 }
 278
 279 "off" {
 280     $this->token = Parser::T_OFF;
 281 }
 282
 283 "by" {
 284     $this->token = Parser::T_BY;
 285 }
 286
 287 "if" token_end {
 288     $this->token = Parser::T_IF;
 289 }
 290
 291 "else" token_end {
 292     $this->token = Parser::T_ELSE;
 293 }
 294
 295 "endif" token_end {
 296     $this->token = Parser::T_ENDIF;
 297 }
 298
 299 "(" {
 300     $this->token = Parser::T_LPARENT;
 301 }
 302
 303 ")" {
 304     $this->token = Parser::T_RPARENT;
 305 }
 306
 307 "%" {
 308     $this->token = Parser::T_MOD;
 309 }
 310
 311 "," {
 312     $this->token = Parser::T_COMMA;
 313 }
 314
 315 "+" {
 316     $this->token = Parser::T_PLUS;
 317 }
 318 "*" {
 319     $this->token = Parser::T_TIMES;
 320 }
 321
 322 "/" {
 323     $this->token = Parser::T_DIV;
 324 }
 325
 326 "'" {
 327     $this->token = Parser::T_STRING_SINGLE_INIT;
 328     $this->yypushstate(self::IN_STRING_SINGLE);
 329 }
 330
 331 "\"" {
 332     $this->token = Parser::T_STRING_DOUBLE_INIT;
 333     $this->yypushstate(self::IN_STRING_DOUBLE);
 334 }
 335
 336 custom_tag_end {
 337     $this->token = Parser::T_CUSTOM_END;
 338 }
 339
 340 "extends" token_end {
 341     $this->token = Parser::T_EXTENDS;
 342 }
 343
 344 "include" token_end {
 345     $this->token = Parser::T_INCLUDE;
 346 }
 347
 348 numerals {
 349     $this->token = Parser::T_NUMERIC;
 350 }
 351
 352 numerals "."  numerals {
 353     $this->token = Parser::T_NUMERIC;
 354 }
 355
 356 alpha {
 357     $this->is_custom_tag();
 358 }
 359
 360 whitespace {
 361     return FALSE;
 362 }
 363
 364 */
 365 /*!lex2php
 366 %statename IN_PRINT
 367 "}}" {
 368     $this->token = Parser::T_PRINT_CLOSE;
 369     $this->yypopstate();
 370 }
 371
 372 "|" {
 373     $this->token = Parser::T_PIPE;
 374 }
 375
 376 ":" {
 377     $this->token = Parser::T_COLON;
 378 }
 379
 380
 381 "." {
 382     $this->token = Parser::T_DOT;
 383 }
 384
 385 "[" {
 386     $this->token = Parser::T_BRACKETS_OPEN;
 387 }
 388
 389 "]" {
 390     $this->token = Parser::T_BRACKETS_CLOSE;
 391 }
 392
 393 numerals {
 394     $this->token = Parser::T_NUMERIC;
 395 }
 396
 397 numerals "."  numerals {
 398     $this->token = Parser::T_NUMERIC;
 399 }
 400
 401 "'" {
 402     $this->token = Parser::T_STRING_SINGLE_INIT;
 403     $this->yypushstate(self::IN_STRING_SINGLE);
 404 }
 405
 406 "\"" {
 407     $this->token = Parser::T_STRING_DOUBLE_INIT;
 408     $this->yypushstate(self::IN_STRING_DOUBLE);
 409 }
 410
 411 alpha {
 412     $this->token = Parser::T_ALPHA;
 413 }
 414
 415 whitespace {
 416     return FALSE;
 417 }
 418 */
 419
 420 /*!lex2php
 421 %statename IN_STRING_DOUBLE
 422
 423 "\\" "\""  {
 424     $this->token = Parser::T_STRING_CONTENT;
 425     $this->value = "\"";
 426     $this->N    += 1;
 427 }
 428
 429 "\'"  {
 430     $this->token = Parser::T_STRING_CONTENT;
 431     $this->value = "'";
 432     $this->N    += 1;
 433 }
 434
 435
 436 "\"" {
 437     $this->token = Parser::T_STRING_DOUBLE_END;
 438     $this->yypopstate();
 439 }
 440
 441 double_string {
 442     $this->token = Parser::T_STRING_CONTENT;
 443 }
 444
 445 */
 446
 447 /*!lex2php
 448 %statename IN_STRING_SINGLE
 449 "\'"  {
 450     $this->token = Parser::T_STRING_CONTENT;
 451     $this->value = "'";
 452     $this->N    += 1;
 453 }
 454
 455 "\\" "\""  {
 456     $this->token = Parser::T_STRING_CONTENT;
 457     $this->value = "\"";
 458     $this->N    += 1;
 459 }
 460
 461
 462 "'" {
 463     $this->token = Parser::T_STRING_SINGLE_END;
 464     $this->yypopstate();
 465 }
 466
 467 single_string {
 468     $this->token = Parser::T_STRING_CONTENT;
 469 }
 470
 471 */
 472
 473 /*!lex2php
 474 %statename IN_COMMENT
 475 comment {
 476     $this->token = Parser::T_COMMENT;
 477     $this->yypopstate();
 478 }
 479 */
 480 }