Tube8 Sorry Server Is Busy Please Try Again in a Few Minutes

YOUTUBE CACHING WITH SQUID -by- Syed Jahanzaib

The last updated guide 22nd April, 2014 about youtube caching is as follows …

https://aacable.wordpress.com/2014/04/21/howto-cache-youtube-with-squid-lusca-and-featherbed-cached-videos-from-mikrotik-queue/

=========================================================================================================

Concluding updated > 20th January, 2014

If you are caching YouTube using storeurl.pl method

EXAMPLE:

https://aacable.wordpress.com/2014/04/21/howto-cache-youtube-with-squid-lusca-and-bypass-cached-videos-from-mikrotik-queue/

https://aacable.wordpress.com/2012/01/19/youtube-caching-with-squid-2-seven-using-storeurl-pl/

and yous come across post-obit fault while watching any cached video  " An error occured, Delight endeavor again after "
As showed in the image below . . .

And so try using the post-obit January, 2014 updated storeurl.pl

#!/usr/bin/perl # This script is Non written or modified past me, I only copy pasted it from the internet. # Information technology was First originally Written by chudy_fernandez@yahoo.com # &amp; Have been modified by diverse persons over the cyberspace to fix/add various functions. # Similar For Instance modified by fellow member of comstuff.cyberspace to satisfy common and dynamic content. # th30nly @comstuff.net a.k.a invisible_theater , and possibly other people too. # For more info, http://wiki.squid-cache.org/ConfigExamples/DynamicContent/YouTube # Syed Jahanzaib / aacable@hotmail.com # https://aacable.wordpress.com/2012/01/nineteen/youtube-caching-with-squid-2-7-using-storeurl-pl/  ##################### #### REFERENCES #####  http://www2.fh-lausitz.de/launic/comp/misc/squid/projekt_youtube/ ##################### #####################  ## storeurl.pl-130411-0.05 ## due south. 130411.howto.squid.youtube.html ## CHANGES ## 130411 hl+mf ## - set up youtube loop redir ## - rel. 0.05 ## 130409 hl ## - add usleep ## 120726 hl ## - add together printtimenow ## 120725 hl ## - remove html-tags ## - add debug ## - disable unused rules ## - rel. 0.04 ## 120130 aacable ## - fix match variable.domain.com ##   https://aacable.wordpress.com/2012/01/30/youtube-caching-problem-an-mistake-occured-please-try-again-later-solved/ ## 120111 aacable ##   https://aacable.wordpress.com/2012/01/eleven/howto-cache-youtube-with-squid-lusca-and-bypass-buried-videos-from-mikrotik-queue/  #### notes ## - config (s. 130411.howto.squid.youtube.html) ##   squid.conf:storeurl_rewrite_program /etc/squid/storeurl.pl ## - test ##   $ cat squid.diag.youtube.url | awk '{print "0",$7,"10.0.0.1/- - GET - myip=x.0.0.2 myport=3128"}' | ./storeurl.pl # # ################################################################################################ ## UPDATED on 20 Jan, 2014 **** thanks to Mr. Safatah Purwonoto [Republic of indonesia] / Syed Jahanzaib ################################################################################################  #### var  utilise IO::File; $|=1; STDOUT->autoflush(one); $debug=ane;        ## recommended:0 $bypassallrules=0;    ## recommended:0 $sucks="";        ## unused $sucks="sucks" if ($debug>=one); $timenow=""; $printtimenow=1;      ## print timenow: 0|i my $logfile = '/tmp/storeurl.log';  open my $logfh, '>>', $logfile or die "Couldn't open $logfile for appending: $!\northward" if $debug; $logfh->autoflush(one) if $debug;  #### main while (<>) { $timenow=time()." " if ($printtimenow); print $logfh "$timenow"."in : $_" if ($debug>=1); chop; ## strip eol @X = split; $x = $Ten[0]; ## 0 $u = $Ten[i]; ## url $_ = $u; ## url  if ($bypassallrules){ $out="$u";    ## map 1:i  #youtube with range (YOUTUBE has split its videos into segments) }elsif (thousand/(youtube|google).*videoplayback\?.*range/ ){ @itag = m/[&?](itag=[0-9]*)/; @id = one thousand/[&?](id=[^\&]*)/; @range = m/[&?](range=[^\&\s]*)/; @begin = m/[&?](begin=[^\&\south]*)/; @redirect = grand/[&?](redirect_counter=[^\&]*)/; $out="http://video-srv.youtube.com.SQUIDINTERNAL/@itag&@id&@range&@redirect"; #sleep(1);    ## filibuster loop  #youtube without range }elsif (g/(youtube|google).*videoplayback\?/ ){ @itag = m/[&?](itag=[0-9]*)/; @id = m/[&?](id=[^\&]*)/; @redirect = m/[&?](redirect_counter=[^\&]*)/; $out="http://video-srv.youtube.com.SQUIDINTERNAL/@itag&@id&@redirect"; #sleep(1);    ## delay loop  #speedtest }elsif (m/^http:\/\/(.*)\/speedtest\/(.*\.(jpg|txt))\?(.*)/) { $out="http://www.speedtest.net.SQUIDINTERNAL/speedtest/" . $2 . "";  #mediafire }elsif (m/^http:\/\/199\.91\.15\d\.\d*\/\due west{12}\/(\w*)\/(.*)/) { $out="http://world wide web.mediafire.com.SQUIDINTERNAL/" . $1 ."/" . $2 . "";  #fileserve }elsif (m/^http:\/\/fs\w*\.fileserve\.com\/file\/(\w*)\/[\w-]*\.\/(.*)/) { $out="http://www.fileserve.com.SQUIDINTERNAL/" . $ane . "./" . $ii . "";  #filesonic }elsif (g/^http:\/\/s[0-nine]*\.filesonic\.com\/download\/([0-9]*)\/(.*)/) { $out="http://www.filesonic.com.SQUIDINTERNAL/" . $1 . "";  #4shared }elsif (one thousand/^http:\/\/[a-zA-Z]{2}\d*\.4shared\.com(:8080|)\/download\/(.*)\/(.*\..*)\?.*/) { $out="http://www.4shared.com.SQUIDINTERNAL/download/$2\/$three";  #4shared preview }elsif (chiliad/^http:\/\/[a-zA-Z]{2}\d*\.4shared\.com(:8080|)\/img\/(\d*)\/\west*\/dlink__2Fdownload_2F(\west*)_3Ftsid_3D[\w-]*\/preview\.mp3\?sId=\due west*/) { $out="http://www.4shared.com.SQUIDINTERNAL/$2";  #photos-X.ak.fbcdn.net where X a-z }elsif (thou/^http:\/\/photos-[a-z](\.ak\.fbcdn\.net)(\/.*\/)(.*\.jpg)/) { $out="http://photos" . $1 . "/" . $2 . $3  . "";  #YX.sphotos.ak.fbcdn.net where X ane-9, Y a-z } elsif (yard/^http:\/\/[a-z][0-9]\.sphotos\.ak\.fbcdn\.internet\/(.*)\/(.*)/) { $out="http://photos.ak.fbcdn.net/" . $one  ."/". $ii . "";  #maps.google.com } elsif (m/^http:\/\/(cbk|mt|khm|mlt|tbn)[0-9]?(.google\.co(m|\.uk|\.id).*)/) { $out="http://" . $1  . $two . "";  # compatibility for old cached get_video?video_id } elsif (m/^http:\/\/([0-9.]{iv}|.*\.youtube\.com|.*\.googlevideo\.com|.*\.video\.google\.com).*?(videoplayback\?id=.*?|video_id=.*?)\&(.*?)/) { $z = $2; $z =~ s/video_id=/get_video?video_id=/; $out="http://video-srv.youtube.com.SQUIDINTERNAL/" . $z . ""; #sleep(ane);    ## filibuster loop  } elsif (thou/^http:\/\/www\.google-analytics\.com\/__utm\.gif\?.*/) { $out="http://www.google-analytics.com/__utm.gif";  #Cache High Latency Ads } elsif (m/^http:\/\/([a-z0-nine.]*)(\.doubleclick\.net|\.quantserve\.com|\.googlesyndication\.com|yieldmanager|cpxinteractive)(.*)/) { $y = $3;$z = $two; for ($y) { south/pixel;.*/pixel/; s/action;.*/activity/; s/(imgad[^&]*).*/\1/; s/;ord=[?0-9]*//; s/;&timestamp=[0-9]*//; s/[&?]correlator=[0-nine]*//; due south/&cookie=[^&]*//; s/&ga_hid=[^&]*//; due south/&ga_vid=[^&]*//; south/&ga_sid=[^&]*//; # s/&prev_slotnames=[^&]*// # s/&u_his=[^&]*//; s/&dt=[^&]*//; s/&dtd=[^&]*//; due south/&lmt=[^&]*//; due south/(&alternate_ad_url=http%3A%2F%2F[^(%2F)]*)[^&]*/\1/; s/(&url=http%3A%2F%2F[^(%2F)]*)[^&]*/\1/; due south/(&ref=http%3A%2F%2F[^(%2F)]*)[^&]*/\1/; due south/(&cookie=http%3A%2F%2F[^(%2F)]*)[^&]*/\one/; s/[;&?]ord=[?0-9]*//; s/[;&]mpvid=[^&;]*//; due south/&xpc=[^&]*//; # yieldmanager due south/\?clickTag=[^&]*//; southward/&u=[^&]*//; due south/&slotname=[^&]*//; s/&page_slots=[^&]*//; } $out="http://" . $1 . $2 . $y . "";  #cache high latency ads } elsif (m/^http:\/\/(.*?)\/(ads)\?(.*?)/) { $out="http://" . $1 . "/" . $2  . "";  # spicific servers starts hither.... } elsif (m/^http:\/\/(www\.ziddu\.com.*\.[^\/]{3,iv})\/(.*?)/) { $out="http://" . $1 . "";  #cdn, varialble 1st path } elsif (($u =~ /filehippo/) && (m/^http:\/\/(.*?)\.(.*?)\/(.*?)\/(.*)\.([a-z0-9]{three,4})(\?.*)?/)) { @y = ($1,$ii,$4,$5); $y[0] =~ southward/[a-z0-nine]{2,5}/cdn./; $out="http://" . $y[0] . $y[1] . "/" . $y[two] . "." . $y[3] . "";  #rapidshare } elsif (($u =~ /rapidshare/) && (m/^http:\/\/(([A-Za-z]+[0-9-.]+)*?)([a-z]*\.[^\/]{3}\/[a-z]*\/[0-9]*)\/(.*?)\/([^\/\?\&]{4,})$/)) { $out="http://cdn." . $3 . "/SQUIDINTERNAL/" . $five . "";  } elsif (($u =~ /maxporn/) && (m/^http:\/\/([^\/]*?)\/(.*?)\/([^\/]*?)(\?.*)?$/)) { $out="http://" . $1 . "/SQUIDINTERNAL/" . $3 . "";  #like porn hub variables url and heart part of the path, filename etention 3 or iv with or without ? at the end } elsif (($u =~ /tube8|pornhub|xvideos/) && (m/^http:\/\/(([A-Za-z]+[0-9-.]+)*?(\.[a-z]*)?)\.([a-z]*[0-9]?\.[^\/]{iii}\/[a-z]*)(.*?)((\/[a-z]*)?(\/[^\/]*){4}\.[^\/\?]{three,four})(\?.*)?$/)) { $out="http://cdn." . $4 . $6 . "";  #...spicific servers cease here.  #photos-X.ak.fbcdn.cyberspace where 10 a-z } elsif (one thousand/^http:\/\/photos-[a-z].ak.fbcdn.net\/(.*)/) { $out="http://photos.ak.fbcdn.net/" . $i  . "";  #for yimg.com video } elsif (m/^http:\/\/(.*yimg.com)\/\/(.*)\/([^\/\?\&]*\/[^\/\?\&]*\.[^\/\?\&]{3,iv})(\?.*)?$/) { $out="http://cdn.yimg.com//" . $three . "";  #for yimg.com doubled } elsif (m/^http:\/\/(.*?)\.yimg\.com\/(.*?)\.yimg\.com\/(.*?)\?(.*)/) { $out="http://cdn.yimg.com/"  . $iii . "";  #for yimg.com with &sig= } elsif (m/^http:\/\/(.*?)\.yimg\.com\/(.*)/) { @y = ($ane,$2); $y[0] =~ south/[a-z]+[0-nine]+/cdn/; $y[1] =~ s/&sig=.*//; $out="http://" . $y[0] . ".yimg.com/"  . $y[1] . "";  #youjizz. We utilize only domain and filename } elsif (($u =~ /media[0-9]{2,5}\.youjizz/) && (m/^http:\/\/(.*)(\.[^\.\-]*?\..*?)\/(.*)\/([^\/\?\&]*)\.([^\/\?\&]{3,four})((\?|\%).*)?$/)) { @y = ($1,$ii,$4,$5); $y[0] =~ s/(([a-zA-A]+[0-nine]+(-[a-zA-Z])?$)|(.*cdn.*)|(.*cache.*))/cdn/; $out="http://" . $y[0] . $y[one] . "/" . $y[ii] . "." . $y[iii] . "";  #general purpose for cdn servers. add above your specific servers. } elsif (m/^http:\/\/([0-9.]*?)\/\/(.*?)\.(.*)\?(.*?)/) { $out="http://squid-cdn-url//" . $2  . "." . $3 . "";  #generic http://variable.domain.com/path/filename."ex" "ext" or "exte" with or withour "? or %" } elsif (m/^http:\/\/(.*)(\.[^\.\-]*?\..*?)\/(.*)\.([^\/\?\&]{2,4})((\?|\%).*)?$/) { @y = ($1,$2,$3,$4); $y[0] =~ s/(([a-zA-Z]+[0-9]+(-[a-zA-Z])?$)|(.*cdn.*)|(.*enshroud.*))/cdn/; $out="http://" . $y[0] . $y[1] . "/" . $y[2] . "." . $y[3] . "";  } else { $out="$u"; ##$Ten[2]="$sucks"; } print $logfh "$timenow"."out: $ten $out $Ten[2] $X[3] $X[4] $Ten[5] $X[6] $X[seven]\northward" if ($debug>=1); print "$10 $out $X[2] $10[3] $10[four] $Ten[5] $X[6] $Ten[vii]\n"; } close $logfh if ($debug);        

.

Please mail service your comments regarding updated storeurl.pl

Regard's
SYED JAHANZAIB

24.851000 67.008300

caryhumque.blogspot.com

Source: https://aacable.wordpress.com/2012/01/30/youtube-caching-problem-an-error-occured-please-try-again-later-solved/

Share this post