chiark / gitweb /
debugging for thing that crashed
[innduct.git] / lib / clientlib.c
1 /*  $Id: clientlib.c 6155 2003-01-19 19:58:25Z rra $
2 **
3 **  Routines compatible with the NNTP "clientlib" routines.
4 */
5 #include "config.h"
6 #include "clibrary.h"
7
8 #include "inn/innconf.h"
9 #include "libinn.h"
10 #include "nntp.h"
11
12
13 FILE    *ser_rd_fp = NULL;
14 FILE    *ser_wr_fp = NULL;
15 char    ser_line[NNTP_STRLEN + 2];
16
17
18 /*
19 **  Get the name of the NNTP server.  Ignore the filename; we use
20 **  our own configuration stuff.  Return pointer to static data.
21 */
22 char *
23 getserverbyfile(char *file UNUSED)
24 {
25     static char buff[256];
26
27     strlcpy(buff, innconf->server, sizeof(buff));
28     return buff;
29 }
30
31
32 /*
33 **  Get a connection to the remote news server.  Return server's reply
34 **  code or -1 on error.
35 */
36 int
37 server_init(char *host, int port)
38 {
39     char        line2[NNTP_STRLEN];
40
41     /* This interface may be used by clients that assume C News behavior and
42        won't read inn.conf themselves. */
43     if (innconf == NULL)
44         if (!innconf_read(NULL))
45             return -1;
46
47     if (NNTPconnect(host, port, &ser_rd_fp, &ser_wr_fp, ser_line) < 0) {
48         if (ser_line[0] == '\0')
49             /* I/O problem. */
50             return -1;
51
52         /* Server rejected connection; return it's reply code. */
53         return atoi(ser_line);
54     }
55
56     /* Send the INN command; if understood, use that reply. */
57     put_server("mode reader");
58     if (get_server(line2, (int)sizeof line2) < 0)
59         return -1;
60     if (atoi(line2) != NNTP_BAD_COMMAND_VAL)
61         strlcpy(ser_line, line2, sizeof(ser_line));
62
63     /* Connected; return server's reply code. */
64     return atoi(ser_line);
65 }
66
67
68 #define CANTPOST        \
69     "NOTE:  This machine does not have permission to post articles"
70 #define CANTUSE         \
71         "This machine does not have permission to use the %s news server.\n"
72 /*
73 **  Print a message based on the the server's initial response.
74 **  Return -1 if server wants us to go away.
75 */
76 int
77 handle_server_response(int response, char *host)
78 {
79     char        *p;
80
81     switch (response) {
82     default:
83         printf("Unknown response code %d from %s.\n", response, host);
84         return -1;
85      case NNTP_GOODBYE_VAL:
86         if (atoi(ser_line) == response) {
87             p = &ser_line[strlen(ser_line) - 1];
88             if (*p == '\n' && *--p == '\r')
89                 *p = '\0';
90             if (p > &ser_line[3]) {
91                 printf("News server %s unavailable: %s\n", host,
92                         &ser_line[4]);
93                 return -1;
94             }
95         }
96         printf("News server %s unavailable, try later.\n", host);
97         return -1;
98     case NNTP_ACCESS_VAL:
99         printf(CANTUSE, host);
100         return -1;
101     case NNTP_NOPOSTOK_VAL:
102         printf("%s.\n", CANTPOST);
103         /* FALLTHROUGH */
104     case NNTP_POSTOK_VAL:
105         break;
106     }
107     return 0;
108 }
109
110
111 /*
112 **  Send a line of text to the server.
113 */
114 void
115 put_server(const char *buff)
116 {
117     fprintf(ser_wr_fp, "%s\r\n", buff);
118     fflush(ser_wr_fp);
119 }
120
121
122 /*
123 **  Get a line of text from the server, strip trailing \r\n.
124 **  Return -1 on error.
125 */
126 int
127 get_server(char *buff, int buffsize)
128 {
129     char        *p;
130
131     if (fgets(buff, buffsize, ser_rd_fp) == NULL)
132         return -1;
133     p = &buff[strlen(buff)];
134     if (p >= &buff[2] && p[-2] == '\r' && p[-1] == '\n')
135         p[-2] = '\0';
136     return 0;
137 }
138
139
140 /*
141 **  Send QUIT and close the server.
142 */
143 void
144 close_server(void)
145 {
146     char        buff[NNTP_STRLEN];
147
148     if (ser_wr_fp != NULL && ser_rd_fp != NULL) {
149         put_server("QUIT");
150         fclose(ser_wr_fp);
151         ser_wr_fp = NULL;
152
153         get_server(buff, (int)sizeof buff);
154         fclose(ser_rd_fp);
155         ser_rd_fp = NULL;
156     }
157 }