autoupdate botnet (all files)

[esix]

Hi, i wonder where could i get an example of a script that auto checks for updates on a specific server and downloads them, i would like to have this for my botnet (24 bots), so that they would be up2date all the time.

Thanks

[greenbear]

Update what? Your eggdrop, a tcl script, a random file ..?

[esix]

tcl scripts, randroom files (like motd, banner .. version.txt ..).

[awyeah]

MC_8 has an updater type of thing in all his scripts which checks his websites for script updates and stuffs.

Code: Select all

## SVS Client (Script Version Service) v4.1.2 ##
# Once a day, the SVS Client will connect to MC_8's SVS Server to determine if
# there is a newer version of this script available.  If a newer version is
# found, the script will be auto updated.

# [0=no/1=yes] Do you want to enable auto updating?  If you chose to disable
# auto updating, it will not automatically update the script upon finding a
# newer version.
set mc_banm(:config:svs:enable) 1

This is in all of his scripts. Goto http://mc.purehype.net/ download a random script and check if the code responsible for it. Oops, and one more thing his scripts and codes are very complex so understanding them is also a bit difficult than normal scripplets out there.

[Kurupt]

smart awyeah!

[esix]

ok, i'll give it a try

[demond]

check out my scripts spambuster.tcl and ircd.tcl, both have autoupdate, making use of a proc like this:

Code: Select all

proc update {} {
	variable version
	set url "http://demond.net/[lindex [split $version -] 0].tcl"
	catch {set token [::http::geturl $url]}
	if [info exists token] {
		if {[::http::ncode $token] == 200} {
			foreach line [split [::http::data $token] \n] {
				if [string match "variable version *" $line] break
			}
			if {[strcmp [lindex $line 2] $version] > 0} {
				set file [open $::ircd::source w]
				set data [split [::http::data $token] \n]
				foreach line [lrange $data 0 end-1] {puts $file $line}
				close $file
				log "updated with NEW version, reloading..."
				uplevel #0 {source $::ircd::source}
			}
		} else {
			log "update error: [::http::code $token]"
		}
		::http::cleanup $token
	}
}

[mm]

Hi demond,
i was wondering hows spambuster.tcl is working?, does this need special setting?


thanks

[esix]

ok, thanks demond i'll give it a try as soon as i'll have time

[demond]

Hi demond,
i was wondering hows spambuster.tcl is working?, does this need special setting?


thanks

everything is configurable and well documented, just read script's header

[mm]

Hi demond, yes but more than 50% document is not in english, that's why i had asked.


thanks

[demond]

mm yes, but there's also description in english for each and every single option; anyway, contact me online if you need more information

[awyeah]

*demond* I was trying to make a similar yet simpler script like spambuster for IRCOps to catch and kill spammers throughout the network

I only want to ask, how do you make the bot join and part random channels? on the network, Do you generate a /list of channels on the network, save it to an array or list? And then make the bot pick a random one and join. Or by whois'ing each user on a channel then joining each channel every user is on, something like that?

[demond]

awyeah, both

actually, the channel roaming is implemented by picking random channels with a configurable minimum number of users from a list which is populated by doing /list on connect; whois'ing on join has another, statistical purpose - as you might have seen already, spambuster generates (on-the-fly) spam stats webpage by channel, server and host/domain

[demond]

...and that channel list gets updated every hour