X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=src%2FIRC%2FSchedulers.pl;h=4566df6872f2047dba1554a33480900108d3858f;hb=64b1ab9e23f7895f1ab62a8168d77955a11451fc;hp=4bc1ae07a9aaa858a407de51236f989ceaf4cfc4;hpb=b2a6aa5be4c2a743ca9c0678a64a0996156555ef;p=infobot.git diff --git a/src/IRC/Schedulers.pl b/src/IRC/Schedulers.pl index 4bc1ae0..4566df6 100644 --- a/src/IRC/Schedulers.pl +++ b/src/IRC/Schedulers.pl @@ -419,8 +419,15 @@ sub netsplitCheck { return if ($_[0] eq "2"); } + &DEBUG("running netsplitCheck..."); + foreach $s1 (keys %netsplitservers) { + &DEBUG("nsC: s1 => $s1"); + foreach $s2 (keys %{ $netsplitservers{$s1} }) { + my $delta = time() - $netsplitservers{$s1}{$s2}; + &DEBUG("nss{$s1}{$s2} = $delta"); + if (time() - $netsplitservers{$s1}{$s2} > 3600) { &status("netsplit between $s1 and $s2 appears to be stale."); delete $netsplitservers{$s1}{$s2}; @@ -496,7 +503,7 @@ sub seenFlush { if ($param{'DBType'} =~ /^mysql|pg|postgres/i) { foreach $nick (keys %seencache) { my $retval = &dbReplace("seen", "nick", $nick, ( - "nick" => $seencache{$nick}{'nick'}, +### "nick" => $seencache{$nick}{'nick'}, "time" => $seencache{$nick}{'time'}, "host" => $seencache{$nick}{'host'}, "channel" => $seencache{$nick}{'chan'}, @@ -785,8 +792,6 @@ sub miscCheck2 { return if ($_[0] eq "2"); # defer. } - &DEBUG("miscCheck2: Doing debian checking..."); - # debian check. opendir(DEBIAN, "$bot_base_dir/debian"); foreach ( grep /gz$/, readdir(DEBIAN) ) {