- public static class TargetConstructor extends Target {
- public final Constructor _ctor;
- public TargetConstructor(Constructor _ctor) { super(Reflection.Bindable.create(_ctor)); this._ctor = _ctor; }
- public String getName() { return _ctor.getName(); }
- public tag getTag() { return (tag)_ctor.getAnnotation(tag.class); }
- public nonterminal getNonTerminal() { return (nonterminal)_ctor.getAnnotation(nonterminal.class); }
- public String toString() { return _ctor.getName(); }
- public int[] buildSequence(Production p) {
- Annotation[][] annotations = _ctor.getParameterAnnotations();
- int len = annotations.length;
- int ofs = 0;
- String name = _ctor.getDeclaringClass().getName();
- /*
- if (name.indexOf('$') > name.lastIndexOf('.')) {
- len--;
- ofs++;
- }
- */
- String[] names = new String[len];
- arg[] argtags = new arg[len];
- for(int i=0; i<names.length; i++)
- for(Annotation a : annotations[i+ofs])
- if (a instanceof arg)
- argtags[i+ofs] = (arg)a;
- return buildSequence(p, names, argtags);
- }
- public Object plant(Object[] fields) {
- return Reflection.impose(_ctor, fields);
- }
- }
- public static class TargetMethod extends Target {
- public final Method _method;
- public TargetMethod(Method _method) { super(Reflection.Bindable.create(_method)); this._method = _method; }
- public String getName() { return _method.getName(); }
- public String toString() { return _method.getName(); }
- public tag getTag() { return (tag)_method.getAnnotation(tag.class); }
- public nonterminal getNonTerminal() { return (nonterminal)_method.getAnnotation(nonterminal.class); }
- public int[] buildSequence(Production p) {
- Annotation[][] annotations = _method.getParameterAnnotations();
- String[] names = new String[annotations.length];
- arg[] argtags = new arg[annotations.length];
- for(int i=0; i<names.length; i++)
- for(Annotation a : annotations[i])
- if (a instanceof arg)
- argtags[i] = (arg)a;
- int[] ret = buildSequence(p, names, argtags);
- return ret;
- }
- public boolean isRaw() { return _method.isAnnotationPresent(raw.class); }
- public Object invokeRaw(Iterable<Tree<Object>> t) {
- return Reflection.impose(_method, new Object[] { t });
- }
- public Object plant(Object[] fields) {
- return Reflection.impose(_method, fields);
- }
-
- }
-
- public static Union cached = null;
- public static Union make() {
- if (cached != null) return cached;
- try {
- ReflectiveMeta m = new ReflectiveMeta();
- Tree<String> res = new CharParser(MetaGrammar.make()).parse(new FileInputStream("tests/meta.g")).expand1();
- MetaGrammar.Meta.MetaGrammarFile mgf = m.new MetaGrammarFile(res);
- MetaGrammar.BuildContext bc = new MetaGrammar.BuildContext(mgf);
- Union meta = mgf.get("s").build(bc);
- Tree t = new CharParser(meta).parse(new FileInputStream("tests/meta.g")).expand1();
- return cached = make(t, "s");
- } catch (Exception e) {
- throw new RuntimeException(e);
- }
- }
- public static Union make(Tree t, String s) { return make(t, s, new ReflectiveMeta()); }
- public static Union make(Tree t, String s, ReflectiveMeta rm) {
- Tree.TreeFunctor<Object,Object> red = (Tree.TreeFunctor<Object,Object>)t.head();
- MG.Grammar g = (MG.Grammar)red.invoke(t.children());
- Context cx = new Context(g,rm);
- Union u = null;
- for(MG.NonTerminal nt : g.nonterminals) {
- System.out.println(nt.name);
- Union el = (Union)cx.get(nt.name);
- StringBuffer st = new StringBuffer();
- el.toString(st);
- System.err.println(st);
- if (nt.name.equals(s)) u = el;
- }
- return u;
- }
-
- public static class MG {
- public static @tag("grammar") class Grammar {
- public NonTerminal get(String s) {
- for(NonTerminal nt : nonterminals)
- if (nt.name.equals(s))
- return nt;
- return null;
- }
- public @arg("NonTerminal") NonTerminal[] nonterminals;
- public String toString() {
- String ret = "[ ";
- for(NonTerminal nt : nonterminals) ret += nt + ", ";
- return ret + " ]";
- }
- }
- public abstract static class Un extends El {
- public Seq[][] sequences;
- public void build(Context cx, Union u) {
- HashSet<Sequence> bad2 = new HashSet<Sequence>();
- for(int i=0; i<sequences.length; i++) {
- Seq[] group = sequences[i];
- Union u2 = new Union();
- if (sequences.length==1) u2 = u;
- for(int j=0; j<group.length; j++) {
- group[j].build(cx, u2, false);
- }
- if (sequences.length==1) break;
- Sequence seq = Sequence.singleton(u2);
- for(Sequence s : bad2) {
- s.lame = true;
- seq = seq.not(s);
- }
- u.add(seq);
- bad2.add(Sequence.singleton(u2));
- }
- }
- }
- public static class NonTerminal extends Un {
- public String name = null;
- public @nonterminal("NonTerminal") NonTerminal(@arg("Word") String name,
- @arg("RHS") Seq[][] sequences) {
- this.name = name;
- this.sequences = sequences;
- }
- public Element build(Context cx) { return cx.get(name); }
- }
-
- public static class AnonUn extends Un {
- public @tag("(") AnonUn(Seq[][] sequences) {
- this.sequences = sequences;
- }
- public Element build(Context cx) {
- Union ret = new Union();
- build(cx, ret);
- return ret;
- }
- }
-
- //public static @tag void range(char c) { }
- public static class Range {
- public @tag("range") Range(char only) { first = only; last = only; }
- public @tag("-") Range(char first, char last) { this.first = first; this.last = last; }
- public char first;
- public char last;
- }
- public static abstract class El {
- public String getLabel() { return null; }
- public String getOwnerTag() { return null; }
- public boolean drop() { return false; }
- public abstract Element build(Context cx);
- }
- public static class Drop extends El {
- public El e;
- public Drop(El e) { this.e = e; }
- public String getLabel() { return null; }
- public boolean drop() { return true; }
- public String getOwnerTag() { return e.getOwnerTag(); }
- public Element build(Context cx) { return e.build(cx); }
- }
- public static class Label extends El {
- public String label;
- public El e;
- public Label(String label, El e) { this.e = e; this.label = label; }
- public String getLabel() { return label; }
- public String getOwnerTag() { return e.getOwnerTag(); }
- public Element build(Context cx) { return e.build(cx); }
- }
- public static /*abstract*/ class Seq {
- HashSet<Seq> and = new HashSet<Seq>();
- HashSet<Seq> not = new HashSet<Seq>();
- El[] elements;
- El follow;
- String tag = null;
- boolean lame;
- public Seq(El e) { this(new El[] { e }); }
- public Seq(El[] elements) { this.elements = elements; }
- public Seq tag(String tag) { this.tag = tag; return this; }
- public Seq follow(El follow) { this.follow = follow; return this; }
- public Seq dup() {
- Seq ret = new Seq(elements);
- ret.and.addAll(and);
- ret.not.addAll(not);
- ret.follow = follow;
- ret.tag = tag;
- return ret;
- }
- public Seq and(Seq s) { and.add(s); s.lame = true; return this; }
- public Seq andnot(Seq s) { not.add(s); s.lame = true; return this; }
- public Seq separate(El sep) {
- El[] elements = new El[this.elements.length * 2 - 1];
- for(int i=0; i<this.elements.length; i++) {
- elements[i*2] = this.elements[i];
- if (i<this.elements.length-1)
- elements[i*2+1] = new Drop(sep);
- }
- this.elements = elements;
- return this;
- }
- public Sequence build(Context cx, Union u, boolean lame) {
- Sequence ret = build0(cx, lame || this.lame);
- for(Seq s : and) { Sequence dork = s.build(cx, u, true); ret = ret.and(dork); }
- for(Seq s : not) { Sequence dork = s.build(cx, u, true); ret = ret.not(dork); }
- u.add(ret);
- ret.lame = lame;
- return ret;
- }
- public Sequence build0(Context cx, boolean lame) {
- boolean unwrap = false;
- boolean dropAll = lame;
- if (tag!=null && tag.equals("[]")) unwrap = true;
- if (tag!=null && "()".equals(tag)) dropAll = true;
- Object[] labels = new Object[elements.length];
- boolean[] drops = new boolean[elements.length];
- Element[] els = new Element[elements.length];
- for(int i=0; i<elements.length; i++) {
- labels[i] = elements[i].getLabel();
- drops[i] = elements[i].drop();
- els[i] = elements[i].build(cx);
- if (elements[i].getOwnerTag() != null)
- tag = elements[i].getOwnerTag();
- }
- Sequence ret = null;
- if (dropAll) ret = Sequence.drop(els, false);
- else if (unwrap) ret = Sequence.unwrap(els, cx.rm.repeatTag(), drops);
- else if (tag!=null) {
- ret = cx.rm.resolveTag(tag, cx.cnt, els, labels, drops);
- } else {
- int idx = -1;
- for(int i=0; i<els.length; i++)
- if (!drops[i])
- if (idx==-1) idx = i;
- else throw new Error("multiple non-dropped elements in sequence: " + Sequence.drop(els,false));
- if (idx != -1) ret = Sequence.singleton(els, idx);
- else ret = Sequence.drop(els, false);
- }
- if (this.follow != null)
- ret.follow = MetaGrammar.infer(this.follow.build(cx));
- ret.lame = this.lame;
- return ret;
- }
- }
- public static @tag("&") Seq and(Seq s, El[] elements) { return s.and(seq(elements)); }
- public static @tag("&~") Seq andnot(Seq s, El[] elements) { return s.andnot(seq(elements)); }
- public static @tag("->") Seq arrow(Seq s, El e) { return s.follow(e); }
- public static @tag("::") Seq tag(String tagname, Seq s) { return s.tag(tagname); }
- public static @tag("/") Seq slash(Seq s, El e) { return s.separate(e); }
-
- public static @tag("ps") Seq seq(El[] elements) { return new Seq(elements); }
- public static @tag Seq psx(Seq s) { return s; }
- public static @tag(":") El colon(String s, El e) { return new Label(s, e); }
- public static @tag(")") void close(String foo) { throw new Error("not supported"); }
- public static @tag("()") El epsilon() { return new Constant(Union.epsilon); }
-
- public static @tag("nonTerminal") class NonTerminalReference extends El {
- public @arg String nonTerminal;
- public Element build(Context cx) {
- return cx.get(nonTerminal);
- }
- }
-
- public static class StringLiteral extends Constant {
- public @tag("literal") StringLiteral(String string) { super(CharRange.string(string)); }
- public boolean drop() { return true; }
- }
-
- public static class CharClass extends El {
- Range[] ranges;
- public @tag("[") CharClass(Range[] ranges) { this.ranges = ranges; }
- public Element build(Context cx) {
- edu.berkeley.sbp.util.Range.Set set = new edu.berkeley.sbp.util.Range.Set();
- for(Range r : ranges)
- set.add(r.first, r.last);
- return CharRange.set(set);
- }
- }
-
- public static @tag("{") class XTree extends El {
- public @arg Seq body;
- public Element build(Context cx) {
- throw new Error();
- }
- }
-
- public static class Rep extends El {
- public El e, sep;
- public boolean zero, many, max;
- public Rep(El e, El sep, boolean zero, boolean many, boolean max) {
- this.e = e; this.sep = sep; this.zero = zero; this.many = many; this.max = max;}
- public Element build(Context cx) {
- return (!max)
- ? Sequence.repeat(e.build(cx), zero, many, sep==null ? null : sep.build(cx), cx.rm.repeatTag())
- : sep==null
- ? Sequence.repeatMaximal(MetaGrammar.infer(e.build(cx)), zero, many, cx.rm.repeatTag())
- : Sequence.repeatMaximal(e.build(cx), zero, many, MetaGrammar.infer(sep.build(cx)), cx.rm.repeatTag());
- }
- }
- public static class Constant extends El {
- Element constant;
- public Constant(Element constant) { this.constant = constant; }
- public Element build(Context cx) { return constant; }
- }
- public abstract static class PostProcess extends El {
- El e;
- public PostProcess(El e) { this.e = e; }
- public Element build(Context cx) { return postProcess(e.build(cx)); }
- public abstract Element postProcess(Element e);
- }
-
- // FIXME: it would be nice if we could hoist this into "Rep"
- public static @tag("++") El plusmax(final El e) { return new Rep(e, null, false, true, true); }
- public static @tag("+") El plus(final El e) { return new Rep(e, null, false, true, false); }
- public static @tag("++/") El plusmaxfollow(final El e, final El sep) { return new Rep(e, sep, false, true, true); }
- public static @tag("+/") El plusfollow(final El e, final El sep) { return new Rep(e, sep, false, true, false); }
- public static @tag("**") El starmax(final El e) { return new Rep(e, null, true, true, true); }
- public static @tag("*") El star(final El e) { return new Rep(e, null, true, true, false); }
- public static @tag("**/") El starmaxfollow(final El e, final El sep) { return new Rep(e, sep, true, true, true); }
- public static @tag("*/") El starfollow(final El e, final El sep) { return new Rep(e, sep, true, true, false); }
- public static @tag("?") El question(final El e) { return new Rep(e, null, true, true, false); }
-
- public static @tag("!") El bang(final El e) { return new Drop(e); }
-
- public static @tag("^") El caret(final String s) {
- return new Drop(new Constant(CharRange.string(s)) {
- public String getOwnerTag() { return s; }
- });
- }
-
- public static @tag("~") El tilde(final El e) {
- return new PostProcess(e) {
- public Element postProcess(Element e) {
- return MetaGrammar.infer((Topology<Character>)Atom.toAtom(e).complement());
- } }; }
-
- public static @tag("^^") void doublecaret(final El e) { throw new Error("not implemented"); }