Class: Teepee::CommandParser

Inherits:

ParserNode

• Object
• ParserNode
• Teepee::CommandParser

Defined in:

lib/teepee/command-parser.rb

Constant Summary

@@commander =

Commander.new nil

@@action_view =

nil

@@controller =

nil

Instance Attribute Summary

• #command ⇒ Object readonly

  Returns the value of attribute command.

• #expressions ⇒ Object readonly

  Returns the value of attribute expressions.

• #parser ⇒ Object

  Returns the value of attribute parser.

• #scope ⇒ Object

  Returns the value of attribute scope.

Class Method Summary

• .commander=(new) ⇒ Object
• .parse(parser, scope, tokens) ⇒ Object

Instance Method Summary

• #builtins ⇒ Object
• #command_error(message) ⇒ Object
• #commander ⇒ Object
• #first_word_token ⇒ Object
• #html_tag(tag) ⇒ Object
• #initialize(parser, scope, command, expressions) ⇒ CommandParser constructor

  A new instance of CommandParser.

• #optional_first_word_token ⇒ Object
• #subscoped_commander ⇒ Object
• #tb_href(target, string) ⇒ Object
• #to_html ⇒ Object
• #to_number ⇒ Object
• #use_scope(scope) ⇒ Object
• #word_tokens ⇒ Object

Constructor Details

#initialize(parser, scope, command, expressions) ⇒ CommandParser

Returns a new instance of CommandParser.

Raises:

• (ArgumentError)

# File 'lib/teepee/command-parser.rb', line 52

def initialize(parser, scope, command, expressions)
  @parser = parser
  raise ArgumentError if not command.is_a? WordToken
  @scope = scope
  raise ArgumentError if not scope.is_a? Scope
  @command = command
  raise ArgumentError if not expressions.is_a? Array
  expressions.each do |expression|
    raise ArgumentError if not expression.kind_of? ParserNode
  end
  @expressions = expressions
end

Instance Attribute Details

#command ⇒ Object (readonly)

Returns the value of attribute command.

# File 'lib/teepee/command-parser.rb', line 50

def command
  @command
end

#expressions ⇒ Object (readonly)

Returns the value of attribute expressions.

# File 'lib/teepee/command-parser.rb', line 50

def expressions
  @expressions
end

#parser ⇒ Object

Returns the value of attribute parser.

# File 'lib/teepee/command-parser.rb', line 49

def parser
  @parser
end

#scope ⇒ Object

Returns the value of attribute scope.

# File 'lib/teepee/command-parser.rb', line 49

def scope
  @scope
end

Class Method Details

.commander=(new) ⇒ Object

# File 'lib/teepee/command-parser.rb', line 544

def commander= new
  @@commander = new
end

.parse(parser, scope, tokens) ⇒ Object

Raises:

• (ParseError)

# File 'lib/teepee/command-parser.rb', line 511

def parse(parser, scope, tokens)
  @parser = parser
  @scope = scope
  expressions = []
  rest = tokens
  backslash, command, left_brace = rest.shift(3)
  right_brace = nil
  raise ParseError if not backslash.is_a? BackslashToken
  raise ParseError if not command.is_a? WordToken
  if not left_brace.is_a? LeftBraceToken # A command with no interior.
    rest.unshift left_brace if not left_brace.is_a? WhitespaceToken
    return [CommandParser.new(parser, scope, command, []), rest]
  end
  while rest.length > 0
    if rest.first.is_a? WordToken or
       rest.first.is_a? WhitespaceToken or
       rest.first.is_a? PipeToken
      expressions << rest.shift
    elsif rest.first.is_a? BackslashToken
      result, rest = CommandParser.parse(parser, scope, rest)
      expressions << result
    elsif rest.first.is_a? RightBraceToken
      right_brace = rest.shift
      return [CommandParser.new(parser, scope, command, expressions), rest]
    else
      raise ParseError
    end
  end
  if right_brace.nil? # Allow a forgotten final right brace.
    return [CommandParser.new(parser, scope, command, expressions), rest]
  end
end

Instance Method Details

#builtins ⇒ Object

# File 'lib/teepee/command-parser.rb', line 98

