Import regress tests for SM2. Not yet linked to the build.

Part of Github PR #105

1 files changed, 256 insertions, 0 deletions

diff --git a/src/regress/lib/libcrypto/sm2/sm2evptest.c b/src/regress/lib/libcrypto/sm2/sm2evptest.c
new file mode 100644
index 0000000000..93024612f4
--- /dev/null
+++ b/src/regress/lib/libcrypto/sm2/sm2evptest.c
@@ -0,0 +1,256 @@
+/*      $OpenBSD: sm2evptest.c,v 1.1.1.1 2021/08/18 16:06:56 tb Exp $ */
+/*
+ * Copyright (c) 2017, 2019 Ribose Inc
+ *
+ * Permission to use, copy, modify, and/or distribute this software for any
+ * purpose with or without fee is hereby granted, provided that the above
+ * copyright notice and this permission notice appear in all copies.
+ *
+ * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
+ * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
+ * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
+ * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
+ * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
+ * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
+ * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
+ */
+
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+
+#include <openssl/ec.h>
+#include <openssl/evp.h>
+#include <openssl/pem.h>
+
+#include "tests.h"
+
+#ifdef OPENSSL_NO_SM2
+int
+main(int argc, char *argv[])
+{
+        printf("No SM2 support\n");
+        return (0);
+}
+#else
+static int
+test_EVP_SM2_verify(void)
+{
+        /* From https://tools.ietf.org/html/draft-shen-sm2-ecdsa-02#appendix-A */
+        const char *pubkey =
+                "-----BEGIN PUBLIC KEY-----\n"
+                "MIIBMzCB7AYHKoZIzj0CATCB4AIBATAsBgcqhkjOPQEBAiEAhULWnkwETxjouSQ1\n"
+                "v2/33kVyg5FcRVF9ci7biwjx38MwRAQgeHlotPoyw/0kF4Quc7v+/y88hItoMdfg\n"
+                "7GUiizk35JgEIGPkxtOyOwyEnPhCQUhL/kj2HVmlsWugbm4S0donxSSaBEEEQh3r\n"
+                "1hti6rZ0ZDTrw8wxXjIiCzut1QvcTE5sFH/t1D0GgFEry7QsB9RzSdIVO3DE5df9\n"
+                "/L+jbqGoWEG55G4JogIhAIVC1p5MBE8Y6LkkNb9v990pdyBjBIVijVrnTufDLnm3\n"
+                "AgEBA0IABArkx3mKoPEZRxvuEYJb5GICu3nipYRElel8BP9N8lSKfAJA+I8c1OFj\n"
+                "Uqc8F7fxbwc1PlOhdtaEqf4Ma7eY6Fc=\n"
+                "-----END PUBLIC KEY-----\n";
+
+        const char *input = "message digest";
+        const char *user_id = "ALICE123@YAHOO.COM";
+
+        const uint8_t signature[] = {
+                0x30, 0x44, 0x02, 0x20,
+                0x40, 0xF1, 0xEC, 0x59, 0xF7, 0x93, 0xD9, 0xF4, 0x9E, 0x09, 0xDC,
+                0xEF, 0x49, 0x13, 0x0D, 0x41, 0x94, 0xF7, 0x9F, 0xB1, 0xEE, 0xD2,
+                0xCA, 0xA5, 0x5B, 0xAC, 0xDB, 0x49, 0xC4, 0xE7, 0x55, 0xD1,
+                0x02, 0x20,
+                0x6F, 0xC6, 0xDA, 0xC3, 0x2C, 0x5D, 0x5C, 0xF1, 0x0C, 0x77, 0xDF,
+                0xB2, 0x0F, 0x7C, 0x2E, 0xB6, 0x67, 0xA4, 0x57, 0x87, 0x2F, 0xB0,
+                0x9E, 0xC5, 0x63, 0x27, 0xA6, 0x7E, 0xC7, 0xDE, 0xEB, 0xE7
+        };
+
+        int rc = 0;
+        BIO *bufio = NULL;
+        EVP_PKEY *pkey = NULL;
+        EVP_MD_CTX *md_ctx_verify = NULL;
+        EVP_PKEY_CTX *verify_ctx = NULL;
+
+        bufio = BIO_new_mem_buf(pubkey, strlen(pubkey));
+        CHECK_GOTO(bufio != NULL);
+
+        pkey = PEM_read_bio_PUBKEY(bufio, NULL, NULL, NULL);
+        CHECK_GOTO(pkey != NULL);
+
+        CHECK_GOTO(EVP_PKEY_set_alias_type(pkey, EVP_PKEY_SM2));
+
+        md_ctx_verify = EVP_MD_CTX_new();
+        CHECK_GOTO(md_ctx_verify != NULL);
+
+        CHECK_GOTO(EVP_DigestVerifyInit(md_ctx_verify, &verify_ctx, EVP_sm3(), NULL, pkey));
+
+        CHECK_GOTO(EVP_PKEY_CTX_set_sm2_uid(verify_ctx, user_id, strlen(user_id)) > 0);
+
+        CHECK_GOTO(EVP_PKEY_CTX_hash_sm2_uid(verify_ctx) > 0);
+
+        CHECK_GOTO(EVP_DigestVerifyUpdate(md_ctx_verify, input, strlen(input)));
+
+        CHECK_GOTO(EVP_DigestVerifyFinal(md_ctx_verify, signature, sizeof(signature)));
+
+        rc = 1;
+ err:
+        BIO_free(bufio);
+        EVP_PKEY_free(pkey);
+        EVP_MD_CTX_free(md_ctx_verify);
+        return rc;
+}
+
+static int
+test_EVP_SM2(void)
+{
+        int ret = 0;
+        EVP_PKEY *pkey = NULL;
+        EVP_PKEY *params = NULL;
+        EVP_PKEY_CTX *pctx = NULL;
+        EVP_PKEY_CTX *sign_ctx = NULL;
+        EVP_PKEY_CTX *verify_ctx = NULL;
+        EVP_PKEY_CTX *kctx = NULL;
+        size_t sig_len = 0;
+        unsigned char *sig = NULL;
+        EVP_MD_CTX *md_ctx = NULL;
+        EVP_MD_CTX *md_ctx_verify = NULL;
+        EVP_PKEY_CTX *cctx = NULL;
+        int useid;
+        const char *uid_str = "nobody@example.com";
+        uint8_t uid_buf[32] = {0};
+        size_t uid_len = 0;
+
+        uint8_t ciphertext[128];
+        size_t ctext_len = sizeof(ciphertext);
+
+        uint8_t plaintext[8];
+        size_t ptext_len = sizeof(plaintext);
+
+        uint8_t kMsg[4] = {1, 2, 3, 4};
+
+        pctx = EVP_PKEY_CTX_new_id(EVP_PKEY_EC, NULL);
+        CHECK_GOTO(pctx != NULL);
+
+        CHECK_GOTO(EVP_PKEY_paramgen_init(pctx) == 1);
+
+        CHECK_GOTO(EVP_PKEY_CTX_set_ec_paramgen_curve_nid(pctx, NID_sm2));
+
+        CHECK_GOTO(EVP_PKEY_paramgen(pctx, &params));
+
+        kctx = EVP_PKEY_CTX_new(params, NULL);
+        CHECK_GOTO(kctx != NULL);
+
+        CHECK_GOTO(EVP_PKEY_keygen_init(kctx));
+
+        CHECK_GOTO(EVP_PKEY_keygen(kctx, &pkey));
+
+        CHECK_GOTO(EVP_PKEY_set_alias_type(pkey, EVP_PKEY_SM2));
+
+        md_ctx = EVP_MD_CTX_new();
+        CHECK_GOTO(md_ctx != NULL);
+
+        md_ctx_verify = EVP_MD_CTX_new();
+        CHECK_GOTO(md_ctx_verify != NULL);
+
+        for (useid = 0; useid <= 1; ++useid) {
+                CHECK_GOTO(EVP_DigestSignInit(md_ctx, &sign_ctx, EVP_sm3(), NULL, pkey));
+
+                if (useid) {
+                        CHECK_GOTO(EVP_PKEY_CTX_set_sm2_uid(sign_ctx, uid_str, strlen(uid_str)) > 0);
+
+                        CHECK_GOTO(EVP_PKEY_CTX_get_sm2_uid_len(sign_ctx, &uid_len) > 0);
+
+                        CHECK_GOTO(uid_len == strlen(uid_str));
+
+                        CHECK_GOTO(EVP_PKEY_CTX_get_sm2_uid(sign_ctx, uid_buf) > 0);
+
+                        CHECK_GOTO(memcmp(uid_buf, uid_str, uid_len) == 0);
+
+                        CHECK_GOTO(EVP_PKEY_CTX_hash_sm2_uid(sign_ctx) > 0);
+                }
+
+                CHECK_GOTO(EVP_DigestSignUpdate(md_ctx, kMsg, sizeof(kMsg)));
+
+                /* Determine the size of the signature. */
+                CHECK_GOTO(EVP_DigestSignFinal(md_ctx, NULL, &sig_len));
+
+                CHECK_GOTO(sig_len == (size_t) EVP_PKEY_size(pkey));
+
+                sig = malloc(sig_len);
+                CHECK_GOTO(sig != NULL);
+
+                CHECK_GOTO(EVP_DigestSignFinal(md_ctx, sig, &sig_len));
+
+                /* Ensure that the signature round-trips. */
+
+                CHECK_GOTO(EVP_DigestVerifyInit(md_ctx_verify, &verify_ctx, EVP_sm3(), NULL, pkey));
+
+                if (useid) {
+                        CHECK_GOTO(EVP_PKEY_CTX_set_sm2_uid(verify_ctx, uid_str, strlen(uid_str)) > 0);
+
+                        CHECK_GOTO(EVP_PKEY_CTX_get_sm2_uid_len(verify_ctx, &uid_len) > 0);
+
+                        CHECK_GOTO(uid_len == strlen(uid_str));
+
+                        CHECK_GOTO(EVP_PKEY_CTX_get_sm2_uid(verify_ctx, uid_buf) > 0);
+
+                        CHECK_GOTO(memcmp(uid_buf, uid_str, uid_len) == 0);
+
+                        CHECK_GOTO(EVP_PKEY_CTX_hash_sm2_uid(verify_ctx) > 0);
+                }
+
+                CHECK_GOTO(EVP_DigestVerifyUpdate(md_ctx_verify, kMsg, sizeof(kMsg)));
+
+                CHECK_GOTO(EVP_DigestVerifyFinal(md_ctx_verify, sig, sig_len));
+
+                free(sig);
+                sig = NULL;
+        }
+
+        /* now check encryption/decryption */
+
+        cctx = EVP_PKEY_CTX_new(pkey, NULL);
+        CHECK_GOTO(cctx != NULL);
+
+        CHECK_GOTO(EVP_PKEY_encrypt_init(cctx));
+
+        CHECK_GOTO(EVP_PKEY_encrypt(cctx, ciphertext, &ctext_len, kMsg, sizeof(kMsg)));
+
+        CHECK_GOTO(EVP_PKEY_decrypt_init(cctx));
+
+        CHECK_GOTO(EVP_PKEY_decrypt(cctx, plaintext, &ptext_len, ciphertext, ctext_len));
+
+        CHECK_GOTO(ptext_len == sizeof(kMsg));
+
+        CHECK_GOTO(memcmp(plaintext, kMsg, sizeof(kMsg)) == 0);
+
+        ret = 1;
+ err:
+        EVP_PKEY_free(params);
+        EVP_MD_CTX_free(md_ctx);
+        EVP_MD_CTX_free(md_ctx_verify);
+        EVP_PKEY_CTX_free(pctx);
+        EVP_PKEY_CTX_free(kctx);
+        EVP_PKEY_CTX_free(cctx);
+        EVP_PKEY_free(pkey);
+        free(sig);
+        return ret;
+}
+
+int
+main(int argc, char *argv[])
+{
+        if (!test_EVP_SM2()) {
+                fprintf(stderr, "test_EVP_SM2() failed.\n");
+                fflush(stderr);
+                return 1;
+        }
+        if (!test_EVP_SM2_verify()) {
+                fprintf(stderr, "test_EVP_SM2_verify() failed.\n");
+                fflush(stderr);
+                return 1;
+        }
+
+        printf("SUCCESS\n");
+
+        return 0;
+}
+
+#endif