mab 0.0.1

data/lib/mab.rb

@@ -0,0 +1,5 @@
+require 'mab/version'
+require 'mab/mixin'
+require 'mab/indentation'
+require 'mab/builder'
+

data/lib/mab/builder.rb

@@ -0,0 +1,45 @@
+module Mab
+  class SimpleBuilder
+    include Mixin
+
+    def initialize(assigns = {}, helper = nil, &blk)
+      @_helper = helper
+      @_result = []
+
+      assigns.each do |key, value|
+        instance_variable_set(:"@#{key}", value)
+      end
+
+      if helper
+        helper.instance_variables.each do |var|
+          instance_variable_set(var, helper.instance_variable_get(var))
+        end
+      end
+
+      capture(&blk) if blk
+    end
+
+    def capture(&blk)
+      @_result << mab(&blk)
+    end
+
+    def to_s; @_result.join end
+
+    def method_missing(name, *args, &blk)
+      if @_helper && @_helper.respond_to?(name, true)
+        @_helper.send(name, *args, &blk)
+      else
+        super
+      end
+    end
+  end
+
+  class Builder < SimpleBuilder
+    include HTML5
+  end
+
+  class PrettyBuilder < Builder
+    include Indentation
+  end
+end
+

data/lib/mab/indentation.rb

@@ -0,0 +1,33 @@
+module Mab
+  module Indentation
+     def mab_insert(str)
+      if i = @mab_context.options[:indentation]
+        super([$/ + "  " * i, str])
+      else
+        @mab_context.options[:indentation] = 0
+        super
+      end
+    end
+
+    def mab_done(tag)
+      if blk = tag.block
+        tag.block = proc do
+          begin
+            @mab_context.options[:indentation] += 1
+            blk.call
+          ensure
+            @mab_context.options[:indentation] -= 1
+          end
+        end
+      end
+      super
+    end
+
+    def reindent!(str)
+      str.split(/\r?\n/).each do |s|
+        text! s
+      end
+    end
+  end
+end
+

data/lib/mab/kernel_method.rb

@@ -0,0 +1,6 @@
+require 'mab'
+
+def mab(&blk)
+  Mab::PrettyBuilder.new({}, self, &blk).to_s
+end
+

data/lib/mab/mixin.rb

