]> Pileus Git - ~andy/fetchmail/blob - pop2.c
Incorporated Henrik Storner's mimedecode patch.
[~andy/fetchmail] / pop2.c
1 /*
2  * pop2.c -- POP2 protocol methods
3  *
4  * Copyright 1997 by Eric S. Raymond
5  * For license terms, see the file COPYING in this directory.
6  */
7
8 #include  "config.h"
9
10 #ifdef POP2_ENABLE
11 #include  <stdio.h>
12 #if defined(STDC_HEADERS)
13 #include <stdlib.h>
14 #endif
15 #include  "fetchmail.h"
16 #include  "socket.h"
17
18 static int pound_arg, equal_arg;
19
20 int pop2_ok (int sock, char *argbuf)
21 /* parse POP2 command response */
22 {
23     int ok;
24     char buf [POPBUFSIZE+1];
25
26     pound_arg = equal_arg = -1;
27
28     if ((ok = gen_recv(sock, buf, sizeof(buf))) == 0)
29     {
30         if (buf[0] == '+')
31             ok = 0;
32         else if (buf[0] == '#')
33         {
34             pound_arg = atoi(buf+1);
35             ok = 0;
36         }
37         else if (buf[0] == '=')
38         {
39             equal_arg = atoi(buf+1);
40             ok = 0;
41         }
42         else if (buf[0] == '-')
43             ok = PS_ERROR;
44         else
45             ok = PS_PROTOCOL;
46
47         if (argbuf != NULL)
48             strcpy(argbuf,buf);
49     }
50
51     return(ok);
52 }
53
54 int pop2_getauth(int sock, struct query *ctl, char *buf)
55 /* apply for connection authorization */
56 {
57     return(gen_transact(sock,
58                   "HELO %s %s",
59                   ctl->remotename, ctl->password));
60 }
61
62 static int pop2_getrange(int sock, struct query *ctl, const char *folder, 
63                          int *countp, int *newp, int *bytes)
64 /* get range of messages to be fetched */
65 {
66     /* maybe the user wanted a non-default folder */
67     if (folder)
68     {
69         int     ok = gen_transact(sock, "FOLD %s", folder);
70
71         if (ok != 0)
72             return(ok);
73         if (pound_arg == -1)
74             return(PS_ERROR);
75     }
76     else
77         /*
78          * We should have picked up a count of messages in the user's
79          * default inbox from the pop2_getauth() response. 
80          *
81          * Note: this logic only works because there is no way to select
82          * both the unnamed folder and named folders within a single
83          * fetchmail run.  If that assumption ever becomes invalid, the
84          * pop2_getauth code will have to stash the pound response away
85          * explicitly in case it gets stepped on.
86          */
87         if (pound_arg == -1)
88             return(PS_ERROR);
89
90     *countp = pound_arg;
91     *bytes = *newp = -1;
92
93     return(0);
94 }
95
96 static int pop2_fetch(int sock, struct query *ctl, int number, int *lenp)
97 /* request nth message */
98 {
99     int ok;
100
101     *lenp = 0;
102     ok = gen_transact(sock, "READ %d", number);
103     if (ok)
104         return(0);
105     *lenp = equal_arg;
106
107     gen_send(sock, "RETR");
108
109     return(ok);
110 }
111
112 static int pop2_trail(int sock, struct query *ctl, int number)
113 /* send acknowledgement for message data */
114 {
115     return(gen_transact(sock, ctl->keep ? "ACKS" : "ACKD"));
116 }
117
118 static int pop2_logout(int sock, struct query *ctl)
119 /* send logout command */
120 {
121     return(gen_transact(sock, "QUIT"));
122 }
123
124 const static struct method pop2 =
125 {
126     "POP2",                             /* Post Office Protocol v2 */
127 #if INET6
128     "pop2",                             /* standard POP3 port */
129 #else /* INET6 */
130     109,                                /* standard POP2 port */
131 #endif /* INET6 */
132     FALSE,                              /* this is not a tagged protocol */
133     FALSE,                              /* does not use message delimiter */
134     pop2_ok,                            /* parse command response */
135     NULL,                               /* no password canonicalization */
136     pop2_getauth,                       /* get authorization */
137     pop2_getrange,                      /* query range of messages */
138     NULL,                               /* no way to get sizes */
139     NULL,                               /* messages are always new */
140     pop2_fetch,                         /* request given message */
141     NULL,                               /* no way to fetch body alone */
142     pop2_trail,                         /* eat message trailer */
143     NULL,                               /* no POP2 delete method */
144     pop2_logout,                        /* log out, we're done */
145     FALSE,                              /* no, we can't re-poll */
146 };
147
148 int doPOP2 (struct query *ctl)
149 /* retrieve messages using POP2 */
150 {
151     peek_capable = FALSE;
152     return(do_protocol(ctl, &pop2));
153 }
154 #endif /* POP2_ENABLE */
155
156 /* pop2.c ends here */