fortitude 0.0.4-java

data/fortitude.gemspec

@@ -0,0 +1,42 @@
+# coding: utf-8
+lib = File.expand_path('../lib', __FILE__)
+$LOAD_PATH.unshift(lib) unless $LOAD_PATH.include?(lib)
+require 'fortitude/version'
+
+Gem::Specification.new do |s|
+  s.name          = "fortitude"
+  s.version       = Fortitude::VERSION
+  s.authors       = ["Andrew Geweke"]
+  s.email         = ["andrew@geweke.org"]
+  s.summary       = %q{Views Are Code: use all the power of Ruby to build views in your own language.}
+  s.description   = %q{Views Are Code: use all the power of Ruby to build views in your own language.}
+  s.homepage      = "https://github.com/ageweke/fortitude"
+  s.license       = "MIT"
+
+  s.files         = `git ls-files`.split($/)
+  s.executables   = s.files.grep(%r{^bin/}) { |f| File.basename(f) }
+  s.test_files    = s.files.grep(%r{^(test|spec|features)/})
+  s.require_paths = ["lib"]
+
+  if RUBY_PLATFORM =~ /java/
+    s.platform = 'java'
+  else
+    s.platform = Gem::Platform::RUBY
+    s.extensions << "ext/fortitude_native_ext/extconf.rb"
+  end
+
+  activesupport_spec = if RUBY_VERSION =~ /^1\.8\./
+    [ ">= 3.0", "< 4.0" ]
+  else
+    [ ">= 3.0" ]
+  end
+
+  s.add_dependency "activesupport", *activesupport_spec
+
+  s.add_development_dependency "bundler", "~> 1.5"
+  s.add_development_dependency "rake"
+  s.add_development_dependency "rspec", "~> 2.99"
+  s.add_development_dependency "rake-compiler"
+  s.add_development_dependency "json"
+  s.add_development_dependency "tilt", "~> 2.0"
+end

data/lib/fortitude.rb

@@ -0,0 +1,7 @@
+require "fortitude/version"
+require "fortitude/widgets"
+require "fortitude/rails"
+require "fortitude/extensions/native_extensions"
+require "fortitude/rendering_context"
+require "fortitude/widget"
+require "fortitude/tilt"

data/lib/fortitude/doctypes.rb

@@ -0,0 +1,48 @@
+require 'fortitude/doctypes/base'
+require 'fortitude/doctypes/html4'
+require 'fortitude/doctypes/html4_frameset'
+require 'fortitude/doctypes/html4_strict'
+require 'fortitude/doctypes/html4_transitional'
+require 'fortitude/doctypes/html5'
+require 'fortitude/doctypes/xhtml10'
+require 'fortitude/doctypes/xhtml10_frameset'
+require 'fortitude/doctypes/xhtml10_strict'
+require 'fortitude/doctypes/xhtml10_transitional'
+require 'fortitude/doctypes/xhtml11'
+
+module Fortitude
+  module Doctypes
+    KNOWN_DOCTYPES = begin
+      out = { }
+
+      [
+        Html5,
+
+        Html4Strict,
+        Html4Transitional,
+        Html4Frameset,
+
+        Xhtml10Strict,
+        Xhtml10Transitional,
+        Xhtml10Frameset,
+
+        Xhtml11
+      ].each do |doctype_class|
+        doctype = doctype_class.new
+        out[doctype.name] = doctype
+      end
+
+      out
+    end
+
+    class << self
+      def standard_doctype(type)
+        out = KNOWN_DOCTYPES[type]
+        unless out
+          raise ArgumentError, "Unknown standard doctype #{type.inspect}; I know about: #{KNOWN_DOCTYPES.keys.inspect}"
+        end
+        out
+      end
+    end
+  end
+end

data/lib/fortitude/doctypes/base.rb

