* cleanup ourselfs on exit.
[citadel.git] / citadel / serv_crypto.c
index ab6bd6f4c0a8fe1958c791cfb5174d4f37f16cdf..0db01ac47b8fdcd0bb8dafadf63f87bf65c2c1e0 100644 (file)
@@ -49,6 +49,16 @@ static unsigned long id_callback(void)
        return (unsigned long) pthread_self();
 }
 
+void destruct_ssl(void)
+{
+       int a;
+       CtdlUnregisterProtoHook(cmd_stls, "STLS");
+       CtdlUnregisterProtoHook(cmd_gtls, "GTLS");
+       for (a = 0; a < CRYPTO_num_locks(); a++) 
+               free(SSLCritters[a]);
+       free (SSLCritters);
+}
+
 void init_ssl(void)
 {
        SSL_METHOD *ssl_method;