maruku 0.6.1 → 0.7.0.beta1

data/lib/maruku/output/to_latex_strings.rb

@@ -1,64 +0,0 @@
-#--
-#   Copyright (C) 2006  Andrea Censi  <andrea (at) rubyforge.org>
-#
-# This file is part of Maruku.
-# 
-#   Maruku is free software; you can redistribute it and/or modify
-#   it under the terms of the GNU General Public License as published by
-#   the Free Software Foundation; either version 2 of the License, or
-#   (at your option) any later version.
-# 
-#   Maruku is distributed in the hope that it will be useful,
-#   but WITHOUT ANY WARRANTY; without even the implied warranty of
-#   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#   GNU General Public License for more details.
-# 
-#   You should have received a copy of the GNU General Public License
-#   along with Maruku; if not, write to the Free Software
-#   Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
-#++
-
-
-
-class String
-
-	# These are TeX's special characters
-	LATEX_ADD_SLASH = [ ?{, ?}, ?$, ?&, ?#, ?_, ?%]
-
-	# These, we transform to {\tt \char<ascii code>}
-	LATEX_TO_CHARCODE = [ ?^, ?~, ?>,?<]
-
-	def escape_to_latex(s)
-		s2 = ""
-		s.each_byte do |b|
-			if LATEX_TO_CHARCODE.include? b
-				s2 += "{\\tt \\char#{b}}" 
-			elsif LATEX_ADD_SLASH.include? b
-				s2 << ?\\ << b
-			elsif b == ?\\
-			# there is no backslash in cmr10 fonts
-				s2 += "$\\backslash$"
-			else
-				s2 << b
-			end
-		end
-		s2
-	end
-	
-	# escapes special characters
-	def to_latex
-		s = escape_to_latex(self)
-		OtherGoodies.each do |k, v|
-			s.gsub!(k, v)
-		end
-		s
-	end
-	
-	# other things that are good on the eyes
-	OtherGoodies = {
-		/(\s)LaTeX/ => '\1\\LaTeX\\xspace ', # XXX not if already \LaTeX
-#		'HTML' => '\\textsc{html}\\xspace ',
-#		'PDF' => '\\textsc{pdf}\\xspace '
-	}
-	
-end

data/lib/maruku/structures.rb

@@ -1,167 +0,0 @@
-#--
-#   Copyright (C) 2006  Andrea Censi  <andrea (at) rubyforge.org>
-#
-# This file is part of Maruku.
-# 
-#   Maruku is free software; you can redistribute it and/or modify
-#   it under the terms of the GNU General Public License as published by
-#   the Free Software Foundation; either version 2 of the License, or
-#   (at your option) any later version.
-# 
-#   Maruku is distributed in the hope that it will be useful,
-#   but WITHOUT ANY WARRANTY; without even the implied warranty of
-#   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#   GNU General Public License for more details.
-# 
-#   You should have received a copy of the GNU General Public License
-#   along with Maruku; if not, write to the Free Software
-#   Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
-#++
-
-
-
-class Module
-	def safe_attr_accessor1(symbol, klass)
-		attr_reader symbol
-		code = <<-EOF
-		def #{symbol}=(val)  
-			if not val.kind_of? #{klass}
-				s = "\nCould not assign an object of type \#{val.class} to #{symbol}.\n\n"
-				s += "Tried to assign object of class \#{val.class}:\n"+
-				     "\#{val.inspect}\n"+
-				     "to \#{self.class}::#{symbol} constrained to be of class #{klass}.\n"
-				raise s
-			end
-			@#{symbol} = val
-		end
-		
-EOF
-		module_eval code
-  end
-
-	def safe_attr_accessor2(symbol, klass)
-		attr_accessor symbol
-	end
-	
-	alias  safe_attr_accessor  safe_attr_accessor2
-end
-
-module MaRuKu
-	
-# I did not want to have a class for each possible element. 
-# Instead I opted to have only the class "MDElement"
-# that represents eveything in the document (paragraphs, headers, etc).
-#
-# You can tell what it is by the variable `node_type`. 
-#
-# In the instance-variable `children` there are the children. These
-# can be of class 1) String or 2) MDElement. 
-#
-# The @doc variable points to the document to which the MDElement
-# belongs (which is an instance of Maruku, subclass of MDElement).
-#
-# Attributes are contained in the hash `attributes`. 
-# Keys are symbols (downcased, with spaces substituted by underscores)
-#
-# For example, if you write in the source document.
-# 
-#     Title: test document
-#     My property: value
-#     
-#     content content
-#
-# You can access `value` by writing:
-#
-#     @doc.attributes[:my_property] # => 'value'
-#
-# from whichever MDElement in the hierarchy.
-#
-class MDElement 
-	# See helpers.rb for the list of allowed #node_type values
-	safe_attr_accessor :node_type, Symbol
-	
-	# Children are either Strings or MDElement
-	safe_attr_accessor :children, Array
-	
-	# An attribute list, may not be nil
-	safe_attr_accessor :al, Array #Maruku::AttributeList
-
-	# These are the processed attributes
-	safe_attr_accessor :attributes, Hash
-	
-	# Reference of the document (which is of class Maruku)
-	attr_accessor :doc
-	
-	def initialize(node_type=:unset, children=[], meta={}, 
-			al=MaRuKu::AttributeList.new )
-		super(); 
-		self.children = children
-		self.node_type = node_type
-		
-		@attributes = {}
-		
-		meta.each do |symbol, value|
-			self.instance_eval "
-			  def #{symbol}; @#{symbol}; end
-			  def #{symbol}=(val); @#{symbol}=val; end"
-			self.send "#{symbol}=", value
-		end
-		
-		self.al = al || AttributeList.new
-
-		self.meta_priv = meta
-	end
-	
-	attr_accessor :meta_priv
-	
-	def ==(o)
-		ok = o.kind_of?(MDElement) &&
-		(self.node_type == o.node_type) &&
-		(self.meta_priv == o.meta_priv) &&
-		(self.children == o.children)
-		
-		if not ok
-#			puts "This:\n"+self.inspect+"\nis different from\n"+o.inspect+"\n\n"
-		end
-		ok
-	end
-end
-
-# This represents the whole document and holds global data.
-
-class MDDocument
-	
-	safe_attr_accessor :refs, Hash
-	safe_attr_accessor :footnotes, Hash
-	
-	# This is an hash. The key might be nil.
-	safe_attr_accessor :abbreviations, Hash
-	
-	# Attribute lists definition
-	safe_attr_accessor :ald, Hash
-	
-	# The order in which footnotes are used. Contains the id.
-	safe_attr_accessor :footnotes_order, Array
-	
-	safe_attr_accessor :latex_required_packages, Array
-	
-	safe_attr_accessor :refid2ref, Hash
-	
-	def initialize(s=nil)
-		super(:document)
-		@doc       = self
-
-		self.refs = {}
-		self.footnotes = {}
-		self.footnotes_order = []
-		self.abbreviations = {}
-		self.ald = {}
-		self.latex_required_packages = []
-		
-		parse_doc(s) if s 
-	end
-end
-
-
-end # MaRuKu
-

data/lib/maruku/structures_inspect.rb

@@ -1,87 +0,0 @@
-#--
-#   Copyright (C) 2006  Andrea Censi  <andrea (at) rubyforge.org>
-#
-# This file is part of Maruku.
-# 
-#   Maruku is free software; you can redistribute it and/or modify
-#   it under the terms of the GNU General Public License as published by
-#   the Free Software Foundation; either version 2 of the License, or
-#   (at your option) any later version.
-# 
-#   Maruku is distributed in the hope that it will be useful,
-#   but WITHOUT ANY WARRANTY; without even the implied warranty of
-#   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#   GNU General Public License for more details.
-# 
-#   You should have received a copy of the GNU General Public License
-#   along with Maruku; if not, write to the Free Software
-#   Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
-#++
-
-
-
-class String
-	def inspect_more(a=nil,b=nil)
-		inspect
-	end
-end
-
-class Object
-	def inspect_more(a=nil,b=nil)
-		inspect
-	end
-end
-
-class Array
-	def inspect_more(compact, join_string, add_brackets=true)
-		s  = map {|x| 
-			x.kind_of?(String) ? x.inspect : 
-			x.kind_of?(MaRuKu::MDElement) ? x.inspect(compact) : 
-			(raise "WTF #{x.class} #{x.inspect}")
-		}.join(join_string)
-		
-		add_brackets ? "[#{s}]" : s
-	end
-end
-
-class Hash
-	def inspect_ordered(a=nil,b=nil)
-		"{"+keys.map{|x|x.to_s}.sort.map{|x|x.to_sym}.
-		map{|k| k.inspect + "=>"+self[k].inspect}.join(',')+"}"
-	end
-end
-
-module MaRuKu
-class MDElement	
-	def inspect(compact=true)
-		if compact
-			i2 = inspect2
-			return i2 if i2
-		end
-		
-		"md_el(:%s,%s,%s,%s)" %
-		[
-			self.node_type,
-			children_inspect(compact), 
-			@meta_priv.inspect_ordered,
-			self.al.inspect
-		]
-	end
-
-	def children_inspect(compact=true)
-		s = @children.inspect_more(compact,', ')
-		if @children.empty?
-			"[]"
-		elsif s.size < 70
-			s
-		else
-			"[\n"+
-			add_tabs(@children.inspect_more(compact,",\n",false))+
-			"\n]"
-		end
-	end
-	
-end
-
-end
-

data/lib/maruku/structures_iterators.rb

@@ -1,61 +0,0 @@
-#--
-#   Copyright (C) 2006  Andrea Censi  <andrea (at) rubyforge.org>
-#
-# This file is part of Maruku.
-# 
-#   Maruku is free software; you can redistribute it and/or modify
-#   it under the terms of the GNU General Public License as published by
-#   the Free Software Foundation; either version 2 of the License, or
-#   (at your option) any later version.
-# 
-#   Maruku is distributed in the hope that it will be useful,
-#   but WITHOUT ANY WARRANTY; without even the implied warranty of
-#   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#   GNU General Public License for more details.
-# 
-#   You should have received a copy of the GNU General Public License
-#   along with Maruku; if not, write to the Free Software
-#   Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
-#++
-
-
-module MaRuKu
-
-class MDElement
-	
-	# Yields to each element of specified node_type
-	# All elements if e_node_type is nil.
-	def each_element(e_node_type=nil, &block) 
-		@children.each do |c| 
-			if c.kind_of? MDElement
-				if (not e_node_type) || (e_node_type == c.node_type)
-					block.call c
-				end
-				c.each_element(e_node_type, &block)
-			end
-		end
-	end
-	
-	# Apply passed block to each String in the hierarchy.
-	def replace_each_string(&block)
-		for c in @children
-			if c.kind_of? MDElement
-				c.replace_each_string(&block)
-			end
-		end
-
-		processed = []
-		until @children.empty?
-			c = @children.shift
-			if c.kind_of? String
-				result = block.call(c)
-				[*result].each do |e| processed << e end
-			else
-				processed << c
-			end
-		end
-		@children = processed
-	end
-
-end
-end

data/lib/maruku/tests/benchmark.rb

@@ -1,82 +0,0 @@
-#--
-#   Copyright (C) 2006  Andrea Censi  <andrea (at) rubyforge.org>
-#
-# This file is part of Maruku.
-# 
-#   Maruku is free software; you can redistribute it and/or modify
-#   it under the terms of the GNU General Public License as published by
-#   the Free Software Foundation; either version 2 of the License, or
-#   (at your option) any later version.
-# 
-#   Maruku is distributed in the hope that it will be useful,
-#   but WITHOUT ANY WARRANTY; without even the implied warranty of
-#   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#   GNU General Public License for more details.
-# 
-#   You should have received a copy of the GNU General Public License
-#   along with Maruku; if not, write to the Free Software
-#   Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
-#++
-
-
-require 'maruku'
-#require 'bluecloth'
-
-
-data = $stdin.read
-
-num = 10
-
-if ARGV.size > 0 && ((n=ARGV[0].to_i) != 0)
-	num = n
-end
-	
-methods = 
-[
-	
-	[Maruku,    :to_html],
-#	[BlueCloth, :to_html],
-	[Maruku,    :to_latex]
-	
-]
-
-#methods = [[Maruku, :class]]
-#num = 10
-
-stats = 
-methods .map do |c, method|
-	puts "Computing for #{c}"
-
-	start = Time.now
-	doc = nil
-	for i in 1..num
-		$stdout.write "#{i} "; $stdout.flush
-		doc = c.new(data)
-	end
-	stop = Time.now
-	parsing = (stop-start)/num
-
-	start = Time.now
-	for i in 1..num
-		$stdout.write "#{i} "; $stdout.flush
-		s = doc.send method
-	end
-	stop = Time.now
-	rendering = (stop-start)/num
-
-	puts ("%s (%s): parsing %0.2f sec + rendering %0.2f sec "+
-	"= %0.2f sec ") % [c, method, parsing,rendering,parsing+rendering]
-
-	[c, method, parsing, rendering]
-end
-
-puts "\n\n\n"
-stats.each do |x| x.push(x[2]+x[3]) end
-max = stats.map{|x|x[4]}.max
-stats.sort! { |x,y| x[4] <=> y[4] } . reverse!
-for c, method, parsing, rendering, tot in stats
-	puts ("%20s: parsing %0.2f sec + rendering %0.2f sec "+
-	"= %0.2f sec   (%0.2fx)") % 
-	["#{c} (#{method})", parsing,rendering,tot,max/tot]
-end
-