@@ -0,0 +1,42 @@
+require 'fortitude/tags/tag_store'
+
+module Fortitude
+  module Doctypes
+    class Base
+      extend Fortitude::Tags::TagStore
+
+      class << self
+        def delegate_tag_stores
+          if superclass.respond_to?(:tags)
+            [ superclass ]
+          else
+            [ ]
+          end
+        end
+      end
+
+      attr_reader :name
+
+      def initialize(name, doctype_line)
+        @name = name
+        @doctype_line = doctype_line
+      end
+
+      def tags
+        self.class.tags
+      end
+
+      def declare!(w)
+        w.doctype(@doctype_line)
+      end
+
+      def close_void_tags_must_be
+        nil
+      end
+
+      def to_s
+        "<Doctype #{name.inspect}>"
+      end
+    end
+  end
+end

data/lib/fortitude/doctypes/html4.rb

@@ -0,0 +1,21 @@
+require 'fortitude/doctypes'
+require 'fortitude/doctypes/base'
+require 'fortitude/doctypes/html4_tags_strict'
+
+module Fortitude
+  module Doctypes
+    class Html4 < Base
+      def default_javascript_tag_attributes
+        { :type => 'text/javascript'.freeze }.freeze
+      end
+
+      def needs_cdata_in_javascript_tag?
+        false
+      end
+
+      def close_void_tags_must_be
+        false
+      end
+    end
+  end
+end

data/lib/fortitude/doctypes/html4_frameset.rb

@@ -0,0 +1,20 @@
+require 'fortitude/doctypes'
+require 'fortitude/doctypes/html4'
+require 'fortitude/doctypes/html4_tags_frameset'
+require 'fortitude/doctypes/html4_transitional'
+
+module Fortitude
+  module Doctypes
+    class Html4Frameset < Html4Transitional
+      def initialize
+        super(:html4_frameset, 'HTML PUBLIC "-//W3C//DTD HTML 4.01 Frameset//EN" "http://www.w3.org/TR/html4/frameset.dtd"')
+      end
+
+      class << self
+        def delegate_tag_stores
+          [ Fortitude::Doctypes::Html4TagsFrameset ]
+        end
+      end
+    end
+  end
+end

data/lib/fortitude/doctypes/html4_strict.rb

@@ -0,0 +1,18 @@
+require 'fortitude/doctypes'
+require 'fortitude/doctypes/html4'
+
+module Fortitude
+  module Doctypes
+    class Html4Strict < Html4
+      def initialize
+        super(:html4_strict, 'HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd"')
+      end
+
+      class << self
+        def delegate_tag_stores
+          [ Fortitude::Doctypes::Html4TagsStrict ]
+        end
+      end
+    end
+  end
+end

data/lib/fortitude/doctypes/html4_tags_frameset.rb

@@ -0,0 +1,53 @@
+require 'fortitude/doctypes'
+require 'fortitude/tags/tag_store'
+require 'fortitude/doctypes/html4_tags_transitional'
+
+module Fortitude
+  module Doctypes
+    module Html4TagsFrameset
+      extend Fortitude::Tags::TagStore
+
+      class << self
+        def delegate_tag_stores
+          [ Fortitude::Doctypes::Html4TagsTransitional ]
+        end
+      end
+
+      FRAMESET_BLOCK_CONTENT = %w{noframes}
+      FRAMESET_FLOW_CONTENT = %w{noframes}
+
+      %w{CORE_ATTRIBUTES FLOW_CONTENT ATTRS_ATTRIBUTES}.each do |constant_name|
+        const_set(constant_name, Fortitude::Doctypes::Html4TagsTransitional.const_get(constant_name))
+      end
+
+      # HTML4.01 spec, section 16.2
+      tag :frameset, :newline_before => true, :can_enclose => %w{frameset frame noframes},
+        :valid_attributes => CORE_ATTRIBUTES + %w{rows cols onload onunload},
+        :spec => 'http://www.w3.org/TR/html401/present/frames.html#h-16.2.1'
+      tag :frame, :newline_before => true, :content_allowed => false,
+        :valid_attributes => CORE_ATTRIBUTES + %w{longdesc name src frameborder marginwidth marginheight noresize scrolling},
+        :spec => 'http://www.w3.org/TR/html401/present/frames.html#h-16.2.2'
+      tag :noframes, :newline_before => true, :can_enclose => FLOW_CONTENT,
+        :valid_attributes => ATTRS_ATTRIBUTES,
+        :spec => 'http://www.w3.org/TR/html401/present/frames.html#h-16.4.1'
+
+      # HTML4.01 spec, section 16.5
+      tag :iframe, :newline_before => true, :can_enclose => FLOW_CONTENT,
+        :valid_attributes => CORE_ATTRIBUTES + %w{longdesc name src frameborder marginwidth marginheight scrolling} +
+                             %w{align height width},
+        :spec => 'http://www.w3.org/TR/html401/present/frames.html#h-16.5'
+
+
+      %w{body blockquote map form noscript}.each do |block_content_tag_name|
+        modify_tag(block_content_tag_name) { |t| t.can_enclose += FRAMESET_BLOCK_CONTENT }
+      end
+
+      %w{div ins del li dd th td object button fieldset center applet noframes iframe}.each do |flow_content_tag_name|
+        modify_tag(flow_content_tag_name) { |t| t.can_enclose += FRAMESET_FLOW_CONTENT }
+      end
+
+
+      modify_tag(:html) { |t| t.can_enclose += %w{frameset} }
+    end
+  end
+end

