email_regex 0.0.1

data/.gitignore

@@ -0,0 +1,24 @@
+*.gem
+*.rbc
+.bundle
+.config
+coverage
+InstalledFiles
+lib/bundler/man
+pkg
+rdoc
+spec/reports
+test/tmp
+test/version_tmp
+tmp
+
+# YARD artifacts
+.yardoc
+_yardoc
+doc/
+
+# Ignore Emacs backups everywhere.
+*~
+
+# Ignore textmate projects
+*.tmproj

data/LICENSE.txt

@@ -0,0 +1,21 @@
+Copyright (c) 2013 Doug Wiegley
+
+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,18 @@
+= email_regex
+
+* {Homepage}[https://github.com/dougwig/email_regex.git]
+* {Email}[mailto:doug at parksidesoftware.com]
+
+== Description
+
+Provides a valid email regex that conforms to most valid RFC edges cases (disallows backticks), and allows for a few illegal patterns that are in common use.
+
+EmailRegex::EMAIL_ADDRESS_REGEX
+
+== Install
+
+  $ gem install email_regex
+
+== Copyright
+
+See LICENSE.txt for details.

data/Rakefile

@@ -0,0 +1,8 @@
+require 'rake/testtask'
+
+Rake::TestTask.new do |t|
+  t.libs << 'test'
+end
+
+desc "Run tests"
+task :default => :test

data/email_regex.gemspec

@@ -0,0 +1,16 @@
+Gem::Specification.new do |s|
+  s.name        = 'email_regex'
+  s.version     = '0.0.1'
+  s.date        = '2013-03-11'
+  s.license     = "MIT"
+  s.summary     = "Validate email address regex"
+  s.description = "Validate email address regex"
+  s.authors     = ["Doug Wiegley"]
+  s.email       = 'doug@parksidesoftware.com'
+
+  s.files         = `git ls-files`.split($/)
+  s.test_files    = s.files.grep(%r{^(test|spec|features)/})
+  s.require_paths = ['lib']
+  
+  s.homepage    = 'https://github.com/dougwig/email_regex.git'
+end

data/lib/email_regex.rb

@@ -0,0 +1,50 @@
+class EmailRegex
+  # 
+  # RFC822, obsolete and more lax in most cases
+  # 
+  # CTL         =  <any ASCII control           ; (  0- 37,  0.- 31.)
+  # SPACE       =  <ASCII SP, space>            ; (     40,      32.)
+  # specials    =  "(" / ")" / "<" / ">" / "@"  ; Must be in quoted-
+  #             /  "," / ";" / ":" / "\" / <">  ;  string, to use
+  #             /  "." / "[" / "]"              ;  within a word.
+  # atom        =  1*<any CHAR except specials, SPACE and CTLs>
+  #
+  # qtext       =  <any CHAR excepting <">,     ; => may be folded "\" & CR, and including linear-white-space>
+  # quoted-pair =  "\" CHAR                     ; may quote any char
+  # quoted-string = <"> *(qtext/quoted-pair) <">; Regular qtext or quoted chars.
+  # word        =  atom / quoted-string
+  #
+  # local-part  =  word *("." word)             ; uninterpreted
+  #
+  # domain-ref  =  atom                         ; symbolic reference
+  # sub-domain  =  domain-ref / domain-literal
+  # domain      =  sub-domain *("." sub-domain)
+  #
+  # addr-spec   =  local-part "@" domain        ; global address
+  #
+
+  ctl            = '\x00-\x1f'
+  space          = ' '
+  specials       = '\(\)\<\>\@\,\;\:\\\"\.\[\]'
+  atom           = '[^' + ctl + space + specials + ']+?'
+  dot_atom       = atom + '(?:\.' + atom + ')*'					 # in common use, allowed by RFC2822
+
+  qtext          = '[^\"\`]+'
+  quoted_pair    = '\\.'
+  quoted_string  = '\"(?:' + qtext + '|' + quoted_pair + ')+?\"'
+  word           = '(?:' + dot_atom  + '|' + quoted_string + ')'
+
+  local_part     = word							                 # ignore word[.word]
+
+  domain_ref     = dot_atom
+  domain_literal = '\[' + atom + '(?:[\.\:]' + atom + ')*\]'       # only used for IPv4/IPv6 addresses
+  sub_domain     = '(?:' + domain_ref + '|' + domain_literal + ')'
+  domain         = sub_domain
+
+  addr_spec      = local_part + '\@' + domain
+
+  addr_ws        = '\s*(' + addr_spec + ')\s*'
+  addr_list      = '^' + addr_ws + '(?:,' + addr_ws + ')*$'
+
+  EMAIL_ADDRESS_REGEX = /#{addr_list}/
+end

data/test/test_email_regex.rb

@@ -0,0 +1,53 @@
+require 'test/unit'
+require 'email_regex'
+
+class EmailRegexTest < Test::Unit::TestCase
+  def test_good_addresses
+    good = [
+    	'doug@example.com',
+    	'"doug"@example.com',
+    	'"sp sp"@example.com',
+    	'"foo"@a,"foo"@b',
+    	'foo@example',
+    	'foo@[1.2.3.4]',
+    	'ipv6@[FEDC:BA98:7654:3210:FEDC:BA98:7654:3210]',
+    	'a@b.c,d@e.f',
+    	'a@b.c,d@e.f,g@h.i',
+    	' a@b.c,d@e.f,g@h.i ',
+    	'a@b.c ,   d@e.f,g@h.i',
+    	'a@b.c,d@e.f           ,g@h.i',
+    	'a@b.c,d@e.f,    g@h.i',
+    	'doug-test@a.com',
+    	'doug_test@a.com',
+    	'doug.test@a.com',
+    	'doug+test@a.com',
+    	'a@f-w.junk',
+    	'a@f_w.junk'       # this is an illegal DNS name, but in common use	
+    ]
+    good.each do |x|
+      assert x =~ EmailRegex::EMAIL_ADDRESS_REGEX
+    end
+  end
+  
+  def test_bad_addresses
+    bad = [
+    	'doug@',
+    	'@example.com',
+    	'sp sp@example.com',
+    	#'doug@[foo.com]',  # not worth the complexity to check for this
+    	#'doug@[foo]',      # not worth the complexity to check for this
+    	'doug@a,',
+    	',doug@a',
+    	'a @b',
+    	'a@ b',
+    	'""@a',
+    	'doug',
+    	'doug,jim',
+    	'"hello`reboot`goodbye"@example.com'
+    ]
+    bad.each do |x|
+      assert (not x =~ EmailRegex::EMAIL_ADDRESS_REGEX)
+    end
+  end
+end
+

metadata

@@ -0,0 +1,53 @@
+--- !ruby/object:Gem::Specification
+name: email_regex
+version: !ruby/object:Gem::Version
+  version: 0.0.1
+  prerelease: 
+platform: ruby
+authors:
+- Doug Wiegley
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2013-03-11 00:00:00.000000000Z
+dependencies: []
+description: Validate email address regex
+email: doug@parksidesoftware.com
+executables: []
+extensions: []
+extra_rdoc_files: []
+files:
+- .gitignore
+- LICENSE.txt
+- README.rdoc
+- Rakefile
+- email_regex.gemspec
+- lib/email_regex.rb
+- test/test_email_regex.rb
+homepage: https://github.com/dougwig/email_regex.git
+licenses:
+- MIT
+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.17
+signing_key: 
+specification_version: 3
+summary: Validate email address regex
+test_files:
+- test/test_email_regex.rb