commaparty 0.0.1pre

checksums.yaml

@@ -0,0 +1,7 @@
+---
+SHA1:
+  metadata.gz: 03a8339495655f770639b4379f0efd00ed002bc4
+  data.tar.gz: 3e7f1c68a4075921dfc9499db7be3d74d4689456
+SHA512:
+  metadata.gz: 63980a3c5b5cf2b9849443cdb99a9f1937f8bbc6e8d24cdd9b060c7ca11e4f3b7cb6ba9bc14befe22eec5988489f40ac0cf18a3e3819e8521c211684f3745ce4
+  data.tar.gz: fa24ef4475c3e4e55cb46b6405a1ccd826bb5d568abdd12858c7156a2e8b6f4766a68ab7e30dba1bf1a8a2860f6d86d2c85c54aad4c4e8eb54b37c0fb3f90575

data/.gitignore

@@ -0,0 +1,17 @@
+*.gem
+*.rbc
+.bundle
+.config
+.yardoc
+Gemfile.lock
+InstalledFiles
+_yardoc
+coverage
+doc/
+lib/bundler/man
+pkg
+rdoc
+spec/reports
+test/tmp
+test/version_tmp
+tmp

data/Gemfile

@@ -0,0 +1,4 @@
+source 'https://rubygems.org'
+
+# Specify your gem's dependencies in commaparty.gemspec
+gemspec

data/LICENSE.txt

@@ -0,0 +1,22 @@
+Copyright (c) 2014 Connor Mendenhall
+
+MIT License
+
+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.md

