paru 0.0.1 → 0.1.0

data/lib/paru/filter/div.rb

@@ -0,0 +1,25 @@
+module Paru
+    module PandocFilter
+        require_relative "./block"
+        require_relative "./attr"
+
+        class Div < Block
+            def initialize contents
+                @attr = Attr.new contents[0]
+                super contents[1]
+            end
+
+            def ast_contents
+                [
+                    @attr.to_ast,
+                    super
+                ]
+            end
+
+            def has_block?
+                true
+            end
+        end
+    end
+end
+

data/lib/paru/filter/document.rb

@@ -0,0 +1,47 @@
+module Paru
+    module PandocFilter
+
+        require 'json'
+        require_relative "./node"
+        require_relative "./plain"
+        require_relative "./meta"
+
+        class Document < Node
+
+            attr_reader :meta
+
+            def self.fragment node_list
+                meta = Hash.new
+                meta["unMeta"] = Hash.new
+                
+                if node_list.any? {|n| n.is_block?}
+                    new_doc = Document.new meta, []
+                    new_doc.children = node_list
+                else
+                    node = PandocFilter::Plain.new [] 
+                    node.children = node_list
+                    new_doc = Document.new meta, [node.to_ast]
+                end
+
+                new_doc
+            end
+
+            def initialize(meta, contents)
+                @meta = Meta.new meta
+                super contents
+            end
+
+            def to_ast
+                [
+                    @meta.to_ast,
+                    ast_contents
+                ]
+            end
+
+            def to_json
+                to_ast.to_json
+            end
+
+        end
+    end
+end

data/lib/paru/filter/emph.rb

@@ -0,0 +1,8 @@
+module Paru
+    module PandocFilter
+        require_relative "./inline"
+
+        class Emph < Inline
+        end
+    end
+end

data/lib/paru/filter/header.rb

@@ -0,0 +1,28 @@
+module Paru
+    module PandocFilter
+        require_relative "./block"
+        require_relative "./attr"
+
+        class Header < Block
+            attr_accessor :level, :attr
+
+            def initialize contents
+                @level = contents[0]
+                @attr = Attr.new contents[1]
+                super contents[2], true
+            end
+
+            def ast_contents
+                [
+                    @level,
+                    @attr.to_ast,
+                    super
+                ]
+            end
+
+            def has_inline?
+                true
+            end
+        end
+    end
+end

data/lib/paru/filter/horizontal_rule.rb

@@ -0,0 +1,11 @@
+module Paru
+    module PandocFilter
+        require_relative "./block"
+
+        class HorizontalRule < Block
+            def initialize contents
+                super []
+            end
+        end
+    end
+end

data/lib/paru/filter/image.rb

@@ -0,0 +1,9 @@
+module Paru
+    module PandocFilter
+
+        require_relative "./link"
+
+        class Image < Link
+        end
+    end
+end

data/lib/paru/filter/inline.rb

@@ -0,0 +1,19 @@
+module Paru
+    module PandocFilter
+        require_relative "./node"
+
+        class Inline < Node
+           def initialize contents
+              super contents, true
+           end 
+
+           def is_inline?
+               true
+           end
+
+           def has_inline?
+               true
+           end
+        end
+    end
+end

data/lib/paru/filter/line_break.rb

@@ -0,0 +1,16 @@
+module Paru
+    module PandocFilter
+        require_relative "./inline"
+
+        class LineBreak < Inline
+            def initialize contents
+                super []
+            end
+
+            def has_inline?
+                false
+            end
+        end
+    end
+end
+

data/lib/paru/filter/link.rb

@@ -0,0 +1,27 @@
+module Paru
+    module PandocFilter
+
+        require_relative "./inline"
+        require_relative "./attr"
+        require_relative "./target"
+
+        class Link < Inline
+            attr_accessor :attr, :target
+            
+            def initialize contents
+                @attr = Attr.new contents[0]
+                super contents[1]
+                @target = Target.new contents[2]
+            end
+
+            def ast_contents
+                [
+                    @attr.to_ast,
+                    super,
+                    @target.to_ast
+                ]
+            end
+
+        end
+    end
+end

data/lib/paru/filter/list.rb

@@ -0,0 +1,22 @@
+module Paru
+    module PandocFilter
+        require_relative "./block"
+
+        class List < Block
+            def initialize contents
+                super []
+                contents.each do |item|
+                    @children.push Block.new item
+                end
+            end
+
+            def ast_contents
+                @children.map {|child| child.ast_contents}
+            end
+
+            def has_block?
+                true
+            end
+        end
+    end
+end

data/lib/paru/filter/list_attributes.rb

@@ -0,0 +1,24 @@
+module Paru
+    module PandocFilter
+        class ListAttributes
+
+            STYLES = ["DefaultStyle", "Example", "Decimal", "LowerRoman", "UpperRoman", "LowerAlpha", "UpperAlpha"]
+            DELIMS = ["DefaultDelim", "Period", "OneParen", "TwoParens"]
+
+            attr_accessor :start, :number_style, :number_delim
+            def initialize attributes
+                @start = attributes[0]
+                @number_style = attributes[1]
+                @number_delim = attributes[2]
+            end
+
+            def to_ast
+                [
+                    @start,
+                    @number_style,
+                    @number_delim
+                ]
+            end
+        end
+    end
+end

