Set /etc/private.rsa as default key for axTLS contexts
More openssl - axTLS fixes
This commit is contained in:
parent
e38c438771
commit
a5ae3959b5
2 changed files with 23 additions and 5 deletions
|
@ -43,14 +43,16 @@ static int nixio__tls_pstatus(lua_State *L, int code) {
|
|||
static int nixio_tls_ctx(lua_State * L) {
|
||||
const char *method = luaL_optlstring(L, 1, "tlsv1", NULL);
|
||||
|
||||
luaL_getmetatable(L, NIXIO_TLS_CTX_META);
|
||||
SSL_CTX **ctx = lua_newuserdata(L, sizeof(SSL_CTX *));
|
||||
if (!ctx) {
|
||||
return luaL_error(L, "out of memory");
|
||||
}
|
||||
|
||||
/* create userdata */
|
||||
luaL_getmetatable(L, NIXIO_TLS_CTX_META);
|
||||
lua_pushvalue(L, -2);
|
||||
lua_setmetatable(L, -2);
|
||||
lua_getfield(L, -1, "tls_defaultkey");
|
||||
|
||||
if (!strcmp(method, "tlsv1")) {
|
||||
*ctx = SSL_CTX_new(TLSv1_method());
|
||||
|
@ -60,13 +62,18 @@ static int nixio_tls_ctx(lua_State * L) {
|
|||
return luaL_argerror(L, 1, "supported values: tlsv1, sslv23");
|
||||
}
|
||||
|
||||
|
||||
SSL_CTX_set_options(*ctx, SSL_OP_NO_SSLv2 | SSL_OP_NO_SSLv3);
|
||||
|
||||
if (!(*ctx)) {
|
||||
return luaL_error(L, "unable to create TLS context");
|
||||
}
|
||||
|
||||
const char *autoload = lua_tostring(L, -1);
|
||||
if (autoload) {
|
||||
SSL_CTX_use_PrivateKey_file(*ctx, autoload, SSL_FILETYPE_PEM);
|
||||
}
|
||||
lua_pop(L, 1);
|
||||
|
||||
SSL_CTX_set_options(*ctx, SSL_OP_NO_SSLv2 | SSL_OP_NO_SSLv3);
|
||||
|
||||
return 1;
|
||||
}
|
||||
|
||||
|
@ -202,10 +209,21 @@ void nixio_open_tls_context(lua_State *L) {
|
|||
/* register module functions */
|
||||
luaL_register(L, NULL, R);
|
||||
|
||||
#ifndef WITH_AXTLS
|
||||
lua_pushliteral(L, "openssl");
|
||||
#else
|
||||
lua_pushliteral(L, "axtls");
|
||||
#endif
|
||||
lua_setfield(L, -2, "tls_provider");
|
||||
|
||||
/* create context metatable */
|
||||
luaL_newmetatable(L, NIXIO_TLS_CTX_META);
|
||||
lua_pushvalue(L, -1);
|
||||
lua_setfield(L, -2, "__index");
|
||||
luaL_register(L, NULL, CTX_M);
|
||||
lua_pop(L, 1);
|
||||
#ifdef WITH_AXTLS
|
||||
lua_pushliteral(L, "/etc/private.rsa");
|
||||
lua_setfield(L, -2, "tls_defaultkey");
|
||||
#endif
|
||||
lua_setfield(L, -2, "meta_tls_context");
|
||||
}
|
||||
|
|
Loading…
Reference in a new issue