Pony PEG

A Pony parsing expression grammar (PEG) based parser generator. It is loosely based on Python fastidious that in turn is based on Go pigeon <https://github.com/PuerkitoBio/pigeon>

TL;DR

From the calculator example. To read the example, think regex, except that the OR spells /, that literal chars are in quotes and that we can reference other rules.

The first {...} enclosed code is copied as-is in the output. The generation rules ( eval <- ... are transformed into methods. Then, the tail (last {...} code, empty here) is copied as-is.

{
use "collections"
use "debug"
use "peg"


actor Main
  // pony-peg boilerplate
  var _p_current_labeled: Map[String, ParseResult val] = Map[String, ParseResult val]
  var p_current_error: String = ""
  let _sr: SourceReader
  var _debug_indent: String = ""

  // User's attributes
  let _env: Env

  new create(env: Env) =>
    _env=env
    let args = env.args.slice(1)
    var src = ""
    for arg in args.values() do
      src = src + " " + arg
    end
    Debug(src)
    _sr = SourceReader(src)
    try
      let result = eval()
      env.out.print(result.string())
    else
      _env.out.print("Can't parse input")
    end

  fun accumulate(first': ParseResult val, rest': ParseResult val): ParseResult val? =>
    if rest'.flatten().string() == "" then
      return first'.flatten()
    end
    var result = first'.string().i32()
    for r in rest'.array().values() do
      let op = r.array()(1).string()
      let second = r.array()(3).string().i32()
      result = match op
      | "+" => result + second
      | "-" => result - second
      | "*" => result * second
      | "/" => result / second
      else
        error
      end
    end
    ParseResult(result.string())

}
eval <- expr:expr EOF {@expr}
term <- first:factor rest:( _ mult_op _ factor )* {accumulate(first', rest')}
expr "EXPRESSION" <- _ first:term rest:( _ add_op _ term  )* _ {accumulate(first', rest')}
add_op "OPERATOR" <- "+" / "-" {}
mult_op "OPERATOR" <- "*" / "/" {}
factor "EXPRESSION" <- ( "(" fact:expr ")" ) / fact:integer {@fact}
integer "INT"<- "-"? [0-9]+ {value'.flatten()}
_ <- [ \n\t\r]* {value'.flatten()}
EOF <- !. {}
{
}

make calculator

This bootstrap the code generator, and runs it against calculator.ponypeg.

The bootstrap process relies on python-virtualenv, fastidious, and python 2. My python2 is /usr/bin/python2. If it fails, you can set yours with

make calculator PYTHON2=/path/to/yours

Then you have a state-of-the-art integer only calculator o/

build/release/calculator "-8* ( 7 -1) *-1  + (-12/2  )"
42

Project Status

Release early release often, they say. Current status is : the calculator works.

I don't even know if the generator is able to generate itself, I didn't try yet.

Testing

Almost none. It's the main priority now that the proof of concept works.

Error reporting

PEG parsers design makes automatic syntax error reporting hard. The parser has to follow every possible path from the root and fail to parse the document before it can tell there's a syntax error. It's even harder to tell where is the error, because at this point, we only know that every path has fail.

However this paper http://arxiv.org/pdf/1405.6646v1.pdf suggest a bunch of techniques to improve syntax error detection, I've implemented some of them in fastidious and it can be ported in pony-peg.

Optimisation

Here again, there are well-known optimisations of peg parsers that I did not coded yet in pony-peg. I won't try to optimize anything before there's a usable benchmark framework.

Bootstraping

Bootstraping a compiler or a parser is always fun :).

Here i use fastidious, a python peg parser generator, to generate pony code that compiles into a parser generator.

The next step is to use this pony generator to generate itself.

I used fastidious because it was here and working, and I wanted fast results. The last step will be to write a hand-made parser in pony to ditch fastidious altogether. It would be only for elegance's sake, so it's not a priority at the moment.

PEG Syntax

This is a copy of fastidious' README, not ported to pony yet.

The whole syntax is formally defined in fastidious parser class, using the PEG syntax (which is actually used to generate the fastidious parser itself, so it's THE TRUTH. Yes, I like meta-stuff). What follows is an informal and rather incomplete description of this syntax.

Identifiers, whitespace, comments and literals follow a subset of python notation:

# a comment
'a string literal'
"a more \"complex\" one with a litteral '\\' \nand a second line"
_aN_iden7ifi3r

Identifiers MUST be valid python identifiers as they are added as methods on the parser objects. Parsers have utility methods that are prefixed by p_ and _p_. Please avoid these names.

Rules

A PEG grammar consists of a set of rules. A rule is an identifier followed by a rule definition operator <- and an expression. An optional display name - a string literal used in error messages instead of the rule identifier - can be specified after the rule identifier. An action can also be specified enclosed in {} after the rule, more on this later.

rule_a "friendly name" <- 'a'+ {an_action} # one or more lowercase 'a's

Actions

Actions are a way to alter the output of a rule. Without actions the rules emit strings, lists of strings, or a list of lists and strings.

Action are useful to control the output. One could for example instantiate AST nodes, or, as we do in the JSON example, our result string, lists and dicts.

Actions can also be used to reduce the result as the input is parsed, that's exactly what we do in the calculator example in the method on_expr.

There are two kind of actions: labels and methods

Label action

If an expression has a label, you can use it as the return value. In the calculator, we use:

factor <- ( '(' fact:expr ')' ) / fact:integer {@fact}

Here, @fact means 'return the part labeled fact' which is an integer literal or the result of an expr enclosed in parentheses, depending on the branch that matches.

All the rest (e.g the parentheses) of the match is never output and is lost.

Method action

Method actions are methods on the parser. In the calculator, there's:

term <- first:factor rest:( _ mult_op _ factor )* {on_expr}

This means that on match, the method of the parser named on_expr is called with one positional argument: value and two keyword arguments: first and rest named after the labels in the expression.

value is the full value of the match, something like:

[ 2 [ " ", "*", "", 3]]

first would be 2 and rest would be [ " ", "*", "", 3].

I hope the indices of r in this method make sense, now:

def on_expr(self, value, first, rest):
    result = first
    for r in rest:
        op = r[1]
        if op == '+':
            result += r[3]
        elif op == '-':
            result -= r[3]
        elif op == '*':
            result *= r[3]
        else:
            result /= r[3]
    return result

Note that even though the rule _ has the Kleen star * it will at least return an empty string, so rest is guaranteed to be a 4 elements list.

Because of its name, on_expr is also the implicit action of the rule expr. This can of course be overridden by adding an explicit action on the rule

Builtin method actions

At the moment, there's one builtin action {{p_flatten}} that recursively concatenates a list of lists and strings:

["a", ["b", ["c", "d"], "e"], "fg"] => "abcdefg"

Expressions

A rule is defined by an expression. The following sections describe the various expression types. Expressions can be grouped by using parentheses, and a rule can be referenced by its identifier in place of an expression.

Choice expression

The choice expression is a list of expressions that will be tested in the order they are defined. The first one that matches will be used. Expressions are separated by the forward slash character "/". E.g.:

choice_expr <- A / B / C # A, B and C should be rules declared in the grammar

Because the first match is used, it is important to think about the order of expressions. For example, in this rule, "<=" would never be used because the "<" expression comes first:

bad_choice_expr <- "<" / "<="

Sequence expression

The sequence expression is a list of expressions that must all match in that same order for the sequence expression to be considered a match. Expressions are separated by whitespace. E.g.:

seq_expr <- "A" "b" "c" # matches "Abc", but not "Acb"

Labeled expression

A labeled expression consists of an identifier followed by a colon ":" and an expression. A labeled expression introduces a variable named with the label that can be referenced in the action of the rule. The variable will have the value of the expression that follows the colon. E.g.:

labeled_expr <- value:[a-z]+ "a suffix" {@value}

If this sequence matches, the rule returns only the [a-z]+ part instead of ["thevalue", "a suffix"]

And and not expressions

An expression prefixed with the exclamation point ! is the "not" predicate expression: it is considered a match if the following expression is not a match, but it does not consume any input.

An expression prefixed with the ampersand & is the "and" predicate expression: it is considered a match if the following expression is a match, but it does not consume any input.

& doesn't exist in pure PEG grammar theory, and is sugar for !!

not_expr <- "A" !"B" #  matches "A" if not followed by a "B" (does not consume "B")
and_expr <- "A" &"B" #  matches "A" if followed by a "B" (does not consume "B")

Repeating expressions

An expression followed by "*", "?" or "+" is a match if the expression occurs zero or more times ("*"), zero or one time "?" or one or more times ("+") respectively. The match is greedy, it will match as many times as possible. E.g:

zero_or_more_as <- "A"*

Literal matcher

A literal matcher tries to match the input against a single character or a string literal. The literal may be a single-quoted or double-quoted string. The same rules as Python apply regarding allowed characters and escaping.

The literal may be followed by a lowercase i (outside the ending quote) to indicate that the match is case-insensitive. E.g.:

literal_match <- "Awesome\n"i # matches "awesome" followed by a newline

Character class matcher

A character class matcher tries to match the input against a class of characters inside square brackets [...]. Inside the brackets, characters represent themselves and the same escapes as in string literals are available, except that the single- and double-quote escape is not valid, instead the closing square bracket ] must be escaped to be used.

Character ranges can be specified using the [a-z] notation. Unicode chars are not supported yet.

As for string literals, a lowercase i may follow the matcher (outside the ending square bracket) to indicate that the match is case-insensitive. A ^ as first character inside the square brackets indicates that the match is inverted (it is a match if the input does not match the character class matcher). E.g.:

not_az <- [^a-z]i

Any matcher

The any matcher is represented by the dot .. It matches any character except the end of file, thus the !. expression is used to indicate "match the end of file". E.g.:

any_char <- . # match a single character
EOF <- !.

Regex matcher

Although not in the formal definition of PEG parsers, regex may be handy (OR NOT!) and may provide substantial performance improvements. A regex expression is defined in a single- or double-quoted string prefixed by a ~.

Flags "iLmsux" as described in python re module can follow the pattern. E.g.:

re_match <- ~"https?://[\\S:@/]*"i  # DON'T TRY THIS ONE, it's just a silly example

TODO

make a tool to generate standalone modules
more tests

lisael / pony-peg