@@ -0,0 +1,66 @@
+CommaParty
+======
+CommaParty is a Ruby implementation of Clojure's
+[Hiccup](https://github.com/weavejester/hiccup/) HTML generation library.
+It uses arrays to represent elements, and hashes to represent an element's
+attributes. Unlike in Clojure, you have to use a lot of commas everywhere.
+
+Install
+-------
+Add the following dependency to your `Gemfile`:
+
+```ruby
+gem 'commaparty'
+```
+
+then
+
+```ruby
+require 'commaparty'
+```
+
+Syntax
+------
+
+Here is a basic example of commaparty syntax:
+
+```ruby
+user=> (use 'hiccup.core)
+nil
+user=> (html [:span {:class "foo"} "bar"])
+"<span class=\"foo\">bar</span>"
+```
+
+The first element of the vector is used as the element name. The second
+attribute can optionally be a map, in which case it is used to supply
+the element's attributes. Every other element is considered part of the
+tag's body.
+
+Hiccup is intelligent enough to render different HTML elements in
+different ways, in order to accommodate browser quirks:
+
+  ```clojure
+user=> (html [:script])
+  "<script></script>"
+user=> (html [:p])
+  "<p />"
+  ```
+
+  And provides a CSS-like shortcut for denoting `id` and `class`
+  attributes:
+
+  ```clojure
+  user=> (html [:div#foo.bar.baz "bang"])
+  "<div id=\"foo\" class=\"bar baz\">bang</div>"
+  ```
+
+  If the body of the element is a seq, its contents will be expanded out
+  into the element body. This makes working with forms like `map` and
+  `for` more convenient:
+
+  ```clojure
+  user=> (html [:ul
+      (for [x (range 1 4)]
+       [:li x])])
+  "<ul><li>1</li><li>2</li><li>3</li></ul>"
+  ```

data/Rakefile

@@ -0,0 +1 @@
+require "bundler/gem_tasks"

data/commaparty.gemspec

@@ -0,0 +1,26 @@
+# coding: utf-8
+lib = File.expand_path('../lib', __FILE__)
+$LOAD_PATH.unshift(lib) unless $LOAD_PATH.include?(lib)
+require 'commaparty/version'
+
+Gem::Specification.new do |spec|
+  spec.name          = "commaparty"
+  spec.version       = CommaParty::VERSION
+  spec.authors       = ["Connor Mendenhall"]
+  spec.email         = ["ecmendenhall@gmail.com"]
+  spec.description   = %q{A ruby implementation of Clojure's Hiccup markup generation library.}
+  spec.summary       = %q{Hiccup, with commas.}
+  spec.homepage      = "https://github.com/ecmendenhall/commaparty"
+  spec.license       = "MIT"
+
+  spec.files         = `git ls-files`.split($/)
+  spec.executables   = spec.files.grep(%r{^bin/}) { |f| File.basename(f) }
+  spec.test_files    = spec.files.grep(%r{^(test|spec|features)/})
+  spec.require_paths = ["lib"]
+
+  spec.add_dependency             "nokogiri"
+
+  spec.add_development_dependency "bundler", "~> 1.3"
+  spec.add_development_dependency "rake"
+  spec.add_development_dependency "rspec"
+end

data/lib/commaparty/destructure_element.rb

@@ -0,0 +1,36 @@
+require 'commaparty/parse_tag'
+
+module CommaParty
+  class DestructureElement
+
+    def initialize(element)
+      @element = element
+    end
+
+    def call
+      normalize_element(@element)
+    end
+
+    private
+
+    def normalize_element(element)
+      tag, tag_attributes = CommaParty::ParseTag.new(element.shift).call
+      tag = safe_tagname(tag)
+      attributes = attribute(element) || {}
+      [tag,
+       attributes.merge(tag_attributes),
+       element]
+    end
+
+    def safe_tagname(tag)
+      "#{tag.to_s}_".to_sym
+    end
+
+    def attribute(element)
+      if element.first && element.first.is_a?(Hash)
+        element.shift
+      end
+    end
+
+  end
+end

data/lib/commaparty/html.rb

@@ -0,0 +1,27 @@
+require 'nokogiri'
+require 'commaparty/markup'
+
+module CommaParty
+  class HTML
+
+    def self.build(markup)
+      new(markup).call
+    end
+
+    def initialize(markup)
+      @markup = CommaParty::Markup.new(markup)
+    end
+
+    def call
+      build(@markup.call)
+    end
+
+    private
+
+    def build(markup)
+      Nokogiri::HTML::Builder.new do |doc|
+        doc.html {|html| html << markup }
+      end.to_html
+    end
+  end
+end

data/lib/commaparty/markup.rb

@@ -0,0 +1,37 @@
+require 'nokogiri'
+require 'commaparty/destructure_element'
+
+module CommaParty
+  class Markup
+
+    def initialize(*hiccup)
+      @hiccup = hiccup
+    end
+
+    def call
+      build(*@hiccup)
+    end
+
+    private
+
+    def build(*elements)
+      doc = Nokogiri::XML::Builder.new do |doc|
+        doc.root do |root|
+          elements.each do |element|
+            create_child(root, element)
+          end
+        end
+      end.doc.root.children.to_html
+    end
+
+    def create_child(node, element)
+      tag, attributes, children = CommaParty::DestructureElement.new(element).call
+      if children.empty? || children.first.is_a?(String)
+        node.send(tag, attributes) {|n| n << children.first }
+      else
+        node.send(tag, attributes) {|n| n << build(*children) }
+      end
+    end
+
+  end
+end

data/lib/commaparty/parse_tag.rb

@@ -0,0 +1,36 @@
+module CommaParty
+  class ParseTag
+
+    def initialize(tag)
+      @tag = tag
+    end
+
+    def call
+      [tag_name, attributes]
+    end
+
+    private
+
+    def attributes
+      attributes = {}
+      attributes = attributes.merge(class: classes.join(' ')) if classes
+      attributes = attributes.merge(id: id) if id
+      return attributes
+    end
+
+    def classes
+      class_names = @tag.to_s.scan(/\.([^\.,#,\b]*)/)
+      class_names if !class_names.empty?
+    end
+
+    def id
+      ids = @tag.to_s.match(/\#([^\.,#,\b]*)/)
+      ids.captures.first if ids
+    end
+
+    def tag_name
+      @tag.to_s.match(/([^\.,#,\b]+)/).captures.first.to_sym
+    end
+
+  end
+end

data/lib/commaparty/version.rb

@@ -0,0 +1,3 @@
+module CommaParty
+  VERSION = "0.0.1pre"
+end

data/lib/commaparty/xml.rb

@@ -0,0 +1,28 @@
+require 'nokogiri'
+require 'commaparty/markup'
+
+module CommaParty
+  class XML
+
+    def self.build(markup)
+      new(markup).call
+    end
+
+    def initialize(markup)
+      @markup = CommaParty::Markup.new(markup).call
+    end
+
+    def call
+      build(@markup)
+    end
+
+    private
+
+    def build(markup)
+      Nokogiri::XML::Builder.new do |doc|
+        doc << markup
+      end.to_xml
+    end
+  end
+
+end

data/lib/commaparty.rb

@@ -0,0 +1,21 @@
+require "commaparty/html"
+require "commaparty/markup"
+require "commaparty/version"
+require "commaparty/xml"
+
+module CommaParty
+
+  def self.html(hiccup)
+    CommaParty::HTML.new(hiccup).call
+  end
+
+  def self.xml(hiccup)
+    CommaParty::XML.new(hiccup).call
+  end
+
+  def self.markup(hiccup)
+    CommaParty::Markup.new(hiccup).call
+  end
+
+end
+

data/spec/commaparty/destructure_element_spec.rb

@@ -0,0 +1,42 @@
+require 'rspec'
+require 'commaparty/destructure_element'
+
+describe CommaParty::DestructureElement do
+
+  describe 'Normalizing elements' do
+    it 'destructures an element with tag only' do
+      tag, attributes, values = described_class.new([:lol]).call
+      expect(tag).to eq(:lol_)
+      expect(attributes).to eq({})
+      expect(values).to eq([])
+    end
+
+    it 'destructures an element with tag, attributes, and values' do
+      tag, attributes, values = described_class.new([:lol, {id: "the-id"}, "lol"]).call
+      expect(tag).to eq(:lol_)
+      expect(attributes).to eq({id: "the-id"})
+      expect(values).to eq(["lol"])
+    end
+
+    it 'destructures an element with tag and attributes only' do
+      tag, attributes, values = described_class.new([:lol, {id: "the-id"}]).call
+      expect(tag).to eq(:lol_)
+      expect(attributes).to eq({id: "the-id"})
+      expect(values).to eq([])
+    end
+
+    it 'destructures an element with tag and values only' do
+      tag, attributes, values = described_class.new([:lol, 'wut']).call
+      expect(tag).to eq(:lol_)
+      expect(attributes).to eq({})
+      expect(values).to eq(['wut'])
+    end
+
+    it 'destructures an element with sibling children' do
+      tag, attributes, values = described_class.new([:lol, {}, [:div], [:ul], [:other]]).call
+      expect(tag).to eq(:lol_)
+      expect(attributes).to eq({})
+      expect(values).to eq([[:div], [:ul], [:other]])
+    end
+  end
+end

data/spec/commaparty/html_spec.rb

@@ -0,0 +1,14 @@
+require 'rspec'
+require 'commaparty/html'
+require 'commaparty/markup'
+
+describe CommaParty::HTML do
+
+  let(:markup) { [:parent, [:child1], [:child2]] }
+
+  it 'creates HTML from markup' do
+    html = described_class.new(markup).call
+    expect(html).to match(/<!DOCTYPE html/)
+  end
+
+end

data/spec/commaparty/markup_spec.rb

@@ -0,0 +1,44 @@
+require 'rspec'
+require 'commaparty/markup'
+
+describe CommaParty::Markup do
+
+  describe 'Generating markup' do
+
+    it 'generates a single tag' do
+      html = described_class.new([:tag]).call
+      expect(html).to eq("<tag></tag>")
+    end
+
+    it 'generates a single tag with an attribute' do
+      html = described_class.new([:tag, {attribute: 'something'}]).call
+      expect(html).to eq("<tag attribute=\"something\"></tag>")
+    end
+
+    it 'generates a single tag with a value' do
+      html = described_class.new([:tag, 'value']).call
+      expect(html).to eq("<tag>value</tag>")
+    end
+
+    it 'generates two sibling tags' do
+      html = described_class.new([:tag1], [:tag2]).call
+      expect(html).to eq("<tag1></tag1><tag2></tag2>")
+    end
+
+    it 'generates nested tags' do
+      html = described_class.new([:theparent, [:tag1], [:tag2]]).call
+      expect(html).to eq("<theparent><tag1></tag1><tag2></tag2></theparent>")
+    end
+
+    it 'handles tags with the same names as ruby methods' do
+      html = described_class.new([:parent]).call
+      expect(html).to eq("<parent></parent>")
+    end
+
+    it 'handles tags with shortcut syntax' do
+      html = described_class.new([:'tag.one.two.three#id']).call
+      expect(html).to eq("<tag class=\"one two three\" id=\"id\"></tag>")
+    end
+
+  end
+end

data/spec/commaparty/parse_tag_spec.rb

@@ -0,0 +1,45 @@
+require 'rspec'
+require 'commaparty/parse_tag'
+
+describe CommaParty::ParseTag do
+
+  describe 'Tag shortcuts' do
+
+    it 'parses tags without shortcut syntax' do
+      tag, attributes = described_class.new(:boring).call
+      expect(tag).to eq(:boring)
+      expect(attributes).to eq({})
+    end
+
+    it 'parses tags with a class shortcut' do
+      tag, attributes = described_class.new(:'exciting.class').call
+      expect(tag).to eq(:exciting)
+      expect(attributes).to eq({class: 'class'})
+    end
+
+    it 'parses tags with an id shortcut' do
+      tag, attributes = described_class.new(:'exciting#id').call
+      expect(tag).to eq(:exciting)
+      expect(attributes).to eq({id: 'id'})
+    end
+
+    it 'parses tags with a class shortcut and id shortcut' do
+      tag, attributes = described_class.new(:'exciting.class#id').call
+      expect(tag).to eq(:exciting)
+      expect(attributes).to eq({class: 'class', id: 'id'})
+    end
+
+    it 'handles different orders' do
+      tag, attributes = described_class.new(:'exciting#id.class').call
+      expect(tag).to eq(:exciting)
+      expect(attributes).to eq({class: 'class', id: 'id'})
+    end
+
+    it 'handles multiple classes' do
+      tag, attributes = described_class.new(:'exciting.one.two').call
+      expect(tag).to eq(:exciting)
+      expect(attributes).to eq({class: 'one two'})
+    end
+  end
+
+end

data/spec/commaparty/xml_spec.rb

@@ -0,0 +1,14 @@
+require 'rspec'
+require 'commaparty/xml'
+require 'commaparty/markup'
+
+describe CommaParty::XML do
+
+  let(:markup) { [:parent, [:child1], [:child2]] }
+
+  it 'creates XML from markup' do
+    xml = described_class.new(markup).call
+    expect(xml).to match(/<?xml/)
+  end
+
+end

metadata

@@ -0,0 +1,123 @@
+--- !ruby/object:Gem::Specification
+name: commaparty
+version: !ruby/object:Gem::Version
+  version: 0.0.1pre
+platform: ruby
+authors:
+- Connor Mendenhall
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2014-02-22 00:00:00.000000000 Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: nokogiri
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+- !ruby/object:Gem::Dependency
+  name: bundler
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - ~>
+      - !ruby/object:Gem::Version
+        version: '1.3'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - ~>
+      - !ruby/object:Gem::Version
+        version: '1.3'
+- !ruby/object:Gem::Dependency
+  name: rake
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+- !ruby/object:Gem::Dependency
+  name: rspec
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+description: A ruby implementation of Clojure's Hiccup markup generation library.
+email:
+- ecmendenhall@gmail.com
+executables: []
+extensions: []
+extra_rdoc_files: []
+files:
+- .gitignore
+- Gemfile
+- LICENSE.txt
+- README.md
+- Rakefile
+- commaparty.gemspec
+- lib/commaparty.rb
+- lib/commaparty/destructure_element.rb
+- lib/commaparty/html.rb
+- lib/commaparty/markup.rb
+- lib/commaparty/parse_tag.rb
+- lib/commaparty/version.rb
+- lib/commaparty/xml.rb
+- spec/commaparty/destructure_element_spec.rb
+- spec/commaparty/html_spec.rb
+- spec/commaparty/markup_spec.rb
+- spec/commaparty/parse_tag_spec.rb
+- spec/commaparty/xml_spec.rb
+homepage: https://github.com/ecmendenhall/commaparty
+licenses:
+- MIT
+metadata: {}
+post_install_message: 
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+required_rubygems_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - '>'
+    - !ruby/object:Gem::Version
+      version: 1.3.1
+requirements: []
+rubyforge_project: 
+rubygems_version: 2.0.3
+signing_key: 
+specification_version: 4
+summary: Hiccup, with commas.
+test_files:
+- spec/commaparty/destructure_element_spec.rb
+- spec/commaparty/html_spec.rb
+- spec/commaparty/markup_spec.rb
+- spec/commaparty/parse_tag_spec.rb
+- spec/commaparty/xml_spec.rb