thh/newsstats
1
0
Fork 0
Code Issues 3 Pull requests Projects Releases Packages Activity

Rename postingstats.pl to poststats.pl.

Browse source 
- Rename dopostingstats.sh accordingly.
- Fix all references in doc and other files.

Signed-off-by: Thomas Hochstein <thh@thh.name>
This commit is contained in:
Thomas Hochstein 2026-01-09 15:39:23 +01:00
parent 333013e7bb
commit 8734008ab0
4 changed files with 29 additions and 27 deletions
Download patch file Download diff file Expand all files Collapse all files

40
bin/postingstats.pl → bin/poststats.pl
View file

@ -1,6 +1,6 @@
#!/usr/bin/perl
#
# postingstats.pl
# poststats.pl
#
# This script will create statistic postings from NewsStats output.
# It defaults to statistics for de.* posted to de.admin.lists, but
@ -14,9 +14,9 @@
# which Perl itself is published.
#
# Usage:
# $~ groupstats.pl --nocomments --sums --format dump | postingstats.pl -t groups
# $~ hoststats.pl --nocomments --sums --format dump | postingstats.pl -t hosts
# $~ clientstats.pl --nocomments --sums --versions --format dump | postingstats.pl -t clients
# $~ groupstats.pl --nocomments --sums --format dump | poststats.pl -t groups
# $~ hoststats.pl --nocomments --sums --format dump | poststats.pl -t hosts
# $~ clientstats.pl --nocomments --sums --versions --format dump | poststats.pl -t clients
#
BEGIN {
@ -61,7 +61,7 @@ my $Timestamp = time;
##### ----- configuration --------------------------------------------
my $TLH = 'de';
my %Heading = ('GroupStats' => 'Postingstatistik fuer de.* im Monat '.$Month,
my %Heading = ('GroupStats' => 'Gruppenstatistik fuer de.* im Monat '.$Month,
'HostStats' => 'Serverstatistik fuer de.* im Monat '.$Month,
'ClientStats' => 'Newsreaderstatistik fuer de.* im Monat '.$Month
);
@ -72,13 +72,13 @@ my %TH = ('counter' => 'Nr.',
my %LeadIn = ('GroupStats' => <<GROUPSIN, 'HostStats' => <<HOSTSIN, 'ClientStats' => <<CLIENTSIN);
From: Thomas Hochstein <thh\@thh.name>
Newsgroups: local.test
Subject: Postingstatistik fuer de.* im Monat $Month
Message-ID: <destat-postings-$Month.$Timestamp\@mid.news.szaf.org>
Subject: Gruppenstatistik fuer de.* im Monat $Month
Message-ID: <destat-groups-$Month.$Timestamp\@mid.news.szaf.org>
Approved: thh\@thh.name
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
User-Agent: postingstats.pl/$VERSION (NewsStats)
User-Agent: poststats.pl/$VERSION (NewsStats)
GROUPSIN
From: Thomas Hochstein <thh\@thh.name>
@ -89,7 +89,7 @@ Approved: thh\@thh.name
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
User-Agent: postingstats.pl/$VERSION (NewsStats)
User-Agent: poststats.pl/$VERSION (NewsStats)
HOSTSIN
From: Thomas Hochstein <thh\@thh.name>
@ -100,7 +100,7 @@ Approved: thh\@thh.name
Mime-Version: 1.0
Content-Type: text/plain; charset=utf-8
Content-Transfer-Encoding: 8bit
User-Agent: postingstats.pl/$VERSION (NewsStats)
User-Agent: poststats.pl/$VERSION (NewsStats)
CLIENTSIN
my %LeadOut = ('GroupStats' => <<GROUPSOUT, 'HostStats' => <<HOSTSOUT, 'ClientStats' => <<CLIENTSOUT);
@ -264,11 +264,11 @@ __END__
=head1 NAME
postingstats - format and post reports
poststats - format and post reports
=head1 SYNOPSIS
B<postingstats> [B<-Vh>] [B<-t> I<groups|hosts|clients>] [B<-m> I<YYYY-MM>]
B<poststats> [B<-Vh>] [B<-t> I<groups|hosts|clients>] [B<-m> I<YYYY-MM>]
=head1 REQUIREMENTS
@ -282,13 +282,13 @@ message that can be posted to Usenet.
=head2 Features and options
B<postingstats> will create a table with entries numbered from most
B<poststats> will create a table with entries numbered from most
to least and percentages calculated from the sum total of all values.
It depends on a sorted list on STDIN in I<dump> format with I<sums>;
I<versions> from B<clientstas.pl> are optional.
B<postingstats> needs a B<--type> and a B<--month> to create a caption
B<poststats> needs a B<--type> and a B<--month> to create a caption
and select matching lead-ins and lead-outs. B<--type> is also needed
to catch the correct sum total from input which differs between I<groups>
on one hand and I<hosts> or I<clients> on the other hand.
@ -296,7 +296,7 @@ on one hand and I<hosts> or I<clients> on the other hand.
It will default to posting statistics (number of postings per group)
and last month.
Output from B<postingstats> can be piped to any C<inews> implementation,
Output from B<poststats> can be piped to any C<inews> implementation,
e.g. C<tinews.pl> from L<ftp://ftp.tin.org/pub/news/clients/tin/tools/tinews.pl>
(present in C</contrib/>).
@ -370,25 +370,25 @@ See L<doc/INSTALL>.
Create a posting from a posting statistics report for last month:
groupstats.pl --nocomments --sums --format dump | postingstats.pl -t groups
groupstats.pl --nocomments --sums --format dump | poststats.pl -t groups
Create a posting from a posting statistics report for 2012-01:
groupstats.pl --nocomments --sums --format dump -m 2012-01 | postingstats.pl -t groups -m 2012-01
groupstats.pl --nocomments --sums --format dump -m 2012-01 | poststats.pl -t groups -m 2012-01
Create a posting from a host statistics report for last month:
hoststats.pl --nocomments --sums --format dump | postingstats.pl -t hosts
hoststats.pl --nocomments --sums --format dump | poststats.pl -t hosts
Create a posting from a client statistics report for last month:
clientstats.pl --nocomments --sums --versions --format dump | postingstats.pl -t clients
clientstats.pl --nocomments --sums --versions --format dump | poststats.pl -t clients
=head1 FILES
=over 4
=item F<bin/postingstats.pl>
=item F<bin/poststats.pl>
The script itself.

6
contrib/dopostingstats.sh → contrib/dopoststats.sh
View file

@ -8,6 +8,6 @@ if ! [[ $1 =~ [0-9]{4}-[0-9]{2} ]]; then
fi
# post stats
/opt/newsstats/bin/groupstats.pl --nocomments --sums --format dump --month $MONTH | /opt/newsstats/bin/postingstats.pl --month $MONTH | /opt/newsstats/contrib/tinews.pl -X -Y
/opt/newsstats/bin/hoststats.pl --nocomments --sums --format dump --month $MONTH | /opt/newsstats/bin/postingstats.pl -t server --month $MONTH | /opt/newsstats/contrib/tinews.pl -X -Y
/opt/newsstats/bin/clientstats.pl --nocomments --sums --versions --format dump --month $MONTH | /opt/newsstats/bin/postingstats.pl -t client --month $MONTH | /opt/newsstats/contrib/tinews.pl -X -Y
/opt/newsstats/bin/groupstats.pl --nocomments --sums --format dump --month $MONTH | /opt/newsstats/bin/poststats.pl --month $MONTH | /opt/newsstats/contrib/tinews.pl -X -Y
/opt/newsstats/bin/hoststats.pl --nocomments --sums --format dump --month $MONTH | /opt/newsstats/bin/poststats.pl -t server --month $MONTH | /opt/newsstats/contrib/tinews.pl -X -Y
/opt/newsstats/bin/clientstats.pl --nocomments --sums --versions --format dump --month $MONTH | /opt/newsstats/bin/poststats.pl -t client --month $MONTH | /opt/newsstats/contrib/tinews.pl -X -Y

2
doc/ChangeLog
View file

@ -3,6 +3,8 @@ NewsStats 0.5.0 (unreleased)
* dbcreate: Change raw table to InnoDB and utf8mb4.
* feedlog: Fix errors when saving unencoded 8bit headers.
* Add addpost (to add post data dropped by feedlog).
* Rename postingstats.pl to poststats.pl, rename
dopostingstats.sh accordingly, fix all references.
NewsStats 0.4.0 (2025-06-02)
* Reformat $Conf{TLH} for GroupStats only.

8
doc/README
View file

@ -97,19 +97,19 @@ Getting Started
per client (with detailed client versions) for the last month,
using the result tables filled by gatherstats.
To post those reports to Usenet, change postingstats.pl according
To post those reports to Usenet, change poststats.pl according
to your needs (sender, newsgroups and other headers, translation
of table headers and text templates) and display a test posting
by piping report data into postingstats.pl:
by piping report data into poststats.pl:
bin/groupstats.pl --nocomments -s -f dump | bin/postingstats.pl
bin/groupstats.pl --nocomments -s -f dump | bin/poststats.pl
If the result is to your liking, add a pipe to a inews
implementation.
Example:
bin/groupstats.pl --nocomments -s -f dump | bin/postingstats.pl | contrib/tinews.pl -X
bin/groupstats.pl --nocomments -s -f dump | bin/poststats.pl | contrib/tinews.pl -X
More information