facets 0.9.0 → 1.0.0

data/lib/mega/bbcode.rb

@@ -1,410 +0,0 @@
-#--
-# BBCode
-#
-# Copyright (c) 2002 Thomas-Ivo Heinen
-#
-# Ruby License
-#
-# This module is free software. You may use, modify, and/or redistribute this
-# software under the same terms as Ruby.
-#
-# This program 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.
-#
-#
-# ==========================================================================
-# Revision History ::
-# --------------------------------------------------------------------------
-#  2002-07-16  TH    Bugfix BBCODE=>ANSI, bbcode_to_html, ansi_to_html,
-#                    html_to_bbcode, html_to_ansi
-#
-#  2002-11-11  TH    Comment fixes, more case insensitive matching,
-#                    convert deprecated HTML styles (<b>, <i>), more
-#                    space-tolerant matching, img-tags in html_to_bbcode
-#                    works now, some error-preventing stripping and
-#                    downcasing.
-# ==========================================================================
-#++
-
-#:title: BBCode
-#
-# This module helps easening the separation of core and frontend with the
-# core (or submodules) being still able to say, what colors shall be used
-# in it's responses. This is achieved by encoding formatting information
-# using the BBCode tokens. This enables you to "pipe" layout information
-# such as colors, style, fonttype, size and alignment through the core to
-# the frontend.
-#
-# Additionally it converts markups/codes between ANSI, HTML and BBCode
-# almost freely ;)
-#
-# == Usage
-#
-#   # Converting a bbcode string to ANSI and XHTML
-#
-#   require 'mega/bbcode'
-#
-#   str = "this is [COLOR=red]red[/COLOR], this is [B]bold[/B]"
-#   print( BBCode.bbcode_to_ansi(str) )
-#   print( BBCode.bbcode_to_html(str) )
-#
-# == Author(s)
-#
-# * Thomas-Ivo Heinen
-#
-
-module BBCode
-
-  ## ANSIname => ANSIcode LUT
-  ANSINAME2CODE= { "reset"     => "\e[0m",    "bold"       => "\e[1m",
-                    "underline" => "\e[4m",    "blink"      => "\e[5m",
-                    "reverse"   => "\e[7m",    "invisible"  => "\e[8m",
-                    "black"     => "\e[0;30m", "darkgrey"   => "\e[1;30m",
-                    "red"       => "\e[0;31m", "lightred"   => "\e[1;31m",
-                    "green"     => "\e[0;32m", "lightgreen" => "\e[1;32m",
-                    "brown"     => "\e[0;33m", "yellow"     => "\e[1;33m",
-                    "blue"      => "\e[0;34m", "lightblue"  => "\e[1;34m",
-                    "purple"    => "\e[0;35m", "magenta"    => "\e[1;35m",
-                    "cyan"      => "\e[1;36m", "lightcyan"  => "\e[1;36m",
-                    "grey"      => "\e[0;37m", "white"      => "\e[1;37m",
-                    "bgblack"   => "\e[40m",   "bgred"      => "\e[41m",
-                    "bggreen"   => "\e[42m",   "bgyellow"   => "\e[43m",
-                    "bgblue"    => "\e[44m",   "bgmagenta"  => "\e[45m",
-                    "bgcyan"    => "\e[46m",   "bgwhite"    => "\e[47m"
-                  }
-
-  ## BBColor => ANSIname LUT
-  BBCOLOR2ANSI  = { "skyblue"   => "blue",     "royalblue" => "blue",
-                    "blue"      => "blue",     "darkblue"  => "blue",
-                    "orange"    => "red",      "orangered" => "red",
-                    "crimson"   => "red",      "red"       => "lightred",
-                    "firebrick" => "red",      "darkred"   => "red",
-                    "green"     => "green",    "limegreen" => "green",
-                    "seagreen"  => "green",    "darkgreen" => "green",
-                    "deeppink"  => "magenta",  "tomato"    => "red",
-                    "coral"     => "cyan",     "purple"    => "purple", 
-                    "indigo"    => "blue",     "burlywood" => "red",
-                    "sandybrown"=> "red",      "sierra"    => "sierra",
-                    "chocolate" => "brown",    "teal"      => "teal",
-                    "silver"    => "white",     
-                    "black"     => "black",    "yellow"    => "yellow",
-                    "magenta"   => "magenta",  "cyan"      => "cyan",
-                    "white"     => "white" 
-                  }
-
-  ## ANSInames => BBCode LUT
-  ANSINAME2BBCODE = { "bold" => "B", "underline" => "U", "reverse" => "I",
-
-                      "red"    => "COLOR=red",      "blue"   => "COLOR=blue",
-                      "green"  => "COLOR=green",    "cyan"   => "COLOR=cyan",
-                      "magenta"=> "COLOR=deeppink", "purple" => "COLOR=purple",
-                      "black"  => "COLOR=black",    "white"  => "COLOR=white",
-                      "yellow" => "COLOR=yellow",   "brown"  => "COLOR=chocolate"
-                    }
-
-  ## Needed for alignments
-  @@width = 80
-
-
-  # ---------------------------
-
-  # Returns the ANSI sequence for given color, if existant
-  def BBCode.ansi(colorname)
-      colorname.strip!
-      return ANSINAME2CODE[ colorname.downcase ]
-  end
-
-  # --- strip_bbcode( string )
-  # Will strip any BBCode tags from the given string.
-  def BBCode.strip_bbcode(string)
-      string.strip!
-      return string.gsub(/\[[A-Za-z0-9\/=]+\]/, "") 
-  end
-
-  # Returns the string with all ansi escape sequences converted to BBCodes
-  def BBCode.ansi_to_bbcode(string)
-      return "" if string.nil? || string.to_s.strip.empty?
-      result = ""
-      tagstack = []
-
-      ## Iterate over input lines
-      string.split("\n").each do |line|
-          ansi = line.scan(/\e\[[0-9;]+m/)
-          continue if ansi.nil? || ansi.empty?
-
-          ## Iterate over found ansi sequences
-          ansi.each do |seq|  
-              ansiname = ANSINAME2CODE.invert["#{seq}"]
-
-              ## Pop last tag and form closing tag
-              if ansiname == "reset"
-                  lasttag = tagstack.pop
-                  bbname = "/" + String.new( lasttag.split("=")[0] )
-
-              ## Get corresponding BBCode tag + Push to stack
-              else
-                  bbname   = ANSINAME2BBCODE[ansiname]
-                  tagstack.push(bbname) 
-              end
-
-              ## Replace ansi sequence by BBCode tag
-              replace = sprintf("[%s]", bbname)
-              line.sub!("#{Regexp.quote(seq)}", replace)
-          end
-
-          ## Append converted line
-          result << sprintf("%s\n", line)
-      end
-
-
-      ## Some tags are unclosed
-      while !tagstack.empty?
-          result << sprintf("[/%s]", String.new(tagstack.pop.split("=")[0])  )
-      end
-
-      return result
-  end
-
-  # Converts a BBCode string to one with ANSI sequences.
-  # Returns the string with all formatting instructions in BBCodes converted
-  # to ANSI code sequences / aligned with spaces to specified width.
-  def BBCode.bbcode_to_ansi(string, usecolors = true)
-      return "" if string.nil? || string.to_s.strip.empty?
-      result = ""
-
-      return BBCode.strip_bbcode(string) if !usecolors
-
-      ## Iterate over lines
-      string.split("\n").each do |line|
-
-          ## TODO: stacking? other styles!
-          ANSINAME2BBCODE.each do |key,val|
-              line.gsub!(/\[#{val}\]/, ANSINAME2CODE[key])
-              line.gsub!(/\[\/#{val}\]/, ANSINAME2CODE["reset"])
-          end
-
-          ## Fonttypes and sizes not available
-          line.gsub!(/\[SIZE=\d\]/, "")
-          line.gsub!(/\[\/SIZE\]/, "")
-          line.gsub!(/\[FONT=[^\]]*\]/, "")
-          line.gsub!(/\[\/FONT\]/, "")
-
-          ## Color-mapping
-          colors = line.scan(/\[COLOR=(.*?)\]/i)
-          colors = colors.collect{|s|  s[0].to_s} if !colors.nil?
-          colors.each do |col|  
-              name = BBCOLOR2ANSI[col.downcase]
-              name = BBCOLOR2ANSI["white"] if name.nil?
-              code = ANSINAME2CODE[name]
-
-              line.gsub!(/\[COLOR=#{col}\]/i, code)
-          end
-          line.gsub!(/\[\/COLOR\]/, ANSINAME2CODE["reset"])
-
-          ## TODO: Alignment
-          ## TODO: IMGs
-          ## TODO: EMAILs
-          ## TODO: URLs
-          ## TODO: QUOTEs
-          ## TODO: LISTs
-
-          result << sprintf("%s\n", line)
-      end
-
-      return result
-  end
-
-  
-  # Converts a HTML string into one with BBCode markup (TODO)
-  # Returns the (X)HTML markup string as BBCode
-  def BBCode.html_to_bbcode(string)
-      return "" if string.nil? || string.to_s.strip.empty?
-      result = ""
-
-      ## Iterate over lines
-      string.split(/<br *\/?>/i).each do |line|
-          styles = { "strong" => "b", "b" => "b",
-                      "em"     => "i", "i" => "i",
-                      "u"      => "u" }
-
-          ## preserve B, I, U
-          styles.each do |html,code|
-              line.gsub!(/<#{html}>/i, "[#{code.upcase}]")
-              line.gsub!(/<\/#{html}>/i, "[/#{code.upcase}]")
-          end
-          
-          ## TODO: COLORs
-          ## TODO: SIZEs
-          ## TODO: FONTs
-
-          ## EMAIL
-          line.gsub!(/<a +href *= *\"mailto:(.*?)\".*?>.*?<\/a>/i, "[EMAIL]\\1[/EMAIL]")
-          
-          ## URL
-          line.gsub!(/<a +href *= *\"((?:https?|ftp):\/\/.*?)\".*?>(.*?)<\/a>/i, "[URL=\\1]\\2[/URL]")
-          
-          ## Other refs + closing tags => throw away
-          line.gsub!(/<a +href *= *\".*?\".*?>/i, "")
-          line.gsub!(/<\/a>/i,            "")
-
-          ## IMG
-          line.gsub!(/<img +src *= *\"(.*?)\".*?\/?>/i, "[IMG=\\1]")
-
-          ## CENTER (right/left??)
-          line.gsub!(/<center>/i,   "[ALIGN=center]")
-          line.gsub!(/<\/center>/i, "[/ALIGN]")
-
-          ## QUOTE
-          line.gsub!(/<(?:xmp|pre)>/i,   "[QUOTE]")
-          line.gsub!(/<\/(?:xmp|pre)>/i, "[/QUOTE]")
-
-          ## LIST
-          line.gsub!(/<ul>/i,      "\n[LIST]\n")
-          line.gsub!(/<\/ul>/i,    "\n[/LIST]\n")
-          line.gsub!(/<li *\/?> */i, "\n[*] ")
-
-          ## Unkown tags => throw away
-          line.gsub!(/<.*? *\/?>/, "")
-
-          result << sprintf("%s<br />\n", line)
-      end
-
-      return result.gsub!(/<br *\/?>/i, "\n")
-  end
-
-  # Converts a BBCode string to one with HTML markup.
-  # Returns the string with all formatting instructions in 
-  # BBCodes converted to XHTML markups.
-  def BBCode.bbcode_to_html(string)
-      return "" if string.nil? || string.to_s.strip.empty?
-      result = ""
-      quote = 0
-
-      ## Iterate over lines
-      string.split("\n").each do |line|
-          styles = { "b" => "strong", "i" => "em", "u" => "u" }
-
-          ## preserve B, I, U
-          styles.each do |code,html|
-              line.gsub!(/\[#{code}\]/i, "<#{html}>")
-              line.gsub!(/\[\/#{code}\]/i, "</#{html}>")
-          end
-          
-          ## COLOR => font color=... (TODO: should be numeric!)
-          line.gsub!(/\[COLOR=(.*?)\]/i, "<font color=\"\\1\">")
-          line.gsub!(/\[\/COLOR\]/i,     "</font>")
-
-          ## SIZE => font size=...
-          line.gsub!(/\[SIZE=(.*?)\]/i, "<font size=\"\\1\">")
-          line.gsub!(/\[\/SIZE\]/i,     "</font>")
-
-          ## URL   
-          line.gsub!(/\[URL\]([^\[]+?)\[\/URL\]/i, "<a href=\"\\1\">\\1</a>")
-          line.gsub!(/\[URL=(.*?)\](.+?)\[\/URL\]/i, "<a href=\"\\1\">\\2</a>")
-
-          ## IMG
-          line.gsub!(/\[IMG=(.*?)\]/i, "<img src=\"\\1\" />")
-
-          ## ALIGN=center (TODO: right, left)
-          line.gsub!(/\[ALIGN=center\]/i, "<center>")
-          line.gsub!(/\[ALIGN=right\]/i,  "<center>")
-          line.gsub!(/\[ALIGN=left\]/i,   "<center>")
-          line.gsub!(/\[\/ALIGN\]/i,      "</center>")
-
-          ## QUOTE
-          quote+=1 if line =~ /\[QUOTE\]/i
-          quote-=1 if (line =~ /\[\/QUOTE\]/i) && (quote > -1)
-          line.gsub!(/\[QUOTE\]/i,   "<pre>\n")
-          line.gsub!(/\[\/QUOTE\]/i, "</pre>\n")
-          line.gsub!(/^/, "&#62;"*quote) if quote > 0
-
-          ## EMAIL
-          line.gsub!(/\[EMAIL\](.*?)\[\/EMAIL\]/i, "<a href=\"mailto:\\1\">\\1</a>")
-
-          ## LIST (TODO: LIST=1, LIST=A)
-          line.gsub!(/\[LIST(?:=(.*?))?\]/i, "\n<ul>\n")
-          line.gsub!(/\[\/LIST\]/i,          "\n</ul>\n")
-          line.gsub!(/\[\*\]/i,              "\n<li />")
-
-          ## FONT => font ??????
-          ## ?BLUR?, FADE?
-
-          result << sprintf("%s<br />\n", line)
-      end
-
-      return result
-  end
-
-
-  # -- Transitive methods ---------------
-
-  # Converts a ANSI string to one with HTML markup.
-  # Returns the string with ANSI code sequences converted to XHTML markup.
-  def BBCode.ansi_to_html(string)
-      bbcoded = BBCode.ansi_to_bbcode(string )
-      htmled  = BBCode.bbcode_to_html(bbcoded)
-
-      return htmled
-  end
-
-  # Returns the (X)HTML markup code as ANSI sequences
-  def BBCode.html_to_ansi(string)
-      bbcoded = BBCode.html_to_bbcode(string )
-      ansied  = BBCode.bbcode_to_ansi(bbcoded)
-
-      return ansied
-  end
-
-end #module BBCode
-
-
-
-#  _____         _
-# |_   _|__  ___| |_
-#   | |/ _ \/ __| __|
-#   | |  __/\__ \ |_
-#   |_|\___||___/\__|
-#
-
-=begin testing
-
-  require 'test/unit'
-
-  class TC_BBCode < Test::Unit::TestCase
-
-    def test_to_ansi
-      str = "this is [COLOR=red]red[/COLOR], this is [B]bold[/B]"
-      out = "this is \e[0;31mred\e[0m, this is \e[1mbold\e[0m\n"
-      assert_equal( out, BBCode.bbcode_to_ansi(str) )
-    end
-
-    def test_to_html
-      str = "this is [COLOR=red]red[/COLOR], this is [B]bold[/B]"
-      out = "this is <font color=\"red\">red</font>, this is <strong>bold</strong><br />\n"
-      assert_equal( out, BBCode.bbcode_to_html(str) ) 
-    end
-
-  end
-
-=end
-
-require 'test/unit'
-require 'mega/bbcode'
-
-
-class TC_BBCode < Test::Unit::TestCase
-
-  def test_to_ansi
-    str = "this is [COLOR=red]red[/COLOR], this is [B]bold[/B]"
-    out = "this is \e[0;31mred\e[0m, this is \e[1mbold\e[0m\n"
-    assert_equal( out, BBCode.bbcode_to_ansi(str) )
-  end
-  
-  def test_to_html
-    str = "this is [COLOR=red]red[/COLOR], this is [B]bold[/B]"
-    out = "this is <font color=\"red\">red</font>, this is <strong>bold</strong><br />\n"
-    assert_equal( out, BBCode.bbcode_to_html(str) ) 
-  end
-
-end

data/lib/mega/binary_multiplier.rb

@@ -1,250 +0,0 @@
-#--
-# Binary Multipliers
-#
-# Copyright (c) 2005 Thomas Sawyer
-# Copyright (c) 2004 Rich Kilmer
-#
-# Ruby License
-#
-# This module is free software. You may use, modify, and/or redistribute this
-# software under the same terms as Ruby.
-#
-# This program 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.
-#
-# ==========================================================================
-# Revision History ::
-# --------------------------------------------------------------------------
-#  2005.08.10  trans   * Made a module. Added in_* methods.
-#  2005.07.28  trans   * Rewrote lib to work in bits instead of bytes.
-#  2005.04.28  trans   * Ported from Rich Kilmer's lib.
-# ==========================================================================
-#
-# :CREDIT: Credit goes to Richard Kilmer for the orignal work and
-#          Alexander Kellett for suggesting it be included here.
-#
-#++
-
-#:title: Binary Multipliers
-#
-# Mixin for Numeric to make working with bits and bytes easier.
-# These are numerous and therefore provided via a mega-module
-# called BinaryMultiplers, rather then individual nano-methods.
-#
-#   1.byte               #=> 8
-#   2.bytes              #=> 16
-#   1.kilobit            #=> 1024
-#   1.kilobyte           #=> 8192
-#
-module Numeric::BinaryMultipliers
-
-  # Measure in bits.
-
-  def bit     ; self ; end
-  def kilobit ; self * 1024 ; end
-  def megabit ; self * 1024**2 ; end
-  def gigabit ; self * 1024**3 ; end
-  def terabit ; self * 1024**4 ; end
-  def petabit ; self * 1024**5 ; end
-  def exabit  ; self * 1024**6 ; end
-
-  alias_method :bits    , :bit
-  alias_method :kilobits, :kilobit
-  alias_method :megabits, :megabit
-  alias_method :gigabits, :gigabit
-  alias_method :petabits, :petabit
-  alias_method :exabits , :exabit
-
-  # Bytes are converted to bits.
-
-  def byte     ; self * 8 ; end
-  def kilobyte ; self * 8 * 1024 ; end
-  def megabyte ; self * 8 * 1024**2 ; end
-  def gigabyte ; self * 8 * 1024**3 ; end
-  def terabyte ; self * 8 * 1024**4 ; end
-  def petabyte ; self * 8 * 1024**5 ; end
-  def exabyte  ; self * 8 * 1024**6 ; end
-
-  alias_method :bytes    , :byte
-  alias_method :kilobytes, :kilobyte
-  alias_method :megabytes, :megabyte
-  alias_method :gigabytes, :gigabyte
-  alias_method :petabytes, :petabyte
-  alias_method :exabytes , :exabyte
-
-  # SI Binary Multiplers (also available from Multipliers)
-
-  def kibi ; self * 1024 ; end
-  def mebi ; self * 1024**2 ; end
-  def gibi ; self * 1024**3 ; end
-  def tebi ; self * 1024**4 ; end
-  def pebi ; self * 1024**5 ; end
-  def exbi ; self * 1024**6 ; end
-
-  # Define inverse functions for bite
-
-  def in_bits     ; self ; end
-  def in_kilobits ; self / 1024 ; end
-  def in_megabits ; self / 1024**2 ; end
-  def in_gigabits ; self / 1024**3 ; end
-  def in_terabits ; self / 1024**4 ; end
-  def in_petabits ; self / 1024**5 ; end
-  def in_exabits  ; self / 1024**6 ; end
-
-  # Define inverse functions for bytes
-
-  def in_bytes     ; self / 8 ; end
-  def in_kilobytes ; self / (8 * 1024) ; end
-  def in_megabytes ; self / (8 * 1024**2) ; end
-  def in_gigabytes ; self / (8 * 1024**3) ; end
-  def in_terabytes ; self / (8 * 1024**4) ; end
-  def in_petabytes ; self / (8 * 1024**5) ; end
-  def in_exabytes  ; self / (8 * 1024**6) ; end
-
-  # Formated string of bits proportial to size.
-  #
-  #   1024.bits_to_s            #=> "1.00 kb"
-  #   1048576.bits_to_s         #=> "1.00 mb"
-  #   1073741824.bits_to_s      #=> "1.00 gb"
-  #   1099511627776.bits_to_s   #=> "1.00 tb"
-  #
-  # Takes a format string to adjust output.
-  #
-  #   1024.bits_to_s('%.0f')    #=> "1 kb"
-  #
-  def strfbits(fmt='%.2f')
-    case
-    when self < 1024
-      "#{self} bits"
-    when self < 1024**2
-      "#{fmt % (self.to_f / 1024)} kb"
-    when self < 1024**3
-      "#{fmt % (self.to_f / 1024**2)} mb"
-    when self < 1024**4
-      "#{fmt % (self.to_f / 1024**3)} gb"
-    when self < 1024**5
-      "#{fmt % (self.to_f / 1024**4)} tb"
-    else
-      "#{self} bits"
-    end
-  end
-
-  # Formated string of bytes proportial to size.
-  #
-  #   1024.bytes_to_s            #=> "1.00 KB"
-  #   1048576.bytes_to_s         #=> "1.00 MB"
-  #   1073741824.bytes_to_s      #=> "1.00 GB"
-  #   1099511627776.bytes_to_s   #=> "1.00 TB"
-  #
-  # Takes a format string to adjust output.
-  #
-  #   1024.bytes_to_s('%.0f')    #=> "1 KB"
-  #
-  def strfbytes(fmt='%.2f')
-    case
-    when self < 1024
-      "#{self} bytes"
-    when self < 1024**2
-      "#{fmt % (self.to_f / 1024)} KB"
-    when self < 1024**3
-      "#{fmt % (self.to_f / 1024**2)} MB"
-    when self < 1024**4
-      "#{fmt % (self.to_f / 1024**3)} GB"
-    when self < 1024**5
-      "#{fmt % (self.to_f / 1024**4)} TB"
-    else
-      "#{self} bytes"
-    end
-  end
-
-  # deprecated
-  alias_method :octet_units, :strfbytes
-
-end
-
-#--
-class Numeric
-  include BinaryMultipliers
-end
-#++
-
-
-#  _____         _
-# |_   _|__  ___| |_
-#   | |/ _ \/ __| __|
-#   | |  __/\__ \ |_
-#   |_|\___||___/\__|
-#
-
-=begin testing
-
-require 'test/unit'
-
-class TC_Numeric < Test::Unit::TestCase
-
-  # bits
-
-  def test_bits
-    assert_equal( 8, 8.bits )
-  end
-
-  def test_kilobits
-    assert_equal( 1024**1, 1.kilobit )
-  end
-
-  def test_megabits
-    assert_equal( 1024**2, 1.megabit )
-  end
-
-  def test_gigabits
-    assert_equal( 1024**3, 1.gigabit )
-  end
-
-  def test_terabits
-    assert_equal( 1024**4, 1.terabit )
-  end
-
-  # bytes
-
-  def test_bytes
-    assert_equal( 8192, 1024.bytes )
-  end
-
-  def test_kilobytes
-    assert_equal( 1024**1*8, 1.kilobyte )
-  end
-
-  def test_megabytes
-    assert_equal( 1024**2*8, 1.megabyte )
-  end
-
-  def test_gigabytes
-    assert_equal( 1024**3*8, 1.gigabyte )
-  end
-
-  def test_terabytes
-    assert_equal( 1024**4*8, 1.terabyte )
-  end
-
-  # bits_to_s
-
-  def test_strfbits
-    assert_equal( "1.00 kb", 1024.strfbits )
-    assert_equal( "1.00 mb", 1048576.strfbits )
-    assert_equal( "1.00 gb", 1073741824.strfbits )
-    assert_equal( "1.00 tb", 1099511627776.strfbits )
-  end
-
-  # bytes_to_s
-
-  def test_strfbytes
-    assert_equal( "1.00 KB", 1024.strfbytes )
-    assert_equal( "1.00 MB", 1048576.strfbytes )
-    assert_equal( "1.00 GB", 1073741824.strfbytes )
-    assert_equal( "1.00 TB", 1099511627776.strfbytes )
-  end
-
-end
-
-=end