1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
|
/*
* For license terms, see the file COPYING in this directory.
*/
/***********************************************************************
module: uid.c
project: fetchmail
programmer: Eric S. Raymond
description: UID list handling
***********************************************************************/
#include <config.h>
#include <stdio.h>
#if defined(STDC_HEADERS)
#include <stdlib.h>
#include <string.h>
#endif
#if defined(HAVE_UNISTD_H)
#include <unistd.h>
#endif
#include "fetchmail.h"
/*
* Machinery for handling UID lists live here. This is mainly to support
* RFC1725-conformant POP3 servers without a LAST command, but may also be
* useful for making the IMAP4 querying logic UID-oriented, if a future
* revision of IMAP forces me to. (This would be bad. Server-side
* seen bits are better than UIDs, because they track messages seen by
* *all* clients.)
*
* Here's the theory:
*
* At start of a query, we have a (possibly empty) list of UIDs to be
* considered seen in `oldsaved'. These are messages that were left in
* the mailbox and *not deleted* on previous queries (we don't need to
* remember the UIDs of deleted messages because ... well, they're gone!)
* This list is initially set up by initialized_saved_list() from the
* .fetchids file.
*
* Early in the query, during the execution of the protocol-specific
* getrange code, the driver expects that the host's `newsaved' member
* will be filled with a list of UIDs and message numbers representing
* the mailbox state. If this list is empty, the server did
* not respond to the request for a UID listing.
*
* Each time a message is fetched, we can check its UID against the
* `oldsaved' list to see if it is old. If not, it should be downloaded
* (and possibly deleted). It should be downloaded anyway if --all
* is on. It should not be deleted if --keep is on.
*
* Each time a message is deleted, we remove its id from the `newsaved'
* member.
*
* At the end of the query, whatever remains in the `newsaved' member
* (because it was not deleted) becomes the `oldsaved' list. The old
* `oldsaved' list is freed.
*
* At the end of the fetchmail run, all current `oldsaved' lists are
* flushed out to the .fetchids file to be picked up by the next run.
* If there are no such messages, the file is deleted.
*/
/* UIDs associated with un-queried hosts */
static struct idlist *scratchlist;
void initialize_saved_lists(hostlist, idfile)
/* read file of saved IDs and attach to each host */
struct hostrec *hostlist;
char *idfile;
{
int st;
FILE *tmpfp;
struct hostrec *hostp;
/* make sure lists are initially empty */
for (hostp = hostlist; hostp; hostp = hostp->next)
hostp->oldsaved = hostp->newsaved = (struct idlist *)NULL;
/* let's get stored message UIDs from previous queries */
if ((tmpfp = fopen(idfile, "r")) != (FILE *)NULL) {
char buf[POPBUFSIZE+1], host[HOSTLEN+1], id[IDLEN+1];
while (fgets(buf, POPBUFSIZE, tmpfp) != (char *)NULL)
{
if ((st = sscanf(buf, "%s %s\n", host, id)) == 2)
{
for (hostp = hostlist; hostp; hostp = hostp->next)
{
if (strcmp(host, hostp->servername) == 0)
{
save_uid(&hostp->oldsaved, -1, id);
break;
}
}
/* if it's not in a host we're querying, save it anyway */
if (hostp == (struct hostrec *)NULL)
save_uid(&scratchlist, -1, buf);
}
}
fclose(tmpfp);
}
}
void save_uid(idl, num, str)
/* save a number/UID pair on the given UID list */
struct idlist **idl;
int num;
char *str;
{
struct idlist *new;
new = (struct idlist *)xmalloc(sizeof(struct idlist));
new->num = num;
new->id = strdup(str);
new->next = *idl;
*idl = new;
}
void free_uid_list(idl)
/* free the given UID list */
struct idlist **idl;
{
if (*idl == (struct idlist *)NULL)
return;
free_uid_list(&(*idl)->next);
free ((*idl)->id);
free(*idl);
*idl = (struct idlist *)NULL;
}
int uid_in_list(idl, str)
/* is a given ID in the given list? */
struct idlist **idl;
char *str;
{
if (*idl == (struct idlist *)NULL || str == (char *) NULL)
return(0);
else if (strcmp(str, (*idl)->id) == 0)
return(1);
else
return(uid_in_list(&(*idl)->next, str));
}
char *uid_find(idl, number)
/* return the id of the given number in the given list. */
struct idlist **idl;
int number;
{
if (*idl == (struct idlist *) 0)
return((char *) 0);
else if (number == (*idl)->num)
return((*idl)->id);
else
return(uid_find(&(*idl)->next, number));
}
int delete_uid(idl, num)
/* delete given message from given list */
struct idlist **idl;
int num;
{
if (*idl == (struct idlist *)NULL)
return(0);
else if ((*idl)->num == num)
{
struct idlist *next = (*idl)->next;
free ((*idl)->id);
free(*idl);
*idl = next;
return(1);
}
else
return(delete_uid(&(*idl)->next, num));
return(0);
}
void update_uid_lists(hostp)
/* perform end-of-query actions on UID lists */
struct hostrec *hostp;
{
free_uid_list(&hostp->oldsaved);
hostp->oldsaved = hostp->newsaved;
hostp->newsaved = (struct idlist *) NULL;
}
void write_saved_lists(hostlist, idfile)
/* perform end-of-run write of seen-messages list */
struct hostrec *hostlist;
char *idfile;
{
int st, idcount;
FILE *tmpfp;
struct hostrec *hostp;
struct idlist *idp;
/* if all lists are empty, nuke the file */
idcount = 0;
for (hostp = hostlist; hostp; hostp = hostp->next) {
if (hostp->oldsaved)
idcount++;
}
/* either nuke the file or write updated last-seen IDs */
if (!idcount)
unlink(idfile);
else
if ((tmpfp = fopen(idfile, "w")) != (FILE *)NULL) {
for (hostp = hostlist; hostp; hostp = hostp->next) {
for (idp = hostp->oldsaved; idp; idp = idp->next)
fprintf(tmpfp, "%s %s\n", hostp->servername, idp->id);
}
for (idp = scratchlist; idp; idp = idp->next)
fputs(idp->id, tmpfp);
fclose(tmpfp);
}
}
|
