2 * pop2.c -- POP2 protocol methods
4 * Copyright 1997 by Eric S. Raymond
5 * For license terms, see the file COPYING in this directory.
11 #include "fetchmail.h"
18 static int pound_arg, equal_arg;
20 static int pop2_ok (int sock, char *argbuf)
21 /* parse POP2 command response */
24 char buf [POPBUFSIZE+1];
26 pound_arg = equal_arg = -1;
28 if ((ok = gen_recv(sock, buf, sizeof(buf))) == 0)
32 else if (buf[0] == '#')
34 pound_arg = atoi(buf+1);
37 else if (buf[0] == '=')
39 equal_arg = atoi(buf+1);
42 else if (buf[0] == '-')
54 static int pop2_getauth(int sock, struct query *ctl, char *buf)
55 /* apply for connection authorization */
61 if (ctl->sslproto && !strcasecmp(ctl->sslproto, "tls1") && !ctl->use_ssl)
63 report(stderr, GT_("POP2 does not support STLS. Giving up.\n"));
67 if (ctl->server.authenticate != A_ANY && ctl->server.authenticate != A_PASSWORD)
69 report(stderr, GT_("POP2 only supports password authentication. Giving up.\n"));
73 strlcpy(shroud, ctl->password, sizeof(shroud));
74 status = gen_transact(sock,
76 ctl->remotename, ctl->password);
77 memset(shroud, 0x55, sizeof(shroud));
82 static int pop2_getrange(int sock, struct query *ctl, const char *folder,
83 int *countp, int *newp, unsigned long long *bytes)
84 /* get range of messages to be fetched */
88 /* maybe the user wanted a non-default folder */
91 int ok = gen_transact(sock, "FOLD %s", folder);
100 * We should have picked up a count of messages in the user's
101 * default inbox from the pop2_getauth() response.
103 * Note: this logic only works because there is no way to select
104 * both the unnamed folder and named folders within a single
105 * fetchmail run. If that assumption ever becomes invalid, the
106 * pop2_getauth code will have to stash the pound response away
107 * explicitly in case it gets stepped on.
118 static int pop2_fetch(int sock, struct query *ctl, int number, int *lenp)
119 /* request nth message */
125 ok = gen_transact(sock, "READ %d", number);
130 gen_send(sock, "RETR");
135 static int pop2_trail(int sock, struct query *ctl, const char *tag)
136 /* send acknowledgement for message data */
140 return(gen_transact(sock, ctl->keep ? "ACKS" : "ACKD"));
143 static int pop2_logout(int sock, struct query *ctl)
144 /* send logout command */
147 return(gen_transact(sock, "QUIT"));
150 static const struct method pop2 =
152 "POP2", /* Post Office Protocol v2 */
153 "pop2", /* standard POP2 port */
154 "pop2", /* ssl POP2 port - not */
155 FALSE, /* this is not a tagged protocol */
156 FALSE, /* does not use message delimiter */
157 pop2_ok, /* parse command response */
158 pop2_getauth, /* get authorization */
159 pop2_getrange, /* query range of messages */
160 NULL, /* no way to get sizes */
161 NULL, /* no way to get sizes of subsets */
162 NULL, /* messages are always new */
163 pop2_fetch, /* request given message */
164 NULL, /* no way to fetch body alone */
165 pop2_trail, /* eat message trailer */
166 NULL, /* no POP2 delete method */
167 NULL, /* how to mark a message as seen */
168 NULL, /* how to end mailbox processing */
169 pop2_logout, /* log out, we're done */
170 FALSE /* no, we can't re-poll */
173 int doPOP2 (struct query *ctl)
174 /* retrieve messages using POP2 */
176 peek_capable = FALSE;
177 return(do_protocol(ctl, &pop2));
179 #endif /* POP2_ENABLE */
181 /* pop2.c ends here */