Advertisement
Guest User

2chproxy-https.patch

a guest
Apr 15th, 2017
252
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Diff 2.34 KB | None | 0 0
  1. --- 2chproxy.pl.org 2017-03-28 20:27:49.050388953 +0900
  2. +++ 2chproxy.pl 2017-04-15 10:28:46.978687005 +0900
  3. @@ -76,7 +76,7 @@
  4.    DISABLE_TE_HEADER => 1,                             #If-Modified-Sinceヘッダーのない要求がプロクシに来た場合に
  5.                                                        #TEヘッダーが付加されるのを止めるかどうか
  6.                                                        #0で無効、1で有効
  7. -  ENABLE_SSL_CONNECTION => 0,                         #https通信を有効にする、動くには動くが
  8. +  ENABLE_SSL_CONNECTION => 1,                         #https通信を有効にする、動くには動くが
  9.                                                        #しっかりした処理ではないので通信内容が壊れるかもしれない
  10.                                                        #0で無効、1で有効
  11.    TCP_CONNECTION_BUFFER => 8192,                      #https通信時のバッファーの最大bytes数
  12. @@ -88,7 +88,7 @@
  13.                                                        #書き込み毎にcookieを変えたい場合はこれを有効にする
  14.                                                        #0で無効、1で有効
  15.    HANDLED_COOKIES => [qw(__cfduid yuki PREN)],        #KEEP_COOKIEが有効な時にプロクシで保持するクッキー
  16. -  DAT_URL => '^http://([\w]+)(\.2ch\.net|\.bbspink\.com)(:[\d]+)?/([\w]+)/(?:dat|kako/\d+(?:/\d+)?)/([\d]+(?:-[\d]+)?)\.dat(\.gz)?$',  #datへのアクセスかを判定する正規表現
  17. +  DAT_URL => '^https?://([\w]+)(\.2ch\.net|\.bbspink\.com)(:[\d]+)?/([\w]+)/(?:dat|kako/\d+(?:/\d+)?)/([\d]+(?:-[\d]+)?)\.dat(\.gz)?$',  #datへのアクセスかを判定する正規表現
  18.    NULL_DEVICE => '/dev/null',                         #nullデバイスの場所
  19.    PID_FILE_NAME => "/tmp/2chproxy.pid",               #pidが書かれたファイル、2重起動禁止にも用いている
  20.    LOG_FILE_NAME => "/tmp/2chproxy.log",               #ログファイル
  21. @@ -1116,7 +1116,7 @@
  22.      $is_gzip  = $6;
  23.  
  24.      $hash_key  = $domain.$category.$dat;
  25. -    $rewrite_uri  = "http://".$host.$domain."/test/read.cgi/".$category."/".$dat."/";
  26. +    $rewrite_uri = $uri->scheme()."://".$host.$domain."/test/read.cgi/".$category."/".$dat."/";
  27.    }
  28.    else {
  29.      my $response  = HTTP::Response->new(500, 'Invalid URL');
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement