kron4eg-wikicloth 0.1.3

data/lib/wiki_buffer/link.rb

@@ -0,0 +1,70 @@
+module WikiCloth
+
+class WikiBuffer::Link < WikiBuffer
+
+  def initialize(data="",options={})
+    super(data,options)
+    @in_quotes = false
+  end
+
+  def internal_link
+    @internal_link ||= false
+  end
+
+  def to_s
+    link_handler = @options[:link_handler]
+    unless self.internal_link
+      return link_handler.external_link("#{params[0]}".strip, "#{params[1]}".strip)
+    else
+      case
+      when params[0] =~ /^:(.*)/
+        return link_handler.link_for(params[0],params[1])
+      when params[0] =~ /^\s*([a-zA-Z0-9-]+)\s*:(.*)$/
+        return link_handler.link_for_resource($1,$2,params[1..-1])
+      else
+        return link_handler.link_for(params[0],params[1])
+      end
+    end
+  end
+
+  protected
+  def internal_link=(val)
+    @internal_link = (val == true ? true : false)
+  end
+
+  def new_char()
+    case
+    # check if this link is internal or external
+    when previous_char.blank? && current_char == '['
+      self.internal_link = true
+
+    # Marks the beginning of another paramater for
+    # the current object
+    when current_char == '|' && self.internal_link == true && @in_quotes == false
+      self.current_param = self.data
+      self.data = ""
+      self.params << ""
+
+    # URL label
+    when current_char == ' ' && self.internal_link == false && params[1].nil? && !self.data.blank?
+      self.current_param = self.data
+      self.data = ""
+      self.params << ""
+
+    # end of link
+    when current_char == ']' && ((previous_char == ']' && self.internal_link == true) || self.internal_link == false)  && @in_quotes == false
+      self.data.chop! if self.internal_link == true
+      self.current_param = self.data
+      self.data = ""
+      return false
+
+    else
+      self.data += current_char unless current_char == ' ' && self.data.blank?
+    end
+
+    return true
+  end
+
+end
+
+end

data/lib/wiki_buffer/table.rb

@@ -0,0 +1,159 @@
+module WikiCloth
+
+class WikiBuffer::Table < WikiBuffer
+
+  def initialize(data="",options={})
+    super(data,options)
+    self.buffer_type = "table"
+    @start_table = true
+    @start_row = false
+    @start_caption = false
+    @in_quotes = false
+  end
+
+  def table_caption
+    @caption ||= ""
+    return @caption.kind_of?(Hash) ? @caption[:value] : @caption
+  end
+
+  def table_caption_attributes
+    @caption.kind_of?(Hash) ? @caption[:style] : ""
+  end
+
+  def rows
+    @rows ||= [ [] ]
+  end
+
+  def to_s
+    row_count = 0
+    ret = "<table" + (params[0].blank? ? "" : " #{params[0].strip}") + ">"
+    ret += "<caption" + (self.table_caption_attributes.blank? ? "" : " #{table_caption_attributes.strip}") + 
+	">#{table_caption.strip}</caption>" unless self.table_caption.blank?
+    for row in rows
+      row_count += 1
+      ret += "<tr" + (params[row_count].nil? || params[row_count].blank? ? "" : " #{params[row_count].strip}") + ">"
+      for cell in row
+          cell_attributes = cell[:style].blank? ? "" : " #{cell[:style].strip}"
+          ret += "<#{cell[:type]}#{cell_attributes}>\n#{cell[:value].strip}\n</#{cell[:type]}>"
+      end
+      ret += "</tr>"
+    end
+    ret += "</table>"
+  end
+
+  protected
+  def rows=(val)
+    @rows = val
+  end
+
+  def table_caption_attributes=(val)
+    @caption = { :style => val, :value => self.table_caption } unless @caption.kind_of?(Hash)
+    @caption[:style] = val if @caption.kind_of?(Hash)
+  end
+
+  def table_caption=(val)
+    @caption = val unless @caption.kind_of?(Hash)
+    @caption[:value] = val if @caption.kind_of?(Hash)
+  end
+
+  def next_row()
+    self.params << ""
+    self.rows << []
+  end
+
+  def next_cell(type="td")
+    if self.rows[-1].size == 0
+      self.rows[-1] = [ { :type => type, :value => "", :style => "" } ]
+    else
+      self.rows[-1][-1][:value] = self.data
+      self.rows[-1] << { :type => type, :value => "", :style => "" }
+    end
+  end
+
+  def new_char()
+    if @check_cell_data == 1
+      case
+      when current_char != '|' && @start_caption == false && self.rows[-1][-1][:style].blank?
+        self.rows[-1][-1][:style] = self.data
+        self.data = ""
+      when current_char != '|' && @start_caption == true && self.table_caption_attributes.blank?
+        self.table_caption_attributes = self.data
+        self.data = ""
+      end
+      @check_cell_data = 0
+    end
+
+    case
+    # Next table cell in row (TD)
+    when current_char == "|" && (previous_char == "\n" || previous_char == "|") && @in_quotes == false
+      self.data.chop!
+      self.next_cell() unless self.data.blank? && previous_char == "|"
+      self.data = ""
+
+    # Next table cell in row (TH)
+    when current_char == "!" && (previous_char == "\n" || previous_char == "!") && @in_quotes == false
+      self.data.chop!
+      self.next_cell('th')
+      self.data = ""
+
+    # End of a table
+    when current_char == '}' && previous_char == '|'
+      self.data = ""
+      self.rows[-1].pop
+      return false
+
+    # Start table caption
+    when current_char == '+' && previous_char == '|' && @in_quotes == false
+      self.data = ""
+      self.rows[-1].pop
+      @start_caption = true
+
+    # Table cell might have attributes
+    when current_char == '|' && previous_char != "\n" && @in_quotes == false
+      @check_cell_data = 1
+
+    # End table caption
+    when current_char == "\n" && @start_caption == true && @in_quotes == false
+      @start_caption = false
+      self.table_caption = self.data
+      self.data = ""
+
+    # in quotes
+    when current_char == '"' && previous_char != '\\'
+      @in_quotes = !@in_quotes
+      self.data += '"'
+
+    # Table params
+    when current_char == "\n" && @start_table == true && @in_quotes == false
+      @start_table = false
+      unless self.data.blank?
+        self.current_param = self.data
+        self.params << ""
+      end
+      self.data = ""
+
+    # Table row params
+    when current_char == "\n" && @start_row == true && @in_quotes == false
+      @start_row = false
+      unless self.data.blank?
+        self.current_param = self.data
+      end
+      self.data = ""
+
+    # Start new table row
+    when current_char == '-' && previous_char == '|' && @in_quotes == false
+      self.data.chop!
+      self.rows[-1].pop
+      self.next_row()
+      @start_row = true
+
+    else
+      self.data += current_char
+    end
+
+    return true
+  end
+
+end
+
+end

