nicoscraper 0.2.1 → 0.2.2

data/README.md

@@ -0,0 +1,112 @@
+#どんなライブラリか
+　ニコニコ動画から動画およびマイリスト情報を取得し、その情報に対して各種操作を行えます。タグやマイリスト検索結果からの抽出、および抽出結果に対する反復処理を行うメソッドも備え、ランキングサイト等の制作を支援します。
+
+#簡単な概要
+　Movieクラス、Mylistクラス、Searcherモジュールから主要な機能が構成されています。基本的には、動画やマイリストのIDを指定してインスタンスを作り、そこから詳細な情報を取得するためのメソッドを実行したのち、さらに分析や加工を行う別のメソッドを実行する、という手順を踏みます。
+
+##動画情報の取得
+
+　例えば"sm1097445"という動画IDから、タイトルや動画の長さ、現在の閲覧数等の詳細な情報を知りたいときは、
+
+~~~~
+require 'nicoscraper'
+
+movie = Nicos::Movie::new("sm1097445")
+movie.getInfo
+
+p movie
+
+<Nicos::Movie:0x00000002537aa8
+	@video_id="sm1097445", 
+	@available=false, @title="【初音ミク】みくみくにしてあげる♪【してやんよ】", 
+	@description="おまえら、みっくみくにしてやんよ。歌詞はhttp://ikamo.hp.infoseek.co.jp/mikumiku.txt（9/20 1:55修正）。上げている他のもの→mylist/1450136", 
+	@thumbnail_url="http://tn-skr2.smilevideo.jp/smile?i=1097445", 
+	@first_retrieve=1190218922, 
+	@length=99, 
+	@movie_type="flv", 
+	@size_high=3906547, 
+	@size_low=1688098, 
+	@view_counter=9073614, 
+	@comment_num=2553366, 
+	@mylist_counter=183470, 
+	@last_res_body="★███████████☆ ☆████████████●●●●███ ★█████... ", 
+	@watch_url="http://www.nicovideo.jp/watch/sm1097445", @thumb_type="video", 
+	@embeddable=1, 
+	@no_live_play=0, 
+	@tags_jp=["音楽", "初音ミク", "みくみくにしてあげる♪", "ミクオリジナル曲", "ika", "VOCALOID殿堂入り", "元気が出るミクうた", "VOCALOID", "初音ミク名曲リンク", "深夜みっく"], 
+	@tags_tw=["彈幕強大", "把你MikuMiku掉♪", "週刊vocaloid排行榜第1名獲得曲", "翻譯歌曲", "台灣VOCALOID評論人氣曲", "最強彈幕傳說", "初音未來"], 
+	@user_id=70391 >
+
+~~~~
+
+　このように、Movieクラスのインスタンス（以下「動画インスタンス」）のgetInfoメソッドを利用します。その結果、動画インスタンスにインスタンス変数として各種情報が付加されます。
+
+##マイリスト情報の取得
+　Mylistクラスもほぼ同様ですが、Mylistクラスのインスタンス（以下「マイリストインスタンス」）は、マイリスト情報の他に、そのマイリストが含む動画のインスタンスを自動的に生成します。つまり、
+
+~~~~
+require 'nicoscraper'
+
+mylist = Nicos::Mylist::new("")
+mylist.getInfoLt
+
+p mylist
+
+# 結果
+#<Nicos::Mylist:0x00000002884670
+　@mylist_id=15196568,
+	@movies=[
+		#<Nicos::Movie:0x0000000255a968
+			@video_id="sm8481759", 
+			@available=true, @title="【Oblivion】おっさんの大冒険１（ゆっくり実況）",
+			...
+		#<Nicos::Movie:0x0000000251a6b0 
+			@video_id="sm8506034",
+		 	@available=true,
+		 	@title="【Oblivion】おっさんの大冒険２（ゆっくり実況）",
+		 	...
+	],
+	@available=true,
+	@title="【Oblivion】おっさんの大冒険", 
+	... >
+~~~~
+
+　というように、動画インスタンスを勝手につくりだして配列として保持します。
+
+##検索結果の取得
+
+　タグやマイリスト検索結果からの情報取得には、Searcherモジュールを使います。情報のソート方法の指定、取得する範囲の制限が可能です。
+
+~~~~
+require 'nicoscraper'
+
+t = Time.now
+ytd = Date::new(t.year, t.month, t.day) - 1
+yesterday = Time.local(ytd.year, ytd.month, ytd.day, 0, 0, 0).to_i
+
+Searcher.byTag('ゆっくり実況プレイpart1リンク', 'post_new', nil) {
+  |result, page|
+
+	result.each { |e|
+    movie = Nicos::Movie.new(e['video_id'])
+    movie.getInfo
+
+	  puts movie.title.toutf8 +
+      " is posted at " +
+       Time.at(movie.first_retrieve).to_s.toutf8
+
+    true if movie.first_retrieve <= yesterday 
+  }  
+}
+~~~~
+
+　これは'ゆっくり実況プレイpart1リンク'というタグの付く動画を、post_new=投稿日時が新しい順からさかのぼって取得していき、取得した動画の日付が前日の0時0分を超えるまでそれを続けます。 
+
+　ブロック内の第1引数には取得結果が与えられるのですが、これは動画1つ毎のコールバックではなく、32個分の配列です。なぜ32個のセットなのかと言うと、ご存知のようにニコニコ動画の検索画面はページで区切られており、Searcherモジュールの各メソッドはページ毎に情報を取得するためです。Htmlから取得するにしろAtomフィードから取得するにしろ、1ページに32個の動画情報が含まれています。そして、第2引数にはそのページ数が与えられます。
+
+　なお、ブロック内でtrueを返すことによりスクレイプは終わります。逆に言えば、trueを返さない限り検索結果全ての情報を取得しようとするため、十分に注意して下さい。上の例では、取得した動画の日付を調べ、3日前の0時0分より前の動画があればそこでループを終える設計です。
+
+
+#より詳しい情報
+
+は、こちらを御覧下さい。

