earl 0.3.0 → 1.0.0

data/.rvmrc

@@ -1,48 +0,0 @@
-#!/usr/bin/env bash
-
-# This is an RVM Project .rvmrc file, used to automatically load the ruby
-# development environment upon cd'ing into the directory
-
-# First we specify our desired <ruby>[@<gemset>], the @gemset name is optional,
-# Only full ruby name is supported here, for short names use:
-#     echo "rvm use 1.9.3" > .rvmrc
-environment_id="ruby-1.9.3-p125@earl"
-
-# Uncomment the following lines if you want to verify rvm version per project
-# rvmrc_rvm_version="1.10.3" # 1.10.1 seams as a safe start
-# eval "$(echo ${rvm_version}.${rvmrc_rvm_version} | awk -F. '{print "[[ "$1*65536+$2*256+$3" -ge "$4*65536+$5*256+$6" ]]"}' )" || {
-#   echo "This .rvmrc file requires at least RVM ${rvmrc_rvm_version}, aborting loading."
-#   return 1
-# }
-
-# First we attempt to load the desired environment directly from the environment
-# file. This is very fast and efficient compared to running through the entire
-# CLI and selector. If you want feedback on which environment was used then
-# insert the word 'use' after --create as this triggers verbose mode.
-if [[ -d "${rvm_path:-$HOME/.rvm}/environments"
-  && -s "${rvm_path:-$HOME/.rvm}/environments/$environment_id" ]]
-then
-  \. "${rvm_path:-$HOME/.rvm}/environments/$environment_id"
-  [[ -s "${rvm_path:-$HOME/.rvm}/hooks/after_use" ]] &&
-    \. "${rvm_path:-$HOME/.rvm}/hooks/after_use" || true
-else
-  # If the environment file has not yet been created, use the RVM CLI to select.
-  rvm --create  "$environment_id" || {
-    echo "Failed to create RVM environment '${environment_id}'."
-    return 1
-  }
-fi
-
-# If you use bundler, this might be useful to you:
-# if [[ -s Gemfile ]] && {
-#   ! builtin command -v bundle >/dev/null ||
-#   builtin command -v bundle | grep $rvm_path/bin/bundle >/dev/null
-# }
-# then
-#   printf "%b" "The rubygem 'bundler' is not installed. Installing it now.\n"
-#   gem install bundler
-# fi
-# if [[ -s Gemfile ]] && builtin command -v bundle >/dev/null
-# then
-#   bundle install | grep -vE '^Using|Your bundle is complete'
-# fi

data/README.md

@@ -1,41 +0,0 @@
-# Earl
-
-What URI wishes it could look like.
-
-## Installation
-
-Add this line to your application's Gemfile:
-
-    gem 'earl'
-
-And then execute:
-
-    $ bundle
-
-Or install it yourself as:
-
-    $ gem install earl
-
-## Usage
-
-``` rb
-url = Earl::URL.new 'http://www.foo.com'
-
-url.scheme         		# => 'http'
-url.scheme?        		# => true
-
-url.subdomain      		# => 'www'
-url.subdomain.www? 		# => true
-url.subdomain.baz? 		# => false
-
-url.host = 'foo.edu'
-url.to_s           		# => 'http://www.foo.edu'
-```
-
-## Contributing
-
-1. Fork it
-2. Create your feature branch (`git checkout -b my-new-feature`)
-3. Commit your changes (`git commit -am 'Added some feature'`)
-4. Push to the branch (`git push origin my-new-feature`)
-5. Create new Pull Request

data/lib/earl/email_assembler.rb

@@ -1,11 +0,0 @@
-module Earl
-  class EmailAssembler
-
-    def assemble( parts={} )
-      ''.tap do |email|
-        email << [ parts[ :username ], parts[ :domain ] ].join( '@' )
-        email << " <#{parts[ :contact ]}>" if parts[ :contact ]
-      end
-    end
-  end
-end

data/lib/earl/email_entity.rb

