117f01e99SJung-uk Kim /* 2*b077aed3SPierre Pronchery * Copyright 2007-2021 The OpenSSL Project Authors. All Rights Reserved. 317f01e99SJung-uk Kim * 4*b077aed3SPierre Pronchery * Licensed under the Apache License 2.0 (the "License"). You may not use 517f01e99SJung-uk Kim * this file except in compliance with the License. You can obtain a copy 617f01e99SJung-uk Kim * in the file LICENSE in the source distribution or at 717f01e99SJung-uk Kim * https://www.openssl.org/source/license.html 817f01e99SJung-uk Kim */ 917f01e99SJung-uk Kim 1017f01e99SJung-uk Kim /* 1117f01e99SJung-uk Kim * Copyright (c) 2007 KISA(Korea Information Security Agency). All rights reserved. 1217f01e99SJung-uk Kim * 1317f01e99SJung-uk Kim * Redistribution and use in source and binary forms, with or without 1417f01e99SJung-uk Kim * modification, are permitted provided that the following conditions 1517f01e99SJung-uk Kim * are met: 1617f01e99SJung-uk Kim * 1. Redistributions of source code must retain the above copyright 1717f01e99SJung-uk Kim * notice, this list of conditions and the following disclaimer. 1817f01e99SJung-uk Kim * 2. Neither the name of author nor the names of its contributors may 1917f01e99SJung-uk Kim * be used to endorse or promote products derived from this software 2017f01e99SJung-uk Kim * without specific prior written permission. 2117f01e99SJung-uk Kim * 2217f01e99SJung-uk Kim * THIS SOFTWARE IS PROVIDED BY AUTHOR AND CONTRIBUTORS ``AS IS'' AND 2317f01e99SJung-uk Kim * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 2417f01e99SJung-uk Kim * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 2517f01e99SJung-uk Kim * ARE DISCLAIMED. IN NO EVENT SHALL AUTHOR OR CONTRIBUTORS BE LIABLE 2617f01e99SJung-uk Kim * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 2717f01e99SJung-uk Kim * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 2817f01e99SJung-uk Kim * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 2917f01e99SJung-uk Kim * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 3017f01e99SJung-uk Kim * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 3117f01e99SJung-uk Kim * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 3217f01e99SJung-uk Kim * SUCH DAMAGE. 3317f01e99SJung-uk Kim * 3417f01e99SJung-uk Kim */ 3517f01e99SJung-uk Kim #ifndef OSSL_CRYPTO_SEED_LOCAL_H 3617f01e99SJung-uk Kim # define OSSL_CRYPTO_SEED_LOCAL_H 3717f01e99SJung-uk Kim 38*b077aed3SPierre Pronchery # include <openssl/e_os2.h> 3917f01e99SJung-uk Kim # include <openssl/seed.h> 4017f01e99SJung-uk Kim 4117f01e99SJung-uk Kim # ifdef SEED_LONG /* need 32-bit type */ 4217f01e99SJung-uk Kim typedef unsigned long seed_word; 4317f01e99SJung-uk Kim # else 4417f01e99SJung-uk Kim typedef unsigned int seed_word; 4517f01e99SJung-uk Kim # endif 4617f01e99SJung-uk Kim 4717f01e99SJung-uk Kim 4817f01e99SJung-uk Kim # define char2word(c, i) \ 4917f01e99SJung-uk Kim (i) = ((((seed_word)(c)[0]) << 24) | (((seed_word)(c)[1]) << 16) | (((seed_word)(c)[2]) << 8) | ((seed_word)(c)[3])) 5017f01e99SJung-uk Kim 5117f01e99SJung-uk Kim # define word2char(l, c) \ 5217f01e99SJung-uk Kim *((c)+0) = (unsigned char)((l)>>24) & 0xff; \ 5317f01e99SJung-uk Kim *((c)+1) = (unsigned char)((l)>>16) & 0xff; \ 5417f01e99SJung-uk Kim *((c)+2) = (unsigned char)((l)>> 8) & 0xff; \ 5517f01e99SJung-uk Kim *((c)+3) = (unsigned char)((l)) & 0xff 5617f01e99SJung-uk Kim 5717f01e99SJung-uk Kim # define KEYSCHEDULE_UPDATE0(T0, T1, X1, X2, X3, X4, KC) \ 5817f01e99SJung-uk Kim (T0) = (X3); \ 5917f01e99SJung-uk Kim (X3) = (((X3)<<8) ^ ((X4)>>24)) & 0xffffffff; \ 6017f01e99SJung-uk Kim (X4) = (((X4)<<8) ^ ((T0)>>24)) & 0xffffffff; \ 6117f01e99SJung-uk Kim (T0) = ((X1) + (X3) - (KC)) & 0xffffffff; \ 6217f01e99SJung-uk Kim (T1) = ((X2) + (KC) - (X4)) & 0xffffffff 6317f01e99SJung-uk Kim 6417f01e99SJung-uk Kim # define KEYSCHEDULE_UPDATE1(T0, T1, X1, X2, X3, X4, KC) \ 6517f01e99SJung-uk Kim (T0) = (X1); \ 6617f01e99SJung-uk Kim (X1) = (((X1)>>8) ^ ((X2)<<24)) & 0xffffffff; \ 6717f01e99SJung-uk Kim (X2) = (((X2)>>8) ^ ((T0)<<24)) & 0xffffffff; \ 6817f01e99SJung-uk Kim (T0) = ((X1) + (X3) - (KC)) & 0xffffffff; \ 6917f01e99SJung-uk Kim (T1) = ((X2) + (KC) - (X4)) & 0xffffffff 7017f01e99SJung-uk Kim 7117f01e99SJung-uk Kim # define KEYUPDATE_TEMP(T0, T1, K) \ 7217f01e99SJung-uk Kim (K)[0] = G_FUNC((T0)); \ 7317f01e99SJung-uk Kim (K)[1] = G_FUNC((T1)) 7417f01e99SJung-uk Kim 7517f01e99SJung-uk Kim # define XOR_SEEDBLOCK(DST, SRC) \ 7617f01e99SJung-uk Kim ((DST))[0] ^= ((SRC))[0]; \ 7717f01e99SJung-uk Kim ((DST))[1] ^= ((SRC))[1]; \ 7817f01e99SJung-uk Kim ((DST))[2] ^= ((SRC))[2]; \ 7917f01e99SJung-uk Kim ((DST))[3] ^= ((SRC))[3] 8017f01e99SJung-uk Kim 8117f01e99SJung-uk Kim # define MOV_SEEDBLOCK(DST, SRC) \ 8217f01e99SJung-uk Kim ((DST))[0] = ((SRC))[0]; \ 8317f01e99SJung-uk Kim ((DST))[1] = ((SRC))[1]; \ 8417f01e99SJung-uk Kim ((DST))[2] = ((SRC))[2]; \ 8517f01e99SJung-uk Kim ((DST))[3] = ((SRC))[3] 8617f01e99SJung-uk Kim 8717f01e99SJung-uk Kim # define CHAR2WORD(C, I) \ 8817f01e99SJung-uk Kim char2word((C), (I)[0]); \ 8917f01e99SJung-uk Kim char2word((C+4), (I)[1]); \ 9017f01e99SJung-uk Kim char2word((C+8), (I)[2]); \ 9117f01e99SJung-uk Kim char2word((C+12), (I)[3]) 9217f01e99SJung-uk Kim 9317f01e99SJung-uk Kim # define WORD2CHAR(I, C) \ 9417f01e99SJung-uk Kim word2char((I)[0], (C)); \ 9517f01e99SJung-uk Kim word2char((I)[1], (C+4)); \ 9617f01e99SJung-uk Kim word2char((I)[2], (C+8)); \ 9717f01e99SJung-uk Kim word2char((I)[3], (C+12)) 9817f01e99SJung-uk Kim 9917f01e99SJung-uk Kim # define E_SEED(T0, T1, X1, X2, X3, X4, rbase) \ 10017f01e99SJung-uk Kim (T0) = (X3) ^ (ks->data)[(rbase)]; \ 10117f01e99SJung-uk Kim (T1) = (X4) ^ (ks->data)[(rbase)+1]; \ 10217f01e99SJung-uk Kim (T1) ^= (T0); \ 10317f01e99SJung-uk Kim (T1) = G_FUNC((T1)); \ 10417f01e99SJung-uk Kim (T0) = ((T0) + (T1)) & 0xffffffff; \ 10517f01e99SJung-uk Kim (T0) = G_FUNC((T0)); \ 10617f01e99SJung-uk Kim (T1) = ((T1) + (T0)) & 0xffffffff; \ 10717f01e99SJung-uk Kim (T1) = G_FUNC((T1)); \ 10817f01e99SJung-uk Kim (T0) = ((T0) + (T1)) & 0xffffffff; \ 10917f01e99SJung-uk Kim (X1) ^= (T0); \ 11017f01e99SJung-uk Kim (X2) ^= (T1) 11117f01e99SJung-uk Kim 11217f01e99SJung-uk Kim #endif /* OSSL_CRYPTO_SEED_LOCAL_H */ 113