src/parser/xss/nodes.xss

   1 /* This file is part of NIT ( http://www.nitlanguage.org ).
   2  *
   3  * Copyright 2008 Jean Privat <jean@pryen.org>
   4  * Based on algorithms developped for ( http://www.sablecc.org/ ).
   5  *
   6  * Licensed under the Apache License, Version 2.0 (the "License");
   7  * you may not use this file except in compliance with the License.
   8  * You may obtain a copy of the License at
   9  *
  10  *     http://www.apache.org/licenses/LICENSE-2.0
  11  *
  12  * Unless required by applicable law or agreed to in writing, software
  13  * distributed under the License is distributed on an "AS IS" BASIS,
  14  * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
  15  * See the License for the specific language governing permissions and
  16  * limitations under the License.
  17  */
  18
  19 $ template make_abs_nodes()
  20 # Root of the AST hierarchy
  21 abstract class PNode
  22 end
  23
  24 # Ancestor of all tokens
  25 abstract class Token
  26 special PNode
  27 end
  28
  29 # Ancestor of all productions
  30 abstract class Prod
  31 special PNode
  32 end
  33 $ end template
  34
  35 $ template make_nodes()
  36 redef class PNode
  37         # Parent of the node in the AST
  38         readable writable attr _parent: PNode
  39
  40         # Remove a child from the AST
  41         meth remove_child(child: PNode)
  42         do
  43                 replace_child(child, null)
  44         end
  45
  46         # Replace a child with an other node in the AST
  47         meth replace_child(old_child: PNode, new_child: PNode) is abstract
  48
  49         # Replace itself with an other node in the AST
  50         meth replace_with(node: PNode)
  51         do
  52                 if (_parent != null) then
  53                         _parent.replace_child(self, node)
  54                 end
  55         end
  56
  57         # Visit all nodes in order.
  58         # Thus, call "v.visit(e)" for each node e
  59         meth visit_all(v: Visitor) is abstract
  60
  61         # Visit all nodes in reverse order.
  62         # Thus, call "v.visit(e)" for each node e starting from the last child
  63         meth visit_all_reverse(v: Visitor) is abstract
  64
  65         # Give a human readable location of the node.
  66         meth locate: String is abstract
  67
  68         # Return only the line number of the node
  69         meth line_number: Int is abstract
  70
  71         # Debug method: output a message prefixed with the location.
  72         meth printl(str: String)
  73         do
  74                 print("{locate}: {str}\n")
  75         end
  76 end
  77
  78 redef class Token
  79         redef meth visit_all(v: Visitor) do end
  80         redef meth visit_all_reverse(v: Visitor) do end
  81         redef meth replace_child(old_child: PNode, new_child: PNode) do end
  82
  83         redef meth locate: String
  84         do
  85                 return "{filename}:{line},{pos}"
  86         end
  87
  88         redef meth line_number do return line
  89 end
  90
  91 redef class Prod
  92         # The first token of the production node
  93         readable writable attr _first_token: Token
  94
  95         # The last token of the production node
  96         readable writable attr _last_token: Token
  97
  98         redef meth locate: String
  99         do
 100                 if first_token == null then
 101                         return "????"
 102                 end
 103                 var lastpos = last_token.pos + last_token.text.length - 1
 104                 if first_token.line == last_token.line then
 105                         return "{first_token.locate}--{lastpos}"
 106                 else
 107                         return "{first_token.locate}--{last_token.line}:{lastpos}"
 108                 end
 109         end
 110
 111         redef meth replace_with(n: PNode)
 112         do
 113                 super
 114                 assert n isa Prod
 115                 n.first_token = first_token
 116                 n.last_token = last_token
 117         end
 118
 119         redef meth line_number
 120         do
 121                 if first_token != null then
 122                         return first_token.line
 123                 else
 124                         return 0
 125                 end
 126         end
 127 end
 128
 129 # Abstract standard visitor
 130 class Visitor
 131         # Ask the visitor to visit a given node.
 132         # Usually automatically called by visit_all* methods.
 133         # Concrete visitors should redefine this method.
 134         meth visit(e: PNode) is abstract
 135 end
 136
 137 $ end template