test/handshake_helper.c:1352: error: INTEGER_OVERFLOW_L2
  ([0, +oo] - 1):unsigned64 by call to `SSL_set_session`.
Showing all 23 steps of the trace


test/handshake_helper.c:1340:10: Call
1338.           goto err;
1339.       }
1340.       if (!create_peer(&client, client_ctx)) {
                 ^
1341.           TEST_note("creating client context");
1342.           goto err;

test/handshake_helper.c:695:10: Call
  693.       unsigned char *read_buf = NULL, *write_buf = NULL;
  694.   
  695.       if (!TEST_ptr(ssl = SSL_new(ctx))
                  ^
  696.               || !TEST_ptr(write_buf = OPENSSL_zalloc(peer_buffer_size))
  697.               || !TEST_ptr(read_buf = OPENSSL_zalloc(peer_buffer_size)))

ssl/ssl_lib.c:610:1: Parameter `ctx->sessions->num_items`
    608.   }
    609.   
    610. > SSL *SSL_new(SSL_CTX *ctx)
    611.   {
    612.       SSL *s;

test/handshake_helper.c:1351:14: Call
1349.       if (session_in != NULL) {
1350.           /* In case we're testing resumption without tickets. */
1351.           if (!TEST_true(SSL_CTX_add_session(server_ctx, session_in))
                     ^
1352.                   || !TEST_true(SSL_set_session(client.ssl, session_in)))
1353.               goto err;

ssl/ssl_sess.c:647:1: Parameter `ctx->sessions->num_items`
  645.   }
  646.   
  647. > int SSL_CTX_add_session(SSL_CTX *ctx, SSL_SESSION *c)
  648.   {
  649.       int ret = 0;

ssl/ssl_sess.c:663:9: Call
  661.   
  662.       CRYPTO_THREAD_write_lock(ctx->lock);
  663.       s = lh_SSL_SESSION_insert(ctx->sessions, c);
                 ^
  664.   
  665.       /*

ssl/ssl_locl.h:697:1: Parameter `lh->num_items`
    695.   } TLSEXT_INDEX;
    696.   
    697. > DEFINE_LHASH_OF(SSL_SESSION);
    698.   /* Needed in ssl_cert.c */
    699.   DEFINE_LHASH_OF(X509_NAME);

ssl/ssl_locl.h:697:1: Call
    695.   } TLSEXT_INDEX;
    696.   
    697. > DEFINE_LHASH_OF(SSL_SESSION);
    698.   /* Needed in ssl_cert.c */
    699.   DEFINE_LHASH_OF(X509_NAME);

crypto/lhash/lhash.c:70:1: Parameter `lh->num_items`
      68.   }
      69.   
      70. > void *OPENSSL_LH_insert(OPENSSL_LHASH *lh, void *data)
      71.   {
      72.       unsigned long hash;

test/handshake_helper.c:1352:21: Call
1350.           /* In case we're testing resumption without tickets. */
1351.           if (!TEST_true(SSL_CTX_add_session(server_ctx, session_in))
1352.                   || !TEST_true(SSL_set_session(client.ssl, session_in)))
                            ^
1353.               goto err;
1354.       }