data/VERSION

@@ -1 +1 @@
-0.2.0
+0.2.2

data/lib/connector.rb

@@ -5,356 +5,357 @@ require 'rubygems'
 require 'ruby-debug'
 require 'net/http'
 
+module Nicos::Connector
+  class Connector
+    def initialize
+      # デフォルトのウェイト設定
+      @seqTime = 0
 
-class Connector
-  def initialize
-    # デフォルトのウェイト設定
-    @seqTime = 0
-
-    @waitConfig = {
-      'seqAccLimit' => 10,  # 連続してリクエストする回数
-      'afterSeq'    => 10,  # 連続リクエスト後のウェイト
-      'each'        => 1,   # 連続リクエスト時の、1リクエスト毎のウェイト
-
-      'increment'   => 1,   # アクセス拒絶時の、次回以降の1リクエスト毎のウェイトの増加量
-      ''            => 100,
-
-      'deniedSeqReq'=> {
-        'retryLimit'  => 3,
-        'wait'        => 120
-      },
-      
-      'serverIsBusy'=> {
-        'retryLimit'  => 3,
-        'wait'        => 120
-      },
-      
-      'serviceUnavailable' => {
-        'retryLimit'  => 3,
-        'wait'        => 120
-      },
-      
-      'timedOut' => {
-        'retryLimit'  => 3,
-        'wait'        => 10
+      @waitConfig = {
+        'seqAccLimit' => 10,  # 連続してリクエストする回数
+        'afterSeq'    => 10,  # 連続リクエスト後のウェイト
+        'each'        => 1,   # 連続リクエスト時の、1リクエスト毎のウェイト
+
+        'increment'   => 1,   # アクセス拒絶時の、次回以降の1リクエスト毎のウェイトの増加量
+        ''            => 100,
+
+        'deniedSeqReq'=> {
+          'retryLimit'  => 3,
+          'wait'        => 120
+        },
+        
+        'serverIsBusy'=> {
+          'retryLimit'  => 3,
+          'wait'        => 120
+        },
+        
+        'serviceUnavailable' => {
+          'retryLimit'  => 3,
+          'wait'        => 120
+        },
+        
+        'timedOut' => {
+          'retryLimit'  => 3,
+          'wait'        => 10
+        }
       }
-    }
 
-    @result = {}
-  end
+      @result = {}
+    end
 
-  private
-  
-  def notPublic
-    # マイリスト非公開のときに403になる。後で専用の処理を入れるべき。
-    puts "This movie/mylist is not public."
-    @result = "notPublic"
-    return { "order" => "terminate" }  
-  end
+    private
+    
+    def notPublic
+      # マイリスト非公開のときに403になる。後で専用の処理を入れるべき。
+      puts "This movie/mylist is not public."
+      @result = "notPublic"
+      return { "order" => "terminate" }  
+    end
 
-  def limInCommunity
-    puts "This movie/mylist is limited in comunity members."
-    # ex. item_id -> 1294702905
-    @result = "limInCommunity"
-    return { "order" => "terminate" }   
-  end
+    def limInCommunity
+      puts "This movie/mylist is limited in comunity members."
+      # ex. item_id -> 1294702905
+      @result = "limInCommunity"
+      return { "order" => "terminate" }   
+    end
 
-  def notFound
-    puts "This movie/mylist is not found."
-    @result = "notFound"
-    return { "order" => "terminate" }  
-  end
+    def notFound
+      puts "This movie/mylist is not found."
+      @result = "notFound"
+      return { "order" => "terminate" }  
+    end
 
-  def deleted
-    puts "This movie/mylist is deleted."
-    @result = "deleted"
-    return { "order" => "terminate" }  
-  end
+    def deleted
+      puts "This movie/mylist is deleted."
+      @result = "deleted"
+      return { "order" => "terminate" }  
+    end
 
-  def deniedSeqReq
-    puts "Denied sequential requests."
-    sleep @waitConfig["deniedSeqReq"]
-    @result = "deniedSeqReq"
-    return { "order" => "retry" }  
-  end
+    def deniedSeqReq
+      puts "Denied sequential requests."
+      sleep @waitConfig["deniedSeqReq"]
+      @result = "deniedSeqReq"
+      return { "order" => "retry" }  
+    end
 
-  def serverIsBusy
-    puts "The server is busy."
-    sleep @waitConfig["serverIsBusy"]
-    @result = "serverIsBusy"
-    return { "order" => "retry" } 
-  end
+    def serverIsBusy
+      puts "The server is busy."
+      sleep @waitConfig["serverIsBusy"]
+      @result = "serverIsBusy"
+      return { "order" => "retry" } 
+    end
 
-  def serviceUnavailable
-    puts "Service unavailable."
-    sleep @waitConfig["serviceUnavailable"]
-    @result = "serviceUnavailable"
-    return { "order" => "retry" } 
-  end
+    def serviceUnavailable
+      puts "Service unavailable."
+      sleep @waitConfig["serviceUnavailable"]
+      @result = "serviceUnavailable"
+      return { "order" => "retry" } 
+    end
 
-  def timedOut
-    puts "Request timed out."
-    sleep @waitConfig["timedOut"]
-    @result = "timedOut"
-    return { "order" => "retry" } 
-  end
+    def timedOut
+      puts "Request timed out."
+      sleep @waitConfig["timedOut"]
+      @result = "timedOut"
+      return { "order" => "retry" } 
+    end
 
-  def success(resBody)
-    sleep @waitConfig["each"]
-    @seqTime += 1
-    
-    if @seqTime >= @waitConfig["seqAccLimit"]
-      sleep @waitConfig["afterSeq"]
-      @seqTime = 0
+    def success(resBody)
+      sleep @waitConfig["each"]
+      @seqTime += 1
+      
+      if @seqTime >= @waitConfig["seqAccLimit"]
+        sleep @waitConfig["afterSeq"]
+        @seqTime = 0
+      end
+      return { "order" => "success", "body" => resBody } 
     end
-    return { "order" => "success", "body" => resBody } 
-  end
 
-  def wait(status)
-    puts "Wait for " + waitTime + " second."
-    sleep @waitConfig[status.to_s]
-  end
-    
-  public
+    def wait(status)
+      puts "Wait for " + waitTime + " second."
+      sleep @waitConfig[status.to_s]
+    end
+      
+    public
 
-  def setWait(waitConfig)
-    if waitConfig != nil
-      @waitConfig = mixin(@waitConfig, waitConfig)
+    def setWait(waitConfig)
+      if waitConfig != nil
+        @waitConfig = mixin(@waitConfig, waitConfig)
+      end
     end
   end
-end
 
 
-class XmlConnector < Connector
-  def get (host, entity)  
-    response = nil
-          
-    begin
-      puts "Request to " + host + entity 
-      Net::HTTP.start(host, 80) { |http|
-        response = http.get(entity)
-      }
+  class Xml < Connector
+    def get (host, entity)  
+      response = nil
+            
+      begin
+        puts "Request to " + host + entity 
+        Net::HTTP.start(host, 80) { |http|
+          response = http.get(entity)
+        }
+
+      rescue => e
+        puts e
+      rescue Timeout::Error => e  
+        timeOut      
 
-    rescue => e
-      puts e
-    rescue Timeout::Error => e  
-      timeOut      
-
-    else
-      res = case response
-      when Net::HTTPSuccess
-        reviewRes( response.body.force_encoding("UTF-8") )
-      #    return response.body.force_encoding("UTF-8") 
-      # when Net::HTTPRedirection
-      #  fetch(response['location'], limit - 1)
-      when Net::HTTPForbidden
-        forbidden            
-      when Net::HTTPNotFound
-        notFound
-      when Net::HTTPServiceUnavailable 
-        serviceUnavailable
       else
-        unknownError
-      end    
-    end until res["order"] == "success" ||
-              res["order"] == "terminate"
+        res = case response
+        when Net::HTTPSuccess
+          reviewRes( response.body.force_encoding("UTF-8") )
+        #    return response.body.force_encoding("UTF-8") 
+        # when Net::HTTPRedirection
+        #  fetch(response['location'], limit - 1)
+        when Net::HTTPForbidden
+          forbidden            
+        when Net::HTTPNotFound
+          notFound
+        when Net::HTTPServiceUnavailable 
+          serviceUnavailable
+        else
+          unknownError
+        end    
+      end until res["order"] == "success" ||
+                res["order"] == "terminate"
 
-    res
+      res
+    end
   end
-end
 
-class MylistAtomConnector < XmlConnector
-  private
+  class MylistAtom < Xml
+    private
 
-  def forbidden
-    # マイリストが非公開の場合、html/Atomのどちらへのリクエストであっても、403が返ってくる。
-    notPublic
-  end
+    def forbidden
+      # マイリストが非公開の場合、html/Atomのどちらへのリクエストであっても、403が返ってくる。
+      notPublic
+    end
 
-  def reviewRes(resBody)
-    if # アクセス集中時
-      /大変ご迷惑をおかけいたしますが、しばらく時間をあけてから再度検索いただくようご協力をお願いいたします。/ =~
-        resBody.force_encoding("UTF-8")
-    then
-      serverIsBusy
-    else
-      success(resBody)
-    end      
+    def reviewRes(resBody)
+      if # アクセス集中時
+        /大変ご迷惑をおかけいたしますが、しばらく時間をあけてから再度検索いただくようご協力をお願いいたします。/ =~
+          resBody.force_encoding("UTF-8")
+      then
+        serverIsBusy
+      else
+        success(resBody)
+      end      
+    end
   end
-end
 
-class SearchByTagAtomConnector < XmlConnector
-  private
+  class TagAtom < Xml
+    private
 
-  def forbidden
-    # マイリストが非公開の場合、html/Atomのどちらへのリクエストであっても、403が返ってくる。
-    notPublic
-  end
+    def forbidden
+      # マイリストが非公開の場合、html/Atomのどちらへのリクエストであっても、403が返ってくる。
+      notPublic
+    end
 
-  def reviewRes(resBody)
-    if # アクセス集中時
-      /大変ご迷惑をおかけいたしますが、しばらく時間をあけてから再度検索いただくようご協力をお願いいたします。/ =~
-        resBody.force_encoding("UTF-8")
-    then
-      serverIsBusy
-    else
-      success(resBody)
-    end      
+    def reviewRes(resBody)
+      if # アクセス集中時
+        /大変ご迷惑をおかけいたしますが、しばらく時間をあけてから再度検索いただくようご協力をお願いいたします。/ =~
+          resBody.force_encoding("UTF-8")
+      then
+        serverIsBusy
+      else
+        success(resBody)
+      end      
+    end
   end
-end
 
-class GetThumbInfoConnector < XmlConnector
-  private
+  class GetThumbInfo < Xml
+    private
 
-  def reviewRes(resBody)
-    r = resBody.force_encoding("UTF-8")
+    def reviewRes(resBody)
+      r = resBody.force_encoding("UTF-8")
 
-    if # getThumbInfoは、該当する動画がない・削除済み・コミュニティ限定でも200が返ってくる。
-      /<nicovideo_thumb_response\sstatus=\"fail\">/ =~ r
-      if /<code>NOT_FOUND<\/code>/ =~ r
-        notFound
-      elsif /<code>DELETED<\/code>/ =~ r
-        deleted
-      elsif /<code>COMMUNITY<\/code>/ =~ r
-        limInCommunity
+      if # getThumbInfoは、該当する動画がない・削除済み・コミュニティ限定でも200が返ってくる。
+        /<nicovideo_thumb_response\sstatus=\"fail\">/ =~ r
+        if /<code>NOT_FOUND<\/code>/ =~ r
+          notFound
+        elsif /<code>DELETED<\/code>/ =~ r
+          deleted
+        elsif /<code>COMMUNITY<\/code>/ =~ r
+          limInCommunity
+        else
+          serverIsBusy
+        end
       else
-        serverIsBusy
-      end
-    else
-      success(resBody)
-    end      
+        success(resBody)
+      end      
+    end
   end
-end
 
-class HtmlConnector < Connector
-  def initialize(mode)
-    @mode = mode
-    # デフォルトのウェイト設定
-    @waitConfig = {
-      'consec_count'  => 10,  # 連続してリクエストする回数
-      'consec_wait'   => 10,  # 連続リクエスト後のウェイト
-      'each'          => 10,  # 連続リクエスト時の、1リクエスト毎のウェイト
- 
-      '200-abnormal'  => 300, # アクセス拒絶時（「短時間での連続アクセスは・・・」）の場合の再試行までの時間
-      'unavailable'   => 10,
-      '403'           => 300, # "403"時の再試行までのウェイト
-      '404'           => 300, # "403"時の再試行までのウェイト
-      'increment'     => 1,   # アクセス拒絶時の、次回以降の1リクエスト毎のウェイトの増加量
-
-      'timeout'       => 10,  # タイムアウト時の、再試行までのウェイト
-      '500'           => 10,  # "500"時の再試行までのウェイト
-      '503'           => 10,  # "503"時の再試行までのウェイト
- 
-      'retryLimit'    => 3    # 再試行回数の限度
-    }
-    
-    # 1つの検索結果画面に表示される動画の数。現時点では32個がデフォルトの模様。
-    @NumOfSearched = 32
-
-    @mech = Mechanize.new
-    # メモリ節約のため、Mechanizeの履歴機能を切る。
-    @mech.max_history = 1
+  class HtmlConnector < Connector
+    def initialize(mode)
+      @mode = mode
+      # デフォルトのウェイト設定
+      @waitConfig = {
+        'consec_count'  => 10,  # 連続してリクエストする回数
+        'consec_wait'   => 10,  # 連続リクエスト後のウェイト
+        'each'          => 10,  # 連続リクエスト時の、1リクエスト毎のウェイト
+   
+        '200-abnormal'  => 300, # アクセス拒絶時（「短時間での連続アクセスは・・・」）の場合の再試行までの時間
+        'unavailable'   => 10,
+        '403'           => 300, # "403"時の再試行までのウェイト
+        '404'           => 300, # "403"時の再試行までのウェイト
+        'increment'     => 1,   # アクセス拒絶時の、次回以降の1リクエスト毎のウェイトの増加量
+
+        'timeout'       => 10,  # タイムアウト時の、再試行までのウェイト
+        '500'           => 10,  # "500"時の再試行までのウェイト
+        '503'           => 10,  # "503"時の再試行までのウェイト
+   
+        'retryLimit'    => 3    # 再試行回数の限度
+      }
+      
+      # 1つの検索結果画面に表示される動画の数。現時点では32個がデフォルトの模様。
+      @NumOfSearched = 32
 
-    @consec_count = 0
-  end
-  
-  public 
-
-  def errorStatus(ex)
-    # 再試行回数が
-    @retryTime += 1
-    if @retryTime >= @wait['allowance_time']
-      return false
-    end
+      @mech = Mechanize.new
+      # メモリ節約のため、Mechanizeの履歴機能を切る。
+      @mech.max_history = 1
 
-    case ex.response_code
-    when '403' then
-      sleep @wait['403']
-      warn "403"
-    when '500' then
-      sleep @wait['500']
-      warn "500"
-    when '503' then
-      sleep @wait['503']
-      warn "503"
-    else
-      warn "Server error: #{ex.code}"
-      return false
+      @consec_count = 0
     end
- 
-    @connection = false
-    @failed += 1
-  end
+    
+    public 
 
-  def htmlReq (url, request, procedure)
-    @failed = 0
+    def errorStatus(ex)
+      # 再試行回数が
+      @retryTime += 1
+      if @retryTime >= @wait['allowance_time']
+        return false
+      end
 
-    # 再試行ループ
-    begin
-      eachWait 
-      @connection = nil
-      request.call(url)
-    
-    # タイムアウト時処理
-    rescue TimeoutError
-      timeOut
-      retry
-       
-    # Mechanizeでアクセスし、200以外のステータスが返ってきた時
-    # 実際に該当するコードが返ってきたことがないので、正常に動くか不明   
-    rescue Mechanize::ResponseCodeError => ex
-      if errorStatus(ex) then retry
-      else break end
-       
-    # HTTP Status:200時の処理
-    else
-      procedure.call
-      
-      # 失敗カウントが指定回数を超えたらループを終わる。
-      if @failed >= @wait['allowance_time'] then
-        puts 'Exceeded the limit of retry time.'
-        @connection = false
-        break
+      case ex.response_code
+      when '403' then
+        sleep @wait['403']
+        warn "403"
+      when '500' then
+        sleep @wait['500']
+        warn "500"
+      when '503' then
+        sleep @wait['503']
+        warn "503"
+      else
+        warn "Server error: #{ex.code}"
+        return false
       end
-    end until @connection
+   
+      @connection = false
+      @failed += 1
+    end
 
-    # 連続アクセスカウント+1
-    @consec_count += 1
-    # 成功 = true / 失敗 = false
-    return @connection
-  end
+    def htmlReq (url, request, procedure)
+      @failed = 0
 
-  def htmlGet (host, entity)
-    htmlReq(
-      host + entity,
-      lambda { |url|
-        t = Thread.new do
-          @mech.get(url)
-          puts "Requesting for " + url
-        end
-        t.join
-      },
-      # HTTP Status:200時の処理 
-      lambda {
-        # 連続アクセス拒絶メッセージが返ってきた時       
-        if /短時間での連続アクセスはご遠慮ください/ =~ @mech.page.search('/html').text then
-          puts 'Access rejected.'
+      # 再試行ループ
+      begin
+        eachWait 
+        @connection = nil
+        request.call(url)
+      
+      # タイムアウト時処理
+      rescue TimeoutError
+        timeOut
+        retry
+         
+      # Mechanizeでアクセスし、200以外のステータスが返ってきた時
+      # 実際に該当するコードが返ってきたことがないので、正常に動くか不明   
+      rescue Mechanize::ResponseCodeError => ex
+        if errorStatus(ex) then retry
+        else break end
+         
+      # HTTP Status:200時の処理
+      else
+        procedure.call
+        
+        # 失敗カウントが指定回数を超えたらループを終わる。
+        if @failed >= @wait['allowance_time'] then
+          puts 'Exceeded the limit of retry time.'
           @connection = false
-          @failed += 1
-     
-          # ウェイトを置いた後、今後のページ毎のウェイトを増やす。
-          puts 'Waiting for ' + @wait['rejected'] + 's.'
-          sleep @wait['rejected']
-          @wait['each'] += @wait['increment']
-          puts 'Increased each @wait by ' + @wait['increment'] + 'sec.'
-        else
-          @connection = true
+          break
         end
-      }
-    )
-    
-    return @mech.page
-  end
+      end until @connection
+
+      # 連続アクセスカウント+1
+      @consec_count += 1
+      # 成功 = true / 失敗 = false
+      return @connection
+    end
 
-  attr_reader :mech
+    def htmlGet (host, entity)
+      htmlReq(
+        host + entity,
+        lambda { |url|
+          t = Thread.new do
+            @mech.get(url)
+            puts "Requesting for " + url
+          end
+          t.join
+        },
+        # HTTP Status:200時の処理 
+        lambda {
+          # 連続アクセス拒絶メッセージが返ってきた時       
+          if /短時間での連続アクセスはご遠慮ください/ =~ @mech.page.search('/html').text then
+            puts 'Access rejected.'
+            @connection = false
+            @failed += 1
+       
+            # ウェイトを置いた後、今後のページ毎のウェイトを増やす。
+            puts 'Waiting for ' + @wait['rejected'] + 's.'
+            sleep @wait['rejected']
+            @wait['each'] += @wait['increment']
+            puts 'Increased each @wait by ' + @wait['increment'] + 'sec.'
+          else
+            @connection = true
+          end
+        }
+      )
+      
+      return @mech.page
+    end
+
+    attr_reader :mech
+  end
 end