literate_md 1.0.0

data/bin/literate_md

@@ -0,0 +1,107 @@
+#!/usr/bin/ruby -rubygems
+
+require 'coderay'
+require 'redcarpet'
+require 'trollop'
+require 'fileutils'
+ 
+opts = Trollop::options do
+  opt :weave, "Produce documentation", :short => 'w'
+  opt :tangle, "Produce code", :short => 't'
+  opt :outputdir, "Directory to write files to", :default => Dir.pwd, :short => 'o'
+  opt :lang, "Default language of code", :default => "ruby", :short => 'l'
+  opt :files, "Files to process", :type => :string, :short => 'f', :required => true
+end
+
+$allowed = '(\w| )*|((.*:)?\*)'
+html_opts = {
+  :fenced_code_blocks => true, 
+  :superscript => true, 
+  :tables => true, 
+  :lax_html_blocks => true, 
+  :strikethrough => true
+}
+$ext_for_lang = {
+  :ruby => 'rb',
+  :c => 'c',
+}
+
+class Weave < Redcarpet::Render::XHTML
+  attr_accessor :default_lang, :original_text
+  def block_code(code, lang)
+  	l_ang, r_ang, equiv = "__lang__", "__rang__", "__equiv__"
+  	line_num = @original_text[0,@original_text.index(code)].count("\n")+1
+    code = code.
+      gsub(/@(#{$allowed})@\s*\+=/,"#{l_ang}\\1#{r_ang}+#{equiv}").
+      gsub(/@(#{$allowed})@/,"#{l_ang}\\1#{r_ang}")
+    code = CodeRay.
+      scan(code, lang.nil? ? @default_lang : lang.to_sym).
+      html(
+        :wrap => :div, 
+        :css => :style, 
+        :line_numbers => :table,
+        :line_number_start => line_num)
+    code.
+      gsub(/#{l_ang}(#{$allowed})#{r_ang}(\s*)\+#{equiv}/,'&lang;\\1&rang;+&equiv;').
+      gsub(/#{l_ang}(#{$allowed})#{r_ang}/,'&lang;\\1&rang;')
+  end  
+  def codespan(code); block_code(code,nil) end
+end
+
+def write_to path, data
+	FileUtils.mkdir_p(File.dirname(path))
+	File.open(path, 'w') {|f| f.write(data)}
+end
+
+if opts.weave
+  r = Redcarpet::Markdown.new(Weave, html_opts)
+  r.renderer.default_lang = opts.lang.to_sym
+  opts.files.split(',').each{|file|
+    code = File.open(file, 'r'){|f|f.read}
+    r.renderer.original_text = code
+	html = r.render(code)
+	write_to("#{opts.outputdir}/#{file}.html", html)
+  }
+end
+
+class Tangle < Redcarpet::Render::Base
+  attr_accessor :default_lang, :links, :file_no_ext
+  def block_code(code, lang)
+    chunks = 
+      [{:start => 0, :anchor => '*', :anchor_len => 0}] + 
+      code.scan(/(@(#{$allowed})@\s*\+=)/).map{|x|
+        {:start => code.index(x[0]), :anchor => x[1], :anchor_len => x[0].length}
+      } +
+      [{:start => code.length}]
+    (1..chunks.length-1).each{|index|
+      last, this = chunks[index-1], chunks[index]
+      @links[normalise(last[:anchor],lang)] << code[last[:start] + last[:anchor_len], this[:start]]
+    }
+    nil
+  end
+  def normalise(link_name, lang)
+    if link_name == '*'
+      "#{@file_no_ext}.#{$ext_for_lang[lang.nil? ? @default_lang : lang.to_sym]}:*"
+    else
+      link_name
+    end
+  end
+  def codespan(code); block_code(code,nil) end
+end
+
+if opts.tangle
+  links = Hash.new{|h,k|h[k]=[]}
+  r = Redcarpet::Markdown.new(Tangle, html_opts)
+  r.renderer.default_lang, r.renderer.links = opts.lang.to_sym, links
+  opts.files.split(',').each{|file|
+    r.renderer.file_no_ext = file[0,file.rindex('.')]
+	r.render(File.open(file, 'r'){|f|f.read})
+  }
+  resolve = lambda{|parts| parts.join('').gsub(/@(#{$allowed})@/) {|match|resolve.call(links[match[1..-2]])} }
+  links.keys.reject{|k|!k.end_with? ':*'}.each{|root|
+	write_to(
+	  "#{opts.outputdir}/#{root[0..-3]}", 
+	  resolve.call(links[root]))
+  }
+end
+ 

metadata

@@ -0,0 +1,106 @@
+--- !ruby/object:Gem::Specification 
+name: literate_md
+version: !ruby/object:Gem::Version 
+  hash: 23
+  prerelease: 
+  segments: 
+  - 1
+  - 0
+  - 0
+  version: 1.0.0
+platform: ruby
+authors: 
+- remis
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2012-03-08 00:00:00 Z
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: redcarpet
+  prerelease: false
+  requirement: &id001 !ruby/object:Gem::Requirement 
+    none: false
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        hash: 3
+        segments: 
+        - 0
+        version: "0"
+  type: :runtime
+  version_requirements: *id001
+- !ruby/object:Gem::Dependency 
+  name: coderay
+  prerelease: false
+  requirement: &id002 !ruby/object:Gem::Requirement 
+    none: false
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        hash: 3
+        segments: 
+        - 0
+        version: "0"
+  type: :runtime
+  version_requirements: *id002
+- !ruby/object:Gem::Dependency 
+  name: trollop
+  prerelease: false
+  requirement: &id003 !ruby/object:Gem::Requirement 
+    none: false
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        hash: 3
+        segments: 
+        - 0
+        version: "0"
+  type: :runtime
+  version_requirements: *id003
+description: A simple hello world gem
+email: 
+executables: 
+- literate_md
+extensions: []
+
+extra_rdoc_files: []
+
+files: 
+- bin/literate_md
+homepage: http://remis-thoughts.blogspot.com
+licenses: []
+
+post_install_message: 
+rdoc_options: []
+
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      hash: 3
+      segments: 
+      - 0
+      version: "0"
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      hash: 3
+      segments: 
+      - 0
+      version: "0"
+requirements: []
+
+rubyforge_project: 
+rubygems_version: 1.8.5
+signing_key: 
+specification_version: 3
+summary: Convert markdown documents into code or html
+test_files: []
+