public class TibDoc {
- public static class Doc {
+ public static Text lf() { Chars ret = new Chars(); ret.text = "\n"; return ret; }
+ public static Text cr() { Chars ret = new Chars(); ret.text = "\r"; return ret; }
+ public static char urlescape(int a, int b) { return (char)(10*a+b); }
+
+
+ // Template Classes //////////////////////////////////////////////////////////////////////////////
+
+ public static abstract class Text implements ToHTML {
+ public static final Class[] subclasses = new Class[] { Chars.class, URL.class, Email.class };
+ public void toHTML(ToHTML.HTML sb) { }
+ }
+ public static class TextString extends Text {
+ public String text;
+ public String tag() { return null; }
+ public void toHTML(ToHTML.HTML sb) { sb.tag(tag(), text); }
+ }
+ public static class TextArray extends Text {
+ public Text[] t;
+ public String tag() { return null; }
+ public void toHTML(ToHTML.HTML sb) { sb.tag(tag(), t); }
+ }
+
+
+ // Structural //////////////////////////////////////////////////////////////////////////////
+
+ public static class Doc implements ToHTML {
public Header head;
public Body body;
+ public void toHTML(ToHTML.HTML sb) { sb.tag("html", body); }
+ public static class Header extends HashMap<String, Text[]> {
+ public static class kv { public String key; public Text[] val; }
+ public void attrs(kv[] kvs) { for(int i=0; i<kvs.length; i++) this.put(kvs[i].key, kvs[i].val); }
+ }
+ public static class Body implements ToHTML {
+ public Section[] sections;
+ public void toHTML(ToHTML.HTML sb) { sb.append(sections); }
+ public static class Section implements ToHTML {
+ public Text header;
+ public Paragraph[] paragraphs;
+ public void toHTML(ToHTML.HTML sb) {
+ sb.tag("h3", header);
+ sb.append(paragraphs);
+ }
+ }
+ }
}
- public static class kv { public String key; public Text[] val; }
- public static class Header {
- public void attrs(kv[] kvs) {
- for(int i=0; i<kvs.length; i++)
- System.out.println("key="+kvs[i].key+" val="+kvs[i].val);
+
+ // Tags //////////////////////////////////////////////////////////////////////////////
+
+ public static class Keyword extends TextString { public String tag() { return "tt"; } }
+ public static class Bold extends TextArray { public String tag() { return "b"; } }
+ public static class Smallcap extends TextArray { public String tag() { return "sc"; } }
+ public static class Subscript extends TextString { public String tag() { return "sub"; } }
+ public static class Superscript extends TextString { public String tag() { return "super"; } }
+ public static class Strikethrough extends TextArray { public String tag() { return "strike"; } }
+ public static class TT extends TextArray { public String tag() { return "tt"; } }
+ public static class Underline extends TextArray { public String tag() { return "u"; } }
+ public static class Citation extends TextArray { /* FIXME */ }
+ public static class Footnote extends TextArray { /* FIXME */ }
+
+ public static class Chars extends TextString { }
+ public static class Symbol extends TextString { }
+
+ public static interface Host extends ToHTML { }
+ public static class DNS implements Host {
+ public String[] part;
+ public void toHTML(ToHTML.HTML sb) {
+ sb.append("<tt>");
+ for(int i=0; i<part.length; i++)
+ sb.append((i==0 ? "" : ".")+part[i]);
+ sb.append("</tt>");
}
}
- public static class Body {
- Section[] sections;
+ public static class IP implements Host {
+ public int a, b, c, d;
+ public void toHTML(ToHTML.HTML sb) { sb.append("<tt>"+a+"."+b+"."+c+"."+d+"</tt>"); }
}
- public static class Section { }
- public static abstract class Text {
- public static final Class[] subclasses = new Class[] { Chars.class, URL.class, Email.class };
+
+ public static interface URI extends ToHTML {
+ public static final Class[] subclasses = new Class[] { URL.class, Email.class };
}
- public static class Chars extends Text { String chars; }
- public static class Symbol extends Text { String chars; }
- public static class Email extends Text { String user; Host host; }
- public static interface Host { }
- public static class DNS implements Host { String[] part; }
- public static class IP implements Host { int a, b, c, d; }
- public static class URL extends Text { String method; Host host; int port; String path; }
- public static class Italic extends Text { Text body; }
+ public static class URL extends Text implements URI {
+ public String method;
+ public Login login;
+ public Host host;
+ public int port;
+ public String path;
+ public void toHTML(ToHTML.HTML sb) {
+ sb.append(method);
+ sb.append("://");
+ // login.toHTML(sb); FIXME
+ host.toHTML(sb);
+ // sb.append(":"); FIXME
+ // sb.append(port);
+ sb.append("/");
+ sb.append(path);
+ }
+ }
+ public static class Email extends Text implements URI {
+ public String user;
+ public Host host;
+ public void toHTML(ToHTML.HTML sb) {
+ sb.append(user);
+ sb.append('@');
+ host.toHTML(sb);
+ }
+ }
+
+ public static class Login {
+ public String username;
+ public String password;
+ public void toHTML(ToHTML.HTML sb) {
+ sb.append(username);
+ sb.append(':');
+ sb.append(password);
+ sb.append('@');
+ }
+ }
+ public static class Italic extends Text {
+ public Text[] body;
+ public void toHTML(ToHTML.HTML sb) {
+ sb.append("<i>");
+ sb.append(body);
+ sb.append("</i>");
+ }
+ }
+
+ public static class LineBreak extends Text {
+ public void toHTML(ToHTML.HTML sb) {
+ sb.append("<br/>");
+ }
+ }
+ public static class Today extends Text { }
+ public static class Euro extends Text {
+ public void toHTML(ToHTML.HTML sb) {
+ sb.append("€");
+ }
+ }
+ public static class Link extends Text {
+ public static final Class[] subclasses = new Class[] { LinkWord.class, LinkText.class };
+ public static class LinkWord extends Link {
+ public String word;
+ public URI href;
+ public void toHTML(ToHTML.HTML sb) {
+ sb.append("<a href='");
+ href.toHTML(sb);
+ sb.append("'>");
+ sb.append(word);
+ sb.append("</a>");
+ }
+ }
+ public static class LinkText extends Link {
+ public Text[] text;
+ public URI href;
+ public void toHTML(ToHTML.HTML sb) {
+ sb.append("<a href='");
+ href.toHTML(sb);
+ sb.append("'>");
+ sb.append(text);
+ sb.append("</a>");
+ }
+ }
+ }
+
+
+ // Paragraph //////////////////////////////////////////////////////////////////////////////
+
+ public static interface Paragraph extends ToHTML {
+ public static final Class[] subclasses = new Class[] { Blockquote.class, P.class, HR.class };
+ public static class HR implements Paragraph {
+ public void toHTML(ToHTML.HTML sb) { sb.append("\n<hr>\n"); }
+ }
+ public static class P extends TextArray implements Paragraph {
+ public void toHTML(ToHTML.HTML sb) {
+ sb.append("\n<p> ");
+ super.toHTML(sb);
+ sb.append(" </p>\n");
+ }
+ }
+ public static class Blockquote extends TextArray implements Paragraph {
+ public String tag() { return "blockquote"; }
+ }
+ }
+
+
+ // Lists //////////////////////////////////////////////////////////////////////////////
+
+ public static abstract class List extends Text {
+ public Text[][] points;
+ public abstract String tag();
+ public void toHTML(ToHTML.HTML sb) {
+ sb.append("<"+tag()+">\n");
+ for(Text[] t : points) {
+ sb.append(" <li> ");
+ sb.append(t);
+ sb.append(" </li>\n");
+ }
+ sb.append("</"+tag()+">\n");
+ }
+ }
+ public static class OL extends List { public String tag() { return "ol"; } }
+ public static class UL extends List { public String tag() { return "ul"; } }
+
+
+ // Main //////////////////////////////////////////////////////////////////////////////
public static void main(String[] s) throws Exception {
try {
Forest f = new CharParser(mg).parse(new Tib(new FileInputStream(s[1])));
//((Tree)new StringifyWalker().walk(f.expand1())).toPrettyString()
System.out.println();
+ System.out.println(f.expand1().toPrettyString());
+ System.out.println();
Doc doc = (Doc)new ReflectiveGrammar(TibDoc.class).build(f.expand1());
System.out.println(doc);
+ System.out.println();
+ System.out.println();
+ System.out.println();
+ System.out.println();
+ StringBuffer sb = new StringBuffer();
+ doc.toHTML(new ToHTML.HTML(sb));
+ System.out.println(sb);
/*
String st = new HTMLWalker().walk(f.expand1()).toString();
System.out.println(st);
}
}
- public static class StringifyWalker extends ReflectiveWalker {
- public Object walk(String head, Object[] children) {
- if ("stringify".equals(head)) {
- StringBuffer ret = new StringBuffer();
- for(Tree<String> t : (Tree<String>)children[0]) ret.append(t);
- return new Tree<String>(null, ret.toString());
- }
- if (children.length==0) return new Tree<String>(null, head, new Tree[0]);
- return new Tree<String>(null, head, (Tree<String>[])Reflection.lub(children));
- }
- }
-
- public static String join(String[] sa, String sep) {
- StringBuffer ret = new StringBuffer();
- boolean first = true;
- for(String s : sa) {
- if (!first) ret.append(sep);
- first = false;
- ret.append(s);
- }
- return ret.toString();
- }
-
- public static class HTMLWalker extends ReflectiveWalker {
- //public void header() { throw new Error(); }
- public String li(Object o) { return "<li>"+o+"</li>"; }
- public String li(Object a, Object o) { return "<li>"+o+"</li>"; }
- public String ul(String[] li) { return "<ul>"+join(li,"")+"</ul>"; }
- public String ol(String[] li) { return "<ol>"+join(li,"")+"</ol>"; }
- public String hr() { return "\n<hr/>\n"; }
- public String br() { return "\n<br/>\n"; }
- public String it(Object o) { return "<i>"+o+"</i>"; }
- public String tt(Object o) { return "<tt>"+o+"</tt>"; }
- public String underline(Object o) { return "<ul>"+o+"</ul>"; }
- public String p(Object o) { return "<p>"+o+"</p>"; }
- public String smallcap(Object o) { return "<span style='font-variant: small-caps'>"+o+"</span>"; }
- public String blockquote(Object o) { return "<blockquote>"+o+"</blockquote>"; }
- public String superscript(Object o) { return "<sup>"+o+"</sup>"; }
- public String subscript(Object o) { return "<sub>"+o+"</sub>"; }
- public String bold(Object o) { return "<b>"+o+"</b>"; }
- public String strikethrough(Object o) { throw new Error();/*return "<b>"+o+"</b>";*/ }
- public Object top(Object o) { return "<html><body>"+o+"</body></html>"; }
- public Object doc(Object header, Object body) { return body; }
- public String text(Object[] body) {
- StringBuffer ret = new StringBuffer();
- for(Object o : body) { ret.append(o); ret.append(" "); }
- return ret.toString();
- }
- public String body(String[] sections) { return join(sections, "\n\n"); }
- public String domain(String[] parts) { return join(parts, "."); }
- public String ip(String[] parts) { return join(parts, "."); }
- public String emailaddr(String user, String host) {
- return link(user+"@"+host, "mailto:"+user+"@"+host);
- }
- //public String url(String method) {
- public String link(Object text, Object target) {
- return "<a href='"+target+"'>"+text+"</a>";
- }
- public String section(Object header, Object[] body) {
- StringBuffer ret = new StringBuffer();
- ret.append(header);
- ret.append(" ");
- for(Object o : body) ret.append(o);
- return ret.toString();
- }
- private String escapify(Object o) {
- String s = o==null ? "" : o.toString();
- StringBuffer sb = new StringBuffer();
- for(int i=0; i<s.length(); i++) {
- switch(s.charAt(i)) {
- case '&': sb.append("&"); break;
- case '<': sb.append("<"); break;
- case '>': sb.append(">"); break;
- case '\'': sb.append("'"); break;
- case '\"': sb.append("""); break;
- default: sb.append(s.charAt(i)); break;
- }
- }
- return sb.toString();
- }
- private Tree<String> lone(String s) {
- return new Tree<String>(null, s, new Tree[0]);
- }
- public Object walk(Tree<String> t) {
- String head = t.head();
- if ("stringify".equals(head)) {
- StringBuffer ret = new StringBuffer();
- for(Tree<String> child : t.child(0)) ret.append(child);
- return ret.toString();
- }
- return super.walk(t);
- }
- protected Object defaultWalk(String head, Object[] children) {
- Tree<String>[] kids = new Tree[children.length];
- for(int i=0; i<children.length; i++) {
- if (children[i]==null) kids[i]=null;
- else if (children[i] instanceof String) kids[i] = lone(escapify((String)children[i]));
- else if (children[i] instanceof Tree) kids[i] = (Tree<String>)children[i];
- else kids[i] = lone(children[i].toString());
- }
- return new Tree<String>(null, head, kids);
- }
- }
/*
public static enum Style { H, UL, TT, SO, IT, Q, B, PRE, LIST, EMDASH; }
Doc = Doc:: head:{Header} body:Body /ws
Header = Header:: "header" attrs:{ kv */ ws } /ws
-Body = sections:Section*/ws
-Section = { section:: SectionHeader Paragraph* /ws }
+Body = Body:: sections:(Section*/ws)
+Section = { Section:: header:SectionHeader paragraphs:Paragraph* /ws }
SectionHeader = "==" SectionHeaderBody "=="
SectionHeaderBody = "=" SectionHeaderBody "="
- > !ws text !ws
+ > !ws (Chars:: text:alphanum++) !ws
sp = " "**
blank = !sp "\n" !sp "\n" !ws
+
kv = kv:: key:word "=" val:text /ws
wp = w++
num = [0-9]++
-Paragraph = blockquote:: { "\"\"" !ws text }
- > hr:: { "---" "-"* }
- > p:: { text }
+Paragraph = Blockquote:: { "\"\" " text }
+ > HR:: { "---" "-"* }
+ > { P:: t:text }
onums = nums !(". "|") ")
any = ~[]*
-uli = li:: "* " (!ws text &~ any (oli|uli))
-oli = li:: ("# "|onums) (!ws text &~ any (oli|uli))
+uli = "* " (!ws text &~ any (oli|uli))
+oli = !("# "|onums) (!ws text &~ any (oli|uli))
text = Item
Itemx = !ws Item
| ()
Item = blockquote
- > "[]":: { ul:: uli+/ws } Itemx
- | "[]":: { ol:: oli+/ws } Itemx
+ > "[]":: { UL:: uli+/ws } Itemx
+ | "[]":: { OL:: oli+/ws } Itemx
> "[]":: pre Itemx
> "[]":: link Itemx
> "[]":: structured Itemx
> "[]":: styled Itemx
- > "[]":: (Chars:: alphanum++) Itemx
- > "[]":: qtext Itemx
+ > "[]":: (Chars:: text:alphanum++) Itemx
+ > "[]":: "\"" text "\"" Itemx
> "[]":: symbol Itemx
> "[]":: (Symbol:: sym++) Itemx
> "[]":: Paragraph Itemx
-blockquote = blockquote:: "\"\"" text "\"\""
- | blockquote:: "\"\"" block
+blockquote = Blockquote:: "\"\"" text "\"\""
+ | Blockquote:: "\"\"" block
-qtext = quoted:: "\"" text "\""
-pre = verbatim:: "[verbatim]" { ~[]+ } /ws // FIXME doesn't work
-
-styled = underline:: "__" text "__"
- | footnote:: "((" text "))"
- | tt:: "[[" text "]]"
- | citation:: "[" word "]"
- | strikethrough:: "!!" text "!!"
- | superscript:: "^^" (word|block)
- | subscript:: ",," (word|block)
- | smallcap:: "\\sc" block
- | bold:: "++" text "++"
- | keyword:: "!" (word|block)
+pre = Verbatim:: "[verbatim]" { ~[]+ } /ws // FIXME doesn't work
+
+styled = Underline:: "__" text "__"
+ | Footnote:: "((" text "))"
+ | TT:: "[[" text "]]"
+ | Citation:: "[" word "]"
+ | Strikethrough:: "!!" text "!!"
+ | Superscript:: "^^" (word|block)
+ | Subscript:: ",," (word|block)
+ | Smallcap:: "\\sc" block
+ | Bold:: "++" text "++"
+ | Keyword:: "!" (word|block)
| Italic:: "**" text "**"
block = { text }
-link = link:: text:({ text }) "->" href:(url|email)
- > link:: text:alphanum++ !ws "->" href:(url|email)
+link = Link:: text:({ text }) "->" href:(url|email)
+ > Link:: text:alphanum++ !ws "->" href:(url|email)
structured = command & "\\" [a-zA-Z0-9]++ block?
> glyph
> email
> url
-glyph = euro:: "(e)" | "(r)" | "(c)" | "(tm)" | "--" | "..."
+glyph = Euro:: "(e)" | "(r)" | "(c)" | "(tm)" | "--" | "..."
-command = today:: "\\today"
- | bre:: "\\br"
+command = Today:: "\\today"
+ | LineBreak:: "\\br"
// URLs //////////////////////////////////////////////////////////////////////////////
urlc = [a-zA-Z0-9;/?:&=$\-_.+@]
urlv = urlc | [%]
urlchar = urlc
- | "%":: "%" [0-9] [0-9]
+ | urlescape:: "%" [0-9] [0-9]
url = "mailto" ":" email -> ~urlv
- > method:method "://" url_login? host:host port:(":" nums)? path:("/" urlpath)? -> ~urlv
-url_login = login:: username (":" password) "@"
+ > URL:: method:method "://" login:url_login? host:host port:(":" nums)? path:("/" urlpath)? -> ~urlv
+url_login = Login:: username:username password:(":" password) "@"
method = [+\-.a-z0-9]+
domain = (part +/ ".") -> ~"."
part = [a-zA-Z0-9\-]++
// interesting use of boolean grammars
// &~ ([\-0-9] ~[]* | ~[]* [\-0-9])
-email = user:username "@" host:host -> ~[.]
+email = Email:: user:username "@" host:host -> ~[.]
nums = [0-9]++
host = IP:: nums "." nums "." nums "." nums
| DNS:: domain
quoted = "\"" ((~[\"\\] | escaped)+) "\""
| "":: "\"\""
-escaped = "\n":: "\\n"
- | "\r":: "\\r"
+escaped = lf:: "\\n"
+ | cr:: "\\r"
| "\\" ~[nr]