blob: 15635e084bdb101760976385e6611f3157d0b224 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
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
|
require 'net/http'
class UrlValidator < ActiveModel::EachValidator
def validate_each(record, attribute, value)
url = value
# Regex code by 'Arsenic' from http://snippets.dzone.com/posts/show/3654
if url =~ /^
( (https?):\/\/ )?
( [a-z\d]+([\-\.][a-z\d]+)*\.[a-z]{2,6} )
(
(:
( \d{1,5} )
)?
( \/.* )?
)?
$/ix
url = "http#{'s' if $7 == '81'}://#{url}" unless $1
else
record.errors[attribute] << 'Not a valid URL'
end
if options[:verify]
begin
url_response = RedirectFollower.new(url).resolve
url = url_response.url if options[:verify] == [:resolve_redirects]
rescue RedirectFollower::TooManyRedirects
record.errors[attribute] << 'URL is redirecting too many times'
rescue
record.errors[attribute] << 'could not be resolved'
end
end
if options[:update]
value.replace url
end
end
end
# Code below written by John Nunemaker
# See blog post at http://railstips.org/blog/archives/2009/03/04/following-redirects-with-nethttp/
class RedirectFollower
class TooManyRedirects < StandardError; end
attr_accessor :url, :body, :redirect_limit, :response
def initialize(url, limit=5)
@url, @redirect_limit = url, limit
logger.level = Logger::INFO
end
def logger
@logger ||= Logger.new(STDOUT)
end
def resolve
raise TooManyRedirects if redirect_limit < 0
self.response = Net::HTTP.get_response(URI.parse(url))
logger.info "redirect limit: #{redirect_limit}"
logger.info "response code: #{response.code}"
logger.debug "response body: #{response.body}"
if response.kind_of?(Net::HTTPRedirection)
self.url = redirect_url
self.redirect_limit -= 1
logger.info "redirect found, headed to #{url}"
resolve
end
self.body = response.body
self
end
def redirect_url
if response['location'].nil?
response.body.match(/<a href=\"([^>]+)\">/i)[1]
else
response['location']
end
end
end
|
