]>
git.ipfire.org Git - thirdparty/openssl.git/blob - crypto/des/qud_cksm.c
2 * Copyright 1995-2016 The OpenSSL Project Authors. All Rights Reserved.
4 * Licensed under the OpenSSL license (the "License"). You may not use
5 * this file except in compliance with the License. You can obtain a copy
6 * in the file LICENSE in the source distribution or at
7 * https://www.openssl.org/source/license.html
11 * From "Message Authentication" R.R. Jueneman, S.M. Matyas, C.H. Meyer IEEE
12 * Communications Magazine Sept 1985 Vol. 23 No. 9 p 29-40 This module in
13 * only based on the code in this paper and is almost definitely not the same
14 * as the MIT implementation.
18 /* bug fix for dos - 7/6/91 - Larry hughes@logos.ucs.indiana.edu */
19 #define Q_B0(a) (((DES_LONG)(a)))
20 #define Q_B1(a) (((DES_LONG)(a))<<8)
21 #define Q_B2(a) (((DES_LONG)(a))<<16)
22 #define Q_B3(a) (((DES_LONG)(a))<<24)
24 /* used to scramble things a bit */
25 /* Got the value MIT uses via brute force :-) 2/10/90 eay */
26 #define NOISE ((DES_LONG)83653421L)
28 DES_LONG
DES_quad_cksum(const unsigned char *input
, DES_cblock output
[],
29 long length
, int out_count
, DES_cblock
*seed
)
31 DES_LONG z0
, z1
, t0
, t1
;
34 const unsigned char *cp
;
39 lp
= (DES_LONG
*)&(output
[0])[0];
41 z0
= Q_B0((*seed
)[0]) | Q_B1((*seed
)[1]) | Q_B2((*seed
)[2]) |
43 z1
= Q_B0((*seed
)[4]) | Q_B1((*seed
)[5]) | Q_B2((*seed
)[6]) |
46 for (i
= 0; ((i
< 4) && (i
< out_count
)); i
++) {
51 t0
= (DES_LONG
)(*(cp
++));
52 t0
|= (DES_LONG
)Q_B1(*(cp
++));
55 t0
= (DES_LONG
)(*(cp
++));
61 /* square, well sort of square */
62 z0
= ((((t0
* t0
) & 0xffffffffL
) + ((t1
* t1
) & 0xffffffffL
))
63 & 0xffffffffL
) % 0x7fffffffL
;
64 z1
= ((t0
* ((t1
+ NOISE
) & 0xffffffffL
)) & 0xffffffffL
) %
69 * The MIT library assumes that the checksum is composed of
70 * 2*out_count 32 bit ints