bin/rotar-mensajes.sh

   1 #!/bin/sh
   2 # vim: set expandtab tabstop=4 shiftwidth=4 fdm=marker:
   3 # Versión 0.3
   4 #
   5 # ChangeLog:
   6 # v0.3:
   7 #       * Se limpia un poco el código.
   8 # v0.2:
   9 #       * Se agrega un filtro para que no se procesen los directorios con
  10 #         el postfijo para que no se arme el quilombo recursivo que se
  11 #         armaba :)
  12 # v0.1:
  13 #       * Versión inicial.
  14 #
  15
  16 # Configuración {{{
  17 mantener=100
  18 ignorar_postfijo=.historial
  19 base=~/Maildir
  20 # }}}
  21
  22 # Código {{{
  23 cd $base
  24 for maildir in `ls -d .* | egrep -v '^\.\.?/' | grep -v $ignorar_postfijo`; do
  25     if [ -d "$maildir/cur" ]; then
  26         mails=`ls "$maildir/cur" | wc -l`
  27         if [ $mails -gt $mantener ]; then
  28             tail=$((mails-mantener))
  29             cd "$maildir/cur"
  30             if [ ! -d "../../$maildir$ignorar_postfijo/cur" ]; then
  31                 maildirmake "../../$maildir$ignorar_postfijo"
  32             fi
  33             mv `ls | sort -r | tail -n$tail` "../../$maildir$ignorar_postfijo/cur"
  34             cd "../.."
  35         fi
  36     fi
  37 done
  38 # }}}
  39