def builtins
  case command.word
  when "backslash",
       "bslash",
       "-/"
    commander.backslash
  when "left-brace",
       "left_brace",
       "leftbrace",
       "lbrace",
       "opening-brace",
       "opening_brace",
       "openingbrace",
       "obrace",
       "-("
    commander.left_brace
  when "right-brace",
       "right_brace",
       "rightbrace",
       "rbrace",
       "closing-brace",
       "closing_brace",
       "closingbrace",
       "cbrace",
       ")-"
    commander.right_brace
  when "left-bracket",
       "left_bracket",
       "opening-bracket",
       "opening_bracket",
       "lbracket",
       "obracket",
       "(("
    commander.left_bracket
  when "right-bracket",
       "right_bracket",
       "closing-bracket",
       "closing_bracket",
       "rbracket",
       "cbracket",
       "))"
    commander.right_bracket
  when "pipe"
    commander.pipe
  when "backtick",
       "backquote",
       "'"
    commander.backquote
  when "squiggle",
       "tilde"
    commander.squiggle
  when "dollar"
    commander.dollar
  when "_"
    commander.nbsp optional_first_word_token
  when "space"
    commander.space
  when "br", "newline"
    commander.br
  when "bold", "b", "textbf"
    commander.b expressions
  when "del",
       "s",
       "strike",
       "strikethrough",
       "strikeout"
    commander.del expressions
  when "italic",
       "textit",
       "it"
    commander.it expressions
  when "underline",
       "u"
    commander.u expressions
  when "tt",
       "texttt",
       "teletype",
       "typewriter"
    commander.tt expressions
  when "small"
    commander.small expressions
  when "big"
    commander.big expressions
  when "subscript",
       "sub"
    commander.sub expressions
  when "superscript",
       "sup"
    commander.sup expressions
  when "h1"
    commander.h1 expressions
  when "h2"
    commander.h2 expressions
  when "h3"
    commander.h3 expressions
  when "h4"
    commander.h4 expressions
  when "h5"
    commander.h5 expressions
  when "h6"
    commander.h6 expressions
  when "itemize",
       "ul"
    commander.itemize expressions
  when "itemize-disc",
       "ul-disc",
       "itemize_disc",
       "ul_disc",
       "itemize-disk",
       "ul-disk",
       "itemize_disk",
       "ul_disk"
    commander.itemize_disc expressions
  when "itemize-circle",
       "ul-circle",
       "itemize_circle",
       "ul_circle"
    commander.itemize_circle expressions
  when "itemize-square",
       "ul-square",
       "itemize_square",
       "ul_square"
    commander.itemize_square expressions
  when "itemize-none",
       "ul-none",
       "itemize_none",
       "ul_none"
    commander.itemize_none expressions
  when "enumerate",
       "ol"
    commander.enumerate expressions
  when "enumerate-numeric",
       "enumerate_numeric",
       "enumerate-1",
       "ol-1",
       "enumerate_1",
       "ol_1"
    commander.enumerate_numeric expressions
  when "enumerate-uppercase",
       "enumerate_uppercase",
       "enumerate-upcase",
       "enumerate_upcase",
       "enumerate-A",
       "ol-A",
       "enumerate_A",
       "ol_A"
    commander.enumerate_uppercase expressions
  when "enumerate-lowercase",
       "enumerate_lowercase",
       "enumerate-downcase",
       "enumerate_downcase",
       "enumerate-a",
       "ol-a",
       "enumerate_a",
       "ol_a"
    commander.enumerate_lowercase expressions
  when "enumerate-roman-uppercase",
       "enumerate_roman_uppercase",
       "enumerate-roman-upcase",
       "enumerate_roman_upcase",
       "enumerate-I",
       "ol-I",
       "enumerate_I",
       "ol_I"
    commander.enumerate_roman_uppercase expressions
  when "enumerate-roman-lowercase",
       "enumerate_roman_lowercase",
       "enumerate-roman-downcase",
       "enumerate_roman_downcase",
       "enumerate-i",
       "ol-i",
       "enumerate_i",
       "ol_i"
    commander.enumerate_roman_lowercase expressions
  when "item",
       "li"
    commander.item expressions
  when "let1"
    subscoped_commander.let1 expressions
  when "table"
    commander.table expressions
  when "tr",
       "table-row",
       "table_row"
    commander.table_row expressions
  when "th",
       "table-header",
       "table_header"
    commander.table_header expressions
  when "td",
       "table-data",
       "table_data",
       "table-cell",
       "table_cell"
    commander.table_data expressions
  when "link",
       "href",
       "url"
    commander.link expressions
  when "email",
       "email-address",
       "email_address",
       "mailto"
    commander.mailto first_word_token
  when "img",
       "image"
    commander.image expressions
  when "user",
       "user-id",
       "user_id"
    commander.user first_word_token
  when "link-id",
       "link_id"
    commander.link_id first_word_token
  when "keyword-id",
       "keyword_id"
    commander.keyword_id first_word_token
  when "note-id",
       "note_id"
    commander.note_id first_word_token
  when "tag-id",
       "tag_id"
    commander.tag_id first_word_token
  when "forum-id",
       "forum_id"
    commander.forum_id first_word_token
  when "folder-id",
       "folder_id"
    commander.folder_id first_word_token
  when "bookmarks-folder-id",
       "bookmarks_folder_id",
       "bookmarks_folder-id",
       "bookmarks-folder_id",
       "bookmark-folder-id",
       "bookmark_folder_id",
       "bookmark_folder-id",
       "bookmark-folder_id"
    commander.bookmarks_folder_id first_word_token
  when "i" # sqrt(-1), not yet supported
    commander.i
  when "pi"
    commander.pi
  when "e"
    commander.e
  when "+"
    commander.+ word_tokens
  when "increment",
       "inc"
    commander.increment first_word_token
  when "decrement",
       "dec"
    commander.decrement first_word_token
  when "-"
    commander.- word_tokens
  when "*"
    commander.* word_tokens
  when "/",
       "÷"
    commander./ word_tokens
  when "%"
    commander.% word_tokens
  when "+%"
    commander.add_percentage word_tokens
  when "-%"
    commander.subtract_percentage word_tokens
  when "%t",
       "%total"
    commander.percent_total word_tokens
  when "floor"
    commander.floor first_word_token
  when "ceil",
       "ciel",
       "ceiling"
    commander.ceiling first_word_token
  when "round"
    commander.round *word_tokens
  when "mod",
       "modulus",
       "modulo"
    commander.mod word_tokens
  when "^", "**"
    commander.** word_tokens
  when "sin", "cos", "tan",
    "asin", "acos", "atan",
    "sinh", "cosh", "tanh",
    "asinh", "acosh", "atanh",
    "erf", "erfc",
    "gamma", "log10", "sqrt"
    commander.send command.word.to_sym, first_word_token
  when "d2r",
       "deg->rad",
       "degrees->radians"
    commander.degrees2radians first_word_token
  when "r2d",
       "rad->deg",
       "radians->degrees"
    commander.radians2degrees first_word_token
  when "lgamma"
    commander.lgamma first_word_token
  when "ld",
       "log2"
    commander.ld first_word_token
  when "ln"
    commander.ln first_word_token
  when "log"
    base, number = word_tokens
    commander.log base, number
  when "ldexp"
    fraction, exponent = word_tokens
    commander.ldexp fraction, exponent
  when "hypot"
    commander.hypot word_tokens
  when "true"
    commander.true_constant
  when "false"
    commander.false_constant
  when "not"
    commander.boolean_not first_word_token
  when "and"
    commander.boolean_and expressions
  when "or"
    commander.boolean_or expressions
  when "nand"
    commander.boolean_nand expressions
  when "nor"
    commander.boolean_nor expressions
  when "xor"
    commander.boolean_xor expressions
  when "xnor"
    commander.boolean_xnor expressions
  when "<"
    commander.less_than word_tokens
  when "<=",
       "≤"
    commander.less_than_or_equal word_tokens
  when ">"
    commander.greater_than word_tokens
  when ">=",
       "≥"
    commander.greater_than_or_equal word_tokens
  when "="
    commander.equal word_tokens
  when "!=",
       "≠"
    commander.not_equal word_tokens
  when "if"
    commander.if_operator expressions
  when "when"
    commander.when_operator expressions
  when "unless"
    commander.unless_operator expressions
  when "comment",
       "!--",
       "#"
    commander.comment expressions
  when "span"
    commander.span_operator expressions
  when "prog1"
    commander.prog1_operator expressions
  when "progn"
    commander.progn_operator expressions
  when "prognil",
       "side-effects",
       "side-affects",
       "effects",
       "affects"
    commander.prognil expressions
  when "cond"
    commander.cond_operator expressions
  when "case"
    commander.case_operator expressions
  when "get"
    commander.get_operator first_word_token
  when "define",
       "def"
    commander.define expressions
  when "undefine",
       "undef"
    commander.undefine expressions
  when "defined?"
    commander.is_defined? word_tokens
  when "dotimes"
    commander.dotimes expressions
  else
    command_error "unknown command #{command.to_html}"
  end
