ssl-bozo.c revision 1.11 1 /* $NetBSD: ssl-bozo.c,v 1.11 2011/08/21 10:45:33 hannken Exp $ */
2
3 /* $eterna: ssl-bozo.c,v 1.13 2010/05/12 12:24:58 rtr Exp $ */
4
5 /*
6 * Copyright (c) 1997-2010 Matthew R. Green
7 * All rights reserved.
8 *
9 * Redistribution and use in source and binary forms, with or without
10 * modification, are permitted provided that the following conditions
11 * are met:
12 * 1. Redistributions of source code must retain the above copyright
13 * notice, this list of conditions and the following disclaimer.
14 * 2. Redistributions in binary form must reproduce the above copyright
15 * notice, this list of conditions and the following disclaimer and
16 * dedication in the documentation and/or other materials provided
17 * with the distribution.
18 *
19 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
20 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
21 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
22 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
23 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
24 * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
25 * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
26 * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
27 * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
28 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
29 * SUCH DAMAGE.
30 *
31 */
32
33 /* this code implements SSL for bozohttpd */
34
35 #include <stdarg.h>
36 #include <stdio.h>
37 #include <syslog.h>
38 #include <unistd.h>
39
40 #include "bozohttpd.h"
41
42 #ifndef NO_SSL_SUPPORT
43
44 #include <openssl/ssl.h>
45 #include <openssl/err.h>
46
47 #ifndef USE_ARG
48 #define USE_ARG(x) /*LINTED*/(void)&(x)
49 #endif
50
51 /* this structure encapsulates the ssl info */
52 typedef struct sslinfo_t {
53 SSL_CTX *ssl_context;
54 const SSL_METHOD *ssl_method;
55 SSL *bozossl;
56 char *certificate_file;
57 char *privatekey_file;
58 } sslinfo_t;
59
60 /*
61 * bozo_ssl_err
62 *
63 * bozo_ssl_err works just like bozo_err except in addition to printing
64 * the error provided by the caller at the point of error it pops and
65 * prints all errors from the SSL error queue.
66 */
67 static void
68 bozo_ssl_err(bozohttpd_t *httpd, int code, const char *fmt, ...)
69 {
70 va_list ap;
71
72 va_start(ap, fmt);
73 if (httpd->logstderr || isatty(STDERR_FILENO)) {
74 vfprintf(stderr, fmt, ap);
75 fputs("\n", stderr);
76 } else
77 vsyslog(LOG_ERR, fmt, ap);
78 va_end(ap);
79
80 unsigned int sslcode = ERR_get_error();
81 do {
82 static const char sslfmt[] = "SSL Error: %s:%s:%s";
83
84 if (httpd->logstderr || isatty(STDERR_FILENO)) {
85 fprintf(stderr, sslfmt,
86 ERR_lib_error_string(sslcode),
87 ERR_func_error_string(sslcode),
88 ERR_reason_error_string(sslcode));
89 } else {
90 syslog(LOG_ERR, sslfmt,
91 ERR_lib_error_string(sslcode),
92 ERR_func_error_string(sslcode),
93 ERR_reason_error_string(sslcode));
94 }
95 } while (0 != (sslcode = ERR_get_error()));
96 exit(code);
97 }
98
99 static int
100 bozo_ssl_printf(bozohttpd_t *httpd, const char * fmt, va_list ap)
101 {
102 sslinfo_t *sslinfo;
103 char *buf;
104 int nbytes;
105
106 sslinfo = httpd->sslinfo;
107 /* XXX we need more elegant/proper handling of SSL_write return */
108 if ((nbytes = vasprintf(&buf, fmt, ap)) != -1)
109 SSL_write(sslinfo->bozossl, buf, nbytes);
110
111 free(buf);
112
113 return nbytes;
114 }
115
116 static ssize_t
117 bozo_ssl_read(bozohttpd_t *httpd, int fd, void *buf, size_t nbytes)
118 {
119 sslinfo_t *sslinfo;
120 ssize_t rbytes;
121
122 USE_ARG(fd);
123 sslinfo = httpd->sslinfo;
124 /* XXX we need elegant/proper handling of SSL_read return */
125 rbytes = (ssize_t)SSL_read(sslinfo->bozossl, buf, (int)nbytes);
126 if (rbytes < 1) {
127 if (SSL_get_error(sslinfo->bozossl, rbytes) ==
128 SSL_ERROR_WANT_READ)
129 bozo_warn(httpd, "SSL_ERROR_WANT_READ");
130 else
131 bozo_warn(httpd, "SSL_ERROR OTHER");
132 }
133
134 return rbytes;
135 }
136
137 static ssize_t
138 bozo_ssl_write(bozohttpd_t *httpd, int fd, const void *buf, size_t nbytes)
139 {
140 sslinfo_t *sslinfo;
141 ssize_t wbytes;
142
143 USE_ARG(fd);
144 sslinfo = httpd->sslinfo;
145 /* XXX we need elegant/proper handling of SSL_write return */
146 wbytes = (ssize_t)SSL_write(sslinfo->bozossl, buf, (int)nbytes);
147
148 return wbytes;
149 }
150
151 static int
152 bozo_ssl_flush(bozohttpd_t *httpd, FILE *fp)
153 {
154 USE_ARG(httpd);
155 USE_ARG(fp);
156 /* nothing to see here, move right along */
157 return 0;
158 }
159
160 void
161 bozo_ssl_init(bozohttpd_t *httpd)
162 {
163 sslinfo_t *sslinfo;
164
165 sslinfo = httpd->sslinfo;
166 if (sslinfo == NULL || !sslinfo->certificate_file)
167 return;
168 SSL_library_init();
169 SSL_load_error_strings();
170
171 sslinfo->ssl_method = SSLv23_server_method();
172 sslinfo->ssl_context = SSL_CTX_new(sslinfo->ssl_method);
173
174 /* XXX we need to learn how to check the SSL stack for more info */
175 if (NULL == sslinfo->ssl_context)
176 bozo_ssl_err(httpd, EXIT_FAILURE,
177 "SSL context creation failed");
178
179 if (1 != SSL_CTX_use_certificate_file(sslinfo->ssl_context,
180 sslinfo->certificate_file, SSL_FILETYPE_PEM))
181 bozo_ssl_err(httpd, EXIT_FAILURE,
182 "Unable to use certificate file '%s'",
183 sslinfo->certificate_file);
184
185 if (1 != SSL_CTX_use_PrivateKey_file(sslinfo->ssl_context,
186 sslinfo->privatekey_file, SSL_FILETYPE_PEM))
187 bozo_ssl_err(httpd, EXIT_FAILURE,
188 "Unable to use private key file '%s'",
189 sslinfo->privatekey_file);
190
191 /* check consistency of key vs certificate */
192 if (!SSL_CTX_check_private_key(sslinfo->ssl_context))
193 bozo_ssl_err(httpd, EXIT_FAILURE,
194 "Check private key failed");
195 }
196
197 void
198 bozo_ssl_accept(bozohttpd_t *httpd)
199 {
200 sslinfo_t *sslinfo;
201
202 sslinfo = httpd->sslinfo;
203 if (sslinfo != NULL && sslinfo->ssl_context) {
204 sslinfo->bozossl = SSL_new(sslinfo->ssl_context);
205 SSL_set_rfd(sslinfo->bozossl, 0);
206 SSL_set_wfd(sslinfo->bozossl, 1);
207 SSL_accept(sslinfo->bozossl);
208 }
209 }
210
211 void
212 bozo_ssl_destroy(bozohttpd_t *httpd)
213 {
214 sslinfo_t *sslinfo;
215
216 sslinfo = httpd->sslinfo;
217 if (sslinfo && sslinfo->bozossl)
218 SSL_free(sslinfo->bozossl);
219 }
220
221 void
222 bozo_ssl_set_opts(bozohttpd_t *httpd, const char *cert, const char *priv)
223 {
224 sslinfo_t *sslinfo;
225
226 if ((sslinfo = httpd->sslinfo) == NULL) {
227 sslinfo = bozomalloc(httpd, sizeof(*sslinfo));
228 if (sslinfo == NULL) {
229 bozo_err(httpd, 1, "sslinfo allocation failed");
230 }
231 httpd->sslinfo = sslinfo;
232 }
233 sslinfo->certificate_file = strdup(cert);
234 sslinfo->privatekey_file = strdup(priv);
235 debug((httpd, DEBUG_NORMAL, "using cert/priv files: %s & %s",
236 sslinfo->certificate_file,
237 sslinfo->privatekey_file));
238 if (!httpd->bindport) {
239 httpd->bindport = strdup("https");
240 }
241 }
242
243 #endif /* NO_SSL_SUPPORT */
244
245 int
246 bozo_printf(bozohttpd_t *httpd, const char *fmt, ...)
247 {
248 va_list args;
249 int cc;
250
251 va_start(args, fmt);
252 #ifndef NO_SSL_SUPPORT
253 if (httpd->sslinfo) {
254 cc = bozo_ssl_printf(httpd, fmt, args);
255 va_end(args);
256 return cc;
257 }
258 #endif
259 cc = vprintf(fmt, args);
260 va_end(args);
261 return cc;
262 }
263
264 ssize_t
265 bozo_read(bozohttpd_t *httpd, int fd, void *buf, size_t len)
266 {
267 #ifndef NO_SSL_SUPPORT
268 if (httpd->sslinfo) {
269 return bozo_ssl_read(httpd, fd, buf, len);
270 }
271 #endif
272 return read(fd, buf, len);
273 }
274
275 ssize_t
276 bozo_write(bozohttpd_t *httpd, int fd, const void *buf, size_t len)
277 {
278 #ifndef NO_SSL_SUPPORT
279 if (httpd->sslinfo) {
280 return bozo_ssl_write(httpd, fd, buf, len);
281 }
282 #endif
283 return write(fd, buf, len);
284 }
285
286 int
287 bozo_flush(bozohttpd_t *httpd, FILE *fp)
288 {
289 #ifndef NO_SSL_SUPPORT
290 if (httpd->sslinfo) {
291 return bozo_ssl_flush(httpd, fp);
292 }
293 #endif
294 return fflush(fp);
295 }
296