|
|
Joined: Dec 2002
Posts: 206
Fjord artisan
|
OP
Fjord artisan
Joined: Dec 2002
Posts: 206 |
some of the workaround scripts for the recent dcc bug made me realize that it is relatively simple to bypass the default version reply using /debug -i. I just thought i would make this known so something might be done about it in future versions.
|
|
|
|
|
Joined: Jan 2003
Posts: 2,973
Hoopy frood
|
|
Hoopy frood
Joined: Jan 2003
Posts: 2,973 |
I understand what you're saying, but you still can't halt it entirly...
on 1:CONNECT: {
/newver mIRC $version Khaled Mardam-Bey (KingTomato Test)
}
alias newver {
/set %vers $1
.debug -ni @d- $+ $cid newVersion
.window -nh @d- $+ $cid
}
alias newVersion {
/tokenize 32 $1
if ((*!*@* iswm $2) && ($5 == :VERSION)) {
var %nick = $right($gettok($2, 1, $asc(!)), -1), %addy = $1
.ctcpreply %nick VERSION Boo
/halt
}
return $1-
}
//ctcp $me Version Returns: [22:49:35] -> [KingTomato] VERSION - [22:49:35] [KingTomato VERSION] - [22:49:35] [KingTomato VERSION reply]: mIRC 6.12 Khaled Mardam-Bey (KingTomato Test) - [22:49:36] [KingTomato VERSION reply]: mIRC v6.12 Khaled Mardam-Bey You still get the default msg..
|
|
|
|
|
Joined: Dec 2002
Posts: 1,518
Hoopy frood
|
|
Hoopy frood
Joined: Dec 2002
Posts: 1,518 |
ON *:START:{
.window -h @ctcp_catcher
.debug -i @ctcp_catcher ctcp_catcher
}
alias ctcp_catcher {
tokenize 32 $1
if ($1 != <-) return
if ($5 == :VERSION || $5 == VERSION) {
var %to = $gettok($2,1,33)
if ($left(%to,1) == :) {
%to = $right(%to,-1)
}
ctcpreply %to VERSION Not telling v1.0
return
}
return
}
voila!!!!!! version changer
|
|
|
|
|
Joined: Jul 2003
Posts: 733
Hoopy frood
|
|
Hoopy frood
Joined: Jul 2003
Posts: 733 |
lies
[23:02] [MTec89 VERSION]
[23:02] [MTec89 VERSION reply]: Not telling v1.0
[23:02] [MTec89 VERSION reply]: mIRC v6.12 Khaled Mardam-Bey
|
|
|
|
|
Joined: Dec 2002
Posts: 1,518
Hoopy frood
|
|
Hoopy frood
Joined: Dec 2002
Posts: 1,518 |
|
|
|
|
|
Joined: Jan 2003
Posts: 2,125
Hoopy frood
|
|
Hoopy frood
Joined: Jan 2003
Posts: 2,125 |
|
|
|
|
|
Joined: Dec 2002
Posts: 1,518
Hoopy frood
|
|
Hoopy frood
Joined: Dec 2002
Posts: 1,518 |
oh that is not my code so dont congratulate me ..... a poster here should recognize it as his and i wont give any names to whom it belongs.
|
|
|
|
|
|
r0ck0
|
|
r0ck0
|
I modified it to this so ignoring all ctcp on all networks isn't needed .. what ya think?
on *:CONNECT:.debug -i $iif($debug == $null,NUL,$debug) ctcp_catcher
alias ctcp_catcher {
tokenize 32 $1
if ($1 != <-) return
if (($5 == :VERSION) || ($5 == VERSION)) {
.ignore -twu1 $right($2,-1)
var %to = $gettok($2,1,33)
if ($left(%to,1) == :) %to = $right(%to,-1)
ctcpreply %to VERSION Not telling v1.1
}
return
}
This still allows any other ctcp through.
Last edited by r0ck0; 14/10/03 01:55 PM.
|
|
|
|
|
Joined: Dec 2002
Posts: 1,518
Hoopy frood
|
|
Hoopy frood
Joined: Dec 2002
Posts: 1,518 |
oh i use something entirely different for 6.03 version which also works. note debug -i does not work in 6.03
|
|
|
|
|
|
r0ck0
|
|
r0ck0
|
Sorry, forgot you were stickin with 6.03
|
|
|
|
|
|
DaveC
|
|
DaveC
|
It needed this added
.ignore -tu1 $mid($2,2)
Just ignore ctcp's from that person for a second
This is what a exploit patch was doing for 6.1 for 2 seconds after it encountered a *!*@* $+ $chr(1) $+ DCC SEND "*
On a personal note, I dont see whats wrong with being able to deny people the right to version you, near the end of the exploit being used by "people" (i use that word loosely) on others , i noticed a few times i would be versioned, by people not in the same channels as me, this made me wonder why, so i rigged the exploit fix, to also give off a false v6.03, and low and behold i would then get hit witha exploit attempt, one time 6 of them in a row, they must have been wondering how i was stopping it on 6.03 i guess
|
|
|
|
|
