zevarito-uglify_html 0.11

data/CHANGELOG

@@ -0,0 +1,8 @@
+version 0.11
+
+* Process UL and OL lists
+* Process Underlines, Line through, Bold and Italics
+* Hpricot Extensions
+** Hpricot::Styles class 
+** Hpricot::Elem change_tag, styles
+** Hpricot::Elem::Trav set_style

data/LICENSE

@@ -0,0 +1,22 @@
+(The MIT License)
+
+Copyright (c) 2009 Nicolas Sanguinetti, entp.com
+
+Permission is hereby granted, free of charge, to any person obtaining
+a copy of this software and associated documentation files (the
+'Software'), to deal in the Software without restriction, including
+without limitation the rights to use, copy, modify, merge, publish,
+distribute, sublicense, and/or sell copies of the Software, and to
+permit persons to whom the Software is furnished to do so, subject to
+the following conditions:
+
+The above copyright notice and this permission notice shall be
+included in all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED 'AS IS', WITHOUT WARRANTY OF ANY KIND,
+EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
+IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY
+CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,
+TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
+SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

data/README.rdoc

@@ -0,0 +1,60 @@
+= UglifyHtml 
+
+Ugly small lib to convert HTML markup to ugly HTML markup.
+
+Things such these happen...
+
+  <strong>some bold text</strong>
+
+to
+
+  <span style="font-weight: bold"></span>
+
+-
+
+  <em>some bold text</em>
+
+to
+
+  <span style="font-style: italic"></span>
+
+-
+
+  <ul>
+    <li>Item 1</li>
+    <li>Item 2
+      <ul>
+        <li>Item 1 List 2</li>
+      </ul>
+    </li>
+  </ul>
+
+to
+
+  <ul>
+    <li>Item 1</li>
+    <li>Item 2
+      <ul>
+        <li>Item 1 List 2</li>
+      </ul>
+    </li>
+  </ul>
+
+
+== Why?
+
+* Put it inside a nicEdit[http://nicedit.com] Wysiwyg editor.
+
+== With
+
+* Hpricot
+* Hpricot extensions Elem::Trav::add_style, Elem::Trav::has_style?, Elem::change_tag!
+
+== Get it
+
+    gem install zevarito-uglify_html
+
+== License
+
+Authors:: Alvaro Gil (zevarito[http://github.com/zevarito])
+License:: MIT (Check LICENSE for details)

data/Rakefile

@@ -0,0 +1,31 @@
+require "rake/testtask"
+
+begin
+  require "hanna/rdoctask"
+rescue LoadError
+  require "rake/rdoctask"
+end
+
+Rake::RDocTask.new do |rd|
+  rd.main = "README"
+  rd.title = "API Documentation for UglifyHtml"
+  rd.rdoc_files.include("README.rdoc", "LICENSE", "lib/**/*.rb")
+  rd.rdoc_dir = "doc"
+end
+
+begin
+  require "metric_fu"
+rescue LoadError
+end
+
+begin
+  require "mg"
+  MG.new("uglify_html.gemspec")
+end
+
+desc "Default: run tests"
+task :default => :test
+
+Rake::TestTask.new do |t|
+  t.test_files = FileList["test/test_*.rb"]
+end

data/lib/hpricot_ext.rb

@@ -0,0 +1,54 @@
+require 'hpricot'
+
+module ::Hpricot
+  module Elem::Trav
+    def has_style?(name)
+    end
+
+    def get_style(name)
+    end
+
+    def set_style(name, value)
+      styles[name.to_s] = value.fast_xs
+    end
+  end
+
+  class Styles
+    def initialize e
+      @element = e
+    end
+
+    def []= k, v 
+      s = properties.map {|pty,val| "#{pty}:#{val}"}.join(";")
+      @element.set_attribute("style", "#{s.chomp(";")};#{k}:#{v}".sub(/^\;/, ""))
+    end
+
+    def properties
+      return {} if not @element.has_attribute?("style")
+      @element.get_attribute("style").split(";").inject({}) do |hash,v|
+        v = v.split(":")
+        hash.update v.first.strip => v.last.strip
+      end
+    end
+
+    def to_s
+      properties.to_s
+    end
+
+    def to_h
+      properties
+    end
+  end
+
+  class Elem
+    def change_tag!(new_tag, preserve_attr = true)
+      return if not etag
+      self.name = new_tag
+      attributes.each {|k,v| remove_attribute(k)} if not preserve_attr
+    end
+
+    def styles
+      Styles.new self
+    end
+  end
+end

data/lib/uglify_html.rb

@@ -0,0 +1,40 @@
+require 'hpricot_ext'
+
+class UglifyHtml
+  def initialize(html)
+    @doc = Hpricot html
+  end
+
+  def make_ugly
+    (@doc/"*").each do |e|
+      case e.name
+      when 'b', 'strong' then process_with_style(e, "font-weight",      "bold")
+      when 'i', 'em'     then process_with_style(e, "font-style",       "italic")
+      when 'u', 'ins'    then process_with_style(e, "text-decoration",  "underline")
+      when 'del'         then process_with_style(e, "text-decoration",  "line-through")
+      when 'ul', 'ol'    then process_list(e)
+      end 
+    end
+
+    (@doc/"li ul | li ol").remove
+
+    @doc.to_html
+  end
+
+  private
+
+  def process_with_style(e, style, value)
+    if e.parent and e.parent.name == "span" and e.parent.children.size == 1
+      e.parent.set_style(style, value)
+      e.swap e.inner_html
+    else
+      e.change_tag! "span"
+      e.set_style(style, value)
+    end
+  end
+
+  def process_list(e)
+    return if not e.parent or not e.parent.name == "li"
+    e.parent.after(e.to_html)
+  end
+end

data/test/test_helper.rb

@@ -0,0 +1,11 @@
+require "rubygems"
+require "test/unit"
+require "contest"
+Dir[File.expand_path(File.dirname(__FILE__) + "/../lib/**/*.rb")].each do |file|
+  require file
+end
+
+begin
+  require "redgreen"
+rescue LoadError
+end

data/test/test_hpricot_ext.rb

@@ -0,0 +1,52 @@
+require File.expand_path(File.dirname(__FILE__) + "/test_helper")
+
+class HpricotExtensionsTest < Test::Unit::TestCase
+  GET_ELEM = lambda {|content| Hpricot(content).children[0]}
+
+  def setup_elements
+    @p_without_styles   = GET_ELEM.call("<p>some text inside</p>")
+    @p_with_styles      = GET_ELEM.call("<p styles='font-weight:bold; color:#000; font-style: italic'>some text inside</p>")
+    @img_without_styles = GET_ELEM.call("<img src='some.jpg' />")
+  end
+
+  context "Hpricot::Styles extensions" do
+    setup do
+      setup_elements
+    end
+
+    test "get a hash of all styles from an element" do
+      assert_kind_of Hpricot::Styles, @p_with_styles.styles
+    end
+
+    test "add new style to an element trough Elem" do
+      @p_without_styles.set_style("color", "red")
+      assert_equal({"color" => "red"}, @p_without_styles.styles.to_h)
+    end
+    
+    test "add new style to an element trough Styles" do
+      @p_without_styles.styles["color"] = "red"
+      assert_equal({"color" => "red"}, @p_without_styles.styles.to_h)
+    end
+  end
+  
+  context "Hpricot::Elem extensions" do
+    setup do
+      setup_elements
+    end
+
+    test "change an element tag name preserving attributes" do
+      @p_with_styles.change_tag! "span"
+      assert_equal "<span styles=\"font-weight:bold; color:#000; font-style: italic\">some text inside</span>", @p_with_styles.to_s
+    end
+    
+    test "change an element tag name not preserving attributes" do
+      @p_with_styles.change_tag! "span", false
+      assert_equal "<span>some text inside</span>", @p_with_styles.to_s
+    end
+    
+    test "ignore self closed element tag name" do
+      @img_without_styles.change_tag! "hr"
+      assert_equal "<img src=\"some.jpg\" />", @img_without_styles.to_s
+    end
+  end
+end

data/test/test_uglify.rb

@@ -0,0 +1,47 @@
+require File.expand_path(File.dirname(__FILE__) + "/test_helper")
+
+class UglifyHtmlTest < Test::Unit::TestCase
+  def assert_renders_uglify(uglify, html)
+    assert_equal uglify, UglifyHtml.new(html).make_ugly
+  end
+
+  context "convert common tags" do
+    test "it should convert a simple <strong> tag" do
+      html = "<p>some <strong>bold</strong> text inside a paragraph</p>"
+      uglify = "<p>some <span style=\"font-weight:bold\">bold</span> text inside a paragraph</p>"
+      assert_renders_uglify uglify, html 
+    end
+
+    test "it should convert a <strong> nested on a <em>" do
+      html = "<p>some <em><strong>em bold</strong></em> text inside a paragraph</p>"
+      uglify = "<p>some <span style=\"font-style:italic;font-weight:bold\">em bold</span> text inside a paragraph</p>"
+      assert_renders_uglify uglify, html 
+    end
+    
+    test "it should convert a <ins> tag" do
+      html = "<p>some <ins>underline</ins> text inside a paragraph</p>"
+      uglify = "<p>some <span style=\"text-decoration:underline\">underline</span> text inside a paragraph</p>"
+      assert_renders_uglify uglify, html 
+    end
+    
+    test "it should convert a <del> tag" do
+      html = "<p>some <del>deleted</del> text inside a paragraph</p>"
+      uglify = "<p>some <span style=\"text-decoration:line-through\">deleted</span> text inside a paragraph</p>"
+      assert_renders_uglify uglify, html 
+    end
+  end
+
+  context "convert lists" do
+    test "it should convert a simple ul nested list" do
+      html = "<ul><li>item 1</li><li>item 2<ul><li>nested 1 item 1</li></ul></li></ul>"
+      uglify = "<ul><li>item 1</li><li>item 2</li><ul><li>nested 1 item 1</li></ul></ul>"
+      assert_renders_uglify uglify, html 
+    end
+    
+    test "it should convert a simple ol nested list" do
+      html = "<ol><li>item 1</li><li>item 2<ol><li>nested 1 item 1</li></ol></li></ol>"
+      uglify = "<ol><li>item 1</li><li>item 2</li><ol><li>nested 1 item 1</li></ol></ol>"
+      assert_renders_uglify uglify, html 
+    end
+  end
+end

data/uglify_html.gemspec

@@ -0,0 +1,37 @@
+Gem::Specification.new do |s|
+  s.name    = "uglify_html"
+  s.version = "0.11"
+  s.date    = "2009-08-10"
+
+  s.description = "Make ugly a Html document"
+  s.summary     = "Make ugly a Html document to use for example on wysiwyg editors"
+  s.homepage    = ""
+
+  s.authors = "Alvaro Gil"
+  s.email   = "zevarito@gmail.com"
+
+  s.require_paths     = ["lib"]
+  s.has_rdoc          = true
+  s.rubygems_version  = "1.3.1"
+
+  s.add_dependency "hpricot"
+
+  if s.respond_to?(:add_development_dependency)
+    s.add_development_dependency "sr-mg"
+    s.add_development_dependency "contest"
+    s.add_development_dependency "redgreen"
+  end
+
+  s.files = %w[
+LICENSE
+CHANGELOG
+README.rdoc
+Rakefile
+uglify_html.gemspec
+lib/hpricot_ext.rb
+lib/uglify_html.rb
+test/test_helper.rb
+test/test_hpricot_ext.rb
+test/test_uglify.rb
+]
+end

metadata

@@ -0,0 +1,102 @@
+--- !ruby/object:Gem::Specification 
+name: zevarito-uglify_html
+version: !ruby/object:Gem::Version 
+  version: "0.11"
+platform: ruby
+authors: 
+- Alvaro Gil
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2009-08-10 00:00:00 -07:00
+default_executable: 
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: hpricot
+  type: :runtime
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: "0"
+    version: 
+- !ruby/object:Gem::Dependency 
+  name: sr-mg
+  type: :development
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: "0"
+    version: 
+- !ruby/object:Gem::Dependency 
+  name: contest
+  type: :development
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: "0"
+    version: 
+- !ruby/object:Gem::Dependency 
+  name: redgreen
+  type: :development
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: "0"
+    version: 
+description: Make ugly a Html document
+email: zevarito@gmail.com
+executables: []
+
+extensions: []
+
+extra_rdoc_files: []
+
+files: 
+- LICENSE
+- CHANGELOG
+- README.rdoc
+- Rakefile
+- uglify_html.gemspec
+- lib/hpricot_ext.rb
+- lib/uglify_html.rb
+- test/test_helper.rb
+- test/test_hpricot_ext.rb
+- test/test_uglify.rb
+has_rdoc: true
+homepage: ""
+licenses: 
+post_install_message: 
+rdoc_options: []
+
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+requirements: []
+
+rubyforge_project: 
+rubygems_version: 1.3.5
+signing_key: 
+specification_version: 2
+summary: Make ugly a Html document to use for example on wysiwyg editors
+test_files: []
+