Class: Contacts::Hotmail

Inherits:
Base
  • Object
show all
Defined in:
lib/contacts/hotmail.rb

Constant Summary collapse

URL = 
"http://login.live.com/login.srf?id=2"
OLD_CONTACT_LIST_URL = 
"http://%s/cgi-bin/addresses"
NEW_CONTACT_LIST_URL = 
"http://%s/mail/GetContacts.aspx"
NEWEST_CONTACT_LIST_URL = 
"http://%s/mail/options.aspx?subsection=26"
COMPOSE_URL = 
"http://%s/cgi-bin/compose?"
PROTOCOL_ERROR = 
"Hotmail has changed its protocols, please upgrade this library first. If that does not work, report this error at http://rubyforge.org/forum/?group_id=2693"
PWDPAD = 
"IfYouAreReadingThisYouHaveTooMuchFreeTime"
MAX_HTTP_THREADS = 
8

Instance Method Summary collapse

Instance Method Details

#contacts(options = {}) ⇒ Object 



99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
 
# File 'lib/contacts/hotmail.rb', line 99

def contacts(options = {})
  return @contacts if @contacts
  if connected?
    url = URI.parse(contact_list_url)
    data, resp, cookies, forward = get( contact_list_url, @cookies )
    
    if resp.code_type != Net::HTTPOK
      raise ConnectionError, self.class.const_get(:PROTOCOL_ERROR)
    end

    # we have to click on the Export Contacts button to get the csv:
    # Search the content for __VIEWSTATE or __EVENTVALIDATION
    viewState = data.split(/>\s*?</).grep(/__VIEWSTATE/).first[/value=\".+?\"/][7..-2]
    eventValidation = data.split(/>\s*?</).grep(/__EVENTVALIDATION/).first[/value=\".+?\"/][7..-2]
    exportValue = data.split(/>\s*?</).grep(/ctl02\$ExportButton/).first[/value=\".+?\"/][7..-2]
    mt = cookies.split("; ").grep(/mt=/).first[3..-1]
    
    # post back to the same url 
    postdata = "%s=%s&%s=%s&%s=%s&%s=%s" % [
      "__VIEWSTATE", CGI.escape(viewState),
      "__EVENTVALIDATION", CGI.escape(eventValidation),
      CGI.escape("ctl02$ExportButton"), CGI.escape(exportValue),
      "mt", CGI.escape( mt )
    ]
  
    url = URI.parse(contact_list_url)
    http = open_http(url)
    resp, data = http.post("#{url.path}?#{url.query}", postdata,
      "User-Agent" => "Mozilla/5.0 (Macintosh; U; Intel Mac OS X; en-US; rv:1.8.1) Gecko/20061010 Firefox/2.0",
      "Accept-Encoding" => "gzip",
      "Cookie" => cookies,
      "Referer" => contact_list_url,
      "Content-Type" => 'application/x-www-form-urlencoded'
    )

    data = uncompress(resp, data)
    parse(data, options)
  end
end

#real_connect ⇒ Object 



12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
 
# File 'lib/contacts/hotmail.rb', line 12

def real_connect
  data, resp, cookies, forward = get(URL)
  
  old_url = URL
  until forward.nil?
    data, resp, cookies, forward, old_url = get(forward, cookies, old_url) + [forward]
  end
  
  postdata =  "PPSX=%s&PwdPad=%s&login=%s&passwd=%s&LoginOptions=2&PPFT=%s" % [
    CGI.escape(data.split("><").grep(/PPSX/).first[/=\S+$/][2..-3]),
    PWDPAD[0...(PWDPAD.length-@password.length)],
    CGI.escape(),
    CGI.escape(password),
    CGI.escape(data.split("><").grep(/PPFT/).first[/=\S+$/][2..-3])
  ]
  
  form_url = data.split("><").grep(/form/).first.split[5][8..-2]
  data, resp, cookies, forward = post(form_url, postdata, cookies)
  
  if data.index("The e-mail address or password is incorrect")
    raise AuthenticationError, "Username and password do not match"
  elsif data != ""
    raise AuthenticationError, "Required field must not be blank"
  elsif cookies == ""
    raise ConnectionError, PROTOCOL_ERROR
  end
  
  old_url = form_url
  until forward.nil?
    data, resp, cookies, forward, old_url = get(forward, cookies, old_url) + [forward]
  end

=begin      
  if data =~ %r{action="(.*?)"}
    forward = $1
    puts forward
    napexp = CGI.escape(data.to_s[/id="NAPExp" value="(.*?)"/][19...-1])
    nap = CGI.escape(data.to_s[/id="NAP" value="(.*?)"/][16...-1])
    anon = CGI.escape(data.to_s[/id="ANON" value="(.*?)"/][17...-1])
    anonexp = CGI.escape(data.to_s[/id="ANONExp" value="(.*?)"/][20...-1])
    t = CGI.escape(data.to_s[/id="t" value="(.*?)"/][14...-1])
    
    postdata = "NAPExp=%s&NAP=%s&ANON=%s&ANONExp=%s&t=%s" % [ napexp, nap, anon, anonexp, t ]
    puts postdata
    data, resp, cookies, forward, old_url = post(forward, postdata, cookies, old_url) + [forward]
  end

  until forward.nil?
    data, resp, cookies, forward, old_url = get(forward, cookies, old_url) + [forward]
  end
=end

  
  data, resp, cookies, forward = get("http://mail.live.com/mail", cookies)
  until forward.nil?
    data, resp, cookies, forward, old_url = get(forward, cookies, old_url) + [forward]
  end

# click on 'Contiune' if presented with the Hotmail Listened page
#  look for the Submit button with a "TakeMeToInbox" name (this should work for other languages)
if (not old_url.grep(/MessageAtLogin.aspx/).first.nil?)
    
  viewState = data.split(/>\s*?</).grep(/__VIEWSTATE/).first[/value=\".+?\"/][7..-2]
  eventValidation = data.split(/>\s*?</).grep(/__EVENTVALIDATION/).first[/value=\".+?\"/][7..-2]
  continueValue = data.split(/>\s*?</).grep(/TakeMeToInbox/).first[/value=\".+?\"/][7..-2]

  # post back to the same url 
  postdata = "%s=%s&%s=%s&%s=%s" % [
        "__VIEWSTATE", CGI.escape(viewState),
        "__EVENTVALIDATION", CGI.escape(eventValidation),
        CGI.escape("TakeMeToInbox"), CGI.escape(continueValue)
    ]
    data, resp, cookies, forward = post( old_url, postdata, cookies, old_url )
    until forward.nil?
      data, resp, cookies, forward, old_url = get(forward, cookies, old_url) + [forward]
    end
  end
        
  @domain = URI.parse(old_url).host
  @cookies = cookies
rescue AuthenticationError => m
  if @attempt == 1
    retry
  else
    raise m
  end
end