crypto/evp/m_sigver.c:129: error: MEMORY_LEAK
  memory dynamically allocated by call to `EVP_MD_CTX_new()` at line 125, column 35 is not reachable after line 129, column 17.
Showing all 65 steps of the trace


crypto/evp/m_sigver.c:93:1: start of procedure EVP_DigestSignFinal()
91.   }
92.   
93. > int EVP_DigestSignFinal(EVP_MD_CTX *ctx, unsigned char *sigret,
94.                           size_t *siglen)
95.   {

crypto/evp/m_sigver.c:96:5: 
94.                           size_t *siglen)
95.   {
96. >     int sctx = 0, r = 0;
97.       EVP_PKEY_CTX *pctx = ctx->pctx;
98.       if (pctx->pmeth->flags & EVP_PKEY_FLAG_SIGCTX_CUSTOM) {

crypto/evp/m_sigver.c:97:5: 
95.   {
96.       int sctx = 0, r = 0;
97. >     EVP_PKEY_CTX *pctx = ctx->pctx;
98.       if (pctx->pmeth->flags & EVP_PKEY_FLAG_SIGCTX_CUSTOM) {
99.           if (!sigret)

crypto/evp/m_sigver.c:98:9: Taking false branch
96.       int sctx = 0, r = 0;
97.       EVP_PKEY_CTX *pctx = ctx->pctx;
98.       if (pctx->pmeth->flags & EVP_PKEY_FLAG_SIGCTX_CUSTOM) {
               ^
99.           if (!sigret)
100.               return pctx->pmeth->signctx(pctx, sigret, siglen, ctx);

crypto/evp/m_sigver.c:112:9: Taking true branch
110.           return r;
111.       }
112.       if (pctx->pmeth->signctx)
               ^
113.           sctx = 1;
114.       else

crypto/evp/m_sigver.c:113:9: 
111.       }
112.       if (pctx->pmeth->signctx)
113. >         sctx = 1;
114.       else
115.           sctx = 0;

crypto/evp/m_sigver.c:116:9: Taking true branch
114.       else
115.           sctx = 0;
116.       if (sigret) {
               ^
117.           unsigned char md[EVP_MAX_MD_SIZE];
118.           unsigned int mdlen = 0;

crypto/evp/m_sigver.c:118:9: 
116.       if (sigret) {
117.           unsigned char md[EVP_MAX_MD_SIZE];
118. >         unsigned int mdlen = 0;
119.           if (ctx->flags & EVP_MD_CTX_FLAG_FINALISE) {
120.               if (sctx)

crypto/evp/m_sigver.c:119:13: Taking false branch
117.           unsigned char md[EVP_MAX_MD_SIZE];
118.           unsigned int mdlen = 0;
119.           if (ctx->flags & EVP_MD_CTX_FLAG_FINALISE) {
                   ^
120.               if (sctx)
121.                   r = ctx->pctx->pmeth->signctx(ctx->pctx, sigret, siglen, ctx);

crypto/evp/m_sigver.c:125:13: 
123.                   r = EVP_DigestFinal_ex(ctx, md, &mdlen);
124.           } else {
125. >             EVP_MD_CTX *tmp_ctx = EVP_MD_CTX_new();
126.               if (tmp_ctx == NULL)
127.                   return 0;

crypto/evp/digest.c:44:1: start of procedure EVP_MD_CTX_new()
  42.   }
  43.   
  44. > EVP_MD_CTX *EVP_MD_CTX_new(void)
  45.   {
  46.       return OPENSSL_zalloc(sizeof(EVP_MD_CTX));

crypto/evp/digest.c:46:5: 
  44.   EVP_MD_CTX *EVP_MD_CTX_new(void)
  45.   {
  46. >     return OPENSSL_zalloc(sizeof(EVP_MD_CTX));
  47.   }
  48.   

crypto/mem.c:197:1: start of procedure CRYPTO_zalloc()
    195.   }
    196.   
    197. > void *CRYPTO_zalloc(size_t num, const char *file, int line)
    198.   {
    199.       void *ret = CRYPTO_malloc(num, file, line);

crypto/mem.c:199:5: 
    197.   void *CRYPTO_zalloc(size_t num, const char *file, int line)
    198.   {
    199. >     void *ret = CRYPTO_malloc(num, file, line);
    200.   
    201.       FAILTEST();

crypto/mem.c:169:1: start of procedure CRYPTO_malloc()
      167.   #endif
      168.   
      169. > void *CRYPTO_malloc(size_t num, const char *file, int line)
      170.   {
      171.       void *ret = NULL;

crypto/mem.c:171:5: 
      169.   void *CRYPTO_malloc(size_t num, const char *file, int line)
      170.   {
      171. >     void *ret = NULL;
      172.   
      173.       if (malloc_impl != NULL && malloc_impl != CRYPTO_malloc)

crypto/mem.c:173:9: Taking false branch
      171.       void *ret = NULL;
      172.   
      173.       if (malloc_impl != NULL && malloc_impl != CRYPTO_malloc)
                     ^
      174.           return malloc_impl(num, file, line);
      175.   

crypto/mem.c:176:9: Taking false branch
      174.           return malloc_impl(num, file, line);
      175.   
      176.       if (num == 0)
                     ^
      177.           return NULL;
      178.   

crypto/mem.c:180:5: 
      178.   
      179.       FAILTEST();
      180. >     allow_customize = 0;
      181.   #ifndef OPENSSL_NO_CRYPTO_MDEBUG
      182.       if (call_malloc_debug) {

crypto/mem.c:190:5: 
      188.       }
      189.   #else
      190. >     osslargused(file); osslargused(line);
      191.       ret = malloc(num);
      192.   #endif

crypto/mem.c:190:24: 
      188.       }
      189.   #else
      190. >     osslargused(file); osslargused(line);
      191.       ret = malloc(num);
      192.   #endif

crypto/mem.c:191:5: 
      189.   #else
      190.       osslargused(file); osslargused(line);
      191. >     ret = malloc(num);
      192.   #endif
      193.   

crypto/mem.c:194:5: 
      192.   #endif
      193.   
      194. >     return ret;
      195.   }
      196.   

crypto/mem.c:195:1: return from a call to CRYPTO_malloc
      193.   
      194.       return ret;
      195. > }
      196.   
      197.   void *CRYPTO_zalloc(size_t num, const char *file, int line)

crypto/mem.c:202:9: Taking true branch
    200.   
    201.       FAILTEST();
    202.       if (ret != NULL)
                   ^
    203.           memset(ret, 0, num);
    204.       return ret;

crypto/mem.c:203:9: 
    201.       FAILTEST();
    202.       if (ret != NULL)
    203. >         memset(ret, 0, num);
    204.       return ret;
    205.   }

crypto/mem.c:204:5: 
    202.       if (ret != NULL)
    203.           memset(ret, 0, num);
    204. >     return ret;
    205.   }
    206.   

crypto/mem.c:205:1: return from a call to CRYPTO_zalloc
    203.           memset(ret, 0, num);
    204.       return ret;
    205. > }
    206.   
    207.   void *CRYPTO_realloc(void *str, size_t num, const char *file, int line)

crypto/evp/digest.c:47:1: return from a call to EVP_MD_CTX_new
  45.   {
  46.       return OPENSSL_zalloc(sizeof(EVP_MD_CTX));
  47. > }
  48.   
  49.   void EVP_MD_CTX_free(EVP_MD_CTX *ctx)

crypto/evp/m_sigver.c:126:17: Taking false branch
124.           } else {
125.               EVP_MD_CTX *tmp_ctx = EVP_MD_CTX_new();
126.               if (tmp_ctx == NULL)
                       ^
127.                   return 0;
128.               if (!EVP_MD_CTX_copy_ex(tmp_ctx, ctx)) {

crypto/evp/m_sigver.c:128:18: 
126.               if (tmp_ctx == NULL)
127.                   return 0;
128. >             if (!EVP_MD_CTX_copy_ex(tmp_ctx, ctx)) {
129.                   EVP_MD_CTX_free(tmp_ctx);
130.                   return 0;

crypto/evp/digest.c:183:1: start of procedure EVP_MD_CTX_copy_ex()
  181.   }
  182.   
  183. > int EVP_MD_CTX_copy_ex(EVP_MD_CTX *out, const EVP_MD_CTX *in)
  184.   {
  185.       unsigned char *tmp_buf;

crypto/evp/digest.c:186:10: Taking false branch
  184.   {
  185.       unsigned char *tmp_buf;
  186.       if ((in == NULL) || (in->digest == NULL)) {
                  ^
  187.           EVPerr(EVP_F_EVP_MD_CTX_COPY_EX, EVP_R_INPUT_NOT_INITIALIZED);
  188.           return 0;

crypto/evp/digest.c:186:26: Taking true branch
  184.   {
  185.       unsigned char *tmp_buf;
  186.       if ((in == NULL) || (in->digest == NULL)) {
                                  ^
  187.           EVPerr(EVP_F_EVP_MD_CTX_COPY_EX, EVP_R_INPUT_NOT_INITIALIZED);
  188.           return 0;

crypto/evp/digest.c:187:9: 
  185.       unsigned char *tmp_buf;
  186.       if ((in == NULL) || (in->digest == NULL)) {
  187. >         EVPerr(EVP_F_EVP_MD_CTX_COPY_EX, EVP_R_INPUT_NOT_INITIALIZED);
  188.           return 0;
  189.       }

crypto/err/err.c:365:1: start of procedure ERR_put_error()
    363.   /********************************************************/
    364.   
    365. > void ERR_put_error(int lib, int func, int reason, const char *file, int line)
    366.   {
    367.       ERR_STATE *es;

crypto/err/err.c:388:5: 
    386.       }
    387.   #endif
    388. >     es = ERR_get_state();
    389.       if (es == NULL)
    390.           return;

crypto/err/err.c:679:1: start of procedure ERR_get_state()
      677.   }
      678.   
      679. > ERR_STATE *ERR_get_state(void)
      680.   {
      681.       ERR_STATE *state = NULL;

crypto/err/err.c:681:5: 
      679.   ERR_STATE *ERR_get_state(void)
      680.   {
      681. >     ERR_STATE *state = NULL;
      682.   
      683.       if (!RUN_ONCE(&err_init, err_do_init))

crypto/err/err.c:683:10: 
      681.       ERR_STATE *state = NULL;
      682.   
      683. >     if (!RUN_ONCE(&err_init, err_do_init))
      684.           return NULL;
      685.   

crypto/threads_pthread.c:105:1: start of procedure CRYPTO_THREAD_run_once()
        103.   }
        104.   
        105. > int CRYPTO_THREAD_run_once(CRYPTO_ONCE *once, void (*init)(void))
        106.   {
        107.       if (pthread_once(once, init) != 0)

crypto/threads_pthread.c:107:9: Taking true branch
        105.   int CRYPTO_THREAD_run_once(CRYPTO_ONCE *once, void (*init)(void))
        106.   {
        107.       if (pthread_once(once, init) != 0)
                       ^
        108.           return 0;
        109.   

crypto/threads_pthread.c:108:9: 
        106.   {
        107.       if (pthread_once(once, init) != 0)
        108. >         return 0;
        109.   
        110.       return 1;

crypto/threads_pthread.c:111:1: return from a call to CRYPTO_THREAD_run_once
        109.   
        110.       return 1;
        111. > }
        112.   
        113.   int CRYPTO_THREAD_init_local(CRYPTO_THREAD_LOCAL *key, void (*cleanup)(void *))

crypto/err/err.c:683:10: Condition is false
      681.       ERR_STATE *state = NULL;
      682.   
      683.       if (!RUN_ONCE(&err_init, err_do_init))
                      ^
      684.           return NULL;
      685.   

crypto/err/err.c:683:10: Taking true branch
      681.       ERR_STATE *state = NULL;
      682.   
      683.       if (!RUN_ONCE(&err_init, err_do_init))
                      ^
      684.           return NULL;
      685.   

crypto/err/err.c:684:9: 
      682.   
      683.       if (!RUN_ONCE(&err_init, err_do_init))
      684. >         return NULL;
      685.   
      686.       state = CRYPTO_THREAD_get_local(&err_thread_local);

crypto/err/err.c:704:1: return from a call to ERR_get_state
      702.   
      703.       return state;
      704. > }
      705.   
      706.   int ERR_get_next_error_library(void)

crypto/err/err.c:389:9: Taking true branch
    387.   #endif
    388.       es = ERR_get_state();
    389.       if (es == NULL)
                   ^
    390.           return;
    391.   

crypto/err/err.c:390:9: 
    388.       es = ERR_get_state();
    389.       if (es == NULL)
    390. >         return;
    391.   
    392.       es->top = (es->top + 1) % ERR_NUM_ERRORS;

crypto/err/err.c:400:1: return from a call to ERR_put_error
    398.       es->err_line[es->top] = line;
    399.       err_clear_data(es, es->top);
    400. > }
    401.   
    402.   void ERR_clear_error(void)

crypto/evp/digest.c:188:9: 
  186.       if ((in == NULL) || (in->digest == NULL)) {
  187.           EVPerr(EVP_F_EVP_MD_CTX_COPY_EX, EVP_R_INPUT_NOT_INITIALIZED);
  188. >         return 0;
  189.       }
  190.   #ifndef OPENSSL_NO_ENGINE

crypto/evp/digest.c:240:1: return from a call to EVP_MD_CTX_copy_ex
  238.   
  239.       return 1;
  240. > }
  241.   
  242.   int EVP_Digest(const void *data, size_t count,

crypto/evp/m_sigver.c:128:18: Taking true branch
126.               if (tmp_ctx == NULL)
127.                   return 0;
128.               if (!EVP_MD_CTX_copy_ex(tmp_ctx, ctx)) {
                        ^
129.                   EVP_MD_CTX_free(tmp_ctx);
130.                   return 0;

crypto/evp/m_sigver.c:129:17: 
127.                   return 0;
128.               if (!EVP_MD_CTX_copy_ex(tmp_ctx, ctx)) {
129. >                 EVP_MD_CTX_free(tmp_ctx);
130.                   return 0;
131.               }

crypto/evp/digest.c:49:1: start of procedure EVP_MD_CTX_free()
  47.   }
  48.   
  49. > void EVP_MD_CTX_free(EVP_MD_CTX *ctx)
  50.   {
  51.       EVP_MD_CTX_reset(ctx);

crypto/evp/digest.c:51:5: Skipping EVP_MD_CTX_reset(): empty list of specs
  49.   void EVP_MD_CTX_free(EVP_MD_CTX *ctx)
  50.   {
  51.       EVP_MD_CTX_reset(ctx);
            ^
  52.       OPENSSL_free(ctx);
  53.   }

crypto/evp/digest.c:52:5: 
  50.   {
  51.       EVP_MD_CTX_reset(ctx);
  52. >     OPENSSL_free(ctx);
  53.   }
  54.   

crypto/mem.c:264:1: start of procedure CRYPTO_free()
    262.   }
    263.   
    264. > void CRYPTO_free(void *str, const char *file, int line)
    265.   {
    266.       if (free_impl != NULL && free_impl != &CRYPTO_free) {

crypto/mem.c:266:9: Taking true branch
    264.   void CRYPTO_free(void *str, const char *file, int line)
    265.   {
    266.       if (free_impl != NULL && free_impl != &CRYPTO_free) {
                   ^
    267.           free_impl(str, file, line);
    268.           return;

crypto/mem.c:266:30: Taking true branch
    264.   void CRYPTO_free(void *str, const char *file, int line)
    265.   {
    266.       if (free_impl != NULL && free_impl != &CRYPTO_free) {
                                        ^
    267.           free_impl(str, file, line);
    268.           return;

crypto/mem.c:267:9: Skipping __function_pointer__(): unresolved function pointer
    265.   {
    266.       if (free_impl != NULL && free_impl != &CRYPTO_free) {
    267.           free_impl(str, file, line);
                   ^
    268.           return;
    269.       }

crypto/mem.c:268:9: 
    266.       if (free_impl != NULL && free_impl != &CRYPTO_free) {
    267.           free_impl(str, file, line);
    268. >         return;
    269.       }
    270.   

crypto/mem.c:282:1: return from a call to CRYPTO_free
    280.       free(str);
    281.   #endif
    282. > }
    283.   
    284.   void CRYPTO_clear_free(void *str, size_t num, const char *file, int line)

crypto/evp/digest.c:53:1: return from a call to EVP_MD_CTX_free
  51.       EVP_MD_CTX_reset(ctx);
  52.       OPENSSL_free(ctx);
  53. > }
  54.   
  55.   int EVP_DigestInit(EVP_MD_CTX *ctx, const EVP_MD *type)

int EVP_DigestSignFinal(EVP_MD_CTX *ctx, unsigned char *sigret,
                        size_t *siglen)
{
    int sctx = 0, r = 0;
    EVP_PKEY_CTX *pctx = ctx->pctx;
    if (pctx->pmeth->flags & EVP_PKEY_FLAG_SIGCTX_CUSTOM) {
        if (!sigret)
            return pctx->pmeth->signctx(pctx, sigret, siglen, ctx);
        if (ctx->flags & EVP_MD_CTX_FLAG_FINALISE)
            r = pctx->pmeth->signctx(pctx, sigret, siglen, ctx);
        else {
            EVP_PKEY_CTX *dctx = EVP_PKEY_CTX_dup(ctx->pctx);
            if (!dctx)
                return 0;
            r = dctx->pmeth->signctx(dctx, sigret, siglen, ctx);
            EVP_PKEY_CTX_free(dctx);
        }
        return r;
    }
    if (pctx->pmeth->signctx)
        sctx = 1;
    else
        sctx = 0;
    if (sigret) {
        unsigned char md[EVP_MAX_MD_SIZE];
        unsigned int mdlen = 0;
        if (ctx->flags & EVP_MD_CTX_FLAG_FINALISE) {
            if (sctx)
                r = ctx->pctx->pmeth->signctx(ctx->pctx, sigret, siglen, ctx);
            else
                r = EVP_DigestFinal_ex(ctx, md, &mdlen);
        } else {
            EVP_MD_CTX *tmp_ctx = EVP_MD_CTX_new();
            if (tmp_ctx == NULL)
                return 0;
            if (!EVP_MD_CTX_copy_ex(tmp_ctx, ctx)) {
                EVP_MD_CTX_free(tmp_ctx);
                return 0;
            }
            if (sctx)
                r = tmp_ctx->pctx->pmeth->signctx(tmp_ctx->pctx,
                                                  sigret, siglen, tmp_ctx);
            else
                r = EVP_DigestFinal_ex(tmp_ctx, md, &mdlen);
            EVP_MD_CTX_free(tmp_ctx);
        }
        if (sctx || !r)
            return r;
        if (EVP_PKEY_sign(ctx->pctx, sigret, siglen, md, mdlen) <= 0)
            return 0;
    } else {
        if (sctx) {
            if (pctx->pmeth->signctx(pctx, sigret, siglen, ctx) <= 0)
                return 0;
        } else {
            int s = EVP_MD_size(ctx->digest);
            if (s < 0 || EVP_PKEY_sign(pctx, sigret, siglen, NULL, s) <= 0)
                return 0;
        }
    }
    return 1;
}
['int EVP_DigestSignFinal(EVP_MD_CTX *ctx, unsigned char *sigret,\n                        size_t *siglen)\n{\n    int sctx = 0, r = 0;\n    EVP_PKEY_CTX *pctx = ctx->pctx;\n    if (pctx->pmeth->flags & EVP_PKEY_FLAG_SIGCTX_CUSTOM) {\n        if (!sigret)\n            return pctx->pmeth->signctx(pctx, sigret, siglen, ctx);\n        if (ctx->flags & EVP_MD_CTX_FLAG_FINALISE)\n            r = pctx->pmeth->signctx(pctx, sigret, siglen, ctx);\n        else {\n            EVP_PKEY_CTX *dctx = EVP_PKEY_CTX_dup(ctx->pctx);\n            if (!dctx)\n                return 0;\n            r = dctx->pmeth->signctx(dctx, sigret, siglen, ctx);\n            EVP_PKEY_CTX_free(dctx);\n        }\n        return r;\n    }\n    if (pctx->pmeth->signctx)\n        sctx = 1;\n    else\n        sctx = 0;\n    if (sigret) {\n        unsigned char md[EVP_MAX_MD_SIZE];\n        unsigned int mdlen = 0;\n        if (ctx->flags & EVP_MD_CTX_FLAG_FINALISE) {\n            if (sctx)\n                r = ctx->pctx->pmeth->signctx(ctx->pctx, sigret, siglen, ctx);\n            else\n                r = EVP_DigestFinal_ex(ctx, md, &mdlen);\n        } else {\n            EVP_MD_CTX *tmp_ctx = EVP_MD_CTX_new();\n            if (tmp_ctx == NULL)\n                return 0;\n            if (!EVP_MD_CTX_copy_ex(tmp_ctx, ctx)) {\n                EVP_MD_CTX_free(tmp_ctx);\n                return 0;\n            }\n            if (sctx)\n                r = tmp_ctx->pctx->pmeth->signctx(tmp_ctx->pctx,\n                                                  sigret, siglen, tmp_ctx);\n            else\n                r = EVP_DigestFinal_ex(tmp_ctx, md, &mdlen);\n            EVP_MD_CTX_free(tmp_ctx);\n        }\n        if (sctx || !r)\n            return r;\n        if (EVP_PKEY_sign(ctx->pctx, sigret, siglen, md, mdlen) <= 0)\n            return 0;\n    } else {\n        if (sctx) {\n            if (pctx->pmeth->signctx(pctx, sigret, siglen, ctx) <= 0)\n                return 0;\n        } else {\n            int s = EVP_MD_size(ctx->digest);\n            if (s < 0 || EVP_PKEY_sign(pctx, sigret, siglen, NULL, s) <= 0)\n                return 0;\n        }\n    }\n    return 1;\n}', 'EVP_MD_CTX *EVP_MD_CTX_new(void)\n{\n    return OPENSSL_zalloc(sizeof(EVP_MD_CTX));\n}', 'void *CRYPTO_zalloc(size_t num, const char *file, int line)\n{\n    void *ret = CRYPTO_malloc(num, file, line);\n    FAILTEST();\n    if (ret != NULL)\n        memset(ret, 0, num);\n    return ret;\n}', 'void *CRYPTO_malloc(size_t num, const char *file, int line)\n{\n    void *ret = NULL;\n    if (malloc_impl != NULL && malloc_impl != CRYPTO_malloc)\n        return malloc_impl(num, file, line);\n    if (num == 0)\n        return NULL;\n    FAILTEST();\n    allow_customize = 0;\n#ifndef OPENSSL_NO_CRYPTO_MDEBUG\n    if (call_malloc_debug) {\n        CRYPTO_mem_debug_malloc(NULL, num, 0, file, line);\n        ret = malloc(num);\n        CRYPTO_mem_debug_malloc(ret, num, 1, file, line);\n    } else {\n        ret = malloc(num);\n    }\n#else\n    osslargused(file); osslargused(line);\n    ret = malloc(num);\n#endif\n    return ret;\n}', 'int EVP_MD_CTX_copy_ex(EVP_MD_CTX *out, const EVP_MD_CTX *in)\n{\n    unsigned char *tmp_buf;\n    if ((in == NULL) || (in->digest == NULL)) {\n        EVPerr(EVP_F_EVP_MD_CTX_COPY_EX, EVP_R_INPUT_NOT_INITIALIZED);\n        return 0;\n    }\n#ifndef OPENSSL_NO_ENGINE\n    if (in->engine && !ENGINE_init(in->engine)) {\n        EVPerr(EVP_F_EVP_MD_CTX_COPY_EX, ERR_R_ENGINE_LIB);\n        return 0;\n    }\n#endif\n    if (out->digest == in->digest) {\n        tmp_buf = out->md_data;\n        EVP_MD_CTX_set_flags(out, EVP_MD_CTX_FLAG_REUSE);\n    } else\n        tmp_buf = NULL;\n    EVP_MD_CTX_reset(out);\n    memcpy(out, in, sizeof(*out));\n    out->md_data = NULL;\n    out->pctx = NULL;\n    if (in->md_data && out->digest->ctx_size) {\n        if (tmp_buf)\n            out->md_data = tmp_buf;\n        else {\n            out->md_data = OPENSSL_malloc(out->digest->ctx_size);\n            if (out->md_data == NULL) {\n                EVPerr(EVP_F_EVP_MD_CTX_COPY_EX, ERR_R_MALLOC_FAILURE);\n                return 0;\n            }\n        }\n        memcpy(out->md_data, in->md_data, out->digest->ctx_size);\n    }\n    out->update = in->update;\n    if (in->pctx) {\n        out->pctx = EVP_PKEY_CTX_dup(in->pctx);\n        if (!out->pctx) {\n            EVP_MD_CTX_reset(out);\n            return 0;\n        }\n    }\n    if (out->digest->copy)\n        return out->digest->copy(out, in);\n    return 1;\n}', 'void ERR_put_error(int lib, int func, int reason, const char *file, int line)\n{\n    ERR_STATE *es;\n#ifdef _OSD_POSIX\n    if (strncmp(file, "*POSIX(", sizeof("*POSIX(") - 1) == 0) {\n        char *end;\n        file += sizeof("*POSIX(") - 1;\n        end = &file[strlen(file) - 1];\n        if (*end == \')\')\n            *end = \'\\0\';\n        if ((end = strrchr(file, \'/\')) != NULL)\n            file = &end[1];\n    }\n#endif\n    es = ERR_get_state();\n    if (es == NULL)\n        return;\n    es->top = (es->top + 1) % ERR_NUM_ERRORS;\n    if (es->top == es->bottom)\n        es->bottom = (es->bottom + 1) % ERR_NUM_ERRORS;\n    es->err_flags[es->top] = 0;\n    es->err_buffer[es->top] = ERR_PACK(lib, func, reason);\n    es->err_file[es->top] = file;\n    es->err_line[es->top] = line;\n    err_clear_data(es, es->top);\n}', 'ERR_STATE *ERR_get_state(void)\n{\n    ERR_STATE *state = NULL;\n    if (!RUN_ONCE(&err_init, err_do_init))\n        return NULL;\n    state = CRYPTO_THREAD_get_local(&err_thread_local);\n    if (state == NULL) {\n        state = OPENSSL_zalloc(sizeof(*state));\n        if (state == NULL)\n            return NULL;\n        if (!ossl_init_thread_start(OPENSSL_INIT_THREAD_ERR_STATE)\n            || !CRYPTO_THREAD_set_local(&err_thread_local, state)) {\n            ERR_STATE_free(state);\n            return NULL;\n        }\n        OPENSSL_init_crypto(OPENSSL_INIT_LOAD_CRYPTO_STRINGS, NULL);\n    }\n    return state;\n}', 'int CRYPTO_THREAD_run_once(CRYPTO_ONCE *once, void (*init)(void))\n{\n    if (pthread_once(once, init) != 0)\n        return 0;\n    return 1;\n}', 'void EVP_MD_CTX_free(EVP_MD_CTX *ctx)\n{\n    EVP_MD_CTX_reset(ctx);\n    OPENSSL_free(ctx);\n}', 'void CRYPTO_free(void *str, const char *file, int line)\n{\n    if (free_impl != NULL && free_impl != &CRYPTO_free) {\n        free_impl(str, file, line);\n        return;\n    }\n#ifndef OPENSSL_NO_CRYPTO_MDEBUG\n    if (call_malloc_debug) {\n        CRYPTO_mem_debug_free(str, 0, file, line);\n        free(str);\n        CRYPTO_mem_debug_free(str, 1, file, line);\n    } else {\n        free(str);\n    }\n#else\n    free(str);\n#endif\n}']