Blame


1 72b033ef 2021-12-29 op /*
2 72b033ef 2021-12-29 op * Copyright (c) 2021 Omar Polo <op@omarpolo.com>
3 72b033ef 2021-12-29 op *
4 72b033ef 2021-12-29 op * Permission to use, copy, modify, and distribute this software for any
5 72b033ef 2021-12-29 op * purpose with or without fee is hereby granted, provided that the above
6 72b033ef 2021-12-29 op * copyright notice and this permission notice appear in all copies.
7 72b033ef 2021-12-29 op *
8 72b033ef 2021-12-29 op * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
9 72b033ef 2021-12-29 op * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
10 72b033ef 2021-12-29 op * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
11 72b033ef 2021-12-29 op * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
12 72b033ef 2021-12-29 op * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
13 72b033ef 2021-12-29 op * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
14 72b033ef 2021-12-29 op * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
15 72b033ef 2021-12-29 op */
16 72b033ef 2021-12-29 op
17 72b033ef 2021-12-29 op #include "gmid.h"
18 72b033ef 2021-12-29 op
19 72b033ef 2021-12-29 op #include <ctype.h>
20 72b033ef 2021-12-29 op #include <errno.h>
21 72b033ef 2021-12-29 op #include <string.h>
22 72b033ef 2021-12-29 op
23 72b033ef 2021-12-29 op #define MIN(a, b) ((a) < (b) ? (a) : (b))
24 72b033ef 2021-12-29 op
25 72b033ef 2021-12-29 op static struct timeval handshake_timeout = { 5, 0 };
26 72b033ef 2021-12-29 op
27 72b033ef 2021-12-29 op static void proxy_tls_readcb(int, short, void *);
28 72b033ef 2021-12-29 op static void proxy_tls_writecb(int, short, void *);
29 72b033ef 2021-12-29 op static void proxy_read(struct bufferevent *, void *);
30 72b033ef 2021-12-29 op static void proxy_write(struct bufferevent *, void *);
31 72b033ef 2021-12-29 op static void proxy_error(struct bufferevent *, short, void *);
32 72b033ef 2021-12-29 op
33 72b033ef 2021-12-29 op static void
34 72b033ef 2021-12-29 op proxy_tls_readcb(int fd, short event, void *d)
35 72b033ef 2021-12-29 op {
36 72b033ef 2021-12-29 op struct bufferevent *bufev = d;
37 72b033ef 2021-12-29 op struct client *c = bufev->cbarg;
38 72b033ef 2021-12-29 op char buf[IBUF_READ_SIZE];
39 72b033ef 2021-12-29 op int what = EVBUFFER_READ;
40 72b033ef 2021-12-29 op int howmuch = IBUF_READ_SIZE;
41 72b033ef 2021-12-29 op int res;
42 72b033ef 2021-12-29 op ssize_t ret;
43 72b033ef 2021-12-29 op size_t len;
44 72b033ef 2021-12-29 op
45 72b033ef 2021-12-29 op if (event == EV_TIMEOUT) {
46 72b033ef 2021-12-29 op what |= EVBUFFER_TIMEOUT;
47 72b033ef 2021-12-29 op goto err;
48 72b033ef 2021-12-29 op }
49 72b033ef 2021-12-29 op
50 72b033ef 2021-12-29 op if (bufev->wm_read.high != 0)
51 72b033ef 2021-12-29 op howmuch = MIN(sizeof(buf), bufev->wm_read.high);
52 72b033ef 2021-12-29 op
53 72b033ef 2021-12-29 op switch (ret = tls_read(c->proxyctx, buf, howmuch)) {
54 72b033ef 2021-12-29 op case TLS_WANT_POLLIN:
55 72b033ef 2021-12-29 op case TLS_WANT_POLLOUT:
56 72b033ef 2021-12-29 op goto retry;
57 72b033ef 2021-12-29 op case -1:
58 72b033ef 2021-12-29 op what |= EVBUFFER_ERROR;
59 72b033ef 2021-12-29 op goto err;
60 72b033ef 2021-12-29 op }
61 72b033ef 2021-12-29 op len = ret;
62 72b033ef 2021-12-29 op
63 72b033ef 2021-12-29 op if (len == 0) {
64 72b033ef 2021-12-29 op what |= EVBUFFER_EOF;
65 72b033ef 2021-12-29 op goto err;
66 72b033ef 2021-12-29 op }
67 72b033ef 2021-12-29 op
68 72b033ef 2021-12-29 op res = evbuffer_add(bufev->input, buf, len);
69 72b033ef 2021-12-29 op if (res == -1) {
70 72b033ef 2021-12-29 op what |= EVBUFFER_ERROR;
71 72b033ef 2021-12-29 op goto err;
72 72b033ef 2021-12-29 op }
73 72b033ef 2021-12-29 op
74 72b033ef 2021-12-29 op event_add(&bufev->ev_read, NULL);
75 72b033ef 2021-12-29 op
76 72b033ef 2021-12-29 op len = EVBUFFER_LENGTH(bufev->input);
77 72b033ef 2021-12-29 op if (bufev->wm_read.low != 0 && len < bufev->wm_read.low)
78 72b033ef 2021-12-29 op return;
79 72b033ef 2021-12-29 op
80 72b033ef 2021-12-29 op if (bufev->readcb != NULL)
81 72b033ef 2021-12-29 op (*bufev->readcb)(bufev, bufev->cbarg);
82 72b033ef 2021-12-29 op return;
83 72b033ef 2021-12-29 op
84 72b033ef 2021-12-29 op retry:
85 72b033ef 2021-12-29 op event_add(&bufev->ev_read, NULL);
86 72b033ef 2021-12-29 op return;
87 72b033ef 2021-12-29 op
88 72b033ef 2021-12-29 op err:
89 72b033ef 2021-12-29 op (*bufev->errorcb)(bufev, what, bufev->cbarg);
90 72b033ef 2021-12-29 op }
91 72b033ef 2021-12-29 op
92 72b033ef 2021-12-29 op static void
93 72b033ef 2021-12-29 op proxy_tls_writecb(int fd, short event, void *d)
94 72b033ef 2021-12-29 op {
95 72b033ef 2021-12-29 op struct bufferevent *bufev = d;
96 72b033ef 2021-12-29 op struct client *c = bufev->cbarg;
97 72b033ef 2021-12-29 op ssize_t ret;
98 72b033ef 2021-12-29 op size_t len;
99 72b033ef 2021-12-29 op short what = EVBUFFER_WRITE;
100 72b033ef 2021-12-29 op
101 72b033ef 2021-12-29 op if (event & EV_TIMEOUT) {
102 72b033ef 2021-12-29 op what |= EVBUFFER_TIMEOUT;
103 72b033ef 2021-12-29 op goto err;
104 72b033ef 2021-12-29 op }
105 72b033ef 2021-12-29 op
106 72b033ef 2021-12-29 op if (EVBUFFER_LENGTH(bufev->output) != 0) {
107 72b033ef 2021-12-29 op ret = tls_write(c->proxyctx, EVBUFFER_DATA(bufev->output),
108 72b033ef 2021-12-29 op EVBUFFER_LENGTH(bufev->output));
109 72b033ef 2021-12-29 op switch (ret) {
110 72b033ef 2021-12-29 op case TLS_WANT_POLLIN:
111 72b033ef 2021-12-29 op case TLS_WANT_POLLOUT:
112 72b033ef 2021-12-29 op goto retry;
113 72b033ef 2021-12-29 op case -1:
114 72b033ef 2021-12-29 op what |= EVBUFFER_ERROR;
115 72b033ef 2021-12-29 op goto err;
116 72b033ef 2021-12-29 op }
117 72b033ef 2021-12-29 op len = ret;
118 72b033ef 2021-12-29 op
119 72b033ef 2021-12-29 op evbuffer_drain(bufev->output, len);
120 72b033ef 2021-12-29 op }
121 72b033ef 2021-12-29 op
122 72b033ef 2021-12-29 op if (EVBUFFER_LENGTH(bufev->output) != 0)
123 72b033ef 2021-12-29 op event_add(&bufev->ev_write, NULL);
124 72b033ef 2021-12-29 op
125 72b033ef 2021-12-29 op if (bufev->writecb != NULL &&
126 72b033ef 2021-12-29 op EVBUFFER_LENGTH(bufev->output) <= bufev->wm_write.low)
127 72b033ef 2021-12-29 op (*bufev->writecb)(bufev, bufev->cbarg);
128 72b033ef 2021-12-29 op return;
129 72b033ef 2021-12-29 op
130 72b033ef 2021-12-29 op retry:
131 72b033ef 2021-12-29 op event_add(&bufev->ev_write, NULL);
132 72b033ef 2021-12-29 op return;
133 72b033ef 2021-12-29 op
134 72b033ef 2021-12-29 op err:
135 72b033ef 2021-12-29 op (*bufev->errorcb)(bufev, what, bufev->cbarg);
136 72b033ef 2021-12-29 op }
137 72b033ef 2021-12-29 op
138 72b033ef 2021-12-29 op static void
139 72b033ef 2021-12-29 op proxy_read(struct bufferevent *bev, void *d)
140 72b033ef 2021-12-29 op {
141 72b033ef 2021-12-29 op struct client *c = d;
142 72b033ef 2021-12-29 op struct evbuffer *src = EVBUFFER_INPUT(bev);
143 72b033ef 2021-12-29 op char *hdr;
144 72b033ef 2021-12-29 op size_t len;
145 72b033ef 2021-12-29 op int code;
146 72b033ef 2021-12-29 op
147 72b033ef 2021-12-29 op /* intercept the header */
148 72b033ef 2021-12-29 op if (c->code == 0) {
149 72b033ef 2021-12-29 op hdr = evbuffer_readln(src, &len, EVBUFFER_EOL_CRLF_STRICT);
150 72b033ef 2021-12-29 op if (hdr == NULL) {
151 72b033ef 2021-12-29 op /* max reply + \r\n */
152 72b033ef 2021-12-29 op if (EVBUFFER_LENGTH(src) > 1029) {
153 72b033ef 2021-12-29 op log_warn(c, "upstream server is trying to "
154 72b033ef 2021-12-29 op "send a header that's too long.");
155 72b033ef 2021-12-29 op proxy_error(bev, EVBUFFER_READ, c);
156 72b033ef 2021-12-29 op }
157 72b033ef 2021-12-29 op
158 72b033ef 2021-12-29 op /* wait a bit */
159 72b033ef 2021-12-29 op return;
160 72b033ef 2021-12-29 op }
161 72b033ef 2021-12-29 op
162 72b033ef 2021-12-29 op if (len < 3 || len > 1029 ||
163 72b033ef 2021-12-29 op !isdigit(hdr[0]) ||
164 72b033ef 2021-12-29 op !isdigit(hdr[1]) ||
165 72b033ef 2021-12-29 op !isspace(hdr[2])) {
166 72b033ef 2021-12-29 op free(hdr);
167 72b033ef 2021-12-29 op log_warn(c, "upstream server is trying to send a "
168 72b033ef 2021-12-29 op "header that's too long.");
169 72b033ef 2021-12-29 op proxy_error(bev, EVBUFFER_READ, c);
170 72b033ef 2021-12-29 op return;
171 72b033ef 2021-12-29 op }
172 72b033ef 2021-12-29 op
173 72b033ef 2021-12-29 op c->header = hdr;
174 72b033ef 2021-12-29 op code = (hdr[0] - '0') * 10 + (hdr[1] - '0');
175 72b033ef 2021-12-29 op
176 72b033ef 2021-12-29 op if (code < 10 || code >= 70) {
177 72b033ef 2021-12-29 op log_warn(c, "upstream server is trying to send an "
178 72b033ef 2021-12-29 op "invalid reply code: %d", code);
179 72b033ef 2021-12-29 op proxy_error(bev, EVBUFFER_READ, c);
180 72b033ef 2021-12-29 op return;
181 72b033ef 2021-12-29 op }
182 72b033ef 2021-12-29 op
183 72b033ef 2021-12-29 op start_reply(c, code, hdr + 3);
184 72b033ef 2021-12-29 op
185 72b033ef 2021-12-29 op if (c->code < 20 || c->code > 29) {
186 72b033ef 2021-12-29 op proxy_error(bev, EVBUFFER_EOF, c);
187 72b033ef 2021-12-29 op return;
188 72b033ef 2021-12-29 op }
189 72b033ef 2021-12-29 op }
190 72b033ef 2021-12-29 op
191 72b033ef 2021-12-29 op bufferevent_write_buffer(c->bev, src);
192 72b033ef 2021-12-29 op }
193 72b033ef 2021-12-29 op
194 72b033ef 2021-12-29 op static void
195 72b033ef 2021-12-29 op proxy_write(struct bufferevent *bev, void *d)
196 72b033ef 2021-12-29 op {
197 72b033ef 2021-12-29 op struct evbuffer *dst = EVBUFFER_OUTPUT(bev);
198 72b033ef 2021-12-29 op
199 72b033ef 2021-12-29 op /* request successfully sent */
200 72b033ef 2021-12-29 op if (EVBUFFER_LENGTH(dst) == 0)
201 72b033ef 2021-12-29 op bufferevent_disable(bev, EV_WRITE);
202 72b033ef 2021-12-29 op }
203 72b033ef 2021-12-29 op
204 72b033ef 2021-12-29 op static void
205 72b033ef 2021-12-29 op proxy_error(struct bufferevent *bev, short error, void *d)
206 72b033ef 2021-12-29 op {
207 72b033ef 2021-12-29 op struct client *c = d;
208 72b033ef 2021-12-29 op
209 72b033ef 2021-12-29 op /*
210 72b033ef 2021-12-29 op * If we're here it means that some kind of non-recoverable
211 72b033ef 2021-12-29 op * error appened.
212 72b033ef 2021-12-29 op */
213 72b033ef 2021-12-29 op
214 72b033ef 2021-12-29 op bufferevent_free(bev);
215 72b033ef 2021-12-29 op c->proxybev = NULL;
216 72b033ef 2021-12-29 op
217 72b033ef 2021-12-29 op tls_free(c->proxyctx);
218 72b033ef 2021-12-29 op c->proxyctx = NULL;
219 72b033ef 2021-12-29 op
220 72b033ef 2021-12-29 op close(c->pfd);
221 72b033ef 2021-12-29 op c->pfd = -1;
222 72b033ef 2021-12-29 op
223 72b033ef 2021-12-29 op /* EOF and no header */
224 72b033ef 2021-12-29 op if (c->code == 0) {
225 72b033ef 2021-12-29 op start_reply(c, PROXY_ERROR, "protocol error");
226 72b033ef 2021-12-29 op return;
227 72b033ef 2021-12-29 op }
228 72b033ef 2021-12-29 op
229 72b033ef 2021-12-29 op c->type = REQUEST_DONE;
230 72b033ef 2021-12-29 op client_write(c->bev, c);
231 72b033ef 2021-12-29 op }
232 72b033ef 2021-12-29 op
233 72b033ef 2021-12-29 op static void
234 593e412b 2022-01-01 op proxy_enqueue_req(struct client *c)
235 72b033ef 2021-12-29 op {
236 b7967bc1 2022-01-02 op struct proxy *p = c->proxy;
237 72b033ef 2021-12-29 op struct evbuffer *evb;
238 72b033ef 2021-12-29 op char iribuf[GEMINI_URL_LEN];
239 593e412b 2022-01-01 op
240 593e412b 2022-01-01 op c->proxybev = bufferevent_new(c->pfd, proxy_read, proxy_write,
241 593e412b 2022-01-01 op proxy_error, c);
242 593e412b 2022-01-01 op if (c->proxybev == NULL)
243 593e412b 2022-01-01 op fatal("can't allocate bufferevent: %s", strerror(errno));
244 593e412b 2022-01-01 op
245 593e412b 2022-01-01 op if (!p->notls) {
246 593e412b 2022-01-01 op event_set(&c->proxybev->ev_read, c->pfd, EV_READ,
247 593e412b 2022-01-01 op proxy_tls_readcb, c->proxybev);
248 593e412b 2022-01-01 op event_set(&c->proxybev->ev_write, c->pfd, EV_WRITE,
249 593e412b 2022-01-01 op proxy_tls_writecb, c->proxybev);
250 593e412b 2022-01-01 op
251 593e412b 2022-01-01 op #if HAVE_LIBEVENT2
252 593e412b 2022-01-01 op evbuffer_unfreeze(c->proxybev->input, 0);
253 593e412b 2022-01-01 op evbuffer_unfreeze(c->proxybev->output, 1);
254 593e412b 2022-01-01 op #endif
255 593e412b 2022-01-01 op }
256 72b033ef 2021-12-29 op
257 593e412b 2022-01-01 op serialize_iri(&c->iri, iribuf, sizeof(iribuf));
258 593e412b 2022-01-01 op
259 593e412b 2022-01-01 op evb = EVBUFFER_OUTPUT(c->proxybev);
260 593e412b 2022-01-01 op evbuffer_add_printf(evb, "%s\r\n", iribuf);
261 593e412b 2022-01-01 op
262 593e412b 2022-01-01 op bufferevent_enable(c->proxybev, EV_READ|EV_WRITE);
263 593e412b 2022-01-01 op }
264 593e412b 2022-01-01 op
265 593e412b 2022-01-01 op static void
266 593e412b 2022-01-01 op proxy_handshake(int fd, short event, void *d)
267 593e412b 2022-01-01 op {
268 593e412b 2022-01-01 op struct client *c = d;
269 593e412b 2022-01-01 op
270 72b033ef 2021-12-29 op if (event == EV_TIMEOUT) {
271 72b033ef 2021-12-29 op start_reply(c, PROXY_ERROR, "timeout");
272 72b033ef 2021-12-29 op return;
273 72b033ef 2021-12-29 op }
274 72b033ef 2021-12-29 op
275 72b033ef 2021-12-29 op switch (tls_handshake(c->proxyctx)) {
276 72b033ef 2021-12-29 op case TLS_WANT_POLLIN:
277 72b033ef 2021-12-29 op event_set(&c->proxyev, fd, EV_READ, proxy_handshake, c);
278 72b033ef 2021-12-29 op event_add(&c->proxyev, &handshake_timeout);
279 72b033ef 2021-12-29 op return;
280 72b033ef 2021-12-29 op case TLS_WANT_POLLOUT:
281 72b033ef 2021-12-29 op event_set(&c->proxyev, fd, EV_WRITE, proxy_handshake, c);
282 72b033ef 2021-12-29 op event_add(&c->proxyev, &handshake_timeout);
283 72b033ef 2021-12-29 op return;
284 72b033ef 2021-12-29 op case -1:
285 72b033ef 2021-12-29 op log_warn(c, "handshake with proxy failed: %s",
286 72b033ef 2021-12-29 op tls_error(c->proxyctx));
287 72b033ef 2021-12-29 op start_reply(c, PROXY_ERROR, "handshake failed");
288 72b033ef 2021-12-29 op return;
289 72b033ef 2021-12-29 op }
290 72b033ef 2021-12-29 op
291 593e412b 2022-01-01 op proxy_enqueue_req(c);
292 72b033ef 2021-12-29 op }
293 72b033ef 2021-12-29 op
294 593e412b 2022-01-01 op static int
295 593e412b 2022-01-01 op proxy_setup_tls(struct client *c)
296 72b033ef 2021-12-29 op {
297 b7967bc1 2022-01-02 op struct proxy *p = c->proxy;
298 72b033ef 2021-12-29 op struct tls_config *conf = NULL;
299 72b033ef 2021-12-29 op
300 72b033ef 2021-12-29 op if ((conf = tls_config_new()) == NULL)
301 72b033ef 2021-12-29 op return -1;
302 72b033ef 2021-12-29 op
303 5128c0b0 2022-01-01 op if (p->noverifyname)
304 5128c0b0 2022-01-01 op tls_config_insecure_noverifyname(conf);
305 5128c0b0 2022-01-01 op
306 72b033ef 2021-12-29 op tls_config_insecure_noverifycert(conf);
307 c7c8ef44 2022-01-01 op tls_config_set_protocols(conf, p->protocols);
308 72b033ef 2021-12-29 op
309 7bdcc91e 2022-01-01 op if (p->cert != NULL) {
310 d49093c1 2022-01-01 op int r;
311 d49093c1 2022-01-01 op
312 7bdcc91e 2022-01-01 op r = tls_config_set_cert_mem(conf, p->cert, p->certlen);
313 d49093c1 2022-01-01 op if (r == -1)
314 d49093c1 2022-01-01 op goto err;
315 d49093c1 2022-01-01 op
316 7bdcc91e 2022-01-01 op r = tls_config_set_key_mem(conf, p->key, p->keylen);
317 d49093c1 2022-01-01 op if (r == -1)
318 d49093c1 2022-01-01 op goto err;
319 d49093c1 2022-01-01 op }
320 d49093c1 2022-01-01 op
321 72b033ef 2021-12-29 op if ((c->proxyctx = tls_client()) == NULL)
322 72b033ef 2021-12-29 op goto err;
323 72b033ef 2021-12-29 op
324 72b033ef 2021-12-29 op if (tls_configure(c->proxyctx, conf) == -1)
325 72b033ef 2021-12-29 op goto err;
326 72b033ef 2021-12-29 op
327 b7967bc1 2022-01-02 op if (tls_connect_socket(c->proxyctx, c->pfd, p->host) == -1)
328 72b033ef 2021-12-29 op goto err;
329 72b033ef 2021-12-29 op
330 72b033ef 2021-12-29 op event_set(&c->proxyev, c->pfd, EV_READ|EV_WRITE, proxy_handshake, c);
331 72b033ef 2021-12-29 op event_add(&c->proxyev, &handshake_timeout);
332 72b033ef 2021-12-29 op
333 72b033ef 2021-12-29 op tls_config_free(conf);
334 72b033ef 2021-12-29 op return 0;
335 72b033ef 2021-12-29 op
336 72b033ef 2021-12-29 op err:
337 72b033ef 2021-12-29 op tls_config_free(conf);
338 593e412b 2022-01-01 op if (c->proxyctx != NULL) {
339 72b033ef 2021-12-29 op tls_free(c->proxyctx);
340 593e412b 2022-01-01 op c->proxyctx = NULL;
341 593e412b 2022-01-01 op }
342 72b033ef 2021-12-29 op return -1;
343 72b033ef 2021-12-29 op }
344 593e412b 2022-01-01 op
345 593e412b 2022-01-01 op int
346 593e412b 2022-01-01 op proxy_init(struct client *c)
347 593e412b 2022-01-01 op {
348 b7967bc1 2022-01-02 op struct proxy *p = c->proxy;
349 593e412b 2022-01-01 op
350 593e412b 2022-01-01 op c->type = REQUEST_PROXY;
351 593e412b 2022-01-01 op
352 593e412b 2022-01-01 op if (p->notls) {
353 593e412b 2022-01-01 op proxy_enqueue_req(c);
354 593e412b 2022-01-01 op return 0;
355 593e412b 2022-01-01 op }
356 593e412b 2022-01-01 op
357 593e412b 2022-01-01 op return proxy_setup_tls(c);
358 593e412b 2022-01-01 op }