data/lib/paru/filter/markdown.rb

@@ -0,0 +1,52 @@
+module Paru
+    module PandocFilter
+        module Markdown
+
+            require_relative "../pandoc"
+            require_relative "./document"
+
+            AST2MARKDOWN = Paru::Pandoc.new do
+                from "json"
+                to "markdown"
+            end
+                
+            MARKDOWN2JSON = Paru::Pandoc.new do
+                from "markdown"
+                to "json"
+            end
+
+            def outer_markdown 
+                temp_doc = PandocFilter::Document.fragment [self]
+                AST2MARKDOWN << temp_doc.to_json
+            end
+
+            def inner_markdown
+                temp_doc = PandocFilter::Document.fragment @children
+                AST2MARKDOWN << temp_doc.to_json
+            end
+
+            def inner_markdown= markdown
+                if has_string?
+                    @string = markdown
+                else
+                    if markdown.empty?
+                        @children = []
+                    else 
+                        json = MARKDOWN2JSON << markdown
+                        meta, contents = JSON.parse json
+                        temp_doc = PandocFilter::Document.new meta, contents
+                        temp_doc.children.each {|c| c.parent = @parent}
+
+                        if has_inline?
+                            @children = temp_doc.children[0].children
+                        elsif has_block?
+                            @children = temp_doc.children
+                        else
+                            # Unknown; what to do here?
+                        end
+                    end
+                end
+            end
+        end
+    end
+end

data/lib/paru/filter/math.rb

@@ -0,0 +1,51 @@
+module Paru
+    module PandocFilter
+        require_relative "./inline"
+
+        class Math < Inline
+            attr_accessor :math_type, :string
+
+            def initialize contents
+                @math_type = contents[0]
+                @string = contents[1]
+            end
+
+            def inline?
+                "InlineMath" == @math_type[t]
+            end
+
+            def inline!
+                @math_type = {
+                    "t" => "InlineMath",
+                    "c" => []
+                }
+            end
+
+            def display?
+                "DisplayMath" == @math_type[t]
+            end
+
+            def display!
+                @math_type = {
+                    "t" => "DisplayMath",
+                    "c" => []
+                }
+            end
+            
+            def ast_contents
+                [
+                    @math_type,
+                    @string
+                ]
+            end
+            
+            def has_string?
+                true
+            end
+
+            def has_inline?
+                false
+            end
+        end
+    end
+end

data/lib/paru/filter/meta.rb

@@ -0,0 +1,24 @@
+module Paru
+    module PandocFilter
+        require_relative "./meta_map"
+
+        class Meta < MetaMap
+            include Enumerable
+
+            def initialize contents
+                super contents["unMeta"]
+            end
+
+            def ast_type
+                "unMeta"
+            end
+
+            def to_ast
+                {
+                    "unMeta" => ast_contents
+                }
+            end
+
+        end
+    end
+end

data/lib/paru/filter/meta_blocks.rb

@@ -0,0 +1,13 @@
+module Paru
+    module PandocFilter
+
+        require_relative "./node"
+
+        class MetaBlocks < Node
+
+            def initialize value
+                super value
+            end
+        end
+    end
+end

data/lib/paru/filter/meta_bool.rb

@@ -0,0 +1,9 @@
+module Paru
+    module PandocFilter
+
+        require_relative "./meta_value"
+
+        class MetaBool < MetaValue
+        end
+    end
+end

data/lib/paru/filter/meta_inlines.rb

@@ -0,0 +1,13 @@
+module Paru
+    module PandocFilter
+
+        require_relative "./node"
+
+        class MetaInlines < Node
+            
+            def initialize value
+                super value
+            end
+        end
+    end
+end

data/lib/paru/filter/meta_list.rb

@@ -0,0 +1,9 @@
+module Paru
+    module PandocFilter
+
+        require_relative "./node"
+
+        class MetaList < Node
+        end
+    end
+end

data/lib/paru/filter/meta_map.rb

@@ -0,0 +1,37 @@
+module Paru
+    module PandocFilter
+
+        require_relative "./node"
+
+        class MetaMap < Node
+
+            def initialize contents
+                @children = Hash.new
+                
+                if contents.is_a? Hash
+                    contents.each_pair do |key, value|
+                        if PandocFilter.const_defined? value["t"]
+                            @children[key] = PandocFilter.const_get(value["t"]).new value["c"]
+                        end
+                    end
+                end
+            end
+
+            def [](key)
+                if @children.key_exists?
+                    @children[key]
+                end
+            end
+
+            
+            def ast_contents
+                ast = Hash.new
+                @children.each_pair do |key, value|
+                    ast[key] = value.to_ast
+                end
+                ast
+            end
+
+        end
+    end
+end