data/lib/wiki_buffer/var.rb

@@ -0,0 +1,77 @@
+module WikiCloth
+
+class WikiBuffer::Var < WikiBuffer
+
+  def initialize(data="",options={})
+    super(data,options)
+    self.buffer_type = "var"
+    @in_quotes = false
+  end
+
+  def skip_html?
+    true
+  end
+
+  def function_name
+    @fname
+  end
+
+  def to_s
+    if self.is_function?
+      ret = "#{buffer_type}"
+      ret += " function #{function_name}"
+      ret += "(#{params.inspect})"
+      ret += " [#{data}]"
+    else
+      ret = @options[:link_handler].include_resource("#{params[0]}".strip,params[1..-1])
+    end
+    ret ||= "<!-- TEMPLATE[#{params[0]}] NOT FOUND -->"
+    ret
+  end
+
+  def is_function?
+    self.function_name.nil? || self.function_name.blank? ? false : true
+  end
+
+  protected
+  def function_name=(val)
+    @fname = val
+  end
+
+  def new_char()
+    case
+    when current_char == '|' && @in_quotes == false
+      self.current_param = self.data
+      self.data = ""
+      self.params << ""
+
+    # Start of either a function or a namespace change
+    when current_char == ':' && @in_quotes == false && self.params.size <= 1
+      self.function_name = self.data
+      self.data = ""
+      puts "[found var function (#{function_name})"
+
+    # Dealing with variable names within functions
+    # and variables
+    when current_char == '=' && @in_quotes == false
+      self.current_param = self.data
+      self.data = ""
+      self.name_current_param()
+
+    # End of a template, variable, or function
+    when current_char == '}' && previous_char == '}'
+      self.data.chop!
+      self.current_param = self.data
+      self.data = ""
+      return false
+
+    else
+      self.data += current_char
+    end
+
+    return true
+  end
+
+end
+
+end

data/lib/wiki_cloth.rb

