tpt delete lock Revision 393737623535 (Wed Jan 25 2012 at 02:20) - Diff Link to this snippet: https://friendpaste.com/wCvPkUnZLQTPt4zGTbvUV Embed: manni perldoc borland colorful default murphy trac fruity autumn bw emacs pastie friendly Show line numbers Wrap lines 1234567891011121314151617181920212223242526272829303132333435//Dorothy2//caption=TokyoPornTube//version=0.00//match=http://www.tokyo-porn-tube.com/video/\d+///author= //path=program//priority=500//endfunction(){ common_load('download', 'character_references'); var id = urlinfo.url.match(/\/video\/(\d+)\//) ? RegExp.$1 : '0'; var http = download(urlinfo.url); if(http.responseHeader.code != 200) { println("error---> page " + http.responseHeader.code); exit(); } var title = http.data.match(/<h2>([^<>]+)</) ? character_references(RegExp.$1.fromUTF8toSJIS()).trim() : '?'; println("title = " + title); http = download('http://www.tokyo-porn-tube.com/media/player/config.php?vkey=' + id); if(http.responseHeader.code != 200) { println("error---> xml " + http.responseHeader.code); exit(); } var url = http.data.match(/<src>(http[^<>]+)<\/src>/) ? RegExp.$1.replace(/&/g,'&') : null; if(http.data.match(/<hd>(http[^<>]+)<\/hd>/)) { url = RegExp.$1.replace(/&/g,'&'); println("HD"); } if(!url) { println("error---> url not found"); exit(); } urlinfo.url = (new URL(url)).url; headers['Host'] = (new URL(urlinfo.url)).host; headers['Referer'] = ''; Dorothy.fileName = changeFileName(title + ' tpt=' + id + '.flv');}