diff options
Diffstat (limited to 'mail.c')
| -rw-r--r-- | mail.c | 228 |
1 files changed, 0 insertions, 228 deletions
@@ -1,228 +0,0 @@ -/* $Id: mail.c,v 1.16 2004/03/03 03:47:04 reinelt Exp $ - * - * email specific functions - * - * Copyright 2001 Axel Ehnert <axel@ehnert.net> - * - * This file is part of LCD4Linux. - * - * LCD4Linux is free software; you can redistribute it and/or modify - * it under the terms of the GNU General Public License as published by - * the Free Software Foundation; either version 2, or (at your option) - * any later version. - * - * LCD4Linux is distributed in the hope that it will be useful, - * but WITHOUT ANY WARRANTY; without even the implied warranty of - * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the - * GNU General Public License for more details. - * - * You should have received a copy of the GNU General Public License - * along with this program; if not, write to the Free Software - * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. - * - * - * $Log: mail.c,v $ - * Revision 1.16 2004/03/03 03:47:04 reinelt - * big patch from Martin Hejl: - * - use qprintf() where appropriate - * - save CPU cycles on gettimeofday() - * - add quit() functions to free allocated memory - * - fixed lots of memory leaks - * - * Revision 1.15 2004/01/29 04:40:02 reinelt - * every .c file includes "config.h" now - * - * Revision 1.14 2004/01/09 04:16:06 reinelt - * added 'section' argument to cfg_get(), but NULLed it on all calls by now. - * - * Revision 1.13 2003/10/05 17:58:50 reinelt - * libtool junk; copyright messages cleaned up - * - * Revision 1.12 2003/02/22 07:53:10 reinelt - * cfg_get(key,defval) - * - * Revision 1.11 2001/09/12 05:58:16 reinelt - * fixed bug in mail2.c - * - * Revision 1.10 2001/09/12 05:37:22 reinelt - * - * fixed a bug in seti.c (file was never closed, lcd4linux run out of fd's - * - * improved socket debugging - * - * Revision 1.9 2001/08/05 17:13:29 reinelt - * - * cleaned up inlude of sys/time.h and time.h - * - * Revision 1.8 2001/03/15 15:49:23 ltoetsch - * fixed compile HD44780.c, cosmetics - * - * Revision 1.7 2001/03/15 14:25:05 ltoetsch - * added unread/total news - * - * Revision 1.6 2001/03/14 13:19:29 ltoetsch - * Added pop3/imap4 mail support - * - * Revision 1.5 2001/03/13 08:34:15 reinelt - * - * corrected a off-by-one bug with sensors - * - * Revision 1.4 2001/03/08 09:02:04 reinelt - * - * seti client cleanup - * - * Revision 1.3 2001/02/21 04:48:13 reinelt - * - * big mailbox patch from Axel Ehnert - * thanks to herp for his idea to check mtime of mailbox - * - * Revision 1.2 2001/02/19 00:15:46 reinelt - * - * integrated mail and seti client - * major rewrite of parser and tokenizer to support double-byte tokens - * - * Revision 1.1 2001/02/18 22:11:34 reinelt - * *** empty log message *** - * - */ - -/* - * exported functions: - * - * Mail (int index, int *num) - * returns 0 if ok, -1 if error - * sets num to number of emails in mailbox #index - * - */ - -#define FALSE 0 -#define TRUE 1 - -#include "config.h" - -#include <stdlib.h> -#include <stdio.h> -#include <string.h> -#include <unistd.h> -#include <fcntl.h> -#include <time.h> -#include <sys/ioctl.h> -#include <sys/types.h> -#include <sys/stat.h> - -#include "cfg.h" -#include "debug.h" -#include "mail.h" - -int Mail (int index, int *num, int *unseen) -{ - FILE *fstr; - char buffer[32]; - static int cfgmbx[MAILBOXES+1]={[0 ... MAILBOXES]=TRUE,}; // Mailbox #index configured? - static time_t mbxlt[MAILBOXES+1]={[0 ... MAILBOXES]=0,}; // mtime of Mailbox #index - static int mbxnum[MAILBOXES+1]={[0 ... MAILBOXES]=0,}; // Last calculated # of mails - static time_t now[MAILBOXES+1]={[0 ... MAILBOXES]=0,}; // Last call to procedure at - // for Mailbox #index - char *fnp1; - int v1=0; - int last_line_blank1; // Was the last line blank? - struct stat fst; - int rc; - char *s: - int i; - - char *txt; - char txt1[100]; - - if (index<0 || index>MAILBOXES) return -1; - - if (now[index] == 0) { /* first time, to give faster a chance */ - now[index] = -1-index; - return 0; - } - if (now[index] < -1) { /* wait different time to avoid long startup */ - now[index]++; - return 0; - } - if (now[index] > 0) { /* not first time, delay */ - sprintf(txt1, "Delay_e%d", index); - s= cfg_get(NULL, txt1, "5"); - i=now[index]+atoi(s); - free(s); - if (time(NULL)<=i) - return 0; // no more then 5/Delay_eX seconds after last check? - } - time(&now[index]); // for Mailbox #index - /* - Build the filename from the config - */ - qprintf(buffer, sizeof(buffer), "Mailbox%d", index); - fnp1=cfg_get(NULL, buffer, NULL); - if (fnp1==NULL || *fnp1=='\0') { - cfgmbx[index]=FALSE; // There is now entry for Mailbox #index - } - v1=mbxnum[index]; - /* - Open the file - */ - if (cfgmbx[index]==TRUE) { - /* - Check the last touch of mailbox. Changed? - */ - rc=stat(fnp1, &fst); - if ( rc != 0 ) { - /* - is it pop3, imap4 or nntp? - */ - rc = Mail_pop_imap_news(fnp1, num, unseen); - if (rc == 0) { - free(fnp1); - return 0; - } - else - cfgmbx[index] = FALSE; /* don't try again */ - - error ("Error getting stat of Mailbox%d", index); - return (-1); - } - if ( mbxlt[index] != fst.st_mtime ) { - mbxlt[index]=fst.st_mtime; - - fstr=fopen(fnp1,"r"); - if (fstr != NULL) { - txt=&txt1[0]; - last_line_blank1=TRUE; - v1=0; - - while ( ( fgets ( txt1, 100, fstr ) ) != NULL ) { - txt1[strlen(txt1)-1]='\0'; // cut the newline - /* - Is there a "From ..." line. Count only, if a blank line was directly before this - */ - if ( strncmp (txt1, "From ", 5 ) == 0 ) { - if ( last_line_blank1 == TRUE ) { - v1++; - last_line_blank1 = FALSE; - } - } - if ( strlen (txt1) == 0 ) { - last_line_blank1 = TRUE; - } - else { - last_line_blank1 = FALSE; - } - } - fclose (fstr); - } - } - } - free(fnp1); - /* FIXME look at the Status of Mails */ - *unseen = v1 - mbxnum[index]; - if (*unseen < 0) - *unseen = 0; - mbxnum[index]=v1; - *num=v1; - return (0); -} - |