1 5e11c00c 2021-03-02 op /*
  2 5e11c00c 2021-03-02 op  * Copyright (c) 2021 Omar Polo <op@omarpolo.com>
  3 5e11c00c 2021-03-02 op  *
  4 5e11c00c 2021-03-02 op  * Permission to use, copy, modify, and distribute this software for any
  5 5e11c00c 2021-03-02 op  * purpose with or without fee is hereby granted, provided that the above
  6 5e11c00c 2021-03-02 op  * copyright notice and this permission notice appear in all copies.
  7 5e11c00c 2021-03-02 op  *
  8 5e11c00c 2021-03-02 op  * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
  9 5e11c00c 2021-03-02 op  * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
 10 5e11c00c 2021-03-02 op  * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
 11 5e11c00c 2021-03-02 op  * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
 12 5e11c00c 2021-03-02 op  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
 13 5e11c00c 2021-03-02 op  * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
 14 5e11c00c 2021-03-02 op  * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
 15 5e11c00c 2021-03-02 op  */
 16 5e11c00c 2021-03-02 op 
 17 5e11c00c 2021-03-02 op /*
 18 5e11c00c 2021-03-02 op  * TODO:
 19 5e11c00c 2021-03-02 op  *  - move the various
 20 5e11c00c 2021-03-02 op  *	imsg_compose(...);
 21 5e11c00c 2021-03-02 op  *	imsg_flush(...);
 22 5e11c00c 2021-03-02 op  *    to something more asynchronous
 23 5e11c00c 2021-03-02 op  */
 24 5e11c00c 2021-03-02 op 
 25 5e11c00c 2021-03-02 op #include <telescope.h>
 26 5e11c00c 2021-03-02 op 
 27 5e11c00c 2021-03-02 op #include <sys/types.h>
 28 5e11c00c 2021-03-02 op #include <sys/socket.h>
 29 5e11c00c 2021-03-02 op 
 30 5e11c00c 2021-03-02 op #include <netinet/in.h>
 31 5e11c00c 2021-03-02 op 
 32 5e11c00c 2021-03-02 op #include <assert.h>
 33 5e11c00c 2021-03-02 op #include <ctype.h>
 34 5e11c00c 2021-03-02 op #include <errno.h>
 35 5e11c00c 2021-03-02 op #include <event.h>
 36 5e11c00c 2021-03-02 op #include <netdb.h>
 37 5e11c00c 2021-03-02 op #include <stdarg.h>
 38 5e11c00c 2021-03-02 op #include <stdio.h>
 39 5e11c00c 2021-03-02 op #include <stdlib.h>
 40 5e11c00c 2021-03-02 op #include <string.h>
 41 5e11c00c 2021-03-02 op #include <tls.h>
 42 5e11c00c 2021-03-02 op #include <unistd.h>
 43 5e11c00c 2021-03-02 op 
 44 5e11c00c 2021-03-02 op static struct tls_config	*tlsconf;
 45 5e11c00c 2021-03-02 op static struct imsgbuf		*ibuf;
 46 5e11c00c 2021-03-02 op 
 47 5e11c00c 2021-03-02 op struct req;
 48 5e11c00c 2021-03-02 op 
 49 5e11c00c 2021-03-02 op static void		 die(void) __attribute__((__noreturn__));
 50 5e11c00c 2021-03-02 op static char		*xasprintf(const char*, ...);
 51 5e11c00c 2021-03-02 op static int 		 conn_towards(struct url*, char**);
 52 5e11c00c 2021-03-02 op 
 53 5e11c00c 2021-03-02 op static void		 close_with_err(struct req*, const char *err);
 54 5e11c00c 2021-03-02 op static struct req	*req_by_id(uint32_t);
 55 5e11c00c 2021-03-02 op 
 56 5e11c00c 2021-03-02 op static void		 do_handshake(int, short, void*);
 57 5e11c00c 2021-03-02 op static void		 write_request(int, short, void*);
 58 5e11c00c 2021-03-02 op static void		 read_reply(int, short, void*);
 59 5e11c00c 2021-03-02 op static void		 parse_reply(struct req*);
 60 5e11c00c 2021-03-02 op static void		 copy_body(int, short, void*);
 61 5e11c00c 2021-03-02 op 
 62 5e11c00c 2021-03-02 op static void		 check_special_page(struct req*, const char*);
 63 5e11c00c 2021-03-02 op 
 64 5e11c00c 2021-03-02 op static void		 handle_get(struct imsg*, size_t);
 65 5e11c00c 2021-03-02 op static void		 handle_cert_status(struct imsg*, size_t);
 66 0972d8b2 2021-03-02 op static void		 handle_proceed(struct imsg*, size_t);
 67 5e11c00c 2021-03-02 op static void		 handle_stop(struct imsg*, size_t);
 68 5e11c00c 2021-03-02 op static void		 handle_quit(struct imsg*, size_t);
 69 5e11c00c 2021-03-02 op 
 70 5e11c00c 2021-03-02 op static imsg_handlerfn *handlers[] = {
 71 5e11c00c 2021-03-02 op 	[IMSG_GET] = handle_get,
 72 5e11c00c 2021-03-02 op 	[IMSG_CERT_STATUS] = handle_cert_status,
 73 0972d8b2 2021-03-02 op 	[IMSG_PROCEED] = handle_proceed,
 74 5e11c00c 2021-03-02 op 	[IMSG_STOP] = handle_stop,
 75 5e11c00c 2021-03-02 op 	[IMSG_QUIT] = handle_quit,
 76 5e11c00c 2021-03-02 op };
 77 5e11c00c 2021-03-02 op 
 78 5e11c00c 2021-03-02 op typedef void (*statefn)(int, short, void*);
 79 5e11c00c 2021-03-02 op 
 80 5e11c00c 2021-03-02 op TAILQ_HEAD(, req) reqhead;
 81 5e11c00c 2021-03-02 op /* a pending request */
 82 5e11c00c 2021-03-02 op struct req {
 83 5e11c00c 2021-03-02 op 	struct event		 ev;
 84 5e11c00c 2021-03-02 op 	struct url		 url;
 85 5e11c00c 2021-03-02 op 	uint32_t		 id;
 86 5e11c00c 2021-03-02 op 	int			 fd;
 87 5e11c00c 2021-03-02 op 	struct tls		*ctx;
 88 5e11c00c 2021-03-02 op 	char			 buf[1024];
 89 5e11c00c 2021-03-02 op 	size_t			 off;
 90 5e11c00c 2021-03-02 op 	TAILQ_ENTRY(req)	 reqs;
 91 5e11c00c 2021-03-02 op };
 92 5e11c00c 2021-03-02 op 
 93 5e11c00c 2021-03-02 op static inline void
 94 5e11c00c 2021-03-02 op yield_r(struct req *req, statefn fn, struct timeval *tv)
 95 5e11c00c 2021-03-02 op {
 96 5e11c00c 2021-03-02 op 	event_once(req->fd, EV_READ, fn, req, tv);
 97 5e11c00c 2021-03-02 op }
 98 5e11c00c 2021-03-02 op 
 99 5e11c00c 2021-03-02 op static inline void
