Jump to content
Sign in to follow this  
Mast3rpyr0

COMODO Firewall auto ddos detector

Recommended Posts

Mast3rpyr0

Made this to work with COMODO firewall to automattically send ips of DDOS attackers (Some reason i get alot of them) to my isp. i kinda got bored of the project so all that got finished was the setup GUI, which works fine.

Feel free to do what you will to it.

#include <GUIConstants.au3>

$MainWindow = GuiCreate("Comodo DDOS AutoDetect", 300, 270)
$Config = @ProgramFilesDir & "\Comodo\AntiDDOS\Config.ini"
GUICtrlCreateLabel("Configure Comodo DDOS AutoDetect", 60, 20)
GUICtrlCreateLabel("Send Log To:", 10, 53)
GUICtrlCreateLabel("Send Log From:", 10, 93)
GUICtrlCreateLabel("Log Location:", 10, 133)
GUICtrlCreateLabel("Check Every:", 10, 173)
If FileExists($Config) Then
$ConfigInfo = IniReadSection($Config, "ConfigInfo")
$To = GUICtrlCreateInput($ConfigInfo[1][1], 90, 50, 150)
$From = GUICtrlCreateInput($ConfigInfo[2][1], 90, 90, 150)
$LogFile = GUICtrlCreateInput($ConfigInfo[3][1], 90, 130, 150)
$Browse = GUICtrlCreateButton("Browse", 245, 127, 50)
$update = GUICtrlCreateCombo($ConfigInfo[4][1], 90, 170, 75)
GUICtrlSetData($update, "24 Hours|3 Days", "12 Hours")
Else
$To = GUICtrlCreateInput("", 90, 50, 150)
$From = GUICtrlCreateInput("", 90, 90, 150)
$LogFile = GUICtrlCreateInput("", 90, 130, 150)
$Browse = GUICtrlCreateButton("Browse", 245, 127, 50)
$update = GUICtrlCreateCombo("12 Hours", 90, 170, 75)
GUICtrlSetData($update, "24 Hours|3 Days", "12 Hours")
EndIf
$Save = GUICtrlCreateButton("Save and Arm", 100, 230, 100)
GUISetState(@SW_SHOW, $MainWindow)


While 1
    $msg = GUIGetMsg()
    Switch $msg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $Save
            Save()
        Case $Browse
            $Browse2 = FileOpenDialog("Select a log file", @AppDataDir, "All(*.*)")
            $LogFile = GUICtrlRead($Browse2)
    EndSwitch
WEnd

Func Save()
    $To = GUICtrlRead($To)
    $From = GUICtrlRead($From)
    $LogFile = GUICtrlRead($LogFile)
    $Update = GUICtrlRead($Update)
    $WriteToFile = "[ConfigInfo]" & @CRLF & "To=" & $To & @CRLF & "From=" & $From & @CRLF & "LogFile=" & $LogFile & @CRLF & "Update=" & $Update
    $Config = @ProgramFilesDir & "\Comodo\AntiDDOS\Config.ini"
    $Config2 = FileOpen($Config, 2)
    FileWrite($Config2, $WriteToFile)
    FileClose($Config2)
EndFunc
Edited by Mast3rpyr0

Share this post


Link to post
Share on other sites
ptrex
JustinReno

I use it, its pretty cool. Works nice.. :)

Share this post


Link to post
Share on other sites
Mast3rpyr0

@Mast3rpyr0

I am not using any COMODO Firewalls, but you might get some ideas from my Log Analyzer for XP.

Firewall Log Analyzer

Regards

ptrex

Thats a pretty nice program, especially for your first. I think that will do just nicely thanks.

Share this post


Link to post
Share on other sites
ptrex

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
Sign in to follow this  

×