diff options
Diffstat (limited to 'ext/ipp/sources/ippcp/pcpbnu_arith_mul_adc.c')
-rw-r--r-- | ext/ipp/sources/ippcp/pcpbnu_arith_mul_adc.c | 114 |
1 files changed, 114 insertions, 0 deletions
diff --git a/ext/ipp/sources/ippcp/pcpbnu_arith_mul_adc.c b/ext/ipp/sources/ippcp/pcpbnu_arith_mul_adc.c new file mode 100644 index 0000000..e88fd0f --- /dev/null +++ b/ext/ipp/sources/ippcp/pcpbnu_arith_mul_adc.c @@ -0,0 +1,114 @@ +/******************************************************************************* +* Copyright 2002-2018 Intel Corporation +* All Rights Reserved. +* +* If this software was obtained under the Intel Simplified Software License, +* the following terms apply: +* +* The source code, information and material ("Material") contained herein is +* owned by Intel Corporation or its suppliers or licensors, and title to such +* Material remains with Intel Corporation or its suppliers or licensors. The +* Material contains proprietary information of Intel or its suppliers and +* licensors. The Material is protected by worldwide copyright laws and treaty +* provisions. No part of the Material may be used, copied, reproduced, +* modified, published, uploaded, posted, transmitted, distributed or disclosed +* in any way without Intel's prior express written permission. No license under +* any patent, copyright or other intellectual property rights in the Material +* is granted to or conferred upon you, either expressly, by implication, +* inducement, estoppel or otherwise. Any license under such intellectual +* property rights must be express and approved by Intel in writing. +* +* Unless otherwise agreed by Intel in writing, you may not remove or alter this +* notice or any other notice embedded in Materials by Intel or Intel's +* suppliers or licensors in any way. +* +* +* If this software was obtained under the Apache License, Version 2.0 (the +* "License"), the following terms apply: +* +* You may not use this file except in compliance with the License. You may +* obtain a copy of the License at http://www.apache.org/licenses/LICENSE-2.0 +* +* +* Unless required by applicable law or agreed to in writing, software +* distributed under the License is distributed on an "AS IS" BASIS, WITHOUT +* WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. +* +* See the License for the specific language governing permissions and +* limitations under the License. +*******************************************************************************/ + +/* +// Purpose: +// Intel(R) Integrated Performance Primitives. Cryptography Primitives. +// Internal Unsigned arithmetic +// +// Contents: +// cpMulAdc_BNU_school() +// +*/ + +#include "owncp.h" +#include "pcpbnuarith.h" +#include "pcpbnumisc.h" + + +/*F* +// Name: cpMulAdc_BNU_school +// +// Purpose: Multiply 2 BigNums. +// +// Returns: +// extention of result of multiply 2 BigNums +// Parameters: +// pA source BigNum +// pB source BigNum +// nsA size of A +// nsB size of B +// pR resultant BigNum +// +*F*/ +#if defined(_USE_C_cpMulAdc_BNU_school_) +#pragma message ("C version of cpMulAdc_BNU_school: ON") +#else +#pragma message ("C version of cpMulAdc_BNU_school: OFF") +#endif + +#if !((_IPP==_IPP_V8) || \ + (_IPP==_IPP_P8) || \ + (_IPP>=_IPP_G9) || \ + (_IPP==_IPP_S8) || \ + (_IPP32E==_IPP32E_M7) || \ + (_IPP32E==_IPP32E_U8) || \ + (_IPP32E==_IPP32E_Y8) || \ + (_IPP32E>=_IPP32E_E9) || \ + (_IPP32E==_IPP32E_N8)) || \ + defined(_USE_C_cpMulAdc_BNU_school_) +BNU_CHUNK_T cpMulAdc_BNU_school(BNU_CHUNK_T* pR, + const BNU_CHUNK_T* pA, cpSize nsA, + const BNU_CHUNK_T* pB, cpSize nsB) +{ + const BNU_CHUNK_T* pa = (BNU_CHUNK_T*)pA; + const BNU_CHUNK_T* pb = (BNU_CHUNK_T*)pB; + BNU_CHUNK_T* pr = (BNU_CHUNK_T*)pR; + + BNU_CHUNK_T extension = 0; + cpSize i, j; + + ZEXPAND_BNU(pr, 0, nsA+nsB); + + for(i=0; i<nsB; i++ ) { + BNU_CHUNK_T b = pb[i]; + + for(j=0, extension=0; j<nsA; j++ ) { + BNU_CHUNK_T rH, rL; + + MUL_AB(rH, rL, pa[j], b); + ADD_ABC(extension, pr[i+j], pr[i+j], rL, extension); + extension += rH; + } + pr[i+j] = extension; + } + return extension; +} +#endif |