@@ -0,0 +1,246 @@
+require 'cgi'
+
+module Mab
+  module Mixin
+    class Error < StandardError; end
+    class Tag
+      attr_accessor :name, :content, :block
+      attr_reader :options, :context, :instance
+      attr_writer :attributes, :pos
+
+      def initialize(name, options, context, instance = nil)
+        @name = name
+        @options = options
+        @context = context
+        @instance = instance
+        @done = false
+        @content = false
+        @pos = @context.size
+      end
+
+      def attributes
+        @attributes ||= {}
+      end
+
+      def merge_attributes(attrs)
+        if defined?(@attributes)
+          @attributes.merge!(attrs)
+        else
+          @attributes = attrs
+        end
+      end
+
+      def method_missing(name, content = nil, attrs = nil, &blk)
+        name = name.to_s
+
+        if name[-1] == ?!
+          attributes[:id] = name[0..-2]
+        else
+          if attributes.has_key?(:class)
+            attributes[:class] += " #{name}"
+          else
+            attributes[:class] = name
+          end
+        end
+
+        insert(content, attrs, &blk)
+      end
+
+      def insert(content = nil, attrs = nil, &blk)
+        raise Error, "This tag is already closed" if @done
+
+        if content.is_a?(Hash)
+          attrs = content
+          content = nil
+        end
+
+        merge_attributes(attrs) if attrs
+
+        if block_given?
+          @block = blk
+          @done = true
+        elsif content
+          content = content.to_s
+          @content = CGI.escapeHTML(content)
+          @done = !content.empty?
+        elsif attrs
+          @done = true
+        end
+
+        @instance.mab_done(self) if @done
+
+        if @block
+          before = @context.children
+          res = @block.call
+
+          if before >= @context.children
+            @content = res.to_s
+          else
+            @content = nil
+            @instance.mab_insert("</#{@name}>")
+          end
+        end
+
+        self
+      end
+
+      def to_ary() nil end
+      def to_str() to_s end
+
+      def attrs_to_s
+        attributes.inject("") do |res, (name, value)|
+          if value
+            value = (value == true) ? name : CGI.escapeHTML(value.to_s)
+            res << " #{name}=\"#{value}\""
+          end
+          res
+        end
+      end
+
+      def to_s
+        if !@context.joining? && @context[@pos]
+          @context[@pos] = nil
+          @context.children -= 1
+        end
+        res = "<#{@name}#{attrs_to_s}"
+        res << (@options[:xml] && @content == false ? ' />' : '>')
+        res << "#{@content}</#{@name}>" if @content
+        res
+      end
+    end
+
+    class Context < Array
+      attr_accessor :children, :options
+
+      def initialize
+        @children = 0
+        @joining = false
+        @options = {}
+      end
+
+      def <<(str)
+        @children += 1
+        super(str)
+      end
+
+      def join(*)
+        @joining = true
+        super
+      end
+
+      def joining?
+        @joining
+      end
+    end
+
+    def tag!(name, content = nil, attrs = nil, &blk)
+      ctx = @mab_context || raise(Error, "Tags can only be written within a `mab { }`-block")
+      tag = Tag.new(name, mab_options, ctx, self)
+      mab_insert(tag)
+      tag.insert(content, attrs, &blk)
+    end
+
+    def text!(str)
+      mab_insert(str)
+    end
+
+    def text(str)
+      text! CGI.escapeHTML(str.to_s)
+    end
+
+    def mab(&blk)
+      prev = defined?(@mab_context) && @mab_context
+      ctx = @mab_context = Context.new
+      res = instance_eval(&blk)
+      ctx.empty? ? res : ctx.join
+    ensure
+      @mab_context = prev
+    end
+
+    def mab_insert(tag)
+      ctx = @mab_context || raise(Error, 'mab { }-block required')
+      ctx << tag
+    end
+
+    def mab_done(tag)
+    end
+
+    def mab_options
+      @mab_options ||= {}
+    end
+
+    module XML
+      include Mixin
+
+      def mab_options
+        @mab_options ||= super.update(:xml => true)
+      end
+    end
+
+    module HTMLDefiners
+      def define_tag(meth, tag)
+        class_eval <<-EOF
+          def #{meth}(content = "", attrs = nil, &blk)
+            if content.is_a?(Hash)
+              attrs = content
+              content = ""
+            end
+            tag!(:#{tag}, content, attrs, &blk)
+          end
+        EOF
+      end
+
+      def define_tags(*tags)
+        tags.flatten.each do |tag|
+          define_tag(tag, tag)
+        end
+      end
+
+      def define_empty_tag(meth, tag)
+        class_eval <<-EOF
+          def #{meth}(attrs = nil)
+            if (!attrs.nil? && !attrs.is_a?(Hash)) || block_given?
+              raise Error, "#{meth} doesn't allow content"
+            end
+            tag!(:#{tag}, attrs)
+          end
+        EOF
+      end
+
+      def define_empty_tags(*tags)
+        tags.flatten.each do |tag|
+          define_empty_tag(tag, tag)
+        end
+      end
+    end
+
+    module HTML5
+      extend HTMLDefiners
+      include Mixin
+
+      define_tags %w[a abbr acronym address applet article aside audio b
+        basefont bdi bdo big blockquote body button canvas caption
+        center cite code colgroup datalist dd del details dfn dir div dl
+        dt em fieldset figcaption figure font footer form frame frameset
+        h1 h2 h3 h4 h5 h6 head header hgroup html i iframe ins kbd label
+        legend li link map mark math menu meter nav noframes noscript
+        object ol optgroup option output p pre progress q rp rt ruby s
+        samp script section select small span strike strong style sub
+        summary sup svg table tbody td textarea tfoot th thead time
+        title tr tt u ul var video xmp]
+
+      define_empty_tags %w[base link meta hr br wbr img embed param source
+        track area col input keygen command]
+
+      def doctype!
+        text! '<!DOCTYPE html>'
+      end
+    end
+
+    module XHTML5
+      include HTML5
+      include XML
+    end
+  end
+end
+

data/lib/mab/version.rb

@@ -0,0 +1,4 @@
+module Mab
+  VERSION = "0.0.1"
+end
+

metadata

@@ -0,0 +1,73 @@
+--- !ruby/object:Gem::Specification
+name: mab
+version: !ruby/object:Gem::Version
+  version: 0.0.1
+  prerelease: 
+platform: ruby
+authors:
+- Magnus Holm
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2012-01-25 00:00:00.000000000 Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: rake
+  requirement: &70107192708940 !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: *70107192708940
+- !ruby/object:Gem::Dependency
+  name: minitest
+  requirement: &70107192708280 !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: *70107192708280
+description: 
+email:
+- judofyr@gmail.com
+executables: []
+extensions: []
+extra_rdoc_files: []
+files:
+- lib/mab/builder.rb
+- lib/mab/indentation.rb
+- lib/mab/kernel_method.rb
+- lib/mab/mixin.rb
+- lib/mab/version.rb
+- lib/mab.rb
+homepage: 
+licenses: []
+post_install_message: 
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  none: false
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+required_rubygems_version: !ruby/object:Gem::Requirement
+  none: false
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+requirements: []
+rubyforge_project: 
+rubygems_version: 1.8.10
+signing_key: 
+specification_version: 3
+summary: Markup as Ruby
+test_files: []