Sign in to follow this  
Followers 0
Mast3rpyr0

COMODO Firewall auto ddos detector

5 posts in this topic

#1 ·  Posted (edited)

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



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

Share this post


Link to post
Share on other sites

@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

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  
Followers 0