1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
|
/* $Id: mail.c,v 1.13 2003/10/05 17:58:50 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.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 <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 *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);
if (time(NULL)<=now[index]+atoi(cfg_get(txt1,"5")))
return 0; // no more then 5/Delay_eX seconds after last check?
}
time(&now[index]); // for Mailbox #index
/*
Build the filename from the config
*/
snprintf(buffer, sizeof(buffer), "Mailbox%d", index);
fnp1=cfg_get(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)
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);
}
}
}
/* FIXME look at the Status of Mails */
*unseen = v1 - mbxnum[index];
if (*unseen < 0)
*unseen = 0;
mbxnum[index]=v1;
*num=v1;
return (0);
}
|
