1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
|
/*
* Copyright (c) 1999 by Sun Microsystems, Inc.
* All rights reserved.
*/
#pragma ident "%Z%%M% %I% %E% SMI"
/* Copyright (C) RSA Data Security, Inc. created 1987, 1996. This is an
unpublished work protected as such under copyright law. This work
contains proprietary, confidential, and trade secret information of
RSA Data Security, Inc. Use, disclosure or reproduction without the
express written authorization of RSA Data Security, Inc. is
prohibited.
*/
#include "port_before.h"
#include "global.h"
#include "bigmath.h"
#include "port_after.h"
/* Single precision multiply, a is same len as b and c.
Returns low order n bytes of result.
*/
void BigPmpyl (a, b, c, n)
UINT2 *a, *b, *c;
unsigned int n;
{
register unsigned int i;
unsigned int cLen;
BigZero (a, n);
cLen = BigLenw (c, n);
for (i = 0; i < n; i++) {
if (cLen < n-i)
a[cLen+i] = BigAcc (&a[i], (unsigned int)b[i], c, cLen);
else
BigAcc (&a[i], (unsigned int)b[i], c, n-i);
}
}
|