ssl/ssl_sess.c:812:1: Parameter `s->session_ctx->sessions->num_items`
  810.   }
  811.   
  812. > int SSL_set_session(SSL *s, SSL_SESSION *session)
  813.   {
  814.       ssl_clear_bad_session(s);

ssl/ssl_sess.c:814:5: Call
  812.   int SSL_set_session(SSL *s, SSL_SESSION *session)
  813.   {
  814.       ssl_clear_bad_session(s);
             ^
  815.       if (s->ctx->method != s->method) {
  816.           if (!SSL_set_ssl_method(s, s->ctx->method))

ssl/ssl_sess.c:1107:1: Parameter `s->session_ctx->sessions->num_items`
    1105.   }
    1106.   
    1107. > int ssl_clear_bad_session(SSL *s)
    1108.   {
    1109.       if ((s->session != NULL) &&

ssl/ssl_sess.c:1112:9: Call
    1110.           !(s->shutdown & SSL_SENT_SHUTDOWN) &&
    1111.           !(SSL_in_init(s) || SSL_in_before(s))) {
    1112.           SSL_CTX_remove_session(s->session_ctx, s->session);
                    ^
    1113.           return 1;
    1114.       } else

ssl/ssl_sess.c:724:1: Parameter `ctx->sessions->num_items`
      722.   }
      723.   
      724. > int SSL_CTX_remove_session(SSL_CTX *ctx, SSL_SESSION *c)
      725.   {
      726.       return remove_session_lock(ctx, c, 1);

ssl/ssl_sess.c:726:12: Call
      724.   int SSL_CTX_remove_session(SSL_CTX *ctx, SSL_SESSION *c)
      725.   {
      726.       return remove_session_lock(ctx, c, 1);
                        ^
      727.   }
      728.   

ssl/ssl_sess.c:729:1: Parameter `ctx->sessions->num_items`
        727.   }
        728.   
        729. > static int remove_session_lock(SSL_CTX *ctx, SSL_SESSION *c, int lck)
        730.   {
        731.       SSL_SESSION *r;

ssl/ssl_sess.c:739:17: Call
        737.           if ((r = lh_SSL_SESSION_retrieve(ctx->sessions, c)) == c) {
        738.               ret = 1;
        739.               r = lh_SSL_SESSION_delete(ctx->sessions, c);
                               ^
        740.               SSL_SESSION_list_remove(ctx, c);
        741.           }

ssl/ssl_locl.h:697:1: Parameter `lh->num_items`
          695.   } TLSEXT_INDEX;
          696.   
          697. > DEFINE_LHASH_OF(SSL_SESSION);
          698.   /* Needed in ssl_cert.c */
          699.   DEFINE_LHASH_OF(X509_NAME);

ssl/ssl_locl.h:697:1: Call
          695.   } TLSEXT_INDEX;
          696.   
          697. > DEFINE_LHASH_OF(SSL_SESSION);
          698.   /* Needed in ssl_cert.c */
          699.   DEFINE_LHASH_OF(X509_NAME);

crypto/lhash/lhash.c:102:1: <LHS trace>
100.   }
101.   
102. > void *OPENSSL_LH_delete(OPENSSL_LHASH *lh, const void *data)
103.   {
104.       unsigned long hash;

crypto/lhash/lhash.c:102:1: Parameter `lh->num_items`
            100.   }
            101.   
            102. > void *OPENSSL_LH_delete(OPENSSL_LHASH *lh, const void *data)
            103.   {
            104.       unsigned long hash;

crypto/lhash/lhash.c:122:5: Binary operation: ([0, +oo] - 1):unsigned64 by call to `SSL_set_session` 
            120.       }
            121.   
            122.       lh->num_items--;
                       ^
            123.       if ((lh->num_nodes > MIN_NODES) &&
            124.           (lh->down_load >= (lh->num_items * LH_LOAD_MULT / lh->num_nodes)))