@@ -1,27 +0,0 @@
-require 'treetop'
-require 'earl/email_parser'
-
-module Earl
-  class EmailEntity < EntityBase
-
-    part_accessor :contact
-
-    part_accessor :username do |value|
-      raise InvalidURLError if value.nil?
-    end
-
-    part_accessor :domain do |value|
-      raise InvalidURLError if value.nil?
-    end
-
-    protected
-
-    def parser
-      @parser ||= EmailParser.new
-    end
-
-    def assembler
-      @assembler ||= EmailAssembler.new
-    end
-  end
-end

data/lib/earl/email_parser.tt

@@ -1,58 +0,0 @@
-module Earl
-  grammar Email
-
-    rule program
-      whitespace v:( email ) whitespace {
-        def resolve
-          { }.merge v.resolve
-        end
-      }
-    end
-
-    rule whitespace
-      [\s]*
-    end
-
-    rule email
-      username '@' domain whitespace contact {
-        def resolve
-          username.resolve.merge domain.resolve.merge contact.resolve
-        end
-      }
-      /
-      username '@' domain {
-        def resolve
-          username.resolve.merge domain.resolve
-        end
-      }
-    end
-
-    rule username
-      [^@\s]+ {
-        def resolve
-          { :username => text_value }
-        end
-      }
-    end
-
-    rule domain
-      characters '.' characters {
-        def resolve
-          { :domain => text_value }
-        end
-      }
-    end
-
-    rule contact
-      '<' [^>]+ '>' {
-        def resolve
-          { :contact => elements[ 1 ].text_value }
-        end
-      }
-    end
-
-    rule characters
-      [a-zA-Z0-9]+
-    end
-  end
-end

data/lib/earl/entity_base.rb

@@ -1,37 +0,0 @@
-module Earl
-  class EntityBase < HashInquirer
-    def initialize( source )
-      super parser.parse( source ).resolve rescue raise InvalidURLError
-    end
-
-    def to_s
-      assembler.assemble self
-    end
-
-    def self.part_accessor( *parts, &block )
-      parts.each do |part|
-        define_method part do
-          if self[ part ].is_a? String
-            StringInquirer.new self[ part ]
-          else
-            self[ part ]
-          end
-        end
-        define_method :"#{part}=" do |value|
-          self[ part ] = value
-          yield value if block_given?
-        end
-      end
-    end
-
-    protected
-
-    def parser
-      raise SubclassError
-    end
-
-    def assembler
-      raise SubclassError
-    end
-  end
-end

data/lib/earl/hash_inquirer.rb

@@ -1,16 +0,0 @@
-module Earl
-  class HashInquirer < ::Hash
-    def initialize( hash, &block )
-      merge! hash
-      super block
-    end
-
-    def method_missing( meth, *args, &block )
-      if meth.to_s[ -1 ] == '?'
-        self.has_key? meth.to_s[ 0..-2 ].to_sym
-      else
-        super
-      end
-    end
-  end
-end

data/lib/earl/string_inquirer.rb

@@ -1,11 +0,0 @@
-module Earl
-  class StringInquirer < ::String
-    def method_missing( meth, *args, &block )
-      if meth.to_s[ -1 ] == '?'
-        meth.to_s[ 0..-2 ] == to_s
-      else
-        super
-      end
-    end
-  end
-end

data/lib/earl/url_assembler.rb

@@ -1,15 +0,0 @@
-module Earl
-  class URLAssembler
-
-    def assemble( parts={} )
-      ''.tap do |url|
-        url << ( parts[ :scheme ] + '://'  ) if parts[ :scheme ]
-        url << ( parts[ :subdomain ] + '.' ) if parts[ :subdomain ]
-        url << ( parts[ :host ]            ) if parts[ :host ]
-        url << ( ':' + parts[ :port ].to_s ) if parts[ :port ]
-        url << ( '/' + parts[ :path ]      ) if parts[ :path ]
-        url << ( '?' + parts[ :search ]    ) if parts[ :search ]
-      end
-    end
-  end
-end

