]> Pileus Git - ~andy/fetchmail/blob - pop2.c
Normal build is now with POP2 disabled and optimization on.
[~andy/fetchmail] / pop2.c
1 /*
2  * pop2.c -- POP2 protocol methods
3  *
4  * Copyright 1996 by Eric S. Raymond
5  * All rights reserved.
6  * For license terms, see the file COPYING in this directory.
7  */
8
9 #include  <config.h>
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, int*countp, int*newp)
63 /* get range of messages to be fetched */
64 {
65     /* maybe the user wanted a non-default folder */
66     if (folder)
67     {
68         int     ok = gen_transact(sock, "FOLD %s", folder);
69
70         if (ok != 0)
71             return(ok);
72         if (pound_arg == -1)
73             return(PS_ERROR);
74     }
75     else
76         /*
77          * We should have picked up a count of messages in the user's
78          * default inbox from the pop2_getauth() response. 
79          *
80          * Note: this logic only works because there is no way to select
81          * both the unnamed folder and named folders within a single
82          * fetchmail run.  If that assumption ever becomes invalid, the
83          * pop2_getauth code will have to stash the pound response away
84          * explicitly in case it gets stepped on.
85          */
86         if (pound_arg == -1)
87             return(PS_ERROR);
88
89     *countp = pound_arg;
90     *newp = -1;
91
92     return(0);
93 }
94
95 static int pop2_fetch(int sock, struct query *ctl, int number, int *lenp)
96 /* request nth message */
97 {
98     int ok;
99
100     *lenp = 0;
101     ok = gen_transact(sock, "READ %d", number);
102     if (ok)
103         return(0);
104     *lenp = equal_arg;
105
106     gen_send(sock, "RETR");
107
108     return(ok);
109 }
110
111 static int pop2_trail(int sock, struct query *ctl, int number)
112 /* send acknowledgement for message data */
113 {
114     return(gen_transact(sock, ctl->keep ? "ACKS" : "ACKD"));
115 }
116
117 const static struct method pop2 =
118 {
119     "POP2",                             /* Post Office Protocol v2 */
120     109,                                /* standard POP2 port */
121     0,                                  /* this is not a tagged protocol */
122     0,                                  /* does not use message delimiter */
123     pop2_ok,                            /* parse command response */
124     pop2_getauth,                       /* get authorization */
125     pop2_getrange,                      /* query range of messages */
126     NULL,                               /* no way to get sizes */
127     NULL,                               /* messages are always new */
128     pop2_fetch,                         /* request given message */
129     NULL,                               /* no way to fetch body alone */
130     pop2_trail,                         /* eat message trailer */
131     NULL,                               /* no POP2 delete method */
132     "QUIT",                             /* the POP2 exit command */
133 };
134
135 int doPOP2 (struct query *ctl)
136 /* retrieve messages using POP2 */
137 {
138     peek_capable = FALSE;
139     return(do_protocol(ctl, &pop2));
140 }
141 #endif /* POP2_ENABLE */
142
143 /* pop2.c ends here */