egghelp/eggheads community

web-overview of the botnet

2005-06-16T00:05:06-04:00

well, unfortunately I don't do complete feature scripts anymore, I lost interest in that; but maybe someone will pick on this (which should generate a bare-bones webpage with the structure you need):

Code:

proc members {f alist} {puts $f set idx 0set more 1while $more {set more 0puts $f foreach {chan elems} $alist {if {$idx < [llength $elems]} {puts $f [lindex $elems $idx]set more 1 } {puts $f }}puts $f incr idx}}proc genpage {f} {puts $f botnetputs $f 
puts $f foreach chan [array names ::bbots] {puts $f  }puts $f members $f [array get ::bbots]members $f [array get ::buser]puts $f $chan
puts $f }

Statistics: Posted by demond — Thu Jun 16, 2005 12:05 am

web-overview of the botnet

2005-06-15T05:51:31-04:00

demond
Thanks for your reply.
Since I don´t know tcl, the code does not tell me much.
The idea was that the script should send data to a webpage
so that "we" were able to se on the web, a graphic of each
channel and which bots are on each channel.
Like a system chart of your botnet , on the web.
I dont know, but many other features could
probobly be added to such a script, to.

e.g.
-Info on the bot. When it was startet, host, how long it has been running ,
vertion , which shell the bots are on...e.g
-The hubs userlist and mybe the leafbots userlist. (with flags of each user)
-Users on each channel . (who is opped, vois e.g)
I guess the sky is the limit....
I em sure that such i script would be a popular script for botnet owners.

toby

Statistics: Posted by tobydude — Wed Jun 15, 2005 5:51 am

web-overview of the botnet

2005-06-14T00:10:39-04:00

of course, requesting bot's own chans/users also need to be included:

Code:

bind time - "?0 *" {set flag 1; putallbots req;#}bind bot - req gotreqproc gotreq {from cmd text} {   foreach chan [channels] {      foreach user [chanlist $chan] {         if {[nick2hand $user $chan] != "*"} {            putbot $from "ans $chan $user"         }      }   }}bind bot - ans gotansproc gotans {from cmd text} {   if $::flag {      if [info exists ::bbots] {unset ::bbots}      if [info exists ::buser] {unset ::buser}      foreach chan [channels] {         lappend ::bbots($chan) $::nick         foreach user [chanlist $chan] {            if {[nick2hand $user $chan] != "*"} {               lappend ::buser($chan) $user            }         }      }      set ::flag 0   }   set chan [lindex [split $text] 0]   set user [lindex [split $text] 1]   if {![info exists ::bbots($chan)] ||       [lsearch -exact $::bbots($chan) $from] == -1} {      lappend ::bbots($chan) $from   }   if {![info exists ::buser($chan)] ||       [lsearch -exact $::buser($chan) $user] == -1} {      lappend ::buser($chan) $user   }}

Statistics: Posted by demond — Tue Jun 14, 2005 12:10 am

web-overview of the botnet

2005-06-13T22:54:14-04:00

this script (run on all bots) will update every 10 mins two global arrays, indexed by channel name and containing bot- and user lists:

Code:

bind time - "?0 *" {set flag 1; putallbots req;#}bind bot - req gotreqproc gotreq {from cmd text} {foreach chan [channels] {foreach user [chanlist $chan] {if {[nick2hand $user $chan] != "*"} {putbot $from "ans $chan $user"}}}}bind bot - ans gotansproc gotans {from cmd text} {if $::flag {if [info exists ::bbots] {unset ::bbots}if [info exists ::buser] {unset ::buser}set ::flag 0}set chan [lindex [split $text] 0]set user [lindex [split $text] 1]if {![info exists ::bbots($chan)] ||    [lsearch -exact $::bbots($chan) $from] == -1} {lappend ::bbots($chan) $from}if {![info exists ::buser($chan)] ||    [lsearch -exact $::buser($chan) $user] == -1} {lappend ::buser($chan) $user}}

it's trivial to construct the web layout you need using the two arrays

Statistics: Posted by demond — Mon Jun 13, 2005 10:54 pm

web-overview of the botnet

2005-06-13T19:24:50-04:00

i've seen that before...

Will try to find it for u again

Statistics: Posted by domp — Mon Jun 13, 2005 7:24 pm

web-overview of the botnet

2005-06-13T03:51:37-04:00

split personality disorder?

Maybe 2 people sharing 1 ID.

Statistics: Posted by awyeah — Mon Jun 13, 2005 3:51 am

web-overview of the botnet

2005-06-13T03:34:02-04:00

it's possible, I'll give you some hints later

Statistics: Posted by demond — Mon Jun 13, 2005 3:34 am

web-overview of the botnet

2005-06-13T03:27:10-04:00

Just to get some attention but
I guess such a script is not possible...

toby

Statistics: Posted by tobydude — Mon Jun 13, 2005 3:27 am

web-overview of the botnet

2005-06-11T13:44:57-04:00

split personality disorder?

Statistics: Posted by ^DooM^ — Sat Jun 11, 2005 1:44 pm

web-overview of the botnet

2005-06-11T09:18:03-04:00

Thank you, somedude.
I will wait patiently for your answer.
Thank you...

tobydude

Statistics: Posted by tobydude — Sat Jun 11, 2005 9:18 am

web-overview of the botnet

2005-06-11T09:15:23-04:00

hey toby.
This is a very good idea for a script!!!
I will pass this on to my scripting friends.
But I must tell you:
This is not an easy task...

somedude

Statistics: Posted by tobydude — Sat Jun 11, 2005 9:15 am

web-overview of the botnet

2005-06-06T07:13:11-04:00

The idea is a web-page which have graphics,describing the whole botnet.
I.E, which bots are on the different channels, which users are on
the different channels.
How nice it would have been to log on the web to check the status
of my bonet and mybe se the users online.
I have made a simple graphic illustration of what I mean.
http://www.tessa.shellcity.no/bilder/webbotnet.jpg

Some script has some of theese features. Many additional features
could be added to such a script (or module).

I have no knowledge of tcl-scripting

toby

Statistics: Posted by tobydude — Mon Jun 06, 2005 7:13 am