diff options
| -rwxr-xr-x | NEWS | 5 | ||||
| -rw-r--r-- | contrib/README.post_count | 14 | ||||
| -rwxr-xr-x | contrib/post_count | 39 |
3 files changed, 58 insertions, 0 deletions
@@ -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" |