/*

 * Copyright 1995-2021 The OpenSSL Project Authors. All Rights Reserved.

 *

 * Licensed under the Apache License 2.0 (the "License").  You may not use

 * this file except in compliance with the License.  You can obtain a copy

 * in the file LICENSE in the source distribution or at

 * https://www.openssl.org/source/license.html

 */

/*

 * SHA-1 low level APIs are deprecated for public use, but still ok for

 * internal use.

 */

#include "internal/deprecated.h"

#include <stdio.h>

#include <string.h>

#include <openssl/crypto.h>

#include <openssl/sha.h>

#include <openssl/evp.h>

#include "crypto/sha.h"

unsigned char *ossl_sha1(const unsigned char *d, size_t n, unsigned char *md)

{

    SHA_CTX c;

    static unsigned char m[SHA_DIGEST_LENGTH];

    if (md == NULL)

        md = m;

    if (!SHA1_Init(&c))

        return NULL;

    SHA1_Update(&c, d, n);

    SHA1_Final(md, &c);

    OPENSSL_cleanse(&c, sizeof(c));

    return md;

}

unsigned char *SHA1(const unsigned char *d, size_t n, unsigned char *md)

{

    static unsigned char m[SHA_DIGEST_LENGTH];

    if (md == NULL)

        md = m;

    return EVP_Q_digest(NULL, "SHA1", NULL, d, n, md, NULL) ? md : NULL;

}

unsigned char *SHA224(const unsigned char *d, size_t n, unsigned char *md)

{

    static unsigned char m[SHA224_DIGEST_LENGTH];

    if (md == NULL)

        md = m;

    return EVP_Q_digest(NULL, "SHA224", NULL, d, n, md, NULL) ? md : NULL;

}

unsigned char *SHA256(const unsigned char *d, size_t n, unsigned char *md)

{

    static unsigned char m[SHA256_DIGEST_LENGTH];

    if (md == NULL)

        md = m;

    return EVP_Q_digest(NULL, "SHA256", NULL, d, n, md, NULL) ? md : NULL;

}

unsigned char *SHA384(const unsigned char *d, size_t n, unsigned char *md)

{

    static unsigned char m[SHA384_DIGEST_LENGTH];

    if (md == NULL)

        md = m;

    return EVP_Q_digest(NULL, "SHA384", NULL, d, n, md, NULL) ? md : NULL;

}

unsigned char *SHA512(const unsigned char *d, size_t n, unsigned char *md)

{

    static unsigned char m[SHA512_DIGEST_LENGTH];

    if (md == NULL)

        md = m;

    return EVP_Q_digest(NULL, "SHA512", NULL, d, n, md, NULL) ? md : NULL;

}