100 5e11c00c 2021-03-02 op yield_w(struct req *req, statefn fn, struct timeval *tv)
101 5e11c00c 2021-03-02 op {
102 5e11c00c 2021-03-02 op 	event_once(req->fd, EV_WRITE, fn, req, tv);
103 5e11c00c 2021-03-02 op }
104 5e11c00c 2021-03-02 op 
105 5e11c00c 2021-03-02 op static inline void
106 5e11c00c 2021-03-02 op advance_buf(struct req *req, size_t len)
107 5e11c00c 2021-03-02 op {
108 5e11c00c 2021-03-02 op 	assert(len <= req->off);
109 5e11c00c 2021-03-02 op 
110 5e11c00c 2021-03-02 op 	req->off -= len;
111 5e11c00c 2021-03-02 op 	memmove(req->buf, req->buf + len, req->off);
112 5e11c00c 2021-03-02 op }
113 5e11c00c 2021-03-02 op 
114 5e11c00c 2021-03-02 op static void __attribute__((__noreturn__))
115 5e11c00c 2021-03-02 op die(void)
116 5e11c00c 2021-03-02 op {
117 5e11c00c 2021-03-02 op 	abort(); 		/* TODO */
118 5e11c00c 2021-03-02 op }
119 5e11c00c 2021-03-02 op 
120 5e11c00c 2021-03-02 op static char *
121 5e11c00c 2021-03-02 op xasprintf(const char *fmt, ...)
122 5e11c00c 2021-03-02 op {
123 5e11c00c 2021-03-02 op 	va_list ap;
124 5e11c00c 2021-03-02 op 	char *s;
125 5e11c00c 2021-03-02 op 
126 5e11c00c 2021-03-02 op 	va_start(ap, fmt);
127 5e11c00c 2021-03-02 op 	if (vasprintf(&s, fmt, ap) == -1)
128 5e11c00c 2021-03-02 op 		s = NULL;
129 5e11c00c 2021-03-02 op 	va_end(ap);
130 5e11c00c 2021-03-02 op 
131 5e11c00c 2021-03-02 op 	return s;
132 5e11c00c 2021-03-02 op }
133 5e11c00c 2021-03-02 op 
134 5e11c00c 2021-03-02 op static int
135 5e11c00c 2021-03-02 op conn_towards(struct url *url, char **err)
136 5e11c00c 2021-03-02 op {
137 5e11c00c 2021-03-02 op 	struct addrinfo	 hints, *servinfo, *p;
138 5e11c00c 2021-03-02 op 	int		 status, sock;
139 5e11c00c 2021-03-02 op 	const char	*proto = "1965";
140 5e11c00c 2021-03-02 op 
141 5e11c00c 2021-03-02 op 	*err = NULL;
142 5e11c00c 2021-03-02 op 
143 5e11c00c 2021-03-02 op 	if (*url->port != '\0')
144 5e11c00c 2021-03-02 op 		proto = url->port;
145 5e11c00c 2021-03-02 op 
146 5e11c00c 2021-03-02 op 	memset(&hints, 0, sizeof(hints));
147 5e11c00c 2021-03-02 op 	hints.ai_family = AF_UNSPEC;
148 5e11c00c 2021-03-02 op 	hints.ai_socktype = SOCK_STREAM;
149 5e11c00c 2021-03-02 op 
150 5e11c00c 2021-03-02 op 	if ((status = getaddrinfo(url->host, proto, &hints, &servinfo))) {
151 5e11c00c 2021-03-02 op 		*err = xasprintf("failed to resolve %s: %s",
152 5e11c00c 2021-03-02 op 		    url->host, gai_strerror(status));
153 5e11c00c 2021-03-02 op 		return -1;
154 5e11c00c 2021-03-02 op 	}
155 5e11c00c 2021-03-02 op 
156 5e11c00c 2021-03-02 op 	sock = -1;
157 5e11c00c 2021-03-02 op 	for (p = servinfo; p != NULL; p = p->ai_next) {
158 5e11c00c 2021-03-02 op 		if ((sock = socket(p->ai_family, p->ai_socktype, p->ai_protocol)) == -1)
159 5e11c00c 2021-03-02 op 			continue;
160 5e11c00c 2021-03-02 op 		if (connect(sock, p->ai_addr, p->ai_addrlen) != -1)
161 5e11c00c 2021-03-02 op 			break;
162 5e11c00c 2021-03-02 op 		close(sock);
163 5e11c00c 2021-03-02 op 	}
164 5e11c00c 2021-03-02 op 
165 5e11c00c 2021-03-02 op 	if (sock == -1)
166 5e11c00c 2021-03-02 op 		*err = xasprintf("couldn't connect to %s", url->host);
167 5e11c00c 2021-03-02 op 	else
168 5e11c00c 2021-03-02 op 		mark_nonblock(sock);
169 5e11c00c 2021-03-02 op 
170 5e11c00c 2021-03-02 op 	freeaddrinfo(servinfo);
171 5e11c00c 2021-03-02 op 	return sock;
172 5e11c00c 2021-03-02 op }
173 5e11c00c 2021-03-02 op 
174 5e11c00c 2021-03-02 op static struct req *
175 5e11c00c 2021-03-02 op req_by_id(uint32_t id)
176 5e11c00c 2021-03-02 op {
177 5e11c00c 2021-03-02 op 	struct req *r;
178 5e11c00c 2021-03-02 op 
179 5e11c00c 2021-03-02 op 	TAILQ_FOREACH(r, &reqhead, reqs) {
180 5e11c00c 2021-03-02 op 		if (r->id == id)
181 5e11c00c 2021-03-02 op 			return r;
182 5e11c00c 2021-03-02 op 	}
183 5e11c00c 2021-03-02 op 
184 5e11c00c 2021-03-02 op 	die();
185 5e11c00c 2021-03-02 op }
186 5e11c00c 2021-03-02 op 
187 5e11c00c 2021-03-02 op static void
188 5e11c00c 2021-03-02 op close_conn(int fd, short ev, void *d)
189 5e11c00c 2021-03-02 op {
190 5e11c00c 2021-03-02 op 	struct req	*req = d;
191 5e11c00c 2021-03-02 op 
192 5e11c00c 2021-03-02 op 	if (req->ctx != NULL) {
193 5e11c00c 2021-03-02 op 		switch (tls_close(req->ctx)) {
194 5e11c00c 2021-03-02 op 		case TLS_WANT_POLLIN:
195 5e11c00c 2021-03-02 op 			yield_r(req, close_conn, NULL);
196 5e11c00c 2021-03-02 op 			return;
197 5e11c00c 2021-03-02 op 		case TLS_WANT_POLLOUT:
198 5e11c00c 2021-03-02 op 			yield_w(req, close_conn, NULL);
199 5e11c00c 2021-03-02 op 			return;
200 5e11c00c 2021-03-02 op 		}
201 5e11c00c 2021-03-02 op 
202 5e11c00c 2021-03-02 op 		tls_free(req->ctx);
203 5e11c00c 2021-03-02 op 	}
204 5e11c00c 2021-03-02 op 
205 5e11c00c 2021-03-02 op 	TAILQ_REMOVE(&reqhead, req, reqs);
206 5e11c00c 2021-03-02 op 	if (req->fd != -1)
207 5e11c00c 2021-03-02 op 		close(req->fd);
208 5e11c00c 2021-03-02 op 	free(req);
209 5e11c00c 2021-03-02 op }
210 5e11c00c 2021-03-02 op 
211 5e11c00c 2021-03-02 op static void
212 5e11c00c 2021-03-02 op close_with_err(struct req *req, const char *err)
213 5e11c00c 2021-03-02 op {
214 5e11c00c 2021-03-02 op 	imsg_compose(ibuf, IMSG_ERR, req->id, 0, -1, err, strlen(err)+1);
215 5e11c00c 2021-03-02 op 	imsg_flush(ibuf);
216 5e11c00c 2021-03-02 op 	close_conn(0, 0, req);
217 5e11c00c 2021-03-02 op }
218 5e11c00c 2021-03-02 op 
219 5e11c00c 2021-03-02 op static void
220 5e11c00c 2021-03-02 op do_handshake(int fd, short ev, void *d)
221 5e11c00c 2021-03-02 op {
222 5e11c00c 2021-03-02 op 	struct req	*req = d;
223 5e11c00c 2021-03-02 op 	const char	*hash;
224 5e11c00c 2021-03-02 op 
225 5e11c00c 2021-03-02 op 	switch (tls_handshake(req->ctx)) {
226 5e11c00c 2021-03-02 op 	case TLS_WANT_POLLIN:
227 5e11c00c 2021-03-02 op 		yield_r(req, do_handshake, NULL);
228 5e11c00c 2021-03-02 op 		return;
229 5e11c00c 2021-03-02 op 	case TLS_WANT_POLLOUT:
230 5e11c00c 2021-03-02 op 		yield_w(req, do_handshake, NULL);
231 5e11c00c 2021-03-02 op 		return;
232 5e11c00c 2021-03-02 op 	}
233 5e11c00c 2021-03-02 op 
234 5e11c00c 2021-03-02 op 	hash = tls_peer_cert_hash(req->ctx);
235 5e11c00c 2021-03-02 op 	imsg_compose(ibuf, IMSG_CHECK_CERT, req->id, 0, -1, hash, strlen(hash)+1);
236 5e11c00c 2021-03-02 op 	imsg_flush(ibuf);
237 5e11c00c 2021-03-02 op }
238 5e11c00c 2021-03-02 op 
239 5e11c00c 2021-03-02 op static void
240 5e11c00c 2021-03-02 op write_request(int fd, short ev, void *d)
241 5e11c00c 2021-03-02 op {
242 5e11c00c 2021-03-02 op 	struct req	*req = d;
243 5e11c00c 2021-03-02 op 	ssize_t		 r;
244 5e11c00c 2021-03-02 op 	size_t		 len;
245 5e11c00c 2021-03-02 op 	char		 buf[1024], *err;
246 5e11c00c 2021-03-02 op 
247 5e11c00c 2021-03-02 op 	strlcpy(buf, "gemini://", sizeof(buf));
248 5e11c00c 2021-03-02 op 	strlcat(buf, req->url.host, sizeof(buf));
249 5e11c00c 2021-03-02 op 	strlcat(buf, "/", sizeof(buf));
250 5e11c00c 2021-03-02 op 	strlcat(buf, req->url.path, sizeof(buf));
251 5e11c00c 2021-03-02 op 
252 5e11c00c 2021-03-02 op 	if (req->url.query[0] != '\0') {
253 5e11c00c 2021-03-02 op 		strlcat(buf, "?", sizeof(buf));
254 5e11c00c 2021-03-02 op 		strlcat(buf, req->url.query, sizeof(buf));
255 5e11c00c 2021-03-02 op 	}
256 5e11c00c 2021-03-02 op 
257 5e11c00c 2021-03-02 op 	len = strlcat(buf, "\r\n", sizeof(buf));
258 5e11c00c 2021-03-02 op 
259 5e11c00c 2021-03-02 op 	assert(len <= sizeof(buf));
260 5e11c00c 2021-03-02 op 
261 5e11c00c 2021-03-02 op 	switch (r = tls_write(req->ctx, buf, len)) {
262 5e11c00c 2021-03-02 op 	case -1:
263 5e11c00c 2021-03-02 op 		err = xasprintf("tls_write: %s", tls_error(req->ctx));
264 5e11c00c 2021-03-02 op 		close_with_err(req, err);
265 5e11c00c 2021-03-02 op 		free(err);
266 5e11c00c 2021-03-02 op 		break;
267 5e11c00c 2021-03-02 op 	case TLS_WANT_POLLIN:
268 5e11c00c 2021-03-02 op 		yield_r(req, write_request, NULL);
269 5e11c00c 2021-03-02 op 		break;
270 5e11c00c 2021-03-02 op 	case TLS_WANT_POLLOUT:
271 5e11c00c 2021-03-02 op 		yield_w(req, write_request, NULL);
272 5e11c00c 2021-03-02 op 		break;
273 5e11c00c 2021-03-02 op 	default:
274 5e11c00c 2021-03-02 op 		/* assume r == len */
275 5e11c00c 2021-03-02 op 		(void)r;
276 5e11c00c 2021-03-02 op 		yield_r(req, read_reply, NULL);
277 5e11c00c 2021-03-02 op 		break;
278 5e11c00c 2021-03-02 op 	}
279 5e11c00c 2021-03-02 op }
280 5e11c00c 2021-03-02 op 
281 5e11c00c 2021-03-02 op static void
282 5e11c00c 2021-03-02 op read_reply(int fd, short ev, void *d)
283 5e11c00c 2021-03-02 op {
284 5e11c00c 2021-03-02 op 	struct req	*req = d;
285 5e11c00c 2021-03-02 op 	size_t		 len;
286 5e11c00c 2021-03-02 op 	ssize_t		 r;
287 5e11c00c 2021-03-02 op 	char		*buf, *e;
288 5e11c00c 2021-03-02 op 
289 5e11c00c 2021-03-02 op 	buf = req->buf + req->off;
290 5e11c00c 2021-03-02 op 	len = sizeof(req->buf) - req->off;
291 5e11c00c 2021-03-02 op 
292 5e11c00c 2021-03-02 op 	switch (r = tls_read(req->ctx, buf, len)) {
293 5e11c00c 2021-03-02 op 	case -1:
294 5e11c00c 2021-03-02 op 		e = xasprintf("tls_read: %s", tls_error(req->ctx));
295 5e11c00c 2021-03-02 op 		close_with_err(req, e);
296 5e11c00c 2021-03-02 op 		free(e);
297 5e11c00c 2021-03-02 op 		break;
298 5e11c00c 2021-03-02 op 	case TLS_WANT_POLLIN:
299 5e11c00c 2021-03-02 op 		yield_r(req, read_reply, NULL);
300 5e11c00c 2021-03-02 op 		break;
301 5e11c00c 2021-03-02 op 	case TLS_WANT_POLLOUT:
302 5e11c00c 2021-03-02 op 		yield_w(req, read_reply, NULL);
303 5e11c00c 2021-03-02 op 		break;
304 5e11c00c 2021-03-02 op 	default:
305 5e11c00c 2021-03-02 op 		req->off += r;
306 5e11c00c 2021-03-02 op 
307 5e11c00c 2021-03-02 op 		/* TODO: really watch for \r\n not \n alone */
308 5e11c00c 2021-03-02 op 		if ((e = telescope_strnchr(req->buf, '\n', req->off)) != NULL)
309 5e11c00c 2021-03-02 op 			parse_reply(req);
310 5e11c00c 2021-03-02 op 		else if (req->off == sizeof(req->buf))
311 5e11c00c 2021-03-02 op 			close_with_err(req, "invalid response");
312 5e11c00c 2021-03-02 op 		else
313 5e11c00c 2021-03-02 op 			yield_r(req, read_reply, NULL);
314 5e11c00c 2021-03-02 op 		break;
315 5e11c00c 2021-03-02 op 	}
316 5e11c00c 2021-03-02 op }
317 5e11c00c 2021-03-02 op 
318 5e11c00c 2021-03-02 op static void
319 5e11c00c 2021-03-02 op parse_reply(struct req *req)
320 5e11c00c 2021-03-02 op {
321 5e11c00c 2021-03-02 op 	int	 code;
322 5e11c00c 2021-03-02 op 	char	*e;
323 5e11c00c 2021-03-02 op 	size_t	 len;
324 5e11c00c 2021-03-02 op 
325 5e11c00c 2021-03-02 op 	if (req->off < 4)
326 5e11c00c 2021-03-02 op 		goto err;
327 5e11c00c 2021-03-02 op 
328 5e11c00c 2021-03-02 op 	if (!isdigit(req->buf[0]) || !isdigit(req->buf[1]))
329 5e11c00c 2021-03-02 op 		goto err;
330 5e11c00c 2021-03-02 op 
331 5e11c00c 2021-03-02 op 	code = (req->buf[0] - '0')*10 + (req->buf[1] - '0');
332 5e11c00c 2021-03-02 op 
333 5e11c00c 2021-03-02 op 	if (!isspace(req->buf[2]))
334 5e11c00c 2021-03-02 op 		goto err;
335 5e11c00c 2021-03-02 op 
336 5e11c00c 2021-03-02 op 	advance_buf(req, 3);
337 5e11c00c 2021-03-02 op 	if ((e = telescope_strnchr(req->buf, '\r', req->off)) == NULL)
338 5e11c00c 2021-03-02 op 		goto err;
339 5e11c00c 2021-03-02 op 
340 5e11c00c 2021-03-02 op 	*e = '\0';
341 5e11c00c 2021-03-02 op 	e++;
342 5e11c00c 2021-03-02 op 	len = e - req->buf;
343 5e11c00c 2021-03-02 op 	imsg_compose(ibuf, IMSG_GOT_CODE, req->id, 0, -1, &code, sizeof(code));
344 5e11c00c 2021-03-02 op 	imsg_compose(ibuf, IMSG_GOT_META, req->id, 0, -1,
345 5e11c00c 2021-03-02 op 	    req->buf, len);
346 5e11c00c 2021-03-02 op 	imsg_flush(ibuf);
347 5e11c00c 2021-03-02 op 
348 5e11c00c 2021-03-02 op 	return;
349 5e11c00c 2021-03-02 op 
350 5e11c00c 2021-03-02 op err:
351 5e11c00c 2021-03-02 op 	close_with_err(req, "malformed request");
352 5e11c00c 2021-03-02 op }
353 5e11c00c 2021-03-02 op 
354 5e11c00c 2021-03-02 op static void
355 5e11c00c 2021-03-02 op copy_body(int fd, short ev, void *d)
356 5e11c00c 2021-03-02 op {
357 5e11c00c 2021-03-02 op 	struct req	*req = d;
358 5e11c00c 2021-03-02 op 	char		 buf[BUFSIZ];
359 5e11c00c 2021-03-02 op 	ssize_t		 r;
360 5e11c00c 2021-03-02 op 
361 5e11c00c 2021-03-02 op 	for (;;) {
362 5e11c00c 2021-03-02 op 		switch (r = tls_read(req->ctx, buf, sizeof(buf))) {
363 5e11c00c 2021-03-02 op 		case TLS_WANT_POLLIN:
364 5e11c00c 2021-03-02 op 			yield_r(req, copy_body, NULL);
365 5e11c00c 2021-03-02 op 			return;
366 5e11c00c 2021-03-02 op 		case TLS_WANT_POLLOUT:
367 5e11c00c 2021-03-02 op 			yield_w(req, copy_body, NULL);
368 5e11c00c 2021-03-02 op 			return;
369 5e11c00c 2021-03-02 op 		case -1:
370 5e11c00c 2021-03-02 op 		case 0:
371 5e11c00c 2021-03-02 op 			imsg_compose(ibuf, IMSG_EOF, req->id, 0, -1, NULL, 0);
372 5e11c00c 2021-03-02 op 			imsg_flush(ibuf);
373 5e11c00c 2021-03-02 op 			close_conn(0, 0, req);
374 5e11c00c 2021-03-02 op 			return;
375 5e11c00c 2021-03-02 op 		default:
376 5e11c00c 2021-03-02 op 			imsg_compose(ibuf, IMSG_BUF, req->id, 0, -1, buf, r);
377 5e11c00c 2021-03-02 op 			imsg_flush(ibuf);
378 5e11c00c 2021-03-02 op 			break;
379 5e11c00c 2021-03-02 op 		}
380 5e11c00c 2021-03-02 op 	}
381 5e11c00c 2021-03-02 op }
382 5e11c00c 2021-03-02 op 
383 5e11c00c 2021-03-02 op static void
384 5e11c00c 2021-03-02 op handle_get(struct imsg *imsg, size_t datalen)
385 5e11c00c 2021-03-02 op {
386 5e11c00c 2021-03-02 op 	struct req	*req;
387 5e11c00c 2021-03-02 op 	const char	*e;
388 5e11c00c 2021-03-02 op 	char		*data, *err = NULL;
389 5e11c00c 2021-03-02 op 
390 5e11c00c 2021-03-02 op 	data = imsg->data;
391 5e11c00c 2021-03-02 op 
392 5e11c00c 2021-03-02 op 	if (data[datalen-1] != '\0')
393 5e11c00c 2021-03-02 op 		die();
394 5e11c00c 2021-03-02 op 
395 5e11c00c 2021-03-02 op 	if ((req = calloc(1, sizeof(*req))) == NULL)
396 5e11c00c 2021-03-02 op 		die();
397 5e11c00c 2021-03-02 op 
398 5e11c00c 2021-03-02 op 	req->id = imsg->hdr.peerid;
399 5e11c00c 2021-03-02 op 
400 5e11c00c 2021-03-02 op         if (!url_parse(imsg->data, &req->url, &e)) {
401 5e11c00c 2021-03-02 op 		fprintf(stderr, "failed to parse url: %s\n", e);
402 5e11c00c 2021-03-02 op 		close_with_err(req, e);
403 5e11c00c 2021-03-02 op 		return;
404 5e11c00c 2021-03-02 op 	}
405 5e11c00c 2021-03-02 op 
406 5e11c00c 2021-03-02 op 	if ((req->fd = conn_towards(&req->url, &err)) == -1)
407 5e11c00c 2021-03-02 op 		goto err;
408 5e11c00c 2021-03-02 op 	if ((req->ctx = tls_client()) == NULL)
409 5e11c00c 2021-03-02 op 		goto err;
410 5e11c00c 2021-03-02 op 	if (tls_configure(req->ctx, tlsconf) == -1) {
411 5e11c00c 2021-03-02 op 		err = xasprintf("tls_configure: %s", tls_error(req->ctx));
412 5e11c00c 2021-03-02 op 		goto err;
413 5e11c00c 2021-03-02 op 	}
414 5e11c00c 2021-03-02 op 	if (tls_connect_socket(req->ctx, req->fd, req->url.host) == -1) {
415 5e11c00c 2021-03-02 op 		err = xasprintf("tls_connect_socket: %s", tls_error(req->ctx));
416 5e11c00c 2021-03-02 op 		goto err;
417 5e11c00c 2021-03-02 op 	}
418 5e11c00c 2021-03-02 op 
419 5e11c00c 2021-03-02 op 	TAILQ_INSERT_HEAD(&reqhead, req, reqs);
420 5e11c00c 2021-03-02 op 	yield_w(req, do_handshake, NULL);
421 5e11c00c 2021-03-02 op 	return;
422 5e11c00c 2021-03-02 op 
423 5e11c00c 2021-03-02 op err:
424 5e11c00c 2021-03-02 op         close_with_err(req, err);
425 5e11c00c 2021-03-02 op 	free(err);
426 5e11c00c 2021-03-02 op }
427 5e11c00c 2021-03-02 op 
428 5e11c00c 2021-03-02 op static void
429 5e11c00c 2021-03-02 op handle_cert_status(struct imsg *imsg, size_t datalen)
430 5e11c00c 2021-03-02 op {
431 5e11c00c 2021-03-02 op 	struct req	*req;
432 5e11c00c 2021-03-02 op 	int		 is_ok;
433 5e11c00c 2021-03-02 op 
434 5e11c00c 2021-03-02 op 	req = req_by_id(imsg->hdr.peerid);
435 5e11c00c 2021-03-02 op 
436 5e11c00c 2021-03-02 op 	if (datalen < sizeof(is_ok))
437 5e11c00c 2021-03-02 op 		die();
438 5e11c00c 2021-03-02 op 	memcpy(&is_ok, imsg->data, sizeof(is_ok));
439 5e11c00c 2021-03-02 op 
440 5e11c00c 2021-03-02 op 	if (is_ok)
441 5e11c00c 2021-03-02 op 		yield_w(req, write_request, NULL);
442 5e11c00c 2021-03-02 op 	else
443 5e11c00c 2021-03-02 op 		close_conn(0, 0, req);
444 5e11c00c 2021-03-02 op }
445 5e11c00c 2021-03-02 op 
446 5e11c00c 2021-03-02 op static void
447 0972d8b2 2021-03-02 op handle_proceed(struct imsg *imsg, size_t datalen)
448 0972d8b2 2021-03-02 op {
449 0972d8b2 2021-03-02 op 	struct req	*req;
450 0972d8b2 2021-03-02 op 
451 0972d8b2 2021-03-02 op 	req = req_by_id(imsg->hdr.peerid);
452 0972d8b2 2021-03-02 op 	yield_r(req, copy_body, NULL);
453 0972d8b2 2021-03-02 op }
454 0972d8b2 2021-03-02 op 
455 0972d8b2 2021-03-02 op static void
456 5e11c00c 2021-03-02 op handle_stop(struct imsg *imsg, size_t datalen)
457 5e11c00c 2021-03-02 op {
458 5e11c00c 2021-03-02 op 	struct req	*req;
459 5e11c00c 2021-03-02 op 
460 5e11c00c 2021-03-02 op 	req = req_by_id(imsg->hdr.peerid);
461 5e11c00c 2021-03-02 op 	close_conn(0, 0, req);
462 5e11c00c 2021-03-02 op }
463 5e11c00c 2021-03-02 op 
464 5e11c00c 2021-03-02 op static void
465 5e11c00c 2021-03-02 op handle_quit(struct imsg *imsg, size_t datalen)
466 5e11c00c 2021-03-02 op {
467 5e11c00c 2021-03-02 op 	event_loopbreak();
468 5e11c00c 2021-03-02 op }
469 5e11c00c 2021-03-02 op 
470 5e11c00c 2021-03-02 op static void
471 5e11c00c 2021-03-02 op dispatch_imsg(int fd, short ev, void *d)
472 5e11c00c 2021-03-02 op {
473 5e11c00c 2021-03-02 op 	struct imsgbuf	*ibuf = d;
474 5e11c00c 2021-03-02 op 	struct imsg	 imsg;
475 5e11c00c 2021-03-02 op 	ssize_t		 n;
476 5e11c00c 2021-03-02 op 	size_t		 datalen;
477 5e11c00c 2021-03-02 op 
478 5e11c00c 2021-03-02 op 	if ((n = imsg_read(ibuf)) == -1) {
479 5e11c00c 2021-03-02 op 		if (errno == EAGAIN || errno == EWOULDBLOCK)
480 5e11c00c 2021-03-02 op 			return;
481 5e11c00c 2021-03-02 op 		die();
482 5e11c00c 2021-03-02 op 	}
483 5e11c00c 2021-03-02 op 
484 5e11c00c 2021-03-02 op 	if (n == 0)
485 5e11c00c 2021-03-02 op 		die();
486 5e11c00c 2021-03-02 op 
487 5e11c00c 2021-03-02 op 	for (;;) {
488 5e11c00c 2021-03-02 op 		if ((n = imsg_get(ibuf, &imsg)) == -1)
489 5e11c00c 2021-03-02 op 			die();
490 5e11c00c 2021-03-02 op 		if (n == 0)
491 5e11c00c 2021-03-02 op 			return;
492 5e11c00c 2021-03-02 op 		datalen = imsg.hdr.len - IMSG_HEADER_SIZE;
493 5e11c00c 2021-03-02 op 		handlers[imsg.hdr.type](&imsg, datalen);
494 5e11c00c 2021-03-02 op 		imsg_free(&imsg);
495 5e11c00c 2021-03-02 op 	}
496 5e11c00c 2021-03-02 op }
497 5e11c00c 2021-03-02 op 
498 5e11c00c 2021-03-02 op int
499 5e11c00c 2021-03-02 op client_main(struct imsgbuf *b)
500 5e11c00c 2021-03-02 op {
501 5e11c00c 2021-03-02 op 	ibuf = b;
502 5e11c00c 2021-03-02 op 
503 5e11c00c 2021-03-02 op 	TAILQ_INIT(&reqhead);
504 5e11c00c 2021-03-02 op 
505 5e11c00c 2021-03-02 op 	if ((tlsconf = tls_config_new()) == NULL)
506 5e11c00c 2021-03-02 op 		die();
507 5e11c00c 2021-03-02 op 	tls_config_insecure_noverifycert(tlsconf);
508 5e11c00c 2021-03-02 op 
509 5e11c00c 2021-03-02 op 	event_init();
510 5e11c00c 2021-03-02 op 
511 5e11c00c 2021-03-02 op 	event_set(&imsgev, ibuf->fd, EV_READ | EV_PERSIST, dispatch_imsg, ibuf);
512 5e11c00c 2021-03-02 op 	event_add(&imsgev, NULL);
513 5e11c00c 2021-03-02 op 
514 5e11c00c 2021-03-02 op 	event_dispatch();
515 5e11c00c 2021-03-02 op 	return 0;
516 5e11c00c 2021-03-02 op }