projects / unix-history / blob
? search:
summary | tags | clone url | shortlog | log | commit | commitdiff | tree
blame | history | raw | HEAD
BSD 4_4 release
[unix-history] / usr / src / contrib / news / inn / samples / innlog.awk
## $Revision: 1.7 $
## @(#) newsinfo.awk falcon@cats.ucsc.edu (jon r. luini) 7/4/92
## Modified by Robert Elz to understand more reports.
## Modified by Rich $alz for consistent formatting.
## Modified by Chris Schmidt to sort output.
BEGIN {
unknowns = 0;
batcher = 0;
client_timeout = 0;
ctlinnd_new = 0;
ctlinnd_rmg = 0;
ctlinnd_seen = 0;
innd = 0;
innd_bad_ihaves = 0;
innd_bad_msgids = 0;
innd_bad_sendmes = 0;
innd_blockeds = 0;
innd_change_groups = 0;
innd_newgroups = 0;
innd_pauses = 0;
innd_points = 0;
innd_reloads = 0;
innd_restarts = 0;
innd_rmgroups = 0;
innd_shutdowns = 0;
innd_throttles = 0;
innxmit = 0;
invalid = "~~~~~~~~~~~~~~~~~~~~~~~~"
mthreads = 0;
mthreads_added = 0;
mthreads_expired = 0;
mthreads_started = 0;
mthreads_turned_off = 0;
mthreads_turned_on = 0;
nnrp = 0;
nnrp_gethostfails = 0;
nnrp_noperms = 0;
nnrp_readers = 0;
nnrp_unrecs = 0;
nntplink = 0;
rnews_bad = 0;
rnews_bad_date = 0;
rnews_bad_dist = 0;
rnews_bad_ng = 0;
rnews_host = 0;
rnews_host = 0;
rnews_rejects = 0;
server_timeout = 0;
ctlinnd["a"] = "addhist";
ctlinnd["D"] = "allow";
ctlinnd["b"] = "begin";
ctlinnd["c"] = "cancel";
ctlinnd["u"] = "changegroup";
ctlinnd["d"] = "checkfile";
ctlinnd["e"] = "drop";
ctlinnd["f"] = "flush";
ctlinnd["g"] = "flushlogs";
ctlinnd["h"] = "go";
ctlinnd["i"] = "hangup";
ctlinnd["s"] = "mode";
ctlinnd["j"] = "name";
ctlinnd["k"] = "newgroup";
ctlinnd["l"] = "param";
ctlinnd["m"] = "pause";
ctlinnd["v"] = "readers";
ctlinnd["t"] = "refile";
ctlinnd["C"] = "reject";
ctlinnd["o"] = "reload";
ctlinnd["n"] = "renumber";
ctlinnd["z"] = "reserve";
ctlinnd["p"] = "rmgroup";
ctlinnd["A"] = "send";
ctlinnd["q"] = "shutdown";
ctlinnd["B"] = "signal";
ctlinnd["r"] = "throttle";
ctlinnd["w"] = "trace";
ctlinnd["x"] = "xabort";
ctlinnd["y"] = "xexec";
}
##
## SYSLOG
##
$5 == "last" && $6 == "message" && $7 == "repeated" {
## Skip.
next;
}
##
## NNRP
##
$5 ~ /nnrpd.*/ {
host = $6;
if ($7 == "connect") {
nnrp_connect[host]++;
nnrp = 1;
next;
}
if ($7 == "exit") {
nnrp_articles[host] += $9;
nnrp_groups[host] += $11;
next;
}
if ($7 == "posts") {
nnrp_posts[host] += $9;
nnrp_rejected[host] += $11;
next;
}
if ($7 == "times") {
nnrp_times_user[host] += $9;
nnrp_times_sys[host] += $11;
nnrp_times_elapsed[host] += $13;
next;
}
if ($7 == "group") {
nnrp_readers = 1;
nnrp_group_request[$8]++;
next;
}
if ($7 == "post") {
## Skip; handled in "posts" above.
next;
}
if ($7 == "unrecognized") {
nnrp_unrecs = 1;
nnrp_unrec[host]++;
next;
}
if ($7 == "no_permission") {
nnrp_noperms = 1;
nnrp_noperm[host]++;
next;
}
if ($7 == "timeout") {
client_timeout = 1;
nnrp_timeout[host]++;
next;
}
if ($6 == "gethostbyaddr:") {
nnrp_gethostfails = 1;
nnrp_gethostfail[$7]++;
next;
}
if ($7 == "cant" && $8 == "gethostbyaddr") {
## Skip; handled in "gethostbyaddr:" above.
next;
}
}
##
## INND
##
$5 == "innd:" {
innd = 1;
if ( $6 ~ /^[a-zA-Z]:.*/ || $6 ~ /^[dgs]$/ ) {
## A ctlinnd command.
## Note that the last parameter in $6 may be continued in $7 etc
n = split($6, ctl, ":");
if (ctlinnd[ctl[1]] == "") {
## Unknown; update this script!
print;
next;
}
ctlinnd_type[ctl[1]]++;
ctlinnd_seen++;
if (ctl[1] == "k") {
## Newgroup. Process it here so we can get the creator.
ctlinnd_new++;
ctlinnd_newgroups[ctl[2]] = ctl[4];
next;
}
if (ctl[1] == "p") {
## Rmgroup. Process it here for symmetry.
ctlinnd_rmg++;
ctlinnd_rmgroups[ctl[2]] = 1;
next;
}
## Skip others for now.
next;
}
if ( $6 ~ /.*:.*/ ) {
n = split($6, path, ":");
host = path[1];
}
else
host = $6;
if ($7 == "connected") {
## Account for the fact that innd says "local connected ##"
## and then "localhost:## closed"
if (host == "local") {
host = "localhost";
}
innd_connect[host]++;
next;
}
if ($7 == "closed") {
innd_seconds[host] += $9;
innd_accepted[host] += $11;
innd_refused[host] += $13;
innd_rejected[host] += $15;
innd_chkp[host] = 0;
if (cp_innd_chkp[host] == 1) {
cp_innd_chkp[host] = 0;
innd_points--;
}
next;
}
if ($7 == "checkpoint") {
cp_innd_seconds[host] = $9;
cp_innd_accepted[host] = $11;
cp_innd_refused[host] = $13;
cp_innd_rejected[host] = $15;
if (cp_innd_chkp[host] == 0) {
cp_innd_chkp[host] = 1;
innd_points++;
}
next;
}
if ($6 ~ /\/.*/) {
## Skip; handled by "opened/spawned" below.
next;
}
if ($7 == "flush") {
innd_flush[host]++;
next;
}
if ($7 == "timeout") {
innd_timeout[host]++;
next;
}
if ($7 == "opened" || $7 == "spawned") {
n = split($8, blarg, ":");
innd_feed[host] = blarg[n];
next;
}
if ($7 == "newgroup") {
innd_newgroups++;
next;
}
if ($7 == "rmgroup") {
innd_rmgroups++;
next;
}
if ($7 == "paused") {
innd_pauses++;
next;
}
if ($7 == "throttled") {
innd_throttles++;
next;
}
if ($7 == "reload") {
innd_reloads++;
next;
}
if ($7 == "change_group") {
innd_change_groups++;
next;
}
if ($7 == "shutdown") {
innd_shutdowns++;
next;
}
if ($7 == "starting") {
innd_restarts++;
if (innd_points != 0) {
## Unfinished checkpoints from before; something crashed.
for (s in cp_innd_chkp) {
if (cp_innd_chkp[s] == 0)
continue;
innd_seconds[s] += cp_innd_seconds[s];
innd_accepted[s] += cp_innd_accepted[s];
innd_refused[s] += cp_innd_refused[s];
innd_rejected[s] += cp_innd_rejected[s];
cp_innd_chkp[s] = 0;
}
innd_points = 0;
}
next;
}
if ($7 == "bad_ihave") {
innd_bad_ihave[host]++;
innd_bad_ihaves = 1;
next;
}
if ($7 == "ihave_from_me") {
next;
}
if ($7 == "bad_messageid") {
innd_bad_msgid[host]++;
innd_bad_msgids = 1;
next;
}
if ($7 == "bad_sendme") {
innd_bad_sendme[host]++;
innd_bad_sendmes = 1;
next;
}
if ($7 == "blocked" && $8 == "sleeping") {
innd_blocked[host]++;
innd_blockeds = 1;
next;
}
if ($7 == "exit" && $8 == "0") {
## Program or process finished normally; don't care.
next;
}
if ($7 == "wakeup" || ($7 == "cant" && ($8 == "write" || $8 == "read"))) {
## Skip; handled by "blocked/sleeping" above.
next;
}
if ($7 == "inactive" || $7 == "descriptors" \
|| $7 == "outgoing" || $7 == "running" \
|| $7 == "lcsetup" || $7 == "ccsetup" \
|| $7 == "rcsetup" || $7 == "readclose" \
|| $7 == "flush_all" \
) {
## Skip; for now.
next;
}
}
##
## BATCHER
##
$5 ~ /batcher.*/ {
host = $7;
## Since times lines are always followed by stats lines, we
## only do the batcher_site[host]++ and batcher=1 once
if ($8 == "times") {
batcher_times_user[host] += $10;
batcher_times_sys[host] += $12;
batcher_times_elapsed[host] += $14;
batcher_site[host]++;
batcher = 1;
next;
}
if ($8 == "stats") {
batcher_num[host] += $10;
batcher_articles[host] += $12;
batcher_bytes[host] += $14;
next;
}
}
##
## INNXMIT
##
$5 ~ /innxmit.*/ {
if ( $6 ~ /:/ ) {
n = split($6, path, ":");
host = path[1];
}
else
host = $6;
if ($7 == "ihave" && $8 == "failed") {
## ihave failed occurs when the server rejects an article,
## and requests it to be resent at the ihave stage - this
## always indicates a server problem (all it has of the article
## is its message-id) most commonly "out of space" - in that
## case we don't really want to count this as an offered
## article, so remember this happened so we can reduce the
## offered count below.
innxmit_ihfail[host] = 1;
if ($9 == "436" && $11 == "NNTP" && $13 == "out" && $15 ~ /space/) {
innxmit_nospace[host]++;
next;
}
}
## Since stats lines are always followed by times lines we
## only do the innxmit_site[host]++ and innxmit=1 once
if ($7 == "stats") {
innxmit_offered[host] += $9 - innxmit_ihfail[host];
innxmit_accepted[host] += $11;
innxmit_rejected[host] += $13;
innxmit_failed[host] += $15;
innxmit_ihfail[host] = 0;
innxmit_site[host]++;
innxmit = 1;
next;
}
if ($7 == "times") {
innxmit_times_user[host] += $9;
innxmit_times_sys[host] += $11;
innxmit_times_elapsed[host] += $13;
next;
}
if ($7 == "requeued") {
r = $9;
for (i = 10; i < NF; i++)
r = r " " $i;
innxmit_reQ_host[host]++;
innxmit_reQ_reason[r]++;
next;
}
if ($7 == "connect" && $9 == "400" \
&& (($10 == "No" && $11 == "space") \
|| ($11 == "NNTP" && $13 == "out" && $15 ~ /space/))) {
## There is no startup marked for this.
innxmit_site[host]++;
innxmit_nospace[host]++;
next;
}
if ($7 == "connect" && $9 == "400" && $10 == "loadav") {
## There is no startup marked for this.
innxmit_site[host]++;
innxmit_hiload[host]++;
next;
}
if ($7 == "connect" && $9 == "400" && $0 ~ /[Ee][Xx][Pp][Ii][Rr]/) {
## There is no startup marked for this.
innxmit_site[host]++;
innxmit_expire[host]++;
next;
}
if ($7 == "connect" && $9 == "400") {
## There is no startup marked for this.
innxmit_site[host]++;
innxmit_crefused[host]++;
next;
}
if ($7 == "connect" && $8 == "failed") {
## There is no startup marked for this.
innxmit_site[host]++;
innxmit_cfail_host[host]++;
## Later, maybe.
#r = $9;
#for (i = 10; i < NF; i++)
# r = r " " $i;
#innxmit_cfail_reason[r]++;
next;
}
if ($7 == "authenticate" && $8 == "failed") {
## There is no startup marked for this.
innxmit_site[host]++;
innxmit_afail_host[host]++;
## Later, maybe.
#r = $9;
#for (i = 10; i < NF; i++)
# r = r " " $i;
#innxmit_afail_reason[r]++;
next;
}
}
$5 ~ /rnews.*/ {
if ($6 == "rejected") {
if ($7 == "connection") {
rnews_rejects++;
i = 8;
if ($8 == "400")
i++;
n = $i;
for (i++; i <= NF; i++)
n = n " " $i;
rnews_r_reject[n]++;
next;
}
if ($7 == "437") {
rnews_bad++;
if ($8 == "Unwanted" && $9 == "newsgroup") {
rnews_bad_ng++;
rnews_bng[$10]++;
next;
}
if ($8 == "Unwanted" && $9 == "distribution") {
rnews_bad_dist++;
rnews_bdist[$10]++;
next;
}
if ($8 == "Bad" && $9 == "\"Date\"") {
rnews_bad_date++;
next;
}
}
}
if ($6 == "offered") {
rnews_hosts[$8]++;
rnews_host = 1;
next;
}
}
##
## NNTPLINK
##
$5 ~ /.*nntplink.*/ {
if ( $6 ~ /:/ ) {
n = split($6, path, ":");
host = path[1];
}
else
host = $6;
if ($7 == "EOF") {
## There is no startup marked for this.
nntplink_site[host]++;
nntplink_eof[host]++;
next;
}
if ($10 == "Broken" && $11 == "pipe") {
## There is no startup marked for this.
nntplink_site[host]++;
nntplink_bpipe[host]++;
next;
}
if ($7 == "greeted" && $10 == "400" \
&& (($11 == "No" && $12 == "space") \
|| ($12 == "NNTP" && $14 == "out" && $16 ~ /space/))) {
## There is no startup marked for this.
nntplink_site[host]++;
nntplink_nospace[host]++;
next;
}
if ($7 == "greeted" && $10 == "400" && $11 == "loadav") {
## There is no startup marked for this.
nntplink_site[host]++;
nntplink_hiload[host]++;
next;
}
if ($7 == "greeted" && $10 == "400" && $0 ~ /[Ee][Xx][Pp][Ii][Rr]/) {
## There is no startup marked for this.
nntplink_site[host]++;
nntplink_expire[host]++;
next;
}
if ($7 == "greeted" && $10 == "400") {
## Some other failure, or innd throttle for some local reason.
## There is no startup marked for this.
nntplink_site[host]++;
nntplink_fail[host]++;
next;
}
if ($7 == "socket():") {
## There is no startup marked for this.
nntplink_site[host]++;
nntplink_sockerr[host]++;
next;
}
if ($7 == "connection" && $8 == "timed" && $9 == "out") {
## There is no startup marked for this. Fake reason.
nntplink_bpipe[host]++;
nntplink_site[host]++;
next;
}
if ($7 == "sent" && $8 == "authinfo" && $10 == "exiting") {
## There is no startup marked for this.
nntplink_site[host]++;
nntplink_auth[host]++;
}
if ($7 == "sent" && $8 == "IHAVE") {
## An "ihave failure": site rejected the article after the
## IHAVE command; most likely it was out of space. Don't
## count this as an offered article, so remember it. Since
## nntplink keeps trying to send we could get many such
## failures in a single connection. For counting purposes
## we pretend that there were several separate connections.
nntplink_ihfail[host]++;
if ($11 == "436" && $13 == "NNTP" && $15 == "out" && $17 ~ /space/) {
nntplink_fake_connects[host]++;
nntplink_nospace[host]++;
next;
}
}
## Since stats lines are always followed by xmit lines, we
## only do the nntplink_site[host]++ and nntplink=1 once
if ($7 == "stats") {
nntplink_offered[host] += $8 - nntplink_ihfail[host];
nntplink_accepted[host] += $10;
nntplink_rejected[host] += $12;
nntplink_failed[host] += $14;
nntplink_ihfail[host] = 0;
if (nntplink_fake_connects[host]) {
nntplink_site[host] += nntplink_fake_connects[host];
nntplink_fake_connects[host] = 0;
} else {
nntplink_site[host]++;
}
nntplink = 1;
next;
}
if ($7 == "xmit") {
nntplink_times_user[host] += $9;
nntplink_times_sys[host] += $11;
nntplink_times_elapsed[host] += $13;
next;
}
if ($7 == "xfer") {
## We can compute this if we need it, but there isn't
## space in the output table for it
#nntplink_offer_min[host] += $9;
#nntplink_accept_min[host] += $11;
next;
}
## 503 is the code for timeouts.
if ($11 == "503" || $12 == "Timeout") {
nntplink_timeout[host]++;
timeout = 1;
next;
}
}
##
## NNTPD
##
$5 ~ /nntpd.*/ {
if ( $6 ~ /.*:.*/ ) {
n = split($6, path, ":");
host = path[1];
}
else
host = $6;
if ($7 == "connect") {
nntpd_connect[host]++;
nntpd = 1;
next;
}
if ($7 == "times") {
nntpd_seconds[host] += $9 + $11;
nntpd_elapsed[host] += $13;
if (nntpd_connect[host] == 0)
nntpd_connect[host]++;
nntpd_done[host]++;
next;
}
if ($7 == "ihave_stats") {
nntpd_accepted[host] += $9;
nntpd_refused[host] += $11;
nntpd_rejected[host] += $13;
next;
}
if ($7 == "no" && $8 == "space") {
nntpd_nospace[host]++;
if (nntpd_connect[host] == 0)
nntpd_connect[host]++;
nntpd_done[host]++;
next;
}
if ($6 == "no" && $7 == "space")
next;
## Rest is likely to be reader stuff; skip for now.
}
##
## MTHREADS
##
$5 ~ /mthreads.*/ {
if ($6 == "Started" && $7 == "mthreads") {
mthreads = 1;
mthreads_started++;
next;
}
if ($6 == "Processed" && $9 == "added" && $12 == "expired") {
mthreads = 1;
mthreads_added += $10;
mthreads_expired += $13;
next;
}
if ($6 == "Turned" && $8 == "groups" && $9 == "on.") {
mthreads = 1;
mthreads_turned_on += $7;
next;
}
if ($6 == "Turned" && $8 == "groups" && $9 == "off.") {
mthreads = 1;
mthreads_turned_off += $7;
next;
}
}
##
## UNKNOWN
##
{
if (unknowns == 0) {
printf("Unknown entries from news log file:\n");
unknowns = 1;
}
print;
}
##
## SUMMARIZE DATA
## NOTE: the following are collected but not used right now:
## innd_flush
## innd_feed
## innd_pauses
## innd_throttles
## innd_newgroups
## innd_rmgroups
## innd_reloads
## innd_timeout
## innd_change_groups
##
END {
printf("\n");
if (innd) {
## INND control statistics.
if (ctlinnd_seen) {
printf("Control commands to INND\t(%d total)\n\n", ctlinnd_seen);
i = 0;
for (m in ctlinnd_type) {
printf("\t%13s %4d", ctlinnd[m], ctlinnd_type[m]);
if (++i == 3) {
i = 0;
printf("\n");
}
}
if (i != 0)
printf("\n");
printf("\n");
if (ctlinnd_new) {
printf("Newsgroups created:\n");
for (m in ctlinnd_newgroups)
printf("\t%-30.30s by %s\n", m, ctlinnd_newgroups[m]);
printf("\n");
}
if (ctlinnd_rmg) {
printf("Newsgroups removed:\n");
for (m in ctlinnd_rmgroups)
printf("\t%s\n", m);
printf("\n");
}
}
## INND exchange statistics.
printf("Articles received by server\n");
printf("System Connects Offered Took Refuse Rejct Accpt Elapsed\n");
for ( ; ; ) {
s = invalid;
for (sortindex in innd_connect)
if (innd_connect[sortindex] >= 0 && sortindex < s)
s = sortindex;
if (s == invalid)
break;
ninnd_connect += innd_connect[s];
ninnd_accept += innd_accepted[s];
ninnd_refuse += innd_refused[s];
ninnd_reject += innd_rejected[s];
ninnd_ela += innd_seconds[s];
offered = innd_accepted[s] + innd_refused[s] + innd_rejected[s];
ninnd_offered += offered;
if (offered == 0)
offered = 1;
percent_accpt = (innd_accepted[s] * 100) / offered;
e_hours = innd_seconds[s] / 3600;
e_sec = innd_seconds[s] % 3600;
e_min = e_sec / 60;
e_sec %= 60;
printf("%-20.20s %5d %6d %6d %6d %5d %3d%% %3d:%02d:%02d\n", \
s, innd_connect[s], \
innd_accepted[s] + innd_refused[s] + innd_rejected[s], \
innd_accepted[s], innd_refused[s], innd_rejected[s], \
percent_accpt, e_hours, e_min, e_sec);
innd_connect[s] = -1;
}
e_hours = ninnd_ela / 3600;
e_sec = ninnd_ela % 3600;
e_min = e_sec / 60;
e_sec %= 60;
they_offered = ninnd_offered;
if (they_offered == 0)
they_offered = 1;
percent_accpt = (ninnd_accept * 100.0)/ (they_offered + 0.1);
printf("\n%-20s %5d %6d %6d %6d %5d %3d%% %3d:%02d:%02d\n\n", \
"TOTALS", ninnd_connect, ninnd_offered, ninnd_accept, \
ninnd_refuse, ninnd_reject, percent_accpt, e_hours, e_min, \
e_sec);
}
## Miscellaneous innd statistics.
if (innd_bad_msgids) {
printf("Bad Message-ID's offered\n");
for ( ; ; ) {
s = invalid;
for (sortindex in innd_bad_msgid)
if (innd_bad_msgid[sortindex] >= 0 && sortindex < s)
s = sortindex;
if (s == invalid)
break;
printf("%-20.20s %5d\n", s, innd_bad_msgid[s]);
innd_bad_msgid[s] = -1;
}
printf("\n");
}
if (innd_bad_ihaves) {
printf("Bad ihave control messages received\n");
for ( ; ; ) {
s = invalid;
for (sortindex in innd_bad_ihave)
if (innd_bad_ihave[sortindex] >= 0 && sortindex < s)
s = sortindex;
if (s == invalid)
break;
printf("%-20.20s %5d\n", s, innd_bad_ihave[s]);
innd_bad_ihave[s] = -1;
}
printf("\n");
}
if (innd_bad_sendmes) {
printf("Ignored sendme control messages received\n");
for ( ; ; ) {
s = invalid;
for (sortindex in innd_bad_sendme)
if (innd_bad_sendme[sortindex] >= 0 && sortindex < s)
s = sortindex;
if (s == invalid)
break;
printf("%-20.20s %5d\n", s, innd_bad_sendme[s]);
innd_bad_sendme[s] = -1;
}
printf("\n");
}
if (innd_blockeds) {
printf("Blocked server feeds\n");
for ( ; ; ) {
s = invalid;
for (sortindex in innd_blocked)
if (innd_blocked[sortindex] >= 0 && sortindex < s)
s = sortindex;
if (s == invalid)
break;
printf("%-20.20s %5d\n", s, innd_blocked[s]);
innd_blocked[s] = -1;
}
printf("\n");
}
## NNTPD statistics.
if (nntpd) {
printf("Articles received by NNTPD\n");
printf("System Connects NSpc Fail Offered Took Refuse Rejct Accpt Elapsed\n");
for ( ; ; ) {
s = invalid;
for (sortindex in nntpd_connect)
if (nntpd_connect[sortindex] >= 0 && sortindex < s)
s = sortindex;
if (s == invalid)
break;
nnntpd_connect += nntpd_connect[s];
nnntpd_nospace += nntpd_nospace[s];
nnntpd_accept += nntpd_accepted[s];
nnntpd_refuse += nntpd_refused[s];
nnntpd_reject += nntpd_rejected[s];
nnntpd_ela += nntpd_elapsed[s];
nnntpd_done += nntpd_done[s];
offered = nntpd_accepted[s] + nntpd_refused[s] + nntpd_rejected[s];
nnntpd_offered += offered;
if (offered == 0)
offered = 1;
percent_accpt = (nntpd_accepted[s] * 100) / offered;
e_hours = nntpd_elapsed[s] / 3600;
e_sec = nntpd_elapsed[s] % 3600;
e_min = e_sec / 60;
e_sec %= 60;
printf("%-20.20s %5d %4d %4d %6d %6d %6d %5d %3d%% %3d:%02d:%02d\n", \
s, nntpd_connect[s], nntpd_nospace[s], \
nntpd_connect[s] - nntpd_done[s], \
nntpd_accepted[s] + nntpd_refused[s] + nntpd_rejected[s], \
nntpd_accepted[s], nntpd_refused[s], nntpd_rejected[s], \
percent_accpt, e_hours, e_min, e_sec);
nntpd_connect[s] = -1;
}
e_hours = nnntpd_ela / 3600;
e_sec = nnntpd_ela % 3600;
e_min = e_sec / 60;
e_sec %= 60;
they_offered = nnntpd_offered;
if (they_offered == 0)
they_offered = 1;
percent_accpt = (nnntpd_accept * 100.0)/ (they_offered + 0.1);
printf("\n%-20s %5d %4d %4d %6d %6d %6d %5d %3d%% %3d:%02d:%02d\n\n", \
"TOTALS", nnntpd_connect, nnntpd_nospace, \
nnntpd_connect - nnntpd_done, \
nnntpd_offered, nnntpd_accept, nnntpd_refuse, nnntpd_reject, \
percent_accpt, e_hours, e_min, e_sec);
}
## Innxmit statistics.
if (innxmit) {
printf("Articles sent by innxmit\n");
printf("System Offrd Took Toss Fail Pct Elapsed CPU Pct\n");
for ( ; ; ) {
s = invalid;
for (sortindex in innxmit_site)
if (innxmit_offered[sortindex] >= 0 && sortindex < s)
s = sortindex;
if (s == invalid)
break;
we_offered = innxmit_offered[s];
if (we_offered == 0)
we_offered = 1;
they_take = (innxmit_accepted[s] * 100.0) / we_offered;
e_hours = innxmit_times_elapsed[s] / 3600;
e_sec = innxmit_times_elapsed[s] % 3600;
e_min = e_sec / 60;
e_sec %= 60;
c_hours = (innxmit_times_user[s] + innxmit_times_sys[host]) / 3600;
c_sec = (innxmit_times_user[s] + innxmit_times_sys[s]) % 3600;
c_min = c_sec / 60;
c_sec %= 60;
elapsed = innxmit_times_elapsed[s];
if (elapsed == 0)
elapsed = 1;
pct = ((innxmit_times_user[s] + innxmit_times_sys[s]) * 100.0) / elapsed;
printf("%-20.20s %6d %6d %6d %5d %3d%% %3d:%02d:%02d %3d:%02d:%02d %3d%%\n", \
s, innxmit_offered[s], innxmit_accepted[s], \
innxmit_rejected[s], innxmit_failed[s], they_take, \
e_hours, e_min, e_sec, c_hours, c_min, c_sec, pct);
ixmt += innxmit_offered[s];
ixmt_accept += innxmit_accepted[s];
ixmt_reject += innxmit_rejected[s];
ixmt_failed += innxmit_failed[s];
ixmt_ela += innxmit_times_elapsed[s];
ixmt_cpu += innxmit_times_user[s] + innxmit_times_sys[s];
innxmit_offered[s] = -1;
}
we_offered = ixmt;
if (we_offered == 0)
we_offered = 1;
they_take = (ixmt_accept * 100) / we_offered;
e_hours = ixmt_ela / 3600;
e_sec = ixmt_ela % 3600;
e_min = e_sec / 60;
e_sec %= 60;
c_hours = ixmt_cpu / 3600;
c_sec = ixmt_cpu % 3600;
c_min = c_sec / 60;
c_sec %= 60;
if (ixmt_ela == 0)
ixmt_ela = 1;
pct = (ixmt_cpu * 100.0) / ixmt_ela;
printf("\n%-20.20s %6d %6d %6d %5d %3d%% %3d:%02d:%02d %3d:%02d:%02d %3d%%\n\n", \
"TOTALS", ixmt, ixmt_accept, ixmt_reject, ixmt_failed, \
they_take, e_hours, e_min, e_sec, c_hours, c_min, c_sec, pct);
printf("\n");
printf("Transmission Connection Attempts ------errors-------------------\n");
printf("System Conn Ok Auth Load Space Expire Connct Other Pct\n");
for ( ; ; ) {
s = invalid;
for (sortindex in innxmit_site)
if (innxmit_site[sortindex] >= 0 && sortindex < s)
s = sortindex;
if (s == invalid)
break;
tot = innxmit_site[s];
if (tot == 0)
tot = 1;
errs = innxmit_afail_host[s] + innxmit_hiload[s] + \
innxmit_nospace[s] + innxmit_cfail_host[s] + \
innxmit_expire[s] + innxmit_crefused[s];
ok = (innxmit_site[s] - errs);
printf("%-20.20s %4d %4d %4d %4d %5d %5d %5d %5d %3d%%\n", \
s, innxmit_site[s], ok, innxmit_afail_host[s], \
innxmit_hiload[s], innxmit_nospace[s], innxmit_expire[s], \
innxmit_cfail_host[s], innxmit_crefused[s], \
(100.0 * ok / tot));
ict_tot += innxmit_site[s];
ict_ok += ok;
ict_afail += innxmit_afail_host[s];
ict_hiload += innxmit_hiload[s];
ict_nospace += innxmit_nospace[s];
ict_expire += innxmit_expire[s];
ict_crefused += innxmit_crefused[s];
ict_cfail += innxmit_cfail_host[s];
innxmit_site[s] = -1;
}
tot = ict_tot;
if (tot == 0)
tot = 1;
errs = ict_afail + ict_nospace + ict_hiload + ict_cfail + ict_crefused;
printf("\n%-20.20s %4d %4d %4d %4d %5d %5d %5d %5d %3d%%\n\n", \
"TOTALS", ict_tot, ict_ok, ict_afail, ict_hiload, \
ict_nospace, ict_expire, ict_cfail, ict_crefused, \
(100.0 * ict_ok / tot));
}
## Nntplink statistics.
if (nntplink) {
printf("Articles sent by nntplink\n");
printf("System Offrd Took Toss Fail Pct Elapsed CPU Pct\n");
for ( ; ; ) {
s = invalid;
for (sortindex in nntplink_site)
if (nntplink_offered[sortindex] >= 0 && sortindex < s)
s = sortindex;
if (s == invalid)
break;
we_offered = nntplink_offered[s];
if (we_offered == 0)
we_offered = 1;
they_take = (nntplink_accepted[s] * 100.0) / we_offered;
e_hours = nntplink_times_elapsed[s] / 3600;
e_sec = nntplink_times_elapsed[s] % 3600;
e_min = e_sec / 60;
e_sec %= 60;
c_hours = (nntplink_times_user[s] + nntplink_times_sys[host]) / 3600;
c_sec = (nntplink_times_user[s] + nntplink_times_sys[s]) % 3600;
c_min = c_sec / 60;
c_sec %= 60;
elapsed = nntplink_times_elapsed[s];
if (elapsed == 0)
elapsed = 1;
pct = ((nntplink_times_user[s] + nntplink_times_sys[s]) * 100.0) / elapsed;
printf("%-20.20s %6d %6d %6d %5d %3d%% %3d:%02d:%02d %3d:%02d:%02d %3d%%\n", \
s, nntplink_offered[s], nntplink_accepted[s], \
nntplink_rejected[s], nntplink_failed[s], they_take, \
e_hours, e_min, e_sec, c_hours, c_min, c_sec, pct);
nxmt += nntplink_offered[s];
nxmt_accept += nntplink_accepted[s];
nxmt_reject += nntplink_rejected[s];
nxmt_failed += nntplink_failed[s];
nxmt_ela += nntplink_times_elapsed[s];
nxmt_cpu += nntplink_times_user[s] + nntplink_times_sys[s];
nntplink_offered[s] = -1;
}
we_offered = nxmt;
if (we_offered == 0)
we_offered = 1;
they_take = (nxmt_accept * 100) / we_offered;
e_hours = nxmt_ela / 3600;
e_sec = nxmt_ela % 3600;
e_min = e_sec / 60;
e_sec %= 60;
c_hours = nxmt_cpu / 3600;
c_sec = nxmt_cpu % 3600;
c_min = c_sec / 60;
c_sec %= 60;
if (nxmt_ela == 0)
nxmt_ela = 1;
pct = (nxmt_cpu * 100.0) / nxmt_ela;
printf("\n%-20.20s %6d %6d %6d %5d %3d%% %3d:%02d:%02d %3d:%02d:%02d %3d%%\n\n", \
"TOTALS", nxmt, nxmt_accept, nxmt_reject, nxmt_failed, \
they_take, e_hours, e_min, e_sec, c_hours, c_min, c_sec, pct);
printf("Transmission Connection Attempts ------errors-------\n");
printf("System Conn Ok EOF Sock Load Bpipe Space Exp Auth Other Pct\n");
for ( ; ; ) {
s = invalid;
for (sortindex in nntplink_site)
if (nntplink_site[sortindex] >= 0 && sortindex < s)
s = sortindex;
if (s == invalid)
break;
tot = nntplink_site[s];
if (tot == 0)
tot = 1;
errs = nntplink_eof[s] + nntplink_sockerr[s] + \
nntplink_hiload[s] + nntplink_bpipe[s] + \
nntplink_nospace[s] + nntplink_auth[s] + \
nntplink_expire[s] + nntplink_fail[s];
ok = (nntplink_site[s] - errs);
printf("%-20.20s %4d %4d %3d %4d %4d %5d %5d %4d %4d %5d %3d%%\n", \
s, nntplink_site[s], ok, nntplink_eof[s], \
nntplink_sockerr[s], nntplink_hiload[s], \
nntplink_bpipe[s], nntplink_nospace[s], \
nntplink_expire[s], nntplink_auth[s], nntplink_fail[s], \
(100.0 * ok / tot));
ct_tot += nntplink_site[s];
ct_ok += ok;
ct_eof += nntplink_eof[s];
ct_sockerr += nntplink_sockerr[s];
ct_hiload += nntplink_hiload[s];
ct_bpipe += nntplink_bpipe[s];
ct_nospace += nntplink_nospace[s];
ct_auth += nntplink_auth[s];
ct_expire += nntplink_expire[s];
ct_fail += nntplink_fail[s];
nntplink_site[s] = -1;
}
tot = ct_tot;
if (tot == 0)
tot = 1;
printf("\n%-20.20s %4d %4d %3d %4d %4d %5d %5d %4d %4d %5d %3d%%\n\n", \
"TOTALS", ct_tot, ct_ok, ct_eof, ct_sockerr, ct_hiload, \
ct_bpipe, ct_nospace, ct_expire, ct_auth, ct_fail, \
(100.0 * ct_ok / tot));
}
## Batcher statistics.
if (batcher) {
printf("UUCP batches created\n");
printf("System Offrd Arts Bytes Elapsed Cpu Pct\n");
for ( ; ; ) {
s = invalid;
for (sortindex in batcher_site)
if (batcher_site[sortindex] >= 0 && sortindex < s)
s = sortindex;
if (s == invalid)
break;
e_hours = batcher_times_elapsed[s] / 3600;
e_sec = batcher_times_elapsed[s] % 3600;
e_min = e_sec / 60;
e_sec %= 60;
c_hours = (batcher_times_user[s] + batcher_times_sys[s]) / 3600;
c_sec = (batcher_times_user[s] + batcher_times_sys[s]) % 3600;
c_min = c_sec / 60;
c_sec %= 60;
elapsed = batcher_times_elapsed[s];
if (elapsed == 0)
elapsed = 1;
pct = ((batcher_times_user[s] + batcher_times_sys[s]) * 100.0) / elapsed;
printf("%-20.20s %6d %6d %10d %3d:%02d:%02d %3d:%02d:%02d %3d%%\n",\
s, batcher_num[s], batcher_articles[s], batcher_bytes[s], \
e_hours, e_min, e_sec, c_hours, c_min, c_sec, pct);
nbatch += batcher_num[s];
nbatch_articles += batcher_articles[s];
nbatch_bytes += batcher_bytes[s];
nbatch_ela += batcher_times_elapsed[s];
nbatch_cpu += batcher_times_user[s] + batcher_times_sys[s];
batcher_site[s] = -1;
}
e_hours = nbatch_ela / 3600;
e_sec = nbatch_ela % 3600;
e_min = e_sec / 60;
e_sec %= 60;
c_hours = nbatch_cpu / 3600;
c_sec = nbatch_cpu % 3600;
c_min = c_sec / 60;
c_sec %= 60;
if (nbatch_ela == 0)
nbatch_ela = 1;
pct = (nbatch_cpu * 100.0) / nbatch_ela;
printf("\n%-20.20s %6d %6d %10d %3d:%02d:%02d %3d:%02d:%02d %3d%%\n\n",\
"TOTALS", nbatch, nbatch_articles, nbatch_bytes,\
e_hours, e_min, e_sec, c_hours, c_min, c_sec, pct);
}
## Rnews statistics.
if (rnews_host) {
printf("Rnews articles offered from:\n");
for ( ; ; ) {
s = invalid;
for (sortindex in rnews_hosts)
if (rnews_hosts[sortindex] >= 0 && sortindex < s)
s = sortindex;
if (s == invalid)
break;
printf("\t%6d\t%s\n", rnews_hosts[s], s);
rnews_hosts[s] = -1;
}
printf("\n");
}
if (rnews_rejects) {
printf("Rnews connections rejected %d times\n", rnews_rejects);
for ( ; ; ) {
s = invalid;
for (sortindex in rnews_r_reject)
if (rnews_r_reject[sortindex] >= 0 && sortindex < s)
s = sortindex;
if (s == invalid)
break;
printf("\t%6d\t%s\n", rnews_r_reject[s], s);
rnews_r_reject[s] = -1;
}
printf("\n");
}
if (rnews_bad) {
printf("Rnews bad articles: (Total %d)\n", rnews_bad);
if (rnews_bad_ng) {
printf("Bad newsgroup: %d\n", rnews_bad_ng);
for ( ; ; ) {
s = invalid;
for (sortindex in rnews_bng)
if (rnews_bng[sortindex] >= 0 && sortindex < s)
s = sortindex;
if (s == invalid)
break;
printf("\t%5d: %s\n", rnews_bng[s], s);
rnews_bng[s] = -1;
}
}
if (rnews_bad_dist) {
printf("Bad distribution: %d\n", rnews_bad_dist);
for ( ; ; ) {
s = invalid;
for (sortindex in rnews_bdist)
if (rnews_bdist[sortindex] >= 0 && sortindex < s)
s = sortindex;
if (s == invalid)
break;
printf("\t%5d: %s\n", rnews_bdist[s], s);
rnews_bdist[s] = -1;
}
}
if (rnews_bad_date) {
printf("Bad date: %d\n", rnews_bad_date);
}
printf("\n");
}
## NNRP statistics.
if (nnrp) {
printf("NNRP readership statistics\n");
printf("System Conn Articles Groups Post Rej Elapsed CPU Pct\n");
for ( ; ; ) {
s = invalid;
for (sortindex in nnrp_connect)
if (nnrp_connect[sortindex] >= 0 && sortindex < s)
s = sortindex;
if (s == invalid)
break;
## Report curious pokers elsewhere.
if (nnrp_groups[s] == 0 \
&& nnrp_articles[s] == 0 \
&& nnrp_posts[s] == 0) {
nnrp_curious[s] += nnrp_connect[s];
curious = 1;
nnrp_connect[s] = -1;
continue;
}
nconn += nnrp_connect[s];
nart += nnrp_articles[s];
ngrp += nnrp_groups[s];
npost += nnrp_posts[s];
nrej += nnrp_rejected[s];
ncpu += (nnrp_times_user[s] + nnrp_times_sys[s]);
nela += nnrp_times_elapsed[s];
e_hours = nnrp_times_elapsed[s] / 3600;
e_sec = nnrp_times_elapsed[s] % 3600;
e_min = e_sec / 60;
e_sec %= 60;
c_hours = (nnrp_times_user[s] + nnrp_times_sys[s]) / 3600;
c_sec = (nnrp_times_user[s] + nnrp_times_sys[s]) % 3600;
c_min = c_sec / 60;
c_sec %= 60;
elapsed = nnrp_times_elapsed[s];
if (elapsed == 0)
elapsed = 1;
pct = ((nnrp_times_user[s] + nnrp_times_sys[s]) * 100.0) / elapsed;
printf("%-20.20s %5d %8d %6d %4d %4d %3d:%02d:%02d %3d:%02d:%02d %3d%%\n",\
s, nnrp_connect[s], nnrp_articles[s], nnrp_groups[s],\
nnrp_posts[s], nnrp_rejected[s], e_hours, e_min, e_sec,\
c_hours, c_min, c_sec, pct);
nnrp_connect[s] = -1;
}
e_hours = nela / 3600;
e_sec = nela % 3600;
e_min = e_sec / 60;
e_sec %= 60;
c_hours = ncpu / 3600;
c_sec = ncpu % 3600;
c_min = c_sec / 60;
c_sec %= 60;
if (nela == 0)
nela = 1;
pct = (ncpu * 100.0) / nela;
printf("\n%-20.20s %5d %8d %6d %4d %4d %3d:%02d:%02d %3d:%02d:%02d %3d%%\n\n",\
"TOTALS", nconn, nart, ngrp, npost, nrej, e_hours, e_min, \
e_sec, c_hours, c_min, c_sec, pct);
}
## Miscellaneous NNRP statistics.
if (curious) {
printf("Curious NNRP server explorers\n");
printf("System Conn\n");
for ( ; ; ) {
s = invalid;
for (sortindex in nnrp_curious)
if (nnrp_curious[sortindex] >= 0 && sortindex < s)
s = sortindex;
if (s == invalid)
break;
printf("%-20.20s %5d\n", s, nnrp_curious[s]);
nnrp_curious[s] = -1;
}
printf("\n");
}
if (nnrp_noperms) {
printf("NNRP no permission clients\n");
printf("System Conn\n");
for ( ; ; ) {
s = invalid;
for (sortindex in nnrp_noperm)
if (nnrp_noperm[sortindex] >= 0 && sortindex < s)
s = sortindex;
if (s == invalid)
break;
printf("%-20.20s %5d\n", s, nnrp_noperm[s]);
nnrp_noperm[s] = -1;
}
printf("\n");
}
if (nnrp_unrecs) {
printf("NNRP unrecognized commands\n");
printf("System Conn\n");
for ( ; ; ) {
s = invalid;
for (sortindex in nnrp_unrec)
if (nnrp_unrec[sortindex] >= 0 && sortindex < s)
s = sortindex;
if (s == invalid)
break;
printf("%-20.20s %5d\n", s, nnrp_unrec[s]);
nnrp_unrec[s] = -1;
}
printf("\n");
}
if (nnrp_gethostfails) {
printf("NNRP gethostbyname failures\n");
printf("IP Conn\n");
for ( ; ; ) {
s = invalid;
for (sortindex in nnrp_gethostfail)
if (nnrp_gethostfail[sortindex] >= 0 && sortindex < s)
s = sortindex;
if (s == invalid)
break;
printf("%-20.20s %5d\n", s, nnrp_gethostfail[s]);
nnrp_gethostfail[s] = -1;
}
printf("\n");
}
if (client_timeout) {
printf("NNRP client timeouts\n");
printf("System Conn\n");
for ( ; ; ) {
s = invalid;
for (sortindex in nnrp_timeout)
if (nnrp_timeout[sortindex] >= 0 && sortindex < s)
s = sortindex;
if (s == invalid)
break;
printf("%-20.20s %5d\n", s, nnrp_timeout[s]);
nnrp_timeout[s] = -1;
}
printf("\n");
}
if (server_timeout) {
printf("NNTPLINK remote server timeouts\n");
printf("System Conn\n");
for ( ; ; ) {
s = invalid;
for (sortindex in nntplink_timeout)
if (nntplink_timeout[sortindex] >= 0 && sortindex < s)
s = sortindex;
if (s == invalid)
break;
printf("%-20.20s %5d\n", s, nntplink_timeout[s]);
nntplink_timeout[s] = -1;
}
printf("\n");
}
## MTHREADS statistics.
if (mthreads) {
printf("Mthreads: Starts Groups on Groups off Articles Expired\n");
printf("%18d%12d%12d%12d%12d\n", mthreads_started, mthreads_turned_on, \
mthreads_turned_off, mthreads_added, mthreads_expired);
printf("\n");
}
## Group readership statistics.
if (nnrp_readers) {
for (g in nnrp_group_request) {
x = length(g);
if (x > max)
max = x;
i = index(g, ".");
if (i > 0)
top = substr(g, 1, i - 1);
else
top = g;
category[top] += nnrp_group_request[g];
}
fmt = sprintf("%%-%ds %%5d\n", max);
printf("Newsgroup request counts (by category)\n");
for ( ; ; ) {
s = invalid;
for (sortindex in category)
if (category[sortindex] >= 0 && sortindex < s)
s = sortindex;
if (s == invalid)
break;
printf(fmt, s, category[s]);
category[s] = -1;
}
printf("\n");
printf("Newsgroup request counts (by newsgroup)\n");
for ( ; ; ) {
s = invalid;
for (sortindex in nnrp_group_request)
if (nnrp_group_request[sortindex] >= 0 && sortindex < s)
s = sortindex;
if (s == invalid)
break;
printf(fmt, s, nnrp_group_request[s]);
nnrp_group_request[s] = -1;
}
printf("\n");
}
printf("\n");
}
Continuous source code history from original PDP-7 UNIX to FreeBSD 2, the first fully unencumbered FreeBSD release.