mirror of git://git.psyced.org/git/psyced
35 lines
801 B
C
35 lines
801 B
C
// $Id: bounce.c,v 1.6 2005/03/14 13:30:46 lynx Exp $ // vim:syntax=lpc
|
|
//
|
|
// currently specific to the IRC implementation: recognize when a
|
|
// person has several clients kicking each other out automatically.
|
|
// yes, IRC client coders do implement things like these.
|
|
//
|
|
#include <net.h>
|
|
|
|
volatile mapping bounces = ([ ]);
|
|
|
|
#ifndef MAX_BOUNCES
|
|
# define MAX_BOUNCES 3
|
|
#endif
|
|
#ifndef BOUNCE_INTERVAL
|
|
# define BOUNCE_INTERVAL 60
|
|
#endif
|
|
|
|
reset() {
|
|
foreach (string nick : bounces) {
|
|
unless (bounces[nick]) m_delete(bounces, nick);
|
|
}
|
|
}
|
|
|
|
checkBounce(nick) {
|
|
string n = lower_case(nick);
|
|
if (bounces[n] < (MAX_BOUNCES + 2)) {
|
|
bounces[n]++;
|
|
call_out(lambda(({}),
|
|
({ #'--,
|
|
({ #'[, bounces, n })
|
|
})), BOUNCE_INTERVAL);
|
|
}
|
|
return (bounces[lower_case(nick)] > MAX_BOUNCES);
|
|
}
|