require 'open3' require 'json' module Pandoc def self.prog @prog ||= 'pandoc' end def self.prog=(val) @prog = val end def self.load(fmt, input) cmd = Pandoc::prog + " -t json" unless fmt.nil? cmd += " -f " + fmt end str = input if str.respond_to? :read str = str.read end json = '' Open3::popen3(cmd) do |stdin, stdout, stderr| stdin.puts(str) stdin.close json = stdout.read end return Pandoc::AST::new(json) end class AST def initialize(json) @js = JSON::parse(json) end def [](key) Pandoc::AST::js2sane(@js[0]["unMeta"][key]) end def to(format) cmd = Pandoc::prog + " -f json -t " + format.to_s output = '' Open3::popen3(cmd) do |stdin, stdout, stderr| stdin.puts @js.to_json stdin.close output = stdout.read end output end def self.js2sane(js) if js.nil? return js end case js["t"] when "MetaList" js["c"].map{|c| js2sane(c)} when "MetaInlines" js["c"].map{|c| js2sane(c)}.join() when "Space" " " when "MetaString" js["c"] when "Str" js["c"] end end end end