aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
Diffstat (limited to '')
-rwxr-xr-xNEWS5
-rw-r--r--contrib/README.post_count14
-rwxr-xr-xcontrib/post_count39
3 files changed, 58 insertions, 0 deletions
diff --git a/NEWS b/NEWS
index 5844a13f..87991ccc 100755
--- a/NEWS
+++ b/NEWS
@@ -41,6 +41,11 @@ Here is a history of user visible changes to Mailman.
- Fixed a possible TypeError in bin/sync_members introduced in 2.1.17.
(LP: #1243343)
+ Miscellaneous
+
+ - Added to the contrib directory, a script from Alain Williams to count
+ posts in a list's archive.
+
2.1.17 (23-Nov-2013)
New Features
diff --git a/contrib/README.post_count b/contrib/README.post_count
new file mode 100644
index 00000000..c2de8112
--- /dev/null
+++ b/contrib/README.post_count
@@ -0,0 +1,14 @@
+This is a bash script to go through the archives of a list and report
+number of posts by month, year and total as well as a rough report of
+total post size by month.
+
+The script was contributed by Alain Williams <addw@phcomp.co.uk>
+and has been slightly modified by Mark Sapiro <mark@msapiro.net> to
+run with only read access to the archive and to remove the perl
+dependency.
+
+The original from Alain is at
+<https://mail.python.org/pipermail/mailman-users/2014-February/076106.html>.
+
+Both versions work only with archives whose archive_volume_frequency
+is Monthly.
diff --git a/contrib/post_count b/contrib/post_count
new file mode 100755
index 00000000..c0aa446c
--- /dev/null
+++ b/contrib/post_count
@@ -0,0 +1,39 @@
+# Show how much email sent through a mailman mail list
+# Copyright (c) Alain Williams <addw@phcomp.co.uk> January 2009
+# This program is free software and is licenced under the GPL: http://www.gnu.org/copyleft/gpl.html
+
+# Set the path to Mailman's private archives directory.
+# Adjust for your installation.
+ARCHIVES="/usr/local/mailman/archives/private"
+
+if [ "$1x" == "x" ] ; then
+ echo "Usage: $0 <list-name>"
+ exit
+fi
+
+cd $ARCHIVES/$1 || exit
+
+echo "Columns: month number-of-messages total-message-size"
+Months="January February March April May June July August September October November December"
+FilesTot=0
+
+# Work out starting year, look for something like: 2004-December
+startYear=$( ls -d [0-9][0-9][0-9][0-9]-* | sort | sed s/-.*// | head -1 )
+endYear=$( date '+%Y' )
+
+for year in $( seq $startYear $endYear )
+do echo "Year $year"
+ YearTot=0
+ for month in $Months
+ do
+ [[ ! -d $year-$month ]] && printf "$year $month\tnone\n" && continue
+ cd $year-$month || exit
+ files=$( ls -f [0-9]* | wc -l )
+ (( FilesTot += files ))
+ (( YearTot += files ))
+ printf "$year $month\t$files\t$( du -h | cut -f 1 )\n"
+ cd .. || exit
+ done
+ echo "Total for year $year: $YearTot"
+done
+echo "Emails total $FilesTot"