schizm 0.0.1

data/lib/schizm/parse.rb

@@ -0,0 +1,398 @@
+require_relative 'chunk'
+require_relative 'match'
+require_relative 'markup'
+require_relative 'string'
+require 'strscan'
+require 'uri'
+
+module Schizm
+
+  module Parse
+
+    CPP_HIGHLIGHT = [
+      ["hi-comment", /\/\/.*$/u],
+      ["hi-comment", /\/\*.*?\*\//um],
+      ["hi-preproc", /\#(?:ifn?def|endif|if|else|elif|define|pragma|include)\b.*?(?<=[^\\])(?:\n|\z)/um],
+      ["hi-type", /(?:auto|bool|char|short|long|int|(?:un)?signed|float|double|void)\b/u],
+      ["hi-type", /(?:size|ptrdiff|char(?:16|32)|wchar|u?int(?:_least|_fast)?(?:8|16|32|64))_t\b/u],
+      ["hi-type-spec", /(?:constexpr|const|volatile|static|mutable|thread_local|register|extern|inline|noexcept)\b/u],
+      ["hi-flow", /(?:new|delete|do|while|for|if|else|try|throw|catch|switch|case|default|break|continue|goto|return)\b/u],
+      ["hi-op", /(?:(?:and|or|xor|not)(?:_eq)?|bitand|bitor|compl|(?:(?:const|dynamic|static|reinterpret)_cast))\b/u],
+      ["hi-value", /(?:true|false|this|nullptr|NULL)\b/u],
+      ["hi-value", /'[^'\\]*(?:\\.[^'\\]*)*'/u], # Single quote
+      ["hi-value", /"[^"\\]*(?:\\.[^"\\]*)*"/u], # Double quote
+      ["hi-other", /(?:alignas|alignof|sizeof|decltype|template|typename|typedef|using|concept|requires|operator)\b/u],
+      ["hi-other", /(?:namespace|class|struct|enum|public|protected|private|friend|final|virtual|override)\b/u],
+      ["hi-ident", /\p{Word}+/u],
+      [nil, /[^\p{Word}\p{Space}]+/um]
+    ]
+
+    # Markup hash.
+    @@hash =
+      Hash.new do |hash, where|
+      hash[where] = Markup.new
+      end
+
+    # Markup hash accessor.
+    def self.hash
+      return @@hash
+    end
+
+    # Link hash.
+    @@links =
+      Hash.new do |hash, where|
+      hash[where] =
+        Hash.new do |hash, entry|
+        hash[entry] = Hash.new
+        end
+      end
+
+    # Link hash accessor.
+    def self.links
+      return @@links
+    end
+
+    # Hash attribute reference.
+    class HashAttr
+      def initialize hash, attr
+        @hash = hash
+        @attr = attr
+      end
+      def to_s
+        return @hash[@attr].to_s
+      end
+    end
+
+    class ChunkRef
+      def initialize where, label
+        @where = where
+        @label = label
+      end
+      def to_s
+        Chunk.each do |chunk|
+          if chunk.label == @label and
+            (chunk.where == @where or chunk.share?)
+            return Env.path_href(@where) + '#' + chunk.id(1)
+          end
+        end
+        return ""
+      end
+    end
+
+    class BlockRef
+      def initialize chunk, index
+        @chunk = chunk
+        @index = index
+      end
+      def to_s
+        return "" if @index < 1
+        return "" if @index > @chunk.blocks.size
+        Env.path_href(@chunk.where) + '#' + @chunk.id(@index)
+      end
+    end
+
+    def self.line_elems where, input
+      elems = Markup.new
+      sscan = StringScanner.new input.strip
+      until sscan.eos?
+        elems.add_elems(
+        case
+        when (sscan.skip SPACE) then " "
+        when (sscan.skip HTML_ENTITY) then sscan[0]
+        when (sscan.skip HTML_ESCAPE) then sscan[0].codepoints[0]
+        when (sscan.skip CHAR_ESCAPE) then sscan[0].codepoints[0]
+        when (sscan.skip LINK_REF)
+          shown = String.new(sscan[1]).unescape(']')
+          param = String.new(sscan[2]).unescape(')')
+          param = LINK_PARAMS.match(param)
+          if (param[2] =~ URI::regexp)
+            attrs = {"href" => param[2],
+                    "title" => param[1]}
+          else
+            entry = param[2]
+            attrs = {"href" => HashAttr.new(@@links[where][entry], "href"),
+                    "title" => HashAttr.new(@@links[where][entry], "title")}
+          end
+          attrs["target"] = "_blank"
+          Markup.new("a")
+          .add_attrs(attrs)
+          .add_elems(line_elems(where, shown))
+        when (sscan.skip CENTER_MATH)
+          Markup.new("script")
+          .add_attrs(CENTER_MATH_ATTRS)
+          .add_elems(String.new(sscan[1]).slim)
+        when (sscan.skip INLINE_MATH)
+          Markup.new("script")
+          .add_attrs(INLINE_MATH_ATTRS)
+          .add_elems(String.new(sscan[1]).slim)
+        when (sscan.skip INLINE_EMPH)
+          depth = sscan[1].size
+          inner = line_elems(where, sscan[2])
+          case
+          when depth <= 1
+            Markup.new("em").add_elems(inner)
+          when depth == 2
+            Markup.new("strong").add_elems(inner)
+          when depth >= 3
+            Markup.new("strong").add_elems(Markup.new("em").add_elems(inner))
+          end
+        when sscan.skip(INLINE_CODE)
+          Markup.new("code")
+          .add_elems(String.new(sscan[1]).unescape("`").html)
+        when sscan.skip(INLINE_SUP)
+          Markup.new("sup").add_elems(line_elems(where, sscan[1]))
+        when sscan.skip(INLINE_SUB)
+          Markup.new("sub").add_elems(line_elems(where, sscan[1]))
+        when (sscan.skip INLINE_INS)
+          Markup.new("ins").add_elems(line_elems(where, sscan[1]))
+        when (sscan.skip INLINE_DEL)
+          Markup.new("del").add_elems(line_elems(where, sscan[1]))
+        when sscan.skip(/\w+|\S/)
+          sscan[0]
+        end)
+      end
+      return elems
+    end
+
+    def self.page_elems where, input
+      elems = Markup.new
+      sscan = StringScanner.new(
+              String.new(input)
+                    .expand_tab(4).trim_blank
+                    .concat("\n"))
+      until sscan.eos?
+        elems.add_elems(
+        case
+        when (sscan.skip EMPTY_LINE) then nil
+        when (sscan.skip EOB_MARKER) then nil
+        when (sscan.skip HRULE)
+          Markup.new "hr"
+        when (sscan.skip HEADING_ATX)
+          type = String.new sscan[1]
+          text = String.new sscan[2]
+          slug = text.slugify
+          Markup.new(
+            case type.size
+            when 1 then "h1"
+            when 2 then "h2"
+            when 3 then "h3"
+            when 4 then "h4"
+            when 5 then "h5"
+            when 6 then "h6"
+            end).add_attrs("id" => slug)
+                .add_elems(line_elems(where, text))
+        when (sscan.skip HEADING_SETEXT)
+          type = String.new sscan[2]
+          text = String.new sscan[1]
+          slug = text.slugify
+          Markup.new(
+            case type[0]
+            when "=" then "h1"
+            when "-" then "h2"
+            end).add_attrs("id" => slug)
+                .add_attrs("class" => "title")
+                .add_elems(line_elems(where, text))
+        when (sscan.skip LINK_DEF)
+          entry = String.new(sscan[1]).unescape(")")
+          param = String.new(sscan[2])#.unescape("]")
+          match = LINK_PARAMS.match param
+          @@links[where][entry]["href"] = match[2]
+          @@links[where][entry]["title"] = match[1]
+          nil
+        when (sscan.skip /^#{CHUNK_LABEL}/u)
+          div = nil
+          chunk = Chunk.hash[where][String.new(sscan[1]).unescape("]")]
+          case
+          when (sscan.skip /[ ]*->[ ]*(.*?)\n/u)
+            chunk.target = sscan[1].strip
+          when (sscan.skip /[ ]*::[ ]*(.*?)\n/u)
+            case sscan[1].strip
+            when "Share" then chunk.share = true
+            when "Local" then chunk.share = false
+            else raise "Unknown attribute."
+            end
+          when (sscan.skip /[ ]*\#=[ ]*(.*?)\n/u)
+            sscan[1].split(' ').each_with_index do |param, index|
+              chunk.params[param][:index] = index
+            end
+          when (sscan.skip /[ ]*\+=[ ]*(?:#{CHUNK_BLOCK})?\n/u)
+            label = sscan[1]
+            block = sscan.scan_until(END_INDENT)
+            block = String.new(block).erase(INDENT).trim
+            label = String.new(label).unescape(")") if label
+            chunk.push block, label
+            div =
+            Markup.new("div")
+            .add_attrs("id" => chunk.id)
+            .add_attrs("class" => "panel")
+            .add_elems([
+              Markup.new("div")
+              .add_attrs("class" => "panel-head")
+              .add_elems([
+                Markup.new("div")
+                .add_attrs("style" => "float: left; width: 75%;")
+                .add_elems([
+                  Markup.new("div")
+                  .add_attrs("class" => "the-chunk")
+                  .add_elems(line_elems(where, chunk.label)),
+                  case
+                  when label
+                    Markup.new("div")
+                    .add_attrs("class" => "the-block")
+                    .add_elems(line_elems(where, label))
+                  else nil
+                  end
+                ]),
+                Markup.new("div")
+                .add_attrs("style" => "float: right;")
+                .add_elems([
+                  Markup.new("a").add_attrs("class" => "panel-link", "href" => BlockRef.new(chunk, chunk.blocks.size - 1)).add_elems(Markup.new("span").add_attrs("class" => "genericons-neue genericons-neue-previous")),
+                  Markup.new("a").add_attrs("class" => "panel-link", "href" => BlockRef.new(chunk, chunk.blocks.size + 1)).add_elems(Markup.new("span").add_attrs("class" => "genericons-neue genericons-neue-next")),
+                ]),
+                Markup.new("div").add_attrs("style" => "clear: both;")
+              ]),
+              Markup.new("div")
+              .add_attrs("class" => "panel-body")
+              .add_elems(Markup.new("pre").add_elems(highlight(where, block, CPP_HIGHLIGHT)))
+            ])
+          end
+          div
+        when (sscan.skip ENTER_ASIDE)
+          text = sscan.scan_until END_INDENT
+          text = String.new(text).erase INDENT
+          Markup.new("div")
+          .add_attrs("class" => "aside")
+          .add_elems([
+            Markup.new("div")
+            .add_attrs("class" => "icon-holder")
+            .add_elems(
+              Markup.new("span")
+              .add_attrs("class" => "genericons-neue genericons-neue-info")),
+            page_elems(where, text)
+          ])
+        when (sscan.skip ENTER_ALERT)
+          text = sscan.scan_until END_INDENT
+          text = String.new(text).erase INDENT
+          Markup.new("div")
+          .add_attrs("class" => "alert")
+          .add_elems([
+            Markup.new("div")
+            .add_attrs("class" => "icon-holder")
+            .add_elems(
+              Markup.new("span")
+              .add_attrs("class" => "genericons-neue genericons-neue-notice")),
+            page_elems(where, text)
+          ])
+        when (sscan.skip ENTER_BUG)
+          text = sscan.scan_until END_INDENT
+          text = String.new(text).erase INDENT
+          Markup.new("div")
+          .add_attrs("class" => "alert")
+          .add_elems([
+            Markup.new("div")
+            .add_attrs("class" => "icon-holder")
+            .add_elems(
+              Markup.new("span")
+              .add_attrs("class" => "genericons-neue genericons-neue-bug")),
+            page_elems(where, text)
+          ])
+        when (sscan.skip ENTER_QUOTE)
+          text = sscan.scan_until END_INDENT
+          text = String.new(text).erase INDENT
+          Markup.new("blockquote")
+                .add_elems(page_elems(where, text))
+        when (sscan.match? ENTER_OLIST)
+          list = Markup.new "ol"
+          while sscan.skip ENTER_OLIST
+            text = sscan.scan_until END_INDENT
+            text = String.new(text).erase INDENT
+            item = Markup.new "li"
+            item.add_elems page_elems(where, text)
+            list.add_elems item
+            sscan.skip EMPTY_LINES
+          end
+          list
+        when (sscan.match? ENTER_ULIST)
+          list = Markup.new "ul"
+          while sscan.skip ENTER_ULIST
+            text = sscan.scan_until END_INDENT
+            text = String.new(text).erase INDENT
+            item = Markup.new "li"
+            item.add_elems page_elems(where, text)
+            list.add_elems item
+            sscan.skip EMPTY_LINES
+          end
+          list
+        when (sscan.match? ENTER_TLIST)
+          list = Markup.new "ul"
+          list.add_attrs("class" => "tl")
+          while sscan.skip ENTER_TLIST
+            type = sscan[1]
+            text = sscan.scan_until END_INDENT
+            text = String.new(text).erase INDENT
+            item = Markup.new "li"
+            item.add_attrs("class" =>
+                case
+                when (type[0] == " ") then "li-todo"
+                when (type[0] != " ") then "li-done"
+                end)
+            item.add_elems page_elems(where, text)
+            list.add_elems item
+            sscan.skip EMPTY_LINES
+          end
+          list
+        when sscan.match?(ENTER_CODE)
+          text = sscan.scan_until END_INDENT
+          text = String.new(text).erase INDENT
+          Markup.new("pre")
+          .add_elems(
+            Markup.new("code")
+            .add_elems(String.new(text).trim.html))
+        when sscan.match?(ENTER_TEXT)
+          text = sscan.scan_until END_SIMPLE
+          text = String.new(text).erase EOB_MARKER
+          Markup.new("p").add_elems(line_elems(where, text))
+        end)
+      end
+      return elems
+    end
+
+    def self.highlight where, input, table
+      elems = Markup.new
+      sscan = StringScanner.new input
+      until sscan.eos?
+        if sscan.skip /\p{Space}+/um
+          elems.add_elems(String.new(sscan[0]).html)
+          next
+        end
+        if sscan.skip CHUNK_LABEL
+          label = String.new(sscan[1]).unescape("]")
+          elems.add_elems(
+            Markup.new("a")
+            .add_attrs("class" => "chunk")
+            .add_attrs("href" => ChunkRef.new(where, label))
+            .add_elems(line_elems(where, label)))
+          next
+        end
+        table.each do |entry|
+          if sscan.skip entry[1]
+            if entry[0] == nil
+              elems.add_elems(String.new(sscan[0]).html)
+            else
+              elems.add_elems(
+                Markup.new("span")
+                .add_attrs("class" => entry[0])
+                .add_elems(String.new(sscan[0]).html))
+            end
+            break
+          end
+        end
+      end
+      return elems
+    end
+
+  end # module Parse
+
+end # module Schizm
+
+# puts Schizm::Parse.page_elems('File.zrc', $stdin.read).to_s

data/lib/schizm/string.rb

@@ -0,0 +1,161 @@
+module Schizm
+
+  # Extend the default +String+ class.
+  class String < ::String
+
+    # Erase occurances of +Regexp.union(*args)+.
+    def erase! *args
+      gsub! Regexp.union(*args), ""
+    end
+
+    # Erase occurances of +Regexp.union(*args)+.
+    def erase *args
+      gsub Regexp.union(*args), ""
+    end
+
+    # Replace sequences of +\p{^Word}+ by an underscore.
+    def wordify!
+      gsub! /\p{^Word}+/u, '_'
+    end
+
+    # Replace sequences of +\p{^Word}+ by an underscore.
+    def wordify
+      gsub /\p{^Word}+/u, '_'
+    end
+
+    # Make suitable string for slug.
+    def slugify
+      gsub(/^\p{^Word}+/u, "")
+        .gsub(/\p{^Word}+$/u, "")
+        .gsub(/\p{^Word}+/u, '-').downcase
+    end
+
+    # Make suitable string for include guard.
+    def guardify
+      strip.wordify.upcase
+    end
+
+    # Encode non-ASCII characters and '&', '<', and '>' as HTML entities.
+    def html!
+      gsub! /[&<>\p{^ASCII}]/u do |char|
+        '&#' + char.codepoints[0].to_s + ';'
+      end
+    end
+
+    # Encode non-ASCII characters and '&', '<', and '>' as HTML entities.
+    def html
+      gsub /[&<>\p{^ASCII}]/u do |char|
+        '&#' + char.codepoints[0].to_s + ';'
+      end
+    end
+
+    # Remove blanks preceding newlines.
+    def trim_blank!
+      gsub! /\p{Blank}+\n/u, "\n"
+    end
+
+    # Remove blanks preceding newlines.
+    def trim_blank
+      gsub /\p{Blank}+\n/u, "\n"
+    end
+
+    # Remove blanks preceding newlines, remove trailing
+    # spaces, remove newlines succeeding empty lines, and
+    # remove leading newlines.
+    def trim!
+      gsub! /\p{Blank}+\n/u, "\n"
+      gsub! /\p{Space}+\z/u, ""
+      gsub! /\n\n+/u, "\n\n"
+      while start_with? "\n"
+        slice! 0
+      end
+    end
+
+    # Remove blanks preceding newlines, remove trailing
+    # spaces, remove newlines succeeding empty lines, and
+    # remove leading newlines.
+    def trim
+      copy = String.new self
+      copy.trim!
+      copy
+    end
+
+    # Replace space sequences by a single ASCII space.
+    def slim!
+      gsub! /\p{Space}+/u, " "
+    end
+
+    # Replace space sequences by a single ASCII space.
+    def slim
+      gsub /\p{Space}+/u, " "
+    end
+
+    # Expand tabs, subject to tabstop +stop+.
+    def expand_tab! stop
+      gsub! /([^\t\n]*)\t/u do
+        $1 + " " * (stop - $1.size % stop)
+      end
+    end
+
+    # Expand tabs, subject to tabstop +stop+.
+    def expand_tab stop
+      gsub /([^\t\n]*)\t/u do
+        $1 + " " * (stop - $1.size % stop)
+      end
+    end
+
+    # Distance from last newline to +length+.
+    # If there's no last newline, just +length+.
+    def find_indent
+      if (offset = rindex /\n/u)
+        length - offset - 1
+      else
+        length
+      end
+    end
+
+    # Format as a C-style comment.
+    def comment
+      s = "/*"
+      each_line do |line|
+        s.concat " "
+        s.concat line
+        s.concat " *"
+      end
+      s.concat "/"
+    end
+
+    # Remove backslashes which escape characters +chars+.
+    def unescape *chars
+      s = String.new
+      prev_char_bslash = false
+      each_char do |char|
+        if prev_char_bslash
+          prev_char_bslash = false
+          unless chars.include? char
+            s.concat '\\'
+          end
+        else
+          if char == '\\'
+            prev_char_bslash = true
+            next
+          end
+        end
+        s.concat char
+      end
+      s
+    end
+
+    def truncate n
+      if size <= n
+        return String.new self
+      else
+        return String.new(self[0..n])
+            .gsub(/\p{Space}+/u, " ")
+            .gsub(/\p{Space}+\p{Graph}+\z/u, "...")
+      end
+    end
+
+ end # class String
+
+end # module Schizm

data/res/fonts/fira-code-license

@@ -0,0 +1,102 @@
+Copyright (c) 2014, Nikita Prokopov http://tonsky.me
+with Reserved Font Name Fira Code.
+
+Copyright (c) 2014, Mozilla Foundation https://mozilla.org/
+with Reserved Font Name Fira Sans.
+
+Copyright (c) 2014, Mozilla Foundation https://mozilla.org/
+with Reserved Font Name Fira Mono.
+
+Copyright (c) 2014, Telefonica S.A.
+
+This Font Software is licensed under the SIL Open Font License, Version 1.1.
+This license is copied below, and is also available with a FAQ at:
+http://scripts.sil.org/OFL
+
+
+-----------------------------------------------------------
+SIL OPEN FONT LICENSE Version 1.1 - 26 February 2007
+-----------------------------------------------------------
+
+PREAMBLE
+The goals of the Open Font License (OFL) are to stimulate worldwide
+development of collaborative font projects, to support the font creation
+efforts of academic and linguistic communities, and to provide a free and
+open framework in which fonts may be shared and improved in partnership
+with others.
+
+The OFL allows the licensed fonts to be used, studied, modified and
+redistributed freely as long as they are not sold by themselves. The
+fonts, including any derivative works, can be bundled, embedded,
+redistributed and/or sold with any software provided that any reserved
+names are not used by derivative works. The fonts and derivatives,
+however, cannot be released under any other type of license. The
+requirement for fonts to remain under this license does not apply
+to any document created using the fonts or their derivatives.
+
+DEFINITIONS
+"Font Software" refers to the set of files released by the Copyright
+Holder(s) under this license and clearly marked as such. This may
+include source files, build scripts and documentation.
+
+"Reserved Font Name" refers to any names specified as such after the
+copyright statement(s).
+
+"Original Version" refers to the collection of Font Software components as
+distributed by the Copyright Holder(s).
+
+"Modified Version" refers to any derivative made by adding to, deleting,
+or substituting -- in part or in whole -- any of the components of the
+Original Version, by changing formats or by porting the Font Software to a
+new environment.
+
+"Author" refers to any designer, engineer, programmer, technical
+writer or other person who contributed to the Font Software.
+
+PERMISSION & CONDITIONS
+Permission is hereby granted, free of charge, to any person obtaining
+a copy of the Font Software, to use, study, copy, merge, embed, modify,
+redistribute, and sell modified and unmodified copies of the Font
+Software, subject to the following conditions:
+
+1) Neither the Font Software nor any of its individual components,
+in Original or Modified Versions, may be sold by itself.
+
+2) Original or Modified Versions of the Font Software may be bundled,
+redistributed and/or sold with any software, provided that each copy
+contains the above copyright notice and this license. These can be
+included either as stand-alone text files, human-readable headers or
+in the appropriate machine-readable metadata fields within text or
+binary files as long as those fields can be easily viewed by the user.
+
+3) No Modified Version of the Font Software may use the Reserved Font
+Name(s) unless explicit written permission is granted by the corresponding
+Copyright Holder. This restriction only applies to the primary font name as
+presented to the users.
+
+4) The name(s) of the Copyright Holder(s) or the Author(s) of the Font
+Software shall not be used to promote, endorse or advertise any
+Modified Version, except to acknowledge the contribution(s) of the
+Copyright Holder(s) and the Author(s) or with their explicit written
+permission.
+
+5) The Font Software, modified or unmodified, in part or in whole,
+must be distributed entirely under this license, and must not be
+distributed under any other license. The requirement for fonts to
+remain under this license does not apply to any document created
+using the Font Software.
+
+TERMINATION
+This license becomes null and void if any of the above conditions are
+not met.
+
+DISCLAIMER
+THE FONT SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO ANY WARRANTIES OF
+MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT
+OF COPYRIGHT, PATENT, TRADEMARK, OR OTHER RIGHT. IN NO EVENT SHALL THE
+COPYRIGHT HOLDER BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY,
+INCLUDING ANY GENERAL, SPECIAL, INDIRECT, INCIDENTAL, OR CONSEQUENTIAL
+DAMAGES, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
+FROM, OUT OF THE USE OR INABILITY TO USE THE FONT SOFTWARE OR FROM
+OTHER DEALINGS IN THE FONT SOFTWARE.

data/res/fonts/fira-code.css

@@ -0,0 +1,20 @@
+@font-face {
+    font-family: Fira-Code;
+    font-weight: 300;
+    src: url(/assets/fonts/fira-code-light.otf);
+}
+@font-face {
+    font-family: Fira-Code;
+    font-weight: 400;
+    src: url(/assets/fonts/fira-code-regular.otf);
+}
+@font-face {
+    font-family: Fira-Code;
+    font-weight: 500;
+    src: url(/assets/fonts/fira-code-medium.otf);
+}
+@font-face {
+    font-family: Fira-Code;
+    font-weight: 700;
+    src: url(/assets/fonts/fira-code-bold.otf);
+}