From 366d4cb3e8b59cf1f91de935a4e3363167b04fd1 Mon Sep 17 00:00:00 2001 From: dms Date: Sat, 3 Feb 2001 12:51:49 +0000 Subject: [PATCH] don't allow those without HOSTS in the user file to DCC CHAT. git-svn-id: https://svn.code.sf.net/p/infobot/code/trunk/blootbot@314 c11ca15a-4712-0410-83d8-924469b57eb5 --- src/IRC/IrcHooks.pl | 16 +++++++++++++++- 1 file changed, 15 insertions(+), 1 deletion(-) diff --git a/src/IRC/IrcHooks.pl b/src/IRC/IrcHooks.pl index 2c93f49..a1b710f 100644 --- a/src/IRC/IrcHooks.pl +++ b/src/IRC/IrcHooks.pl @@ -238,13 +238,23 @@ sub on_dcc_open { $type ||= "???"; if ($type eq 'SEND') { + &status("${b_green}DCC lGET$ob established with $b_cyan$nick$ob"); + } elsif ($type eq 'CHAT') { + &status("${b_green}DCC CHAT$ob established with $b_cyan$nick$ob $b_yellow($ob$nuh{$nick}$b_yellow)$ob"); + &verifyUser($nick, $nuh{lc $nick}); + + if (!exists $users{$userHandle}{HOSTS}) { + &pSReply("you have no hosts defined in my user file; rejecting."); + ### TODO: $sock->close(); + return; + } + my $crypto = $users{$userHandle}{PASS}; $dcc{'CHAT'}{$nick} = $sock; - foreach (keys %{ $users{$userHandle} }) { &VERB(" $_ => $users{$userHandle}{$_}",2); } @@ -255,12 +265,16 @@ sub on_dcc_open { } else { &dccsay($nick,"Welcome to blootbot DCC CHAT interface, $userHandle."); } + } elsif ($type eq 'SEND') { + &DEBUG("Starting DCC receive."); foreach ($event->args) { &DEBUG(" => '$_'."); } + } else { + &WARN("${b_green}DCC $type$ob (3)"); } } -- 2.39.2