1 /*******************************************************************************
2 * Copyright 2017-2018 Intel Corporation
3 * All Rights Reserved.
4 *
5 * If this  software was obtained  under the  Intel Simplified  Software License,
6 * the following terms apply:
7 *
8 * The source code,  information  and material  ("Material") contained  herein is
9 * owned by Intel Corporation or its  suppliers or licensors,  and  title to such
10 * Material remains with Intel  Corporation or its  suppliers or  licensors.  The
11 * Material  contains  proprietary  information  of  Intel or  its suppliers  and
12 * licensors.  The Material is protected by  worldwide copyright  laws and treaty
13 * provisions.  No part  of  the  Material   may  be  used,  copied,  reproduced,
14 * modified, published,  uploaded, posted, transmitted,  distributed or disclosed
15 * in any way without Intel's prior express written permission.  No license under
16 * any patent,  copyright or other  intellectual property rights  in the Material
17 * is granted to  or  conferred  upon  you,  either   expressly,  by implication,
18 * inducement,  estoppel  or  otherwise.  Any  license   under such  intellectual
19 * property rights must be express and approved by Intel in writing.
20 *
21 * Unless otherwise agreed by Intel in writing,  you may not remove or alter this
22 * notice or  any  other  notice   embedded  in  Materials  by  Intel  or Intel's
23 * suppliers or licensors in any way.
24 *
25 *
26 * If this  software  was obtained  under the  Apache License,  Version  2.0 (the
27 * "License"), the following terms apply:
28 *
29 * You may  not use this  file except  in compliance  with  the License.  You may
30 * obtain a copy of the License at http://www.apache.org/licenses/LICENSE-2.0
31 *
32 *
33 * Unless  required  by   applicable  law  or  agreed  to  in  writing,  software
34 * distributed under the License  is distributed  on an  "AS IS"  BASIS,  WITHOUT
35 * WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
36 *
37 * See the   License  for the   specific  language   governing   permissions  and
38 * limitations under the License.
39 *******************************************************************************/
40 /******* FILE MODIFIED FROM ORIGINAL 2019u1 RELEASE TO AVOID WARNINGS *********/
41 /*
42 //
43 //  Purpose:
44 //     Cryptography Primitive. Modular Arithmetic Engine. General Functionality
45 //
46 //  Contents:
47 //        gs_mont_inv()
48 //
49 */
50 
51 #include "owndefs.h"
52 #include "owncp.h"
53 #include "pcpbnumisc.h"
54 #include "pcpbnuarith.h"
55 #include "gsmodstuff.h"
56 #include "pcpmask_ct.h"
57 
cpPow2_ct(int bit,BNU_CHUNK_T * dst,int len)58 __INLINE BNU_CHUNK_T* cpPow2_ct(int bit, BNU_CHUNK_T* dst, int len)
59 {
60    int slot = bit/BNU_CHUNK_BITS;
61    BNU_CHUNK_T value = (BNU_CHUNK_T)1 << (bit%BNU_CHUNK_BITS);
62 
63    int i;
64    len -= (int)cpIsEqu_ct(slot, len);
65    for(i=0; i<len; i++) {
66       BNU_CHUNK_T mask = cpIsEqu_ct(slot, i);
67       dst[i] = value & mask;
68    }
69 
70    return dst;
71 }
72 
73 /*
74 // returns r = mont(a^-1)
75 //    a in desidue domain
76 //    r in Montgomery domain
77 */
gs_mont_inv(BNU_CHUNK_T * pr,const BNU_CHUNK_T * pa,gsModEngine * pME,alm_inv alm_inversion)78 BNU_CHUNK_T* gs_mont_inv(BNU_CHUNK_T* pr, const BNU_CHUNK_T* pa, gsModEngine* pME, alm_inv alm_inversion)
79 {
80    int k = alm_inversion(pr, pa, pME);
81 
82    if(0==k)
83       return NULL;
84 
85    {
86       int mLen = MOD_LEN(pME);
87       int m = mLen*BNU_CHUNK_BITS;
88       mod_mul mon_mul = MOD_METHOD(pME)->mul;
89 
90       BNU_CHUNK_T* t = gsModPoolAlloc(pME, 1);
91       //tbcd: temporary excluded: assert(NULL!=t);
92 
93       if(k<=m) {
94          mon_mul(pr, pr, MOD_MNT_R2(pME), pME);
95          k += m;
96       }
97 
98       //ZEXPAND_BNU(t, 0, mLen);
99       //SET_BIT(t, 2*m-k); /* t = 2^(2*m-k) */
100       cpPow2_ct(2*m-k, t, mLen);
101       mon_mul(pr, pr, t, pME);
102 
103       gsModPoolFree(pME, 1);
104 
105       return pr;
106    }
107 }
108