#!/bin/sh
#
# filtro_adjuntos()
#
# Elimina attachments con tipos MIME o extensiones prohibidos
#
##############################################################


function filtro_adjuntos() {


USUARIO=$(msg_to)

# Por default, usamos la lista clase C
BADMIMES=${AF_CFG}/badmimes

# Clase B?
if miembrode claseB $USUARIO; then
   BADMIMES=${AF_CFG}/claseB-mimes
fi
 
# Clase A?
if miembrode claseA $USUARIO; then
   BADMIMES=${AF_CFG}/claseA-mimes
fi

 
# Si el remitente esta en la lista blanca usamos
# la lista de extensiones de la lista blanca
if miembrode listaBlanca $SENDER; then
   BADMIMES=${AF_CFG}/listaBlanca-mimes
fi


# Si no existe la lista entonces no tenemos algo que eliminar
if [ -r "$BADMIMES" ]; then

   # Creamos la RE de la lista de tipos con un tipo
   # falso para asegurarnos de que hay algo en la lista.

   LISTARE=""

   # Agregamos los tipos del archivo
   for tipo in `cat $BADMIMES`; do
      if [ -z "$LISTARE" ]; then
         LISTARE="$tipo"
      else
         LISTARE="${LISTARE}|${tipo}$"
      fi
   done

   if [ "$LISTARE" ]; then  # Tenemos algo que eliminar?
      # Eliminamos lo que haya en la lista
      $ALTERMIME --input="$MSGFILE" --xheader="AttachFilter-Regex:$LISTARE" --remove="$LISTARE" || error "Error en altermime: $?" $?
   fi

fi

}
