Hola,

he hecho una pequeña función para generar conexiones aleatorias a páginas que seguramente no existan. Podría servir para "ocultar" un poco las conexiones que se hagan desde un bot o RAT.

JunkConnection()

Código: Seleccionar todo

Global $oError = ObjEvent("AutoIt.Error", "_ErrFunc")
Func _ErrFunc()
    ; Nothing
EndFunc
Func JunkConnection()
   Local $sGETPOST = StringSplit("GET|POST", "|")
   Local $sDomains = StringSplit("com|net|edu|gov|co.uk|it|pt|com.br|es|de|fr", "|")
   $oHTTP = ObjCreate("WinHTTP.WinHttpRequest.5.1") 
   $oHTTP.Open($sGETPOST[Random(0, 1)], "http://" & RandomString() & "." & $sDomains[Random(0, $sDomains[0])] & "/" & RandomString() & ".php", False)
   $oHTTP.SetRequestHeader("User-Agent", RandomString())
   $oHTTP.SetRequestHeader("Content-Type", "application/x-www-form-urlencoded")
   $oHTTP.Send(RandomString() & "=" & RandomString())
   If $oError.Number Then
       $oError.Clear()
   EndIf
EndFunc

Func RandomString()
   $MAXLENGTH = Random(Random(10, 25), Random(30, 40))
   Local $RET = ''
   For $i = 1 To $MAXLENGTH
	  $RET &= Chr(Random(33, 126))
   Next
   Return $RET
EndFunc
Responder

Volver a “Fuentes”