end

#command_error(message) ⇒ Object

# File 'lib/teepee/command-parser.rb', line 71

def command_error(message)
  %{<span style="color: red">[#{message}]</span>}
end

#commander ⇒ Object

# File 'lib/teepee/command-parser.rb', line 75

def commander
  @@commander.with_scope scope
end

#first_word_token ⇒ Object

# File 'lib/teepee/command-parser.rb', line 498

def first_word_token
  word_tokens.first
end

#html_tag(tag) ⇒ Object

# File 'lib/teepee/command-parser.rb', line 486

def html_tag(tag)
  "<#{tag}>" + expressions.map(&:to_html).join + "</#{tag}>"
end

#optional_first_word_token ⇒ Object

# File 'lib/teepee/command-parser.rb', line 502

def optional_first_word_token
  first_word_token if not expressions.empty?
end

#subscoped_commander ⇒ Object

# File 'lib/teepee/command-parser.rb', line 79

def subscoped_commander
  @@commander.with_scope scope.derive
end

#tb_href(target, string) ⇒ Object

# File 'lib/teepee/command-parser.rb', line 490

def tb_href(target, string)
  %{<a href="#{TB_COM}/#{target}">#{string}</a>}
end

#to_html ⇒ Object

# File 'lib/teepee/command-parser.rb', line 87

def to_html
  commander.parser = @parser
  if @@commander.scope.has_key? command.word
    @@commander.scope[command.word]
  elsif @parser.variables.include? command.word
    commander.get_operator command.word
  else
    builtins
  end
end

#to_number ⇒ Object

# File 'lib/teepee/command-parser.rb', line 83

def to_number
  to_html.to_number
end

#use_scope(scope) ⇒ Object

# File 'lib/teepee/command-parser.rb', line 65

def use_scope scope
  @scope = scope
  expressions.map {|node| node.use_scope scope}
  self
end

#word_tokens ⇒ Object

# File 'lib/teepee/command-parser.rb', line 494

def word_tokens
  expressions.reject {|expr| expr.is_a? WhitespaceToken}
end