devol
/
Come-funziona-Cloudflare
mirror of https://codeberg.org/arh/how-cloudflare-works
1
0
Fork 0
Code Issues Releases Wiki Activity

Update 'tool/irssi_cf_alturl.pl'

This commit is contained in:
J0NA8_Fz 2020-05-19 11:01:55 +02:00
parent 7e171243ce
commit 9664160253
1 changed files with 6 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
tool/irssi_cf_alturl.pl
View File

@ -24,7 +24,7 @@
use vars qw($VERSION %IRSSI);
$VERSION = "20190706";
$VERSION = "20200501";
%IRSSI = (
# Special thanks to: "eo, tsaavik"
@ -227,10 +227,10 @@ sub GotUrl {
deb("$target Asking API about $fqdn");
$answer = '';
$url =
'https://api.searxes.eu.org/_/ismitm.php?f='
'https://api.wodferndripvpe6ib4uz4rtngrnzichnirgn7t5x64gxcyroopbhsuqd.onion/_/ismitm.php?f='
. $fqdn;
$browser = LWP::UserAgent->new;
$browser->agent("Mozilla/5.0 (Windows NT 6.1; rv:60.0) Gecko/20100101 Firefox/60.0");
$browser->agent("Mozilla/5.0 (Windows NT 6.1; rv:78.0) Gecko/20100101 Firefox/78.0");
$response = $browser->get($url);
$answer = $response->content;
if ( $answer eq '[true,true]' ) {
@ -246,14 +246,14 @@ sub GotUrl {
if ( length($myurl) > $cfg_minurllen ) {
if ( $cfg_shortonion == 1 ) {
deb("$target Creating Short Onion for $myurl");
$url = 'https://url.danwin1210.me/?i=new&url=' . $myurl;
$url = 'http://hbfkuwcbzhcht33fetbiajuh7i6gqupgnyupxcmujiky34drzmpajrid.onion/?i=new&url=' . $myurl;
$browser = LWP::UserAgent->new;
$browser->agent("Mozilla/5.0 (Windows NT 6.1; rv:60.0) Gecko/20100101 Firefox/60.0");
$browser->agent("Mozilla/5.0 (Windows NT 6.1; rv:78.0) Gecko/20100101 Firefox/78.0");
$response = $browser->get($url);
$answer = $response->content;
if (
index( $answer,
'http://dt2tq5y2ccowebjo.onion/?' ) == 0
'http://hbfkuwcbzhcht33fetbiajuh7i6gqupgnyupxcmujiky34drzmpajrid.onion/?' ) == 0
)
{
if ( $mytype eq '' ) {