void *OPENSSL_LH_delete(OPENSSL_LHASH *lh, const void *data)
{
    unsigned long hash;
    OPENSSL_LH_NODE *nn, **rn;
    void *ret;
    lh->error = 0;
    rn = getrn(lh, data, &hash);
    if (*rn == NULL) {
        lh->num_no_delete++;
        return NULL;
    } else {
        nn = *rn;
        *rn = nn->next;
        ret = nn->data;
        OPENSSL_free(nn);
        lh->num_delete++;
    }
    lh->num_items--;
    if ((lh->num_nodes > MIN_NODES) &&
        (lh->down_load >= (lh->num_items * LH_LOAD_MULT / lh->num_nodes)))
        contract(lh);
    return ret;
}
['static HANDSHAKE_RESULT *do_handshake_internal(\n    SSL_CTX *server_ctx, SSL_CTX *server2_ctx, SSL_CTX *client_ctx,\n    const SSL_TEST_CTX *test_ctx, const SSL_TEST_EXTRA_CONF *extra,\n    SSL_SESSION *session_in, SSL_SESSION **session_out)\n{\n    PEER server, client;\n    BIO *client_to_server = NULL, *server_to_client = NULL;\n    HANDSHAKE_EX_DATA server_ex_data, client_ex_data;\n    CTX_DATA client_ctx_data, server_ctx_data, server2_ctx_data;\n    HANDSHAKE_RESULT *ret = HANDSHAKE_RESULT_new();\n    int client_turn = 1, client_turn_count = 0;\n    connect_phase_t phase = HANDSHAKE;\n    handshake_status_t status = HANDSHAKE_RETRY;\n    const unsigned char* tick = NULL;\n    size_t tick_len = 0;\n    const unsigned char* sess_id = NULL;\n    unsigned int sess_id_len = 0;\n    SSL_SESSION* sess = NULL;\n    const unsigned char *proto = NULL;\n    unsigned int proto_len = 0;\n    EVP_PKEY *tmp_key;\n    const STACK_OF(X509_NAME) *names;\n    time_t start;\n    if (ret == NULL)\n        return NULL;\n    memset(&server_ctx_data, 0, sizeof(server_ctx_data));\n    memset(&server2_ctx_data, 0, sizeof(server2_ctx_data));\n    memset(&client_ctx_data, 0, sizeof(client_ctx_data));\n    memset(&server, 0, sizeof(server));\n    memset(&client, 0, sizeof(client));\n    memset(&server_ex_data, 0, sizeof(server_ex_data));\n    memset(&client_ex_data, 0, sizeof(client_ex_data));\n    if (!configure_handshake_ctx(server_ctx, server2_ctx, client_ctx,\n                                 test_ctx, extra, &server_ctx_data,\n                                 &server2_ctx_data, &client_ctx_data)) {\n        TEST_note("configure_handshake_ctx");\n        return NULL;\n    }\n    if (!create_peer(&server, server_ctx)) {\n        TEST_note("creating server context");\n        goto err;\n    }\n    if (!create_peer(&client, client_ctx)) {\n        TEST_note("creating client context");\n        goto err;\n    }\n    server.bytes_to_write = client.bytes_to_read = test_ctx->app_data_size;\n    client.bytes_to_write = server.bytes_to_read = test_ctx->app_data_size;\n    configure_handshake_ssl(server.ssl, client.ssl, extra);\n    if (session_in != NULL) {\n        if (!TEST_true(SSL_CTX_add_session(server_ctx, session_in))\n                || !TEST_true(SSL_set_session(client.ssl, session_in)))\n            goto err;\n    }\n    ret->result = SSL_TEST_INTERNAL_ERROR;\n    if (test_ctx->use_sctp) {\n#if !defined(OPENSSL_NO_SCTP) && !defined(OPENSSL_NO_SOCK)\n        int csock, ssock;\n        if (create_sctp_socks(&ssock, &csock)) {\n            client_to_server = BIO_new_dgram_sctp(csock, BIO_CLOSE);\n            server_to_client = BIO_new_dgram_sctp(ssock, BIO_CLOSE);\n        }\n#endif\n    } else {\n        client_to_server = BIO_new(BIO_s_mem());\n        server_to_client = BIO_new(BIO_s_mem());\n    }\n    if (!TEST_ptr(client_to_server)\n            || !TEST_ptr(server_to_client))\n        goto err;\n    BIO_set_nbio(client_to_server, 1);\n    BIO_set_nbio(server_to_client, 1);\n    SSL_set_connect_state(client.ssl);\n    SSL_set_accept_state(server.ssl);\n    if (test_ctx->use_sctp) {\n        SSL_set_bio(client.ssl, client_to_server, client_to_server);\n        SSL_set_bio(server.ssl, server_to_client, server_to_client);\n    } else {\n        SSL_set_bio(client.ssl, server_to_client, client_to_server);\n        if (!TEST_int_gt(BIO_up_ref(server_to_client), 0)\n                || !TEST_int_gt(BIO_up_ref(client_to_server), 0))\n            goto err;\n        SSL_set_bio(server.ssl, client_to_server, server_to_client);\n    }\n    ex_data_idx = SSL_get_ex_new_index(0, "ex data", NULL, NULL, NULL);\n    if (!TEST_int_ge(ex_data_idx, 0)\n            || !TEST_int_eq(SSL_set_ex_data(server.ssl, ex_data_idx, &server_ex_data), 1)\n            || !TEST_int_eq(SSL_set_ex_data(client.ssl, ex_data_idx, &client_ex_data), 1))\n        goto err;\n    SSL_set_info_callback(server.ssl, &info_cb);\n    SSL_set_info_callback(client.ssl, &info_cb);\n    client.status = PEER_RETRY;\n    server.status = PEER_WAITING;\n    start = time(NULL);\n    for(;;) {\n        if (client_turn) {\n            do_connect_step(test_ctx, &client, phase);\n            status = handshake_status(client.status, server.status,\n                                      1  );\n            if (server.status == PEER_WAITING)\n                server.status = PEER_RETRY;\n        } else {\n            do_connect_step(test_ctx, &server, phase);\n            status = handshake_status(server.status, client.status,\n                                      0  );\n        }\n        switch (status) {\n        case HANDSHAKE_SUCCESS:\n            client_turn_count = 0;\n            phase = next_phase(test_ctx, phase);\n            if (phase == CONNECTION_DONE) {\n                ret->result = SSL_TEST_SUCCESS;\n                goto err;\n            } else {\n                client.status = server.status = PEER_RETRY;\n                client_turn = 1;\n                break;\n            }\n        case CLIENT_ERROR:\n            ret->result = SSL_TEST_CLIENT_FAIL;\n            goto err;\n        case SERVER_ERROR:\n            ret->result = SSL_TEST_SERVER_FAIL;\n            goto err;\n        case INTERNAL_ERROR:\n            ret->result = SSL_TEST_INTERNAL_ERROR;\n            goto err;\n        case HANDSHAKE_RETRY:\n            if (test_ctx->use_sctp) {\n                if (time(NULL) - start > 3) {\n                    ret->result = SSL_TEST_INTERNAL_ERROR;\n                    goto err;\n                }\n                if ((client_turn && server.status == PEER_RETRY)\n                        || (!client_turn && client.status == PEER_RETRY))\n                    client_turn ^= 1;\n            } else {\n                if (client_turn_count++ >= 2000) {\n                    ret->result = SSL_TEST_INTERNAL_ERROR;\n                    goto err;\n                }\n                client_turn ^= 1;\n            }\n            break;\n        }\n    }\n err:\n    ret->server_alert_sent = server_ex_data.alert_sent;\n    ret->server_num_fatal_alerts_sent = server_ex_data.num_fatal_alerts_sent;\n    ret->server_alert_received = client_ex_data.alert_received;\n    ret->client_alert_sent = client_ex_data.alert_sent;\n    ret->client_num_fatal_alerts_sent = client_ex_data.num_fatal_alerts_sent;\n    ret->client_alert_received = server_ex_data.alert_received;\n    ret->server_protocol = SSL_version(server.ssl);\n    ret->client_protocol = SSL_version(client.ssl);\n    ret->servername = server_ex_data.servername;\n    if ((sess = SSL_get0_session(client.ssl)) != NULL) {\n        SSL_SESSION_get0_ticket(sess, &tick, &tick_len);\n        sess_id = SSL_SESSION_get_id(sess, &sess_id_len);\n    }\n    if (tick == NULL || tick_len == 0)\n        ret->session_ticket = SSL_TEST_SESSION_TICKET_NO;\n    else\n        ret->session_ticket = SSL_TEST_SESSION_TICKET_YES;\n    ret->compression = (SSL_get_current_compression(client.ssl) == NULL)\n                       ? SSL_TEST_COMPRESSION_NO\n                       : SSL_TEST_COMPRESSION_YES;\n    if (sess_id == NULL || sess_id_len == 0)\n        ret->session_id = SSL_TEST_SESSION_ID_NO;\n    else\n        ret->session_id = SSL_TEST_SESSION_ID_YES;\n    ret->session_ticket_do_not_call = server_ex_data.session_ticket_do_not_call;\n#ifndef OPENSSL_NO_NEXTPROTONEG\n    SSL_get0_next_proto_negotiated(client.ssl, &proto, &proto_len);\n    ret->client_npn_negotiated = dup_str(proto, proto_len);\n    SSL_get0_next_proto_negotiated(server.ssl, &proto, &proto_len);\n    ret->server_npn_negotiated = dup_str(proto, proto_len);\n#endif\n    SSL_get0_alpn_selected(client.ssl, &proto, &proto_len);\n    ret->client_alpn_negotiated = dup_str(proto, proto_len);\n    SSL_get0_alpn_selected(server.ssl, &proto, &proto_len);\n    ret->server_alpn_negotiated = dup_str(proto, proto_len);\n    ret->client_resumed = SSL_session_reused(client.ssl);\n    ret->server_resumed = SSL_session_reused(server.ssl);\n    if (session_out != NULL)\n        *session_out = SSL_get1_session(client.ssl);\n    if (SSL_get_server_tmp_key(client.ssl, &tmp_key)) {\n        ret->tmp_key_type = pkey_type(tmp_key);\n        EVP_PKEY_free(tmp_key);\n    }\n    SSL_get_peer_signature_nid(client.ssl, &ret->server_sign_hash);\n    SSL_get_peer_signature_nid(server.ssl, &ret->client_sign_hash);\n    SSL_get_peer_signature_type_nid(client.ssl, &ret->server_sign_type);\n    SSL_get_peer_signature_type_nid(server.ssl, &ret->client_sign_type);\n    names = SSL_get0_peer_CA_list(client.ssl);\n    if (names == NULL)\n        ret->client_ca_names = NULL;\n    else\n        ret->client_ca_names = SSL_dup_CA_list(names);\n    names = SSL_get0_peer_CA_list(server.ssl);\n    if (names == NULL)\n        ret->server_ca_names = NULL;\n    else\n        ret->server_ca_names = SSL_dup_CA_list(names);\n    ret->server_cert_type = peer_pkey_type(client.ssl);\n    ret->client_cert_type = peer_pkey_type(server.ssl);\n    ctx_data_free_data(&server_ctx_data);\n    ctx_data_free_data(&server2_ctx_data);\n    ctx_data_free_data(&client_ctx_data);\n    peer_free_data(&server);\n    peer_free_data(&client);\n    return ret;\n}', 'static int create_peer(PEER *peer, SSL_CTX *ctx)\n{\n    static const int peer_buffer_size = 64 * 1024;\n    SSL *ssl = NULL;\n    unsigned char *read_buf = NULL, *write_buf = NULL;\n    if (!TEST_ptr(ssl = SSL_new(ctx))\n            || !TEST_ptr(write_buf = OPENSSL_zalloc(peer_buffer_size))\n            || !TEST_ptr(read_buf = OPENSSL_zalloc(peer_buffer_size)))\n        goto err;\n    peer->ssl = ssl;\n    peer->write_buf = write_buf;\n    peer->read_buf = read_buf;\n    peer->write_buf_len = peer->read_buf_len = peer_buffer_size;\n    return 1;\nerr:\n    SSL_free(ssl);\n    OPENSSL_free(write_buf);\n    OPENSSL_free(read_buf);\n    return 0;\n}', 'SSL *SSL_new(SSL_CTX *ctx)\n{\n    SSL *s;\n    if (ctx == NULL) {\n        SSLerr(SSL_F_SSL_NEW, SSL_R_NULL_SSL_CTX);\n        return (NULL);\n    }\n    if (ctx->method == NULL) {\n        SSLerr(SSL_F_SSL_NEW, SSL_R_SSL_CTX_HAS_NO_DEFAULT_SSL_VERSION);\n        return (NULL);\n    }\n    s = OPENSSL_zalloc(sizeof(*s));\n    if (s == NULL)\n        goto err;\n    s->lock = CRYPTO_THREAD_lock_new();\n    if (s->lock == NULL)\n        goto err;\n    if (RAND_get_rand_method() == RAND_OpenSSL()) {\n        s->drbg = RAND_DRBG_new(NID_aes_128_ctr, RAND_DRBG_FLAG_CTR_USE_DF,\n                                RAND_DRBG_get0_global());\n        if (s->drbg == NULL\n            || RAND_DRBG_instantiate(s->drbg, NULL, 0) == 0) {\n            CRYPTO_THREAD_lock_free(s->lock);\n            goto err;\n        }\n    }\n    RECORD_LAYER_init(&s->rlayer, s);\n    s->options = ctx->options;\n    s->dane.flags = ctx->dane.flags;\n    s->min_proto_version = ctx->min_proto_version;\n    s->max_proto_version = ctx->max_proto_version;\n    s->mode = ctx->mode;\n    s->max_cert_list = ctx->max_cert_list;\n    s->references = 1;\n    s->max_early_data = ctx->max_early_data;\n    s->cert = ssl_cert_dup(ctx->cert);\n    if (s->cert == NULL)\n        goto err;\n    RECORD_LAYER_set_read_ahead(&s->rlayer, ctx->read_ahead);\n    s->msg_callback = ctx->msg_callback;\n    s->msg_callback_arg = ctx->msg_callback_arg;\n    s->verify_mode = ctx->verify_mode;\n    s->not_resumable_session_cb = ctx->not_resumable_session_cb;\n    s->record_padding_cb = ctx->record_padding_cb;\n    s->record_padding_arg = ctx->record_padding_arg;\n    s->block_padding = ctx->block_padding;\n    s->sid_ctx_length = ctx->sid_ctx_length;\n    if (!ossl_assert(s->sid_ctx_length <= sizeof s->sid_ctx))\n        goto err;\n    memcpy(&s->sid_ctx, &ctx->sid_ctx, sizeof(s->sid_ctx));\n    s->verify_callback = ctx->default_verify_callback;\n    s->generate_session_id = ctx->generate_session_id;\n    s->param = X509_VERIFY_PARAM_new();\n    if (s->param == NULL)\n        goto err;\n    X509_VERIFY_PARAM_inherit(s->param, ctx->param);\n    s->quiet_shutdown = ctx->quiet_shutdown;\n    s->max_send_fragment = ctx->max_send_fragment;\n    s->split_send_fragment = ctx->split_send_fragment;\n    s->max_pipelines = ctx->max_pipelines;\n    if (s->max_pipelines > 1)\n        RECORD_LAYER_set_read_ahead(&s->rlayer, 1);\n    if (ctx->default_read_buf_len > 0)\n        SSL_set_default_read_buffer_len(s, ctx->default_read_buf_len);\n    SSL_CTX_up_ref(ctx);\n    s->ctx = ctx;\n    s->ext.debug_cb = 0;\n    s->ext.debug_arg = NULL;\n    s->ext.ticket_expected = 0;\n    s->ext.status_type = ctx->ext.status_type;\n    s->ext.status_expected = 0;\n    s->ext.ocsp.ids = NULL;\n    s->ext.ocsp.exts = NULL;\n    s->ext.ocsp.resp = NULL;\n    s->ext.ocsp.resp_len = 0;\n    SSL_CTX_up_ref(ctx);\n    s->session_ctx = ctx;\n#ifndef OPENSSL_NO_EC\n    if (ctx->ext.ecpointformats) {\n        s->ext.ecpointformats =\n            OPENSSL_memdup(ctx->ext.ecpointformats,\n                           ctx->ext.ecpointformats_len);\n        if (!s->ext.ecpointformats)\n            goto err;\n        s->ext.ecpointformats_len =\n            ctx->ext.ecpointformats_len;\n    }\n    if (ctx->ext.supportedgroups) {\n        s->ext.supportedgroups =\n            OPENSSL_memdup(ctx->ext.supportedgroups,\n                           ctx->ext.supportedgroups_len\n                                * sizeof(*ctx->ext.supportedgroups));\n        if (!s->ext.supportedgroups)\n            goto err;\n        s->ext.supportedgroups_len = ctx->ext.supportedgroups_len;\n    }\n#endif\n#ifndef OPENSSL_NO_NEXTPROTONEG\n    s->ext.npn = NULL;\n#endif\n    if (s->ctx->ext.alpn) {\n        s->ext.alpn = OPENSSL_malloc(s->ctx->ext.alpn_len);\n        if (s->ext.alpn == NULL)\n            goto err;\n        memcpy(s->ext.alpn, s->ctx->ext.alpn, s->ctx->ext.alpn_len);\n        s->ext.alpn_len = s->ctx->ext.alpn_len;\n    }\n    s->verified_chain = NULL;\n    s->verify_result = X509_V_OK;\n    s->default_passwd_callback = ctx->default_passwd_callback;\n    s->default_passwd_callback_userdata = ctx->default_passwd_callback_userdata;\n    s->method = ctx->method;\n    s->key_update = SSL_KEY_UPDATE_NONE;\n    if (!s->method->ssl_new(s))\n        goto err;\n    s->server = (ctx->method->ssl_accept == ssl_undefined_function) ? 0 : 1;\n    if (!SSL_clear(s))\n        goto err;\n    if (!CRYPTO_new_ex_data(CRYPTO_EX_INDEX_SSL, s, &s->ex_data))\n        goto err;\n#ifndef OPENSSL_NO_PSK\n    s->psk_client_callback = ctx->psk_client_callback;\n    s->psk_server_callback = ctx->psk_server_callback;\n#endif\n    s->psk_find_session_cb = ctx->psk_find_session_cb;\n    s->psk_use_session_cb = ctx->psk_use_session_cb;\n    s->job = NULL;\n#ifndef OPENSSL_NO_CT\n    if (!SSL_set_ct_validation_callback(s, ctx->ct_validation_callback,\n                                        ctx->ct_validation_callback_arg))\n        goto err;\n#endif\n    return s;\n err:\n    SSL_free(s);\n    SSLerr(SSL_F_SSL_NEW, ERR_R_MALLOC_FAILURE);\n    return NULL;\n}', 'int SSL_CTX_add_session(SSL_CTX *ctx, SSL_SESSION *c)\n{\n    int ret = 0;\n    SSL_SESSION *s;\n    SSL_SESSION_up_ref(c);\n    CRYPTO_THREAD_write_lock(ctx->lock);\n    s = lh_SSL_SESSION_insert(ctx->sessions, c);\n    if (s != NULL && s != c) {\n        SSL_SESSION_list_remove(ctx, s);\n        SSL_SESSION_free(s);\n        s = NULL;\n    } else if (s == NULL &&\n               lh_SSL_SESSION_retrieve(ctx->sessions, c) == NULL) {\n        s = c;\n    }\n    if (s == NULL)\n        SSL_SESSION_list_add(ctx, c);\n    if (s != NULL) {\n        SSL_SESSION_free(s);\n        ret = 0;\n    } else {\n        ret = 1;\n        if (SSL_CTX_sess_get_cache_size(ctx) > 0) {\n            while (SSL_CTX_sess_number(ctx) > SSL_CTX_sess_get_cache_size(ctx)) {\n                if (!remove_session_lock(ctx, ctx->session_cache_tail, 0))\n                    break;\n                else\n                    ctx->stats.sess_cache_full++;\n            }\n        }\n    }\n    CRYPTO_THREAD_unlock(ctx->lock);\n    return ret;\n}', 'DEFINE_LHASH_OF(SSL_SESSION)', 'void *OPENSSL_LH_insert(OPENSSL_LHASH *lh, void *data)\n{\n    unsigned long hash;\n    OPENSSL_LH_NODE *nn, **rn;\n    void *ret;\n    lh->error = 0;\n    if ((lh->up_load <= (lh->num_items * LH_LOAD_MULT / lh->num_nodes)) && !expand(lh))\n        return NULL;\n    rn = getrn(lh, data, &hash);\n    if (*rn == NULL) {\n        if ((nn = OPENSSL_malloc(sizeof(*nn))) == NULL) {\n            lh->error++;\n            return NULL;\n        }\n        nn->data = data;\n        nn->next = NULL;\n        nn->hash = hash;\n        *rn = nn;\n        ret = NULL;\n        lh->num_insert++;\n        lh->num_items++;\n    } else {\n        ret = (*rn)->data;\n        (*rn)->data = data;\n        lh->num_replace++;\n    }\n    return ret;\n}', 'int SSL_set_session(SSL *s, SSL_SESSION *session)\n{\n    ssl_clear_bad_session(s);\n    if (s->ctx->method != s->method) {\n        if (!SSL_set_ssl_method(s, s->ctx->method))\n            return 0;\n    }\n    if (session != NULL) {\n        SSL_SESSION_up_ref(session);\n        s->verify_result = session->verify_result;\n    }\n    SSL_SESSION_free(s->session);\n    s->session = session;\n    return 1;\n}', 'int ssl_clear_bad_session(SSL *s)\n{\n    if ((s->session != NULL) &&\n        !(s->shutdown & SSL_SENT_SHUTDOWN) &&\n        !(SSL_in_init(s) || SSL_in_before(s))) {\n        SSL_CTX_remove_session(s->session_ctx, s->session);\n        return 1;\n    } else\n        return (0);\n}', 'int SSL_CTX_remove_session(SSL_CTX *ctx, SSL_SESSION *c)\n{\n    return remove_session_lock(ctx, c, 1);\n}', 'static int remove_session_lock(SSL_CTX *ctx, SSL_SESSION *c, int lck)\n{\n    SSL_SESSION *r;\n    int ret = 0;\n    if ((c != NULL) && (c->session_id_length != 0)) {\n        if (lck)\n            CRYPTO_THREAD_write_lock(ctx->lock);\n        if ((r = lh_SSL_SESSION_retrieve(ctx->sessions, c)) == c) {\n            ret = 1;\n            r = lh_SSL_SESSION_delete(ctx->sessions, c);\n            SSL_SESSION_list_remove(ctx, c);\n        }\n        c->not_resumable = 1;\n        if (lck)\n            CRYPTO_THREAD_unlock(ctx->lock);\n        if (ret)\n            SSL_SESSION_free(r);\n        if (ctx->remove_session_cb != NULL)\n            ctx->remove_session_cb(ctx, c);\n    } else\n        ret = 0;\n    return (ret);\n}', 'void *OPENSSL_LH_delete(OPENSSL_LHASH *lh, const void *data)\n{\n    unsigned long hash;\n    OPENSSL_LH_NODE *nn, **rn;\n    void *ret;\n    lh->error = 0;\n    rn = getrn(lh, data, &hash);\n    if (*rn == NULL) {\n        lh->num_no_delete++;\n        return NULL;\n    } else {\n        nn = *rn;\n        *rn = nn->next;\n        ret = nn->data;\n        OPENSSL_free(nn);\n        lh->num_delete++;\n    }\n    lh->num_items--;\n    if ((lh->num_nodes > MIN_NODES) &&\n        (lh->down_load >= (lh->num_items * LH_LOAD_MULT / lh->num_nodes)))\n        contract(lh);\n    return ret;\n}']