#NoTrayIcon #region ;**** Directives created by AutoIt3Wrapper_GUI **** #AutoIt3Wrapper_icon=D:\wmi\icons\user_anonymous.ico #AutoIt3Wrapper_Compression=4 #AutoIt3Wrapper_Change2CUI=y #AutoIt3Wrapper_Res_Comment=SPA #AutoIt3Wrapper_Res_Description=Statistical Phish Analysis #AutoIt3Wrapper_Res_Fileversion=1.0.0.0 #AutoIt3Wrapper_Res_LegalCopyright=MWTI #AutoIt3Wrapper_AU3Check_Parameters=-d -w 1 -w 2 -w 3 -w 5 -w 6 #Tidy_Parameters=/gd #endregion ;**** Directives created by AutoIt3Wrapper_GUI **** #include #include "WinHttp.au3" #include "Array.au3" #include "string.au3" #include "file.au3" Opt("MustDeclareVars", 1) ; Initialize Global Const $iSizeBufferAsync = 1048576 ; 1MB for example, should be enough ; The buffer Global Static $tBufferAsync = DllStructCreate("byte[" & $iSizeBufferAsync & "]") Global $path, $domain, $frame, $frame_array, $redirect, $browser_path_count = 0, $browser_domain Global $other_domain[1][2] Global $pBufferAsync Global $hOpen Global $hWINHTTP_STATUS_CALLBACK Global $hConnect Global $hRequest Global $sData Global $frame_recursive_count = 0 Global $meta_temp, $count_meta = 0 Global $result_log = '' Global $count_server = 0 Global $F_url Local $url ;~ If $cmdline[0] == 0 Or $cmdline[0] > 1 Then ;~ ConsoleWrite('Parameter expected url eg. "http://www.google.com" or "https://www.gmail.com/"' & @CRLF) ;~ Else ;~ If StringLower(StringLeft($cmdline[1], 7)) == 'http://' Or StringLower(StringLeft($cmdline[1], 8)) == 'https://' Then ;~ $F_url = $cmdline[1] ;~ $url = $F_url ;~ $url = StringMid($url, 1, StringInStr($url, '%23', -1) - 1) ;~ $url = StringMid($url, 1, StringInStr($url, '#', -1) - 1) ;~ Local $temp_array = __WinCrackUrl($url) ;~ $domain = $temp_array[2] ;~ $path = $temp_array[6] & $temp_array[7] ;~ $browser_domain = $domain ;~ ConsoleWrite('Checking : ' & $F_url & @CRLF) ;~ __WinHttpConnect($domain, $path) ;~ meta_refresh_redirect() ;~ frame_get() ;~ Else ;~ ConsoleWrite('Parameter expected url eg. "http://www.google.com" or "https://www.gmail.com/"' & @CRLF) ;~ EndIf ;~ EndIf $url = 'https://' & 'www.gmail.com' $F_url = $url $url = StringMid($url, 1, StringInStr($url, '%23', -1) - 1) $url = StringMid($url, 1, StringInStr($url, '#', -1) - 1) ConsoleWrite('Checking : ' & $url & @CRLF) Local $temp_array = __WinCrackUrl($url);#Itau_Seguranca $domain = $temp_array[2] $path = $temp_array[6] & $temp_array[7] $browser_domain = $domain __WinHttpConnect($domain, $path) meta_refresh_redirect() frame_get() ConsoleWrite($sData) Exit 7 Func __WinCrackUrl($curl) Local $curl_temp $curl = StringStripCR($curl) $curl = StringReplace($curl, @LF, '') $curl = StringStripWS($curl, 3) $curl_temp = _WinHttpCrackUrl($curl, $ICU_DECODE) Return $curl_temp EndFunc ;==>__WinCrackUrl Func meta_refresh_redirect() Local $meta, $meta_array, $temp_array Local $replace = '' Local $script_header Local $meta_temp_temp $replace = StringMid($sData, StringInStr($sData, '')) If $replace <> '' Then $sData = StringReplace($sData, StringMid($sData, StringInStr($sData, '')), '') EndIf $meta = IniRead('wget.ini', 'reg', 'meta_tag', '') $meta_array = StringRegExp($sData, $meta, 3) If IsArray($meta_array) And StringLower(StringLeft($meta_temp, 7)) == 'http://' And $count_meta < UBound($meta_array) And $count_meta < 10 Then $script_header = StringMid($sData, StringInStr($sData, ''), StringInStr($sData, '')) If StringInStr($script_header, '