libs/luci-lib-nixio/src/axtls-compat.c

   1 /*
   2  * Copyright (c) 2007, Cameron Rich
   3  *
   4  * All rights reserved.
   5  *
   6  * Redistribution and use in source and binary forms, with or without
   7  * modification, are permitted provided that the following conditions are met:
   8  *
   9  * * Redistributions of source code must retain the above copyright notice,
  10  *   this list of conditions and the following disclaimer.
  11  * * Redistributions in binary form must reproduce the above copyright notice,
  12  *   this list of conditions and the following disclaimer in the documentation
  13  *   and/or other materials provided with the distribution.
  14  * * Neither the name of the axTLS project nor the names of its contributors
  15  *   may be used to endorse or promote products derived from this software
  16  *   without specific prior written permission.
  17  *
  18  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
  19  * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
  20  * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
  21  * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR
  22  * CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
  23  * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
  24  * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
  25  * PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
  26  * LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
  27  * NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
  28  * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  29  */
  30
  31 /*
  32  * Enable a subset of openssl compatible functions. We don't aim to be 100%
  33  * compatible - just to be able to do basic ports etc.
  34  *
  35  * Only really tested on mini_httpd, so I'm not too sure how extensive this
  36  * port is.
  37  */
  38
  39 #include "config.h"
  40
  41 #include <stdlib.h>
  42 #include <string.h>
  43 #include <stdarg.h>
  44 #include "ssl.h"
  45
  46 static char *key_password = NULL;
  47
  48 void *SSLv23_server_method(void) { return NULL; }
  49 void *SSLv3_server_method(void) { return NULL; }
  50 void *TLSv1_server_method(void) { return NULL; }
  51 void *SSLv23_client_method(void) { return NULL; }
  52 void *SSLv3_client_method(void) { return NULL; }
  53 void *TLSv1_client_method(void) { return NULL; }
  54 void *SSLv23_method(void) { return NULL; }
  55 void *TLSv1_method(void) { return NULL; }
  56
  57 SSL_CTX * SSL_CTX_new(void *meth)
  58 {
  59     SSL_CTX *ssl_ctx = ssl_ctx_new(SSL_SERVER_VERIFY_LATER, 5);
  60     return ssl_ctx;
  61 }
  62
  63 void SSL_CTX_free(SSL_CTX * ssl_ctx)
  64 {
  65     ssl_ctx_free(ssl_ctx);
  66 }
  67
  68 SSL * SSL_new(SSL_CTX *ssl_ctx)
  69 {
  70     SSL *ssl;
  71
  72     ssl = ssl_new(ssl_ctx, -1);        /* fd is set later */
  73
  74     return ssl;
  75 }
  76
  77 int SSL_set_fd(SSL *s, int fd)
  78 {
  79     s->client_fd = fd;
  80     return 1;   /* always succeeds */
  81 }
  82
  83 int SSL_accept(SSL *ssl)
  84 {
  85         ssl->next_state = HS_CLIENT_HELLO;
  86     while (ssl_read(ssl, NULL) == SSL_OK)
  87     {
  88         if (ssl->next_state == HS_CLIENT_HELLO)
  89             return 1;   /* we're done */
  90     }
  91
  92     return -1;
  93 }
  94
  95 int SSL_connect(SSL *ssl)
  96 {
  97         SET_SSL_FLAG(SSL_IS_CLIENT);
  98         int stat = do_client_connect(ssl);
  99         ssl_display_error(stat);
 100     return  (stat == SSL_OK) ? 1 : -1;
 101 }
 102
 103 void SSL_free(SSL *ssl)
 104 {
 105     ssl_free(ssl);
 106 }
 107
 108 int SSL_read(SSL *ssl, void *buf, int num)
 109 {
 110     uint8_t *read_buf;
 111     int ret;
 112
 113     while ((ret = ssl_read(ssl, &read_buf)) == SSL_OK);
 114
 115     if (ret > SSL_OK)
 116     {
 117         memcpy(buf, read_buf, ret > num ? num : ret);
 118     }
 119
 120     return ret;
 121 }
 122
 123 int SSL_write(SSL *ssl, const void *buf, int num)
 124 {
 125     return ssl_write(ssl, buf, num);
 126 }
 127
 128 int SSL_CTX_use_certificate_file(SSL_CTX *ssl_ctx, const char *file, int type)
 129 {
 130     return (ssl_obj_load(ssl_ctx, SSL_OBJ_X509_CERT, file, NULL) == SSL_OK);
 131 }
 132
 133 int SSL_CTX_use_PrivateKey_file(SSL_CTX *ssl_ctx, const char *file, int type)
 134 {
 135     return (ssl_obj_load(ssl_ctx, SSL_OBJ_RSA_KEY, file, key_password) == SSL_OK);
 136 }
 137
 138 int SSL_CTX_use_certificate_ASN1(SSL_CTX *ssl_ctx, int len, const uint8_t *d)
 139 {
 140     return (ssl_obj_memory_load(ssl_ctx,
 141                         SSL_OBJ_X509_CERT, d, len, NULL) == SSL_OK);
 142 }
 143
 144 int SSL_CTX_set_session_id_context(SSL_CTX *ctx, const unsigned char *sid_ctx,
 145                                             unsigned int sid_ctx_len)
 146 {
 147     return 1;
 148 }
 149
 150 int SSL_CTX_set_default_verify_paths(SSL_CTX *ctx)
 151 {
 152     return 1;
 153 }
 154
 155 int SSL_CTX_use_certificate_chain_file(SSL_CTX *ssl_ctx, const char *file)
 156 {
 157     return (ssl_obj_load(ssl_ctx,
 158                         SSL_OBJ_X509_CERT, file, NULL) == SSL_OK);
 159 }
 160
 161 int SSL_shutdown(SSL *ssl)
 162 {
 163     return 1;
 164 }
 165
 166 /*** get/set session ***/
 167 SSL_SESSION *SSL_get1_session(SSL *ssl)
 168 {
 169     return (SSL_SESSION *)ssl_get_session_id(ssl); /* note: wrong cast */
 170 }
 171
 172 int SSL_set_session(SSL *ssl, SSL_SESSION *session)
 173 {
 174     memcpy(ssl->session_id, (uint8_t *)session, SSL_SESSION_ID_SIZE);
 175     return 1;
 176 }
 177
 178 void SSL_SESSION_free(SSL_SESSION *session) { }
 179 /*** end get/set session ***/
 180
 181 long SSL_CTX_ctrl(SSL_CTX *ctx, int cmd, long larg, void *parg)
 182 {
 183     return 0;
 184 }
 185
 186 void SSL_CTX_set_verify(SSL_CTX *ctx, int mode,
 187                                  int (*verify_callback)(int, void *)) {
 188         if (mode & SSL_VERIFY_PEER) {
 189                 ctx->options &= ~SSL_SERVER_VERIFY_LATER;
 190                 ctx->options |= SSL_CLIENT_AUTHENTICATION;
 191         } else {
 192                 ctx->options |= SSL_SERVER_VERIFY_LATER;
 193                 ctx->options &= ~SSL_CLIENT_AUTHENTICATION;
 194         }
 195 }
 196
 197 void SSL_CTX_set_verify_depth(SSL_CTX *ctx,int depth) { }
 198
 199 int SSL_CTX_load_verify_locations(SSL_CTX *ctx, const char *CAfile,
 200                                            const char *CApath)
 201 {
 202     return 1;
 203 }
 204
 205 void *SSL_load_client_CA_file(const char *file)
 206 {
 207     return (void *)file;
 208 }
 209
 210 void SSL_CTX_set_client_CA_list(SSL_CTX *ssl_ctx, void *file)
 211 {
 212
 213     ssl_obj_load(ssl_ctx, SSL_OBJ_X509_CERT, (const char *)file, NULL);
 214 }
 215
 216 void SSL_CTX_set_default_passwd_cb(SSL_CTX *ctx, void *cb) { }
 217
 218 void SSL_CTX_set_default_passwd_cb_userdata(SSL_CTX *ctx, void *u)
 219 {
 220     key_password = (char *)u;
 221 }
 222
 223 int SSL_peek(SSL *ssl, void *buf, int num)
 224 {
 225     memcpy(buf, ssl->bm_data, num);
 226     return num;
 227 }
 228
 229 void SSL_set_bio(SSL *ssl, void *rbio, void *wbio) { }
 230
 231 long SSL_get_verify_result(const SSL *ssl)
 232 {
 233     return ssl_handshake_status(ssl);
 234 }
 235
 236 int SSL_state(SSL *ssl)
 237 {
 238     return 0x03; // ok state
 239 }
 240
 241 /** end of could do better list */
 242
 243 void *SSL_get_peer_certificate(const SSL *ssl)
 244 {
 245     return &ssl->ssl_ctx->certs[0];
 246 }
 247
 248 int SSL_clear(SSL *ssl)
 249 {
 250     return 1;
 251 }
 252
 253
 254 int SSL_CTX_check_private_key(const SSL_CTX *ctx)
 255 {
 256     return 1;
 257 }
 258
 259 int SSL_CTX_set_cipher_list(SSL_CTX *s, const char *str)
 260 {
 261     return 1;
 262 }
 263
 264 int SSL_get_error(const SSL *ssl, int ret)
 265 {
 266     ssl_display_error(ret);
 267     return ret;   /* TODO: return proper return code */
 268 }
 269
 270 void SSL_CTX_set_options(SSL_CTX *ssl_ctx, int option) {}
 271 int SSL_library_init(void ) { return 1; }
 272 void SSL_load_error_strings(void ) {}
 273 void ERR_print_errors_fp(FILE *fp) {}
 274
 275 long SSL_CTX_get_timeout(const SSL_CTX *ssl_ctx) {
 276                             return CONFIG_SSL_EXPIRY_TIME*3600; }
 277 long SSL_CTX_set_timeout(SSL_CTX *ssl_ctx, long t) {
 278                             return SSL_CTX_get_timeout(ssl_ctx); }
 279 void BIO_printf(FILE *f, const char *format, ...)
 280 {
 281     va_list(ap);
 282     va_start(ap, format);
 283     vfprintf(f, format, ap);
 284     va_end(ap);
 285 }
 286
 287 void* BIO_s_null(void) { return NULL; }
 288 FILE *BIO_new(bio_func_type_t func)
 289 {
 290     if (func == BIO_s_null)
 291         return fopen("/dev/null", "r");
 292     else
 293         return NULL;
 294 }
 295
 296 FILE *BIO_new_fp(FILE *stream, int close_flag) { return stream; }
 297 int BIO_free(FILE *a) { if (a != stdout && a != stderr) fclose(a); return 1; }