Author: sparky Date: Tue Jul 13 13:57:38 2010 New Revision: 11665 Modified: toys/rsget.pl/Get/StorageTo toys/rsget.pl/Get/X7 Log: - improved
Modified: toys/rsget.pl/Get/StorageTo ============================================================================== --- toys/rsget.pl/Get/StorageTo (original) +++ toys/rsget.pl/Get/StorageTo Tue Jul 13 13:57:38 2010 @@ -9,7 +9,7 @@ short: ST web: "http://storage.to/"; uri: qr{storage\.to/get/[a-zA-Z0-9]{8}([\?/].*?)?$} -status: OK 2010-06-04 +status: OK 2010-07-13 start: GET( $-{_uri} ); @@ -24,7 +24,7 @@ ! s/^.*?{\s+//; ! s/\s+}.*?$//; - ERROR( "download failed" ) if /'state'\s*:\s*'failed'/; + DELAY( 5 * 60, "download failed" ) if /'state'\s*:\s*'failed'/; ! /'countdown'\s*:\s*(\d+)/; my $wait = $1; Modified: toys/rsget.pl/Get/X7 ============================================================================== --- toys/rsget.pl/Get/X7 (original) +++ toys/rsget.pl/Get/X7 Tue Jul 13 13:57:38 2010 @@ -23,6 +23,8 @@ ERROR( "file not found" ) if /<title>File not found/; + ERROR( "not allowed: $1" ) + if /(The requested file is larger.*only premium.*?)</; ! m#<b>Download</b>\s+\((\d+(?:,\d+)?\s*[KMG]?B)\)#s; my $asize = $1; _______________________________________________ pld-cvs-commit mailing list [email protected] http://lists.pld-linux.org/mailman/listinfo/pld-cvs-commit
