You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
konversation/konversation/scripts/mail

71 lines
1.8 KiB

#!/bin/bash
#
# Licensed under GPL v2 or later at your option
# Copyright 2005 by John Tapsell <john.tapsell@kdemail.net>
PORT=$1;
SERVER=$2;
TARGET=$3;
FOLDER=$4;
if [ "$FOLDER" = "" ] ; then
FOLDER="inbox"
fi
getmails()
{
dcop kmail > /dev/null || {
dcop $PORT default info "Sorry kmail is not running"
exit
}
for f in $(dcop kmail KMailIface folderList) ; do
MAILFOLDER=$(dcop $(dcop kmail KMailIface getFolder $f) "displayPath" | grep -i $FOLDER)
if [ "$MAILFOLDER" != "" ] ; then
FOUNDFOLDER=1
MAILCOUNT=$(dcop $(dcop kmail KMailIface getFolder $f ) "unreadMessages()" )
MAILTOTALCOUNT=$(dcop $(dcop kmail KMailIface getFolder $f ) "messages()" )
MAILTOTALCOUNT=$(($MAILCOUNT + $MAILTOTALCOUNT))
if [[ -z "$MAILCOUNT" ]] ; then MAILCOUNT = "0" ; fi
if [ "$MAILCOUNT" != 0 ] ; then
FOUNDEMAIL=1
echo "Email folder %B$MAILFOLDER%B has %B$MAILCOUNT%B unread messages, out of %B$MAILTOTALCOUNT%B"
fi
fi
done
if [[ -z "$FOUNDEMAIL" ]] ; then
if [[ -z "$FOUNDFOLDER" ]] ; then
dcop $PORT default info "No email folders were found that had a name containing '$FOLDER'"
exit
else
echo "No new emails in any folders matching '$FOLDER'"
fi
fi
}
if [[ -z "$3" ]] ; then
echo "Scripts are not meant to be called from the command line."
echo "This script should be installed to $TDEDIR/share/apps/konversation/scripts"
echo "Then executed with /script from the konversation"
echo
echo The output is:
getmails
exit
fi
#LINECOUNT=$(getmails | wc -l)
#if [[ "$LINECOUNT" -gt 5 ]] ; then
# dcop $PORT default info "There are more than 5 matches. Cancelling to avoid flooding the server"
# exit
#fi
getmails | head -n 3 | while read line; do dcop $PORT default say $SERVER "$TARGET" "$line"; done