data/lib/earl/url_entity.rb

@@ -1,23 +0,0 @@
-require 'treetop'
-require 'earl/url_parser'
-
-module Earl
-  class URLEntity < EntityBase
-
-    part_accessor :scheme, :subdomain, :port, :path, :search
-
-    part_accessor :host do |value|
-      raise InvalidURLError if value.nil?
-    end
-
-    protected
-
-    def parser
-      @parser ||= URLParser.new
-    end
-
-    def assembler
-      @assembler ||= URLAssembler.new
-    end
-  end
-end

data/lib/earl/url_parser.tt

@@ -1,163 +0,0 @@
-module Earl
-  grammar URL
-
-    rule program
-      whitespace v:( url ) whitespace {
-        def resolve
-          { }.merge v.resolve
-        end
-      }
-    end
-
-    rule whitespace
-      [\s]*
-    end
-
-    rule url
-      scheme host port path search {
-        def resolve
-          scheme.resolve.merge port.resolve.merge host.resolve.merge path.resolve.merge search.resolve
-        end
-      }
-      /
-      scheme host port path {
-        def resolve
-          scheme.resolve.merge port.resolve.merge host.resolve.merge path.resolve
-        end
-      }
-      /
-      scheme host port search {
-        def resolve
-          scheme.resolve.merge port.resolve.merge host.resolve.merge search.resolve
-        end
-      }
-      /
-      scheme host port {
-        def resolve
-          scheme.resolve.merge port.resolve.merge host.resolve
-        end
-      }
-      /
-      scheme host path search {
-        def resolve
-          scheme.resolve.merge host.resolve.merge path.resolve.merge search.resolve
-        end
-      }
-      /
-      scheme host path {
-        def resolve
-          scheme.resolve.merge host.resolve.merge path.resolve
-        end
-      }
-      /
-      scheme host search {
-        def resolve
-          scheme.resolve.merge host.resolve.merge search.resolve
-        end
-      }
-      /
-      scheme host {
-        def resolve
-          scheme.resolve.merge host.resolve
-        end
-      }
-      /
-      host port path search {
-        def resolve
-          port.resolve.merge host.resolve.merge path.resolve.merge search.resolve
-        end
-      }
-      /
-      host port path {
-        def resolve
-          port.resolve.merge host.resolve.merge path.resolve
-        end
-      }
-      /
-      host port search {
-        def resolve
-          port.resolve.merge host.resolve.merge search.resolve
-        end
-      }
-      /
-      host port {
-        def resolve
-          port.resolve.merge host.resolve
-        end
-      }
-      /
-      host path {
-        def resolve
-          host.resolve.merge path.resolve
-        end
-      }
-      /
-      host search {
-        def resolve
-          host.resolve.merge search.resolve
-        end
-      }
-      /
-      host
-    end
-
-    rule scheme
-      characters '://' {
-        def resolve
-          { :scheme => characters.text_value }
-        end
-      }
-    end
-
-    rule host
-      subdomain:characters '.' domain:characters '.' tld:characters {
-        def resolve
-          {
-            :subdomain => subdomain.text_value,
-            :host => "#{domain.text_value}.#{tld.text_value}"
-          }
-        end
-      }
-      /
-      domain:characters '.' tld:characters {
-        def resolve
-          { :host => text_value }
-        end
-      }
-      /
-      characters {
-        def resolve
-          { :host => text_value }
-        end
-      }
-    end
-
-    rule port
-      ':' port:([0-9]1..4) {
-        def resolve
-          { :port => port.text_value }
-        end
-      }
-    end
-
-    rule path
-      '/' characters {
-        def resolve
-          { :path => characters.text_value }
-        end
-      }
-    end
-
-    rule search
-      '?' search:( characters '=' characters ) {
-        def resolve
-          { :search => search.text_value }
-        end
-      }
-    end
-
-    rule characters
-      [a-zA-Z0-9]+
-    end
-  end
-end