@ -1,7 +1,7 @@
/* $Id$
/* $Id$
* *
* isync - IMAP4 to maildir mailbox synchronizer * isync - IMAP4 to maildir mailbox synchronizer
* Copyright ( C ) 2000 - 1 Michael R . Elkins < me @ mutt . org > * Copyright ( C ) 2000 - 2 Michael R . Elkins < me @ mutt . org >
* *
* This program is free software ; you can redistribute it and / or modify * This program is free software ; you can redistribute it and / or modify
* it under the terms of the GNU General Public License as published by * it under the terms of the GNU General Public License as published by
@ -85,7 +85,7 @@ read_uid (const char *path, const char *file)
{ {
char full [ _POSIX_PATH_MAX ] ; char full [ _POSIX_PATH_MAX ] ;
int fd ; int fd ;
int ret ; int ret = 0 ;
int len ; int len ;
char buf [ 64 ] ; char buf [ 64 ] ;
unsigned int uid = 0 ; unsigned int uid = 0 ;
@ -96,29 +96,59 @@ read_uid (const char *path, const char *file)
{ {
if ( errno ! = ENOENT ) if ( errno ! = ENOENT )
{ {
perror ( " open " ) ; perror ( full ) ;
return - 1 ; return - 1 ;
} }
return 0 ; /* doesn't exist */ return 0 ; /* doesn't exist */
} }
ret = do_lock ( fd , F_RDLCK ) ;
if ( ! ret )
{
len = read ( fd , buf , sizeof ( buf ) - 1 ) ; len = read ( fd , buf , sizeof ( buf ) - 1 ) ;
if ( len = = - 1 ) if ( len = = - 1 )
{
perror ( " read " ) ;
ret = - 1 ; ret = - 1 ;
}
else else
{ {
buf [ len ] = 0 ; buf [ len ] = 0 ;
uid = atol ( buf ) ; uid = atol ( buf ) ;
} }
}
ret | = do_lock ( fd , F_UNLCK ) ;
close ( fd ) ; close ( fd ) ;
return ret ? ( unsigned int ) ret : uid ; return ret ? ( unsigned int ) ret : uid ;
} }
/* NOTE: this is NOT NFS safe */
static int
maildir_lock ( mailbox_t * m )
{
char path [ _POSIX_PATH_MAX ] ;
snprintf ( path , sizeof ( path ) , " %s/isynclock " , m - > path ) ;
m - > lockfd = open ( path , O_WRONLY | O_CREAT | O_EXCL , S_IWUSR | S_IRUSR ) ;
if ( m - > lockfd = = - 1 )
{
perror ( path ) ;
return - 1 ;
}
if ( do_lock ( m - > lockfd , F_WRLCK ) )
{
close ( m - > lockfd ) ;
return - 1 ;
}
return 0 ;
}
static void
maildir_unlock ( mailbox_t * m )
{
char path [ _POSIX_PATH_MAX ] ;
snprintf ( path , sizeof ( path ) , " %s/isynclock " , m - > path ) ;
unlink ( path ) ;
do_lock ( m - > lockfd , F_UNLCK ) ;
close ( m - > lockfd ) ;
}
/* open a maildir mailbox.
/* open a maildir mailbox.
* if OPEN_FAST is set , we just check to make * if OPEN_FAST is set , we just check to make
* sure its a valid mailbox and don ' t actually parse it . any IMAP messages * sure its a valid mailbox and don ' t actually parse it . any IMAP messages
@ -141,8 +171,10 @@ maildir_open (const char *path, int flags)
struct stat sb ; struct stat sb ;
const char * subdirs [ ] = { " cur " , " new " , " tmp " } ; const char * subdirs [ ] = { " cur " , " new " , " tmp " } ;
int i ; int i ;
datum key ;
m = calloc ( 1 , sizeof ( mailbox_t ) ) ; m = calloc ( 1 , sizeof ( mailbox_t ) ) ;
m - > lockfd = - 1 ;
/* filename expansion happens here, not in the config parser */ /* filename expansion happens here, not in the config parser */
m - > path = expand_strdup ( path ) ; m - > path = expand_strdup ( path ) ;
@ -154,9 +186,7 @@ maildir_open (const char *path, int flags)
{ {
fprintf ( stderr , " ERROR: mkdir %s: %s (errno %d) \n " , fprintf ( stderr , " ERROR: mkdir %s: %s (errno %d) \n " ,
m - > path , strerror ( errno ) , errno ) ; m - > path , strerror ( errno ) , errno ) ;
free ( m - > path ) ; goto err ;
free ( m ) ;
return NULL ;
} }
for ( i = 0 ; i < 3 ; i + + ) for ( i = 0 ; i < 3 ; i + + )
@ -166,9 +196,7 @@ maildir_open (const char *path, int flags)
{ {
fprintf ( stderr , " ERROR: mkdir %s: %s (errno %d) \n " , fprintf ( stderr , " ERROR: mkdir %s: %s (errno %d) \n " ,
buf , strerror ( errno ) , errno ) ; buf , strerror ( errno ) , errno ) ;
free ( m - > path ) ; goto err ;
free ( m ) ;
return NULL ;
} }
} }
@ -177,9 +205,7 @@ maildir_open (const char *path, int flags)
{ {
fprintf ( stderr , " ERROR: stat %s: %s (errno %d) \n " , m - > path , fprintf ( stderr , " ERROR: stat %s: %s (errno %d) \n " , m - > path ,
strerror ( errno ) , errno ) ; strerror ( errno ) , errno ) ;
free ( m - > path ) ; goto err ;
free ( m ) ;
return NULL ;
} }
} }
else else
@ -195,33 +221,37 @@ maildir_open (const char *path, int flags)
fprintf ( stderr , fprintf ( stderr ,
" ERROR: %s does not appear to be a valid maildir style mailbox \n " , " ERROR: %s does not appear to be a valid maildir style mailbox \n " ,
m - > path ) ; m - > path ) ;
free ( m - > path ) ; goto err ;
free ( m ) ;
return 0 ;
} }
} }
} }
/* we need a mutex on the maildir because of the state files that isync
* uses .
*/
if ( maildir_lock ( m ) )
goto err ;
/* check for the uidvalidity value */ /* check for the uidvalidity value */
m - > uidvalidity = read_uid ( m - > path , " isyncuidvalidity " ) ; m - > uidvalidity = read_uid ( m - > path , " isyncuidvalidity " ) ;
if ( m - > uidvalidity = = ( unsigned int ) - 1 ) if ( m - > uidvalidity = = ( unsigned int ) - 1 )
{ goto err ;
free ( m - > path ) ;
free ( m ) ;
return NULL ;
}
/* load the current maxuid */ /* load the current maxuid */
if ( ( m - > maxuid = read_uid ( m - > path , " isyncmaxuid " ) ) = = ( unsigned int ) - 1 ) if ( ( m - > maxuid = read_uid ( m - > path , " isyncmaxuid " ) ) = = ( unsigned int ) - 1 )
{ goto err ;
free ( m - > path ) ;
free ( m ) ;
return NULL ;
}
if ( flags & OPEN_FAST ) if ( flags & OPEN_FAST )
return m ; return m ;
snprintf ( buf , sizeof ( buf ) , " %s/isyncuidmap " , m - > path ) ;
m - > db = dbm_open ( buf , O_RDWR | O_CREAT , S_IRUSR | S_IWUSR ) ;
if ( m - > db = = NULL )
{
fputs ( " ERROR: unable to open UID db \n " , stderr ) ;
goto err ;
}
cur = & m - > msgs ; cur = & m - > msgs ;
for ( ; count < 2 ; count + + ) for ( ; count < 2 ; count + + )
{ {
@ -231,10 +261,8 @@ maildir_open (const char *path, int flags)
d = opendir ( buf ) ; d = opendir ( buf ) ;
if ( ! d ) if ( ! d )
{ {
free ( m - > path ) ;
free ( m ) ;
perror ( " opendir " ) ; perror ( " opendir " ) ;
return 0 ; goto err ;
} }
while ( ( e = readdir ( d ) ) ) while ( ( e = readdir ( d ) ) )
{ {
@ -247,40 +275,25 @@ maildir_open (const char *path, int flags)
p - > flags = 0 ; p - > flags = 0 ;
p - > new = ( count = = 0 ) ; p - > new = ( count = = 0 ) ;
/* filename format is something like:
/* determine the UID for this message. The basename (sans
* < unique - prefix > , U = < n > : 2 , < flags > * flags ) is used as the key in the db
* This is completely non - standard , but in order for mail
* clients to understand the flags , we have to use the
* standard : info as described by the qmail spec
*/ */
s = strstr ( p - > file , " ,U= " ) ; strfcpy ( buf , p - > file , sizeof ( buf ) ) ;
if ( ! s ) s = strchr ( p - > file , ' : ' ) ;
s = strstr ( p - > file , " UID " ) ; if ( s )
if ( ! s ) * s = 0 ;
puts ( " Warning, no UID for message " ) ; key . dptr = buf ;
else key . dsize = strlen ( buf ) ;
key = dbm_fetch ( m - > db , key ) ;
if ( key . dptr )
{ {
p - > uid = strtol ( s + 3 , & s , 10 ) ; p - > uid = * ( int * ) key . dptr ;
if ( p - > uid > m - > maxuid ) if ( p - > uid > m - > maxuid )
{
m - > maxuid = p - > uid ; m - > maxuid = p - > uid ;
m - > maxuidchanged = 1 ;
}
/* Courier-IMAP names it files
* unique , S = < size > : info
* so we need to put the UID before the size , hence here
* we check for a comma as a valid terminator as well ,
* since the format will be
* unique , U = < uid > , S = < size > : info
*/
if ( * s & & * s ! = ' : ' & & * s ! = ' , ' )
{
puts ( " Warning, unable to parse UID " ) ;
p - > uid = - 1 ; /* reset */
}
} }
else
puts ( " Warning, no UID for message " ) ;
s = strchr ( p - > file , ' : ' ) ;
if ( s ) if ( s )
parse_info ( p , s + 1 ) ; parse_info ( p , s + 1 ) ;
if ( p - > flags & D_DELETED ) if ( p - > flags & D_DELETED )
@ -290,6 +303,15 @@ maildir_open (const char *path, int flags)
closedir ( d ) ; closedir ( d ) ;
} }
return m ; return m ;
err :
if ( m - > db )
dbm_close ( m - > db ) ;
if ( m - > lockfd ! = - 1 )
maildir_unlock ( m ) ;
free ( m - > path ) ;
free ( m ) ;
return NULL ;
} }
/* permanently remove messages from a maildir mailbox. if `dead' is nonzero,
/* permanently remove messages from a maildir mailbox. if `dead' is nonzero,
@ -322,8 +344,8 @@ maildir_expunge (mailbox_t * mbox, int dead)
return 0 ; return 0 ;
} }
static int int
update_maxuid ( mailbox_t * mbox ) maildir_ update_maxuid( mailbox_t * mbox )
{ {
int fd ; int fd ;
char buf [ 64 ] ; char buf [ 64 ] ;
@ -355,7 +377,7 @@ update_maxuid (mailbox_t * mbox)
uid = atol ( buf ) ; uid = atol ( buf ) ;
if ( uid > mbox - > maxuid ) if ( uid > mbox - > maxuid )
{ {
puts ( " Error, maxuid is now higher (fatal) " ) ; f puts( " ERROR: maxuid is now higher (fatal) \n " , stderr ) ;
ret = - 1 ; ret = - 1 ;
} }
@ -429,48 +451,14 @@ maildir_clean_tmp (const char *mbox)
} }
} }
int void
maildir_close ( mailbox_t * mbox ) maildir_close ( mailbox_t * mbox )
{ {
message_t * cur = mbox - > msgs ; if ( mbox - > db )
char path [ _POSIX_PATH_MAX ] ; dbm_close ( mbox - > db ) ;
char oldpath [ _POSIX_PATH_MAX ] ;
char * p ;
int ret = 0 ;
if ( mbox - > changed )
{
for ( ; cur ; cur = cur - > next )
{
if ( cur - > changed )
{
/* generate old path */
snprintf ( oldpath , sizeof ( oldpath ) , " %s/%s/%s " ,
mbox - > path , cur - > new ? " new " : " cur " , cur - > file ) ;
/* truncate old flags (if present) */
p = strchr ( cur - > file , ' : ' ) ;
if ( p )
* p = 0 ;
/* generate new path - always put this in the cur/ directory
/* release the mutex on the mailbox */
* because its no longer new maildir_unlock ( mbox ) ;
*/
snprintf ( path , sizeof ( path ) , " %s/cur/%s:2,%s%s%s%s " ,
mbox - > path ,
cur - > file , ( cur - > flags & D_FLAGGED ) ? " F " : " " ,
( cur - > flags & D_ANSWERED ) ? " R " : " " ,
( cur - > flags & D_SEEN ) ? " S " : " " ,
( cur - > flags & D_DELETED ) ? " T " : " " ) ;
if ( rename ( oldpath , path ) )
perror ( " rename " ) ;
}
}
}
if ( mbox - > maxuidchanged )
ret = update_maxuid ( mbox ) ;
/* per the maildir(5) specification, delivery agents are supposed to
/* per the maildir(5) specification, delivery agents are supposed to
* set a 24 - hour timer on items placed in the ` tmp ' directory . * set a 24 - hour timer on items placed in the ` tmp ' directory .
@ -481,8 +469,6 @@ maildir_close (mailbox_t * mbox)
free_message ( mbox - > msgs ) ; free_message ( mbox - > msgs ) ;
memset ( mbox , 0xff , sizeof ( mailbox_t ) ) ; memset ( mbox , 0xff , sizeof ( mailbox_t ) ) ;
free ( mbox ) ; free ( mbox ) ;
return ret ;
} }
int int
Michael Elkins
23 years ago