data/lib/fortitude/doctypes/html4_tags_strict.rb

@@ -0,0 +1,274 @@
+require 'fortitude/doctypes'
+require 'fortitude/tags/tag_store'
+
+module Fortitude
+  module Doctypes
+    module Html4TagsStrict
+      extend Fortitude::Tags::TagStore
+
+      # HTML4.01 DTD
+      I18N_ATTRIBUTES = %w{lang dir}
+      CORE_ATTRIBUTES = %w{id class style title}
+      EVENTS_ATTRIBUTES = %w{onclick ondblclick onmousedown onmouseup onmouseover onmousemove onmouseout onkeypress onkeydown onkeyup}
+      ATTRS_ATTRIBUTES = CORE_ATTRIBUTES + I18N_ATTRIBUTES + EVENTS_ATTRIBUTES
+
+      CELLHALIGN_ATTRIBUTES = %w{align char charoff}
+      CELLVALIGN_ATTRIBUTES = %w{valign}
+
+      HEADING_CONTENT = %w{h1 h2 h3 h4 h5 h6}
+      # TRANSITIONAL: + %w{dir menu}
+      LIST_CONTENT = %w{ul ol}
+      PREFORMATTED_CONTENT = %w{pre}
+      # TRANSITIONAL: + %w{center noframes isindex}
+      BLOCK_CONTENT = %w{p} + HEADING_CONTENT + LIST_CONTENT + PREFORMATTED_CONTENT + %w{dl div noscript} +
+                      %w{blockquote form hr table fieldset address}
+      # TRANSITIONAL: + %w{u s strike}
+      FONTSTYLE_CONTENT = %w{tt i b big small}
+      PHRASE_CONTENT = %w{em strong dfn code samp kbd var cite abbr acronym}
+      # TRANSITIONAL: + %w{applet font basefont iframe}
+      SPECIAL_CONTENT = %w{a img object br script map q sub sup span bdo}
+      FORMCTRL_CONTENT = %w{input select textarea label button}
+      INLINE_CONTENT = %w{_text} + FONTSTYLE_CONTENT + PHRASE_CONTENT + SPECIAL_CONTENT + FORMCTRL_CONTENT
+      FLOW_CONTENT = BLOCK_CONTENT + INLINE_CONTENT
+
+      # HTML4.01 spec, section 7.3
+      tag :html, :newline_before => true, :valid_attributes => I18N_ATTRIBUTES + %w{version},
+        :can_enclose => %w{head body},
+        :spec => 'http://www.w3.org/TR/html401/struct/global.html#h-7.3'
+
+      # HTML4.01 spec, section 7.4
+      tag :head, :newline_before => true, :valid_attributes => I18N_ATTRIBUTES + %w{profile},
+        :can_enclose => %w{script style meta link object title base},
+        :spec => 'http://www.w3.org/TR/html401/struct/global.html#h-7.4.1'
+      tag :title, :newline_before => true, :valid_attributes => I18N_ATTRIBUTES,
+        :spec => 'http://www.w3.org/TR/html401/struct/global.html#h-7.4.2'
+      tag :meta, :newline_before => true, :valid_attributes => I18N_ATTRIBUTES + %w{http-equiv name content scheme},
+        :content_allowed => false,
+        :spec => 'http://www.w3.org/TR/html401/struct/global.html#h-7.4.4.2'
+
+      # HTML4.01 spec, section 7.5
+      tag :body, :newline_before => true, :valid_attributes => ATTRS_ATTRIBUTES + %w{onload onunload},
+        :can_enclose => BLOCK_CONTENT + %w{script ins del},
+        :spec => 'http://www.w3.org/TR/html401/struct/global.html#h-7.5.1'
+      tag :div, :newline_before => true, :valid_attributes => ATTRS_ATTRIBUTES, :can_enclose => FLOW_CONTENT,
+        :spec => 'http://www.w3.org/TR/html401/struct/global.html#h-7.5.4'
+      tag :span, :valid_attributes => ATTRS_ATTRIBUTES, :can_enclose => INLINE_CONTENT,
+        :spec => 'http://www.w3.org/TR/html401/struct/global.html#h-7.5.4'
+      tag :h1, :newline_before => true, :valid_attributes => ATTRS_ATTRIBUTES, :can_enclose => INLINE_CONTENT,
+        :spec => 'http://www.w3.org/TR/html401/struct/global.html#h-7.5.5'
+      tag :h2, :newline_before => true, :valid_attributes => ATTRS_ATTRIBUTES, :can_enclose => INLINE_CONTENT,
+        :spec => 'http://www.w3.org/TR/html401/struct/global.html#h-7.5.5'
+      tag :h3, :newline_before => true, :valid_attributes => ATTRS_ATTRIBUTES, :can_enclose => INLINE_CONTENT,
+        :spec => 'http://www.w3.org/TR/html401/struct/global.html#h-7.5.5'
+      tag :h4, :newline_before => true, :valid_attributes => ATTRS_ATTRIBUTES, :can_enclose => INLINE_CONTENT,
+        :spec => 'http://www.w3.org/TR/html401/struct/global.html#h-7.5.5'
+      tag :h5, :newline_before => true, :valid_attributes => ATTRS_ATTRIBUTES, :can_enclose => INLINE_CONTENT,
+        :spec => 'http://www.w3.org/TR/html401/struct/global.html#h-7.5.5'
+      tag :h6, :newline_before => true, :valid_attributes => ATTRS_ATTRIBUTES, :can_enclose => INLINE_CONTENT,
+        :spec => 'http://www.w3.org/TR/html401/struct/global.html#h-7.5.5'
+      tag :address, :newline_before => true, :valid_attributes => ATTRS_ATTRIBUTES, :can_enclose => INLINE_CONTENT,
+        :spec => 'http://www.w3.org/TR/html401/struct/global.html#h-7.5.6'
+
+      # HTML4.01 spec, section 9.2
+      tag :em, :valid_attributes => ATTRS_ATTRIBUTES, :can_enclose => INLINE_CONTENT,
+        :spec => 'http://www.w3.org/TR/html401/struct/text.html#h-9.2.1'
+      tag :strong, :valid_attributes => ATTRS_ATTRIBUTES, :can_enclose => INLINE_CONTENT,
+        :spec => 'http://www.w3.org/TR/html401/struct/text.html#h-9.2.1'
+      tag :dfn, :valid_attributes => ATTRS_ATTRIBUTES, :can_enclose => INLINE_CONTENT,
+        :spec => 'http://www.w3.org/TR/html401/struct/text.html#h-9.2.1'
+      tag :code, :valid_attributes => ATTRS_ATTRIBUTES, :can_enclose => INLINE_CONTENT,
+        :spec => 'http://www.w3.org/TR/html401/struct/text.html#h-9.2.1'
+      tag :samp, :valid_attributes => ATTRS_ATTRIBUTES, :can_enclose => INLINE_CONTENT,
+        :spec => 'http://www.w3.org/TR/html401/struct/text.html#h-9.2.1'
+      tag :kbd, :valid_attributes => ATTRS_ATTRIBUTES, :can_enclose => INLINE_CONTENT,
+        :spec => 'http://www.w3.org/TR/html401/struct/text.html#h-9.2.1'
+      tag :var, :valid_attributes => ATTRS_ATTRIBUTES, :can_enclose => INLINE_CONTENT,
+        :spec => 'http://www.w3.org/TR/html401/struct/text.html#h-9.2.1'
+      tag :cite, :valid_attributes => ATTRS_ATTRIBUTES, :can_enclose => INLINE_CONTENT,
+        :spec => 'http://www.w3.org/TR/html401/struct/text.html#h-9.2.1'
+      tag :abbr, :valid_attributes => ATTRS_ATTRIBUTES, :can_enclose => INLINE_CONTENT,
+        :spec => 'http://www.w3.org/TR/html401/struct/text.html#h-9.2.1'
+      tag :acronym, :valid_attributes => ATTRS_ATTRIBUTES, :can_enclose => INLINE_CONTENT,
+        :spec => 'http://www.w3.org/TR/html401/struct/text.html#h-9.2.1'
+      tag :blockquote, :newline_before => true, :valid_attributes => ATTRS_ATTRIBUTES + %w{cite},
+        :can_enclose => BLOCK_CONTENT + %w{script},
+        :spec => 'http://www.w3.org/TR/html401/struct/text.html#h-9.2.2'
+      tag :q, :valid_attributes => ATTRS_ATTRIBUTES + %w{cite}, :can_enclose => INLINE_CONTENT,
+        :spec => 'http://www.w3.org/TR/html401/struct/text.html#h-9.2.2'
+      tag :sub, :valid_attributes => ATTRS_ATTRIBUTES, :can_enclose => INLINE_CONTENT,
+        :spec => 'http://www.w3.org/TR/html401/struct/text.html#h-9.2.3'
+      tag :sup, :valid_attributes => ATTRS_ATTRIBUTES, :can_enclose => INLINE_CONTENT,
+        :spec => 'http://www.w3.org/TR/html401/struct/text.html#h-9.2.3'
+
+      # HTML4.01 spec, section 9.3
+      tag :p, :newline_before => true, :valid_attributes => ATTRS_ATTRIBUTES, :can_enclose => INLINE_CONTENT,
+        :spec => 'http://www.w3.org/TR/html401/struct/text.html#h-9.3.1'
+      tag :br, :newline_before => true, :valid_attributes => CORE_ATTRIBUTES, :content_allowed => false,
+        :spec => 'http://www.w3.org/TR/html401/struct/text.html#h-9.3.2.1'
+      tag :pre, :newline_before => true, :valid_attributes => ATTRS_ATTRIBUTES,
+        :can_enclose => INLINE_CONTENT - %w{img object big small sub sup},
+        :spec => 'http://www.w3.org/TR/html401/struct/text.html#h-9.3.4'
+      tag :ins, :valid_attributes => ATTRS_ATTRIBUTES + %w{cite datetime}, :can_enclose => FLOW_CONTENT,
+        :spec => 'http://www.w3.org/TR/html401/struct/text.html#h-9.4'
+      tag :del, :valid_attributes => ATTRS_ATTRIBUTES + %w{cite datetime}, :can_enclose => FLOW_CONTENT,
+        :spec => 'http://www.w3.org/TR/html401/struct/text.html#h-9.4'
+
+      # HTML4.01 spec, section 10.2
+      tag :ul, :newline_before => true, :valid_attributes => ATTRS_ATTRIBUTES, :can_enclose => %w{li},
+        :spec => 'http://www.w3.org/TR/html401/struct/lists.html#h-10.2'
+      tag :ol, :newline_before => true, :valid_attributes => ATTRS_ATTRIBUTES, :can_enclose => %w{li},
+        :spec => 'http://www.w3.org/TR/html401/struct/lists.html#h-10.2'
+      tag :li, :newline_before => true, :valid_attributes => ATTRS_ATTRIBUTES, :can_enclose => FLOW_CONTENT,
+        :spec => 'http://www.w3.org/TR/html401/struct/lists.html#h-10.2'
+      tag :dl, :newline_before => true, :valid_attributes => ATTRS_ATTRIBUTES, :can_enclose => %w{dt dd},
+        :spec => 'http://www.w3.org/TR/html401/struct/lists.html#h-10.3'
+      tag :dt, :newline_before => true, :valid_attributes => ATTRS_ATTRIBUTES, :can_enclose => INLINE_CONTENT,
+        :spec => 'http://www.w3.org/TR/html401/struct/lists.html#h-10.3'
+      tag :dd, :newline_before => true, :valid_attributes => ATTRS_ATTRIBUTES, :can_enclose => FLOW_CONTENT,
+        :spec => 'http://www.w3.org/TR/html401/struct/lists.html#h-10.3'
+
+      # HTML4.01 spec, section 11.2
+      tag :table, :newline_before => true, :can_enclose => %w{caption col colgroup thead tfoot tbody tr},
+        :valid_attributes => ATTRS_ATTRIBUTES + %w{summary width border frame rules cellspacing cellpadding},
+        :spec => 'http://www.w3.org/TR/html401/struct/tables.html#h-11.2.1'
+      tag :caption, :newline_before => true, :can_enclose => INLINE_CONTENT, :valid_attributes => ATTRS_ATTRIBUTES,
+        :spec => 'http://www.w3.org/TR/html401/struct/tables.html#h-11.2.2'
+      tag :thead, :newline_before => true, :can_enclose => %w{tr},
+        :valid_attributes => ATTRS_ATTRIBUTES + CELLVALIGN_ATTRIBUTES + CELLVALIGN_ATTRIBUTES,
+        :spec => 'http://www.w3.org/TR/html401/struct/tables.html#h-11.2.3'
+      tag :tfoot, :newline_before => true, :can_enclose => %w{tr},
+        :valid_attributes => ATTRS_ATTRIBUTES + CELLVALIGN_ATTRIBUTES + CELLVALIGN_ATTRIBUTES,
+        :spec => 'http://www.w3.org/TR/html401/struct/tables.html#h-11.2.3'
+      tag :tbody, :newline_before => true, :can_enclose => %w{tr},
+        :valid_attributes => ATTRS_ATTRIBUTES + CELLVALIGN_ATTRIBUTES + CELLVALIGN_ATTRIBUTES,
+        :spec => 'http://www.w3.org/TR/html401/struct/tables.html#h-11.2.3'
+      tag :colgroup, :newline_before => true, :can_enclose => %w{col},
+        :valid_attributes => ATTRS_ATTRIBUTES + %w{span width} + CELLHALIGN_ATTRIBUTES + CELLVALIGN_ATTRIBUTES,
+        :spec => 'http://www.w3.org/TR/html401/struct/tables.html#h-11.2.4.1'
+      tag :col, :newline_before => true, :content_allowed => false,
+        :valid_attributes => ATTRS_ATTRIBUTES + %w{span width} + CELLHALIGN_ATTRIBUTES + CELLVALIGN_ATTRIBUTES,
+        :spec => 'http://www.w3.org/TR/html401/struct/tables.html#h-11.2.4.2'
+      tag :tr, :newline_before => true, :can_enclose => %w{th td},
+        :valid_attributes => ATTRS_ATTRIBUTES + CELLHALIGN_ATTRIBUTES + CELLVALIGN_ATTRIBUTES,
+        :spec => 'http://www.w3.org/TR/html401/struct/tables.html#h-11.2.5'
+      tag :th, :newline_before => true, :can_enclose => FLOW_CONTENT,
+        :valid_attributes => ATTRS_ATTRIBUTES + %w{abbr axis headers scope rowspan colspan} + CELLHALIGN_ATTRIBUTES + CELLVALIGN_ATTRIBUTES,
+        :spec => 'http://www.w3.org/TR/html401/struct/tables.html#h-11.2.6'
+      tag :td, :newline_before => true, :can_enclose => FLOW_CONTENT,
+        :valid_attributes => ATTRS_ATTRIBUTES + %w{abbr axis headers scope rowspan colspan} + CELLHALIGN_ATTRIBUTES + CELLVALIGN_ATTRIBUTES,
+        :spec => 'http://www.w3.org/TR/html401/struct/tables.html#h-11.2.6'
+
+      # HTML4.01 spec, section 12.2
+      tag :a, :can_enclose => INLINE_CONTENT,
+        :valid_attributes => ATTRS_ATTRIBUTES + %w{charset type name href hreflang rel rev accesskey shape coords tabindex onfocus onblur},
+        :spec => 'http://www.w3.org/TR/html401/struct/links.html#h-12.2'
+
+      # HTML4.01 spec, section 12.3
+      tag :link, :newline_before => true, :content_allowed => false,
+        :valid_attributes => ATTRS_ATTRIBUTES + %w{charset href hreflang type rel rev media},
+        :spec => 'http://www.w3.org/TR/html401/struct/links.html#h-12.3'
+
+      # HTML4.01 spec, section 12.4
+      tag :base, :newline_before => true, :content_allowed => false, :valid_attributes => %w{href},
+        :spec => 'http://www.w3.org/TR/html401/struct/links.html#h-12.4'
+
+      # HTML4.01 spec, section 13.2
+      tag :img, :content_allowed => false,
+        :valid_attributes => ATTRS_ATTRIBUTES + %w{src alt longdesc name height width usemap ismap},
+        :spec => 'http://www.w3.org/TR/html401/struct/objects.html#h-13.2'
+
+      # HTML4.01 spec, section 13.3
+      tag :object, :newline_before => true, :can_enclose => FLOW_CONTENT + %w{param},
+        :valid_attributes => ATTRS_ATTRIBUTES + %w{declare classid codebase data type codetype archive standby height} +
+                             %w{width usemap name tabindex},
+        :spec => 'http://www.w3.org/TR/html401/struct/objects.html#h-13.3'
+      tag :param, :newline_before => true, :content_allowed => false,
+        :valid_attributes => %w{id name value valuetype type},
+        :spec => 'http://www.w3.org/TR/html401/struct/objects.html#h-13.3.2'
+
+      # HTML4.01 spec, section 13.6
+      tag :map, :newline_before => true, :can_enclose => BLOCK_CONTENT + %w{area},
+        :valid_attributes => ATTRS_ATTRIBUTES + %w{name},
+        :spec => 'http://www.w3.org/TR/html401/struct/objects.html#h-13.6.1'
+      tag :area, :newline_before => true, :content_allowed => false,
+        :valid_attributes => ATTRS_ATTRIBUTES + %w{shape coords href nohref alt tabindex accesskey onfocus onblur},
+        :spec => 'http://www.w3.org/TR/html401/struct/objects.html#h-13.6.1'
+
+      # HTML4.01 spec, section 14.2
+      tag :style, :newline_before => true, :valid_attributes => I18N_ATTRIBUTES + %w{type media title},
+        :escape_direct_content => false,
+        :spec => 'http://www.w3.org/TR/html401/present/styles.html#h-14.2.3'
+
+      # HTML4.01 spec, section 15.2
+      tag :tt, :can_enclose => INLINE_CONTENT, :valid_attributes => ATTRS_ATTRIBUTES,
+        :spec => 'http://www.w3.org/TR/html401/present/graphics.html#h-15.2.1'
+      tag :i, :can_enclose => INLINE_CONTENT, :valid_attributes => ATTRS_ATTRIBUTES,
+        :spec => 'http://www.w3.org/TR/html401/present/graphics.html#h-15.2.1'
+      tag :b, :can_enclose => INLINE_CONTENT, :valid_attributes => ATTRS_ATTRIBUTES,
+        :spec => 'http://www.w3.org/TR/html401/present/graphics.html#h-15.2.1'
+      tag :big, :can_enclose => INLINE_CONTENT, :valid_attributes => ATTRS_ATTRIBUTES,
+        :spec => 'http://www.w3.org/TR/html401/present/graphics.html#h-15.2.1'
+      tag :small, :can_enclose => INLINE_CONTENT, :valid_attributes => ATTRS_ATTRIBUTES,
+        :spec => 'http://www.w3.org/TR/html401/present/graphics.html#h-15.2.1'
+
+      # HTML4.01 spec, section 15.3
+      tag :hr, :newline_before => true, :content_allowed => false, :valid_attributes => ATTRS_ATTRIBUTES,
+        :spec => 'http://www.w3.org/TR/html401/present/graphics.html#h-15.3'
+
+      # HTML4.01 spec, section 17.3
+      tag :form, :newline_before => true, :can_enclose => BLOCK_CONTENT + %w{script} - %w{form},
+        :valid_attributes => ATTRS_ATTRIBUTES + %w{action method enctype accept name onsubmit onreset accept-charset},
+        :spec => 'http://www.w3.org/TR/html401/interact/forms.html#h-17.3'
+
+      # HTML4.01 spec, section 17.4
+      tag :input, :newline_before => true, :content_allowed => false,
+        :valid_attributes => ATTRS_ATTRIBUTES + %w{type name value checked disabled readonly size maxlength src alt} +
+                             %w{usemap ismap tabindex accesskey onfocus onblur onselect onchange accept},
+        :spec => 'http://www.w3.org/TR/html401/interact/forms.html#h-17.4'
+
+      # HTML4.01 spec, section 17.5
+      tag :button, :newline_before => true, :can_enclose => FLOW_CONTENT - FORMCTRL_CONTENT - %w{a form fieldset},
+        :valid_attributes => ATTRS_ATTRIBUTES + %w{name value type disabled tabindex accesskey onfocus onblur},
+        :spec => 'http://www.w3.org/TR/html401/interact/forms.html#h-17.5'
+
+      # HTML4.01 spec, section 17.6
+      tag :select, :newline_before => true, :can_enclose => %w{optgroup option},
+        :valid_attributes => ATTRS_ATTRIBUTES + %w{name size multiple disabled tabindex onfocus onblur onchange},
+        :spec => 'http://www.w3.org/TR/html401/interact/forms.html#h-17.6'
+      tag :optgroup, :newline_before => true, :can_enclose => %w{option},
+        :valid_attributes => ATTRS_ATTRIBUTES + %w{disabled label},
+        :spec => 'http://www.w3.org/TR/html401/interact/forms.html#h-17.6'
+      tag :option, :newline_before => true, :can_enclose => %w{_text},
+        :valid_attributes => ATTRS_ATTRIBUTES + %w{selected disabled label value},
+        :spec => 'http://www.w3.org/TR/html401/interact/forms.html#h-17.6'
+
+      # HTML4.01 spec, section 17.7
+      tag :textarea, :newline_before => true, :can_enclose => %w{_text},
+        :valid_attributes => ATTRS_ATTRIBUTES + %w{name rows cols disabled readonly tabindex accesskey} +
+                             %w{onfocus onblur onselect onchange},
+        :spec => 'http://www.w3.org/TR/html401/interact/forms.html#h-17.7'
+
+      # HTML4.01 spec, section 17.9
+      tag :label, :newline_before => true, :can_enclose => INLINE_CONTENT,
+        :valid_attributes => ATTRS_ATTRIBUTES + %w{for accesskey onfocus onblur},
+        :spec => 'http://www.w3.org/TR/html401/interact/forms.html#h-17.9.1'
+
+      # HTML4.01 spec, section 17.10
+      tag :fieldset, :newline_before => true, :can_enclose => %w{_text legend} + FLOW_CONTENT,
+        :valid_attributes => ATTRS_ATTRIBUTES,
+        :spec => 'http://www.w3.org/TR/html401/interact/forms.html#h-17.10'
+      tag :legend, :newline_before => true, :can_enclose => INLINE_CONTENT,
+        :valid_attributes => ATTRS_ATTRIBUTES + %w{accesskey},
+        :spec => 'http://www.w3.org/TR/html401/interact/forms.html#h-17.10'
+
+      # HTML4.01 spec, section 18.2
+      tag :script, :newline_before => true, :can_enclose => %w{_text},
+        :valid_attributes => %w{charset type src defer}, :escape_direct_content => false,
+        :spec => 'http://www.w3.org/TR/html401/interact/scripts.html#h-18.2.1'
+      # HTML4.01 spec, section 18.3
+      tag :noscript, :newline_before => true, :can_enclose => BLOCK_CONTENT,
+        :valid_attributes => ATTRS_ATTRIBUTES,
+        :spec => 'http://www.w3.org/TR/html401/interact/scripts.html#h-18.3.1'
+    end
+  end
+end