same rcon change
authordiv0 <div0@f962a42d-fe04-0410-a3ab-8c8b0445ebaa>
Mon, 25 May 2009 15:36:38 +0000 (15:36 +0000)
committerdiv0 <div0@f962a42d-fe04-0410-a3ab-8c8b0445ebaa>
Mon, 25 May 2009 15:36:38 +0000 (15:36 +0000)
git-svn-id: svn://svn.icculus.org/nexuiz/trunk@6771 f962a42d-fe04-0410-a3ab-8c8b0445ebaa

server/rcon2irc/rbiserver.pl
server/rcon2irc/rcon2irc.pl

index d651d05..9bfbcbf 100644 (file)
@@ -77,7 +77,8 @@ sub markmap($$$$;$)
 [ dp => q{pure: -(\S+) (.*)} => sub {
        my ($status, $nick) = @_;
        $nick = color_dp2irc $nick;
-       out irc => 0, "PRIVMSG $config{irc_channel} :\001ACTION thinks $nick is $status\001";
+       out irc => 0, "PRIVMSG $config{irc_channel} :\001ACTION thinks $nick is $status\001"
+               unless $status eq 'MODIFIED'; # in this case, either DETAIL_TIMEOUT or DETAIL_MISMATCH follows
        return 0;
 } ],
 [ dp => q{pure: \*DETAIL_MISMATCH (.*) (\S+)$} => sub {
index 1279984..02f1069 100755 (executable)
@@ -466,7 +466,7 @@ sub send($$$)
        my ($self, $line, $nothrottle) = @_;
        if($self->{secure})
        {
-               my $t = sprintf "%ld", time();
+               my $t = sprintf "%ld.%06d", time(), int rand 1000000;
                my $key = Digest::HMAC::hmac("$t $line", $self->{password}, \&Digest::MD4::md4);
                return $self->{connector}->send("\377\377\377\377srcon HMAC-MD4 TIME $key $t $line");
        }