zeke-monkey_patches 0.1.16 → 0.1.17

data/VERSION.yml

@@ -1,4 +1,4 @@
 --- 
 :minor: 1
-:patch: 16
+:patch: 17
 :major: 0

data/lib/monkey_patches.rb

@@ -1,3 +1,25 @@
+module RFC822
+  EmailAddress = begin
+    qtext = '[^\\x0d\\x22\\x5c\\x80-\\xff]'
+    dtext = '[^\\x0d\\x5b-\\x5d\\x80-\\xff]'
+    atom_middle = '[^\\x00-\\x20\\x22\\x28\\x29\\x2c\\x2e\\x3a-' +
+      '\\x3c\\x3e\\x40\\x5b-\\x5d\\x7f-\\xff]+'
+    atom_edge = '[^\\x00-\\x20\\x22\\x28\\x29\\x2c-\\x2e\\x3a-' +
+      '\\x3c\\x3e\\x40\\x5b-\\x5d\\x7f-\\xff]'
+    atom = "(?:#{atom_edge}{1,2}|#{atom_edge}#{atom_middle}#{atom_edge})"
+    quoted_pair = '\\x5c[\\x00-\\x7f]'
+    domain_literal = "\\x5b(?:#{dtext}|#{quoted_pair})*\\x5d"
+    quoted_string = "\\x22(?:#{qtext}|#{quoted_pair})*\\x22"
+    domain_ref = atom
+    sub_domain = "(?:[a-zA-Z0-9][\-a-zA-Z0-9]*[a-zA-Z0-9]|[a-zA-Z0-9]+)"
+    word = "(?:#{atom}|#{quoted_string})"
+    domain = "#{sub_domain}(?:\\x2e#{sub_domain})*"
+    local_part = "#{word}(?:\\x2e#{word})*"
+    addr_spec = "#{local_part}\\x40#{domain}"
+    pattern = /\A#{addr_spec}\z/
+  end
+end
+
 class Object
   
   unless method_defined? "blank?"
@@ -16,7 +38,6 @@ class Object
       send method if respond_to? method
     end
   end
-
   
 end
 
@@ -117,6 +138,11 @@ class String
     !self.match(/https?:\/\/([^\/]+)(.*)/).nil?
   end
   
+  # Returns true or false depending on whether a string appears to be an email address
+  def valid_email?
+    !self.match(/^[A-Z0-9._%-]+@[A-Z0-9.-]+\.(?:[A-Z]{2}|com|org|net|biz|info|name|aero|biz|info|jobs|museum|name)$/i).nil?
+  end
+  
   # Removes tab characters and instances of more than one space
   def remove_whitespace
     self.gnix("\t").split(" ").remove_blanks.join(" ")
@@ -239,5 +265,4 @@ class Array
     self[0..self.size-2]
   end
   
-end
-
+end

data/spec/monkey_patches_spec.rb

@@ -85,6 +85,11 @@ describe "MonkeyPatches" do
     "testsite.com".valid_url?.should == false
   end
   
+  it "validates emails" do
+    ["bob.the.boss@moma.museum", "123@big.domain.madness.info", "test@foo.com"].all?{|e| e.valid_email? }.should == true
+    ["test@foo", "text", ""].any?{|e| e.valid_email? }.should == false
+  end
+  
   it "removes whitespace" do
     "this is    a    test".remove_whitespace.should == "this is a test"
     "  this \t is also a test  ".remove_whitespace.should == "this is also a test"

metadata

@@ -1,7 +1,7 @@
 --- !ruby/object:Gem::Specification 
 name: zeke-monkey_patches
 version: !ruby/object:Gem::Version 
-  version: 0.1.16
+  version: 0.1.17
 platform: ruby
 authors: 
 - Zeke Sikelianos
@@ -9,7 +9,7 @@ autorequire:
 bindir: bin
 cert_chain: []
 
-date: 2009-06-02 00:00:00 -07:00
+date: 2009-06-08 00:00:00 -07:00
 default_executable: 
 dependencies: []