int EVP_EncryptUpdate(EVP_CIPHER_CTX *ctx, unsigned char *out, int *outl,
                      const unsigned char *in, int inl)
{
    int i, j, bl;
    if (ctx->cipher->flags & EVP_CIPH_FLAG_CUSTOM_CIPHER) {
        i = ctx->cipher->do_cipher(ctx, out, in, inl);
        if (i < 0)
            return 0;
        else
            *outl = i;
        return 1;
    }
    if (inl <= 0) {
        *outl = 0;
        return inl == 0;
    }
    if (ctx->buf_len == 0 && (inl & (ctx->block_mask)) == 0) {
        if (ctx->cipher->do_cipher(ctx, out, in, inl)) {
            *outl = inl;
            return 1;
        } else {
            *outl = 0;
            return 0;
        }
    }
    i = ctx->buf_len;
    bl = ctx->cipher->block_size;
    OPENSSL_assert(bl <= (int)sizeof(ctx->buf));
    if (i != 0) {
        if (i + inl < bl) {
            memcpy(&(ctx->buf[i]), in, inl);
            ctx->buf_len += inl;
            *outl = 0;
            return 1;
        } else {
            j = bl - i;
            memcpy(&(ctx->buf[i]), in, j);
            if (!ctx->cipher->do_cipher(ctx, out, ctx->buf, bl))
                return 0;
            inl -= j;
            in += j;
            out += bl;
            *outl = bl;
        }
    } else
        *outl = 0;
    i = inl & (bl - 1);
    inl -= i;
    if (inl > 0) {
        if (!ctx->cipher->do_cipher(ctx, out, in, inl))
            return 0;
        *outl += inl;
    }
    if (i != 0)
        memcpy(ctx->buf, &(in[inl]), i);
    ctx->buf_len = i;
    return 1;
}
['EVP_PKEY *b2i_PVK_bio(BIO *in, pem_password_cb *cb, void *u)\n{\n    unsigned char pvk_hdr[24], *buf = NULL;\n    const unsigned char *p;\n    int buflen;\n    EVP_PKEY *ret = NULL;\n    unsigned int saltlen, keylen;\n    if (BIO_read(in, pvk_hdr, 24) != 24) {\n        PEMerr(PEM_F_B2I_PVK_BIO, PEM_R_PVK_DATA_TOO_SHORT);\n        return NULL;\n    }\n    p = pvk_hdr;\n    if (!do_PVK_header(&p, 24, 0, &saltlen, &keylen))\n        return 0;\n    buflen = (int)keylen + saltlen;\n    buf = OPENSSL_malloc(buflen);\n    if (buf == NULL) {\n        PEMerr(PEM_F_B2I_PVK_BIO, ERR_R_MALLOC_FAILURE);\n        return 0;\n    }\n    p = buf;\n    if (BIO_read(in, buf, buflen) != buflen) {\n        PEMerr(PEM_F_B2I_PVK_BIO, PEM_R_PVK_DATA_TOO_SHORT);\n        goto err;\n    }\n    ret = do_PVK_body(&p, saltlen, keylen, cb, u);\n err:\n    OPENSSL_clear_free(buf, buflen);\n    return ret;\n}', 'static int do_PVK_header(const unsigned char **in, unsigned int length,\n                         int skip_magic,\n                         unsigned int *psaltlen, unsigned int *pkeylen)\n{\n    const unsigned char *p = *in;\n    unsigned int pvk_magic, is_encrypted;\n    if (skip_magic) {\n        if (length < 20) {\n            PEMerr(PEM_F_DO_PVK_HEADER, PEM_R_PVK_TOO_SHORT);\n            return 0;\n        }\n    } else {\n        if (length < 24) {\n            PEMerr(PEM_F_DO_PVK_HEADER, PEM_R_PVK_TOO_SHORT);\n            return 0;\n        }\n        pvk_magic = read_ledword(&p);\n        if (pvk_magic != MS_PVKMAGIC) {\n            PEMerr(PEM_F_DO_PVK_HEADER, PEM_R_BAD_MAGIC_NUMBER);\n            return 0;\n        }\n    }\n    p += 4;\n      read_ledword(&p);\n    is_encrypted = read_ledword(&p);\n    *psaltlen = read_ledword(&p);\n    *pkeylen = read_ledword(&p);\n    if (is_encrypted && !*psaltlen) {\n        PEMerr(PEM_F_DO_PVK_HEADER, PEM_R_INCONSISTENT_HEADER);\n        return 0;\n    }\n    *in = p;\n    return 1;\n}', 'static EVP_PKEY *do_PVK_body(const unsigned char **in,\n                             unsigned int saltlen, unsigned int keylen,\n                             pem_password_cb *cb, void *u)\n{\n    EVP_PKEY *ret = NULL;\n    const unsigned char *p = *in;\n    unsigned int magic;\n    unsigned char *enctmp = NULL, *q;\n    EVP_CIPHER_CTX *cctx = EVP_CIPHER_CTX_new();\n    if (saltlen) {\n        char psbuf[PEM_BUFSIZE];\n        unsigned char keybuf[20];\n        int enctmplen, inlen;\n        if (cb)\n            inlen = cb(psbuf, PEM_BUFSIZE, 0, u);\n        else\n            inlen = PEM_def_callback(psbuf, PEM_BUFSIZE, 0, u);\n        if (inlen <= 0) {\n            PEMerr(PEM_F_DO_PVK_BODY, PEM_R_BAD_PASSWORD_READ);\n            goto err;\n        }\n        enctmp = OPENSSL_malloc(keylen + 8);\n        if (enctmp == NULL) {\n            PEMerr(PEM_F_DO_PVK_BODY, ERR_R_MALLOC_FAILURE);\n            goto err;\n        }\n        if (!derive_pvk_key(keybuf, p, saltlen,\n                            (unsigned char *)psbuf, inlen))\n            goto err;\n        p += saltlen;\n        memcpy(enctmp, p, 8);\n        p += 8;\n        if (keylen < 8) {\n            PEMerr(PEM_F_DO_PVK_BODY, PEM_R_PVK_TOO_SHORT);\n            goto err;\n        }\n        inlen = keylen - 8;\n        q = enctmp + 8;\n        if (!EVP_DecryptInit_ex(cctx, EVP_rc4(), NULL, keybuf, NULL))\n            goto err;\n        if (!EVP_DecryptUpdate(cctx, q, &enctmplen, p, inlen))\n            goto err;\n        if (!EVP_DecryptFinal_ex(cctx, q + enctmplen, &enctmplen))\n            goto err;\n        magic = read_ledword((const unsigned char **)&q);\n        if (magic != MS_RSA2MAGIC && magic != MS_DSS2MAGIC) {\n            q = enctmp + 8;\n            memset(keybuf + 5, 0, 11);\n            if (!EVP_DecryptInit_ex(cctx, EVP_rc4(), NULL, keybuf, NULL))\n                goto err;\n            OPENSSL_cleanse(keybuf, 20);\n            if (!EVP_DecryptUpdate(cctx, q, &enctmplen, p, inlen))\n                goto err;\n            if (!EVP_DecryptFinal_ex(cctx, q + enctmplen, &enctmplen))\n                goto err;\n            magic = read_ledword((const unsigned char **)&q);\n            if (magic != MS_RSA2MAGIC && magic != MS_DSS2MAGIC) {\n                PEMerr(PEM_F_DO_PVK_BODY, PEM_R_BAD_DECRYPT);\n                goto err;\n            }\n        } else\n            OPENSSL_cleanse(keybuf, 20);\n        p = enctmp;\n    }\n    ret = b2i_PrivateKey(&p, keylen);\n err:\n    EVP_CIPHER_CTX_free(cctx);\n    OPENSSL_free(enctmp);\n    return ret;\n}', 'int EVP_DecryptUpdate(EVP_CIPHER_CTX *ctx, unsigned char *out, int *outl,\n                      const unsigned char *in, int inl)\n{\n    int fix_len;\n    unsigned int b;\n    if (ctx->cipher->flags & EVP_CIPH_FLAG_CUSTOM_CIPHER) {\n        fix_len = ctx->cipher->do_cipher(ctx, out, in, inl);\n        if (fix_len < 0) {\n            *outl = 0;\n            return 0;\n        } else\n            *outl = fix_len;\n        return 1;\n    }\n    if (inl <= 0) {\n        *outl = 0;\n        return inl == 0;\n    }\n    if (ctx->flags & EVP_CIPH_NO_PADDING)\n        return EVP_EncryptUpdate(ctx, out, outl, in, inl);\n    b = ctx->cipher->block_size;\n    OPENSSL_assert(b <= sizeof ctx->final);\n    if (ctx->final_used) {\n        memcpy(out, ctx->final, b);\n        out += b;\n        fix_len = 1;\n    } else\n        fix_len = 0;\n    if (!EVP_EncryptUpdate(ctx, out, outl, in, inl))\n        return 0;\n    if (b > 1 && !ctx->buf_len) {\n        *outl -= b;\n        ctx->final_used = 1;\n        memcpy(ctx->final, &out[*outl], b);\n    } else\n        ctx->final_used = 0;\n    if (fix_len)\n        *outl += b;\n    return 1;\n}', 'int EVP_EncryptUpdate(EVP_CIPHER_CTX *ctx, unsigned char *out, int *outl,\n                      const unsigned char *in, int inl)\n{\n    int i, j, bl;\n    if (ctx->cipher->flags & EVP_CIPH_FLAG_CUSTOM_CIPHER) {\n        i = ctx->cipher->do_cipher(ctx, out, in, inl);\n        if (i < 0)\n            return 0;\n        else\n            *outl = i;\n        return 1;\n    }\n    if (inl <= 0) {\n        *outl = 0;\n        return inl == 0;\n    }\n    if (ctx->buf_len == 0 && (inl & (ctx->block_mask)) == 0) {\n        if (ctx->cipher->do_cipher(ctx, out, in, inl)) {\n            *outl = inl;\n            return 1;\n        } else {\n            *outl = 0;\n            return 0;\n        }\n    }\n    i = ctx->buf_len;\n    bl = ctx->cipher->block_size;\n    OPENSSL_assert(bl <= (int)sizeof(ctx->buf));\n    if (i != 0) {\n        if (i + inl < bl) {\n            memcpy(&(ctx->buf[i]), in, inl);\n            ctx->buf_len += inl;\n            *outl = 0;\n            return 1;\n        } else {\n            j = bl - i;\n            memcpy(&(ctx->buf[i]), in, j);\n            if (!ctx->cipher->do_cipher(ctx, out, ctx->buf, bl))\n                return 0;\n            inl -= j;\n            in += j;\n            out += bl;\n            *outl = bl;\n        }\n    } else\n        *outl = 0;\n    i = inl & (bl - 1);\n    inl -= i;\n    if (inl > 0) {\n        if (!ctx->cipher->do_cipher(ctx, out, in, inl))\n            return 0;\n        *outl += inl;\n    }\n    if (i != 0)\n        memcpy(ctx->buf, &(in[inl]), i);\n    ctx->buf_len = i;\n    return 1;\n}']