@@ -0,0 +1,61 @@
+require 'jcode'
+
+module WikiCloth
+
+class WikiCloth
+
+  def initialize(opt={})
+    self.load(opt[:data],opt[:params]) unless opt[:data].nil? || opt[:data].blank?
+    self.options[:link_handler] = opt[:link_handler] unless opt[:link_handler].nil?
+  end
+
+  def load(data,p={})
+    data.gsub!(/<!--(.|\s)*?-->/,"")
+    self.params = p
+    self.html = data
+  end
+
+  def render(opt={})
+    self.options = { :output => :html, :link_handler => self.link_handler, :params => self.params }.merge(opt)
+    self.options[:link_handler].params = options[:params]
+    buffer = WikiBuffer.new("",options)
+    self.html.each_char { |c| buffer.add_char(c) }
+    buffer.to_s
+  end
+
+  def to_html(opt={})
+    self.render(opt)
+  end
+
+  def link_handler
+    self.options[:link_handler] ||= WikiLinkHandler.new
+  end
+
+  def html
+    @page_data
+  end
+
+  def params
+    @page_params ||= {}
+  end
+
+  protected
+  def options=(val)
+    @options = val
+  end
+
+  def options
+    @options ||= {}
+  end
+
+  def html=(val)
+    @page_data = val
+  end
+
+  def params=(val)
+    @page_params = val
+  end
+
+end
+
+end

data/lib/wiki_link_handler.rb

@@ -0,0 +1,138 @@
+require 'rubygems'
+require 'builder'
+
+module WikiCloth
+
+class WikiLinkHandler
+
+  def references
+    @references ||= []
+  end
+
+  def section_link(section)
+    ""
+  end
+
+  def params
+    @params ||= {}
+  end
+
+  def external_links
+    @external_links ||= []
+  end
+
+  def find_reference_by_name(n)
+    references.each { |r| return r if !r[:name].nil? && r[:name].strip == n }
+    return nil
+  end
+
+  def reference_index(h)
+    references.each_index { |r| return r+1 if references[r] == h }
+    return nil
+  end
+
+  def references=(val)
+    @references = val
+  end
+
+  def params=(val)
+    @params = val
+  end
+
+  def external_link(url,text)
+    self.external_links << url
+    elem.a({ :href => url }) { |x| x << (text.blank? ? url : text) }
+  end
+
+  def external_links=(val)
+    @external_links = val
+  end
+
+  def url_for(page)
+    "javascript:void(0)"
+  end
+
+  def link_attributes_for(page)
+     { :href => url_for(page) }
+  end
+
+  def link_for(page, text)
+    ltitle = !text.nil? && text.blank? ? self.pipe_trick(page) : text
+    ltitle = page if text.nil?
+    elem.a(link_attributes_for(page)) { |x| x << ltitle.strip }
+  end
+
+  def include_resource(resource, options=[])
+    return self.params[resource] unless self.params[resource].nil?
+  end
+
+  def link_for_resource(prefix, resource, options=[])
+    ret = ""
+    prefix.downcase!
+    case
+    when ["image","file","media"].include?(prefix)
+      ret += wiki_image(resource,options)
+    else
+      title = options[0] ? options[0] : "#{prefix}:#{resource}"
+      ret += link_for("#{prefix}:#{resource}",title)
+    end
+    ret
+  end
+
+  protected
+  def pipe_trick(page)
+    t = page.split(":")
+    t = t[1..-1] if t.size > 1
+    return t.join("").split(/[,(]/)[0]
+  end
+
+  # this code needs some work... lots of work
+  def wiki_image(resource,options)
+      pre_img = ''
+      post_img = ''
+      css = []
+      loc = "right"
+      type = nil
+      w = 180
+      h = nil
+      title = nil
+      ffloat = false
+
+      options.each do |x|
+        case
+        when ["thumb","thumbnail","frame","border"].include?(x.strip)
+          type = x.strip
+        when ["left","right","center","none"].include?(x.strip)
+          ffloat = true
+          loc = x.strip
+        when x.strip =~ /^([0-9]+)\s*px$/
+          w = $1
+          css << "width:#{w}px"
+        when x.strip =~ /^([0-9]+)\s*x\s*([0-9]+)\s*px$/
+          w = $1
+          css << "width:#{w}px"
+          h = $2
+          css << "height:#{h}px"
+        else
+          title = x.strip
+        end
+      end
+      css << "float:#{loc}" if ffloat == true
+      css << "border:1px solid #000" if type == "border"
+
+      sane_title = title.nil? ? "" : title.gsub(/<\/?[^>]*>/, "")
+      if type == "thumb" || type == "thumbnail" || type == "frame"
+        pre_img = '<div class="thumb t' + loc + '"><div class="thumbinner" style="width: ' + w.to_s +
+            'px;"><a href="" class="image" title="' + sane_title + '">'
+        post_img = '</a><div class="thumbcaption">' + title + '</div></div></div>'
+      end
+      "#{pre_img}<img src=\"#{resource}\" alt=\"#{sane_title}\" title=\"#{sane_title}\" style=\"#{css.join(";")}\" />#{post_img}"
+  end
+
+  def elem
+    Builder::XmlMarkup.new
+  end
+
+end
+
+end