blob: 7ea5f7f82f43c259a806addbc882da5f6e8aae54 [file] [log] [blame]
Forest Bond5449c682009-04-25 10:30:44 -04001/*
2 * Copyright (c) 1996, 2003 VIA Networking Technologies, Inc.
3 * All rights reserved.
4 *
5 * This program is free software; you can redistribute it and/or modify
6 * it under the terms of the GNU General Public License as published by
7 * the Free Software Foundation; either version 2 of the License, or
8 * (at your option) any later version.
9 *
10 * This program is distributed in the hope that it will be useful,
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 * GNU General Public License for more details.
14 *
15 * You should have received a copy of the GNU General Public License along
16 * with this program; if not, write to the Free Software Foundation, Inc.,
17 * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
18 *
19 *
20 * File: michael.cpp
21 *
22 * Purpose: The implementation of LIST data structure.
23 *
24 * Author: Kyle Hsu
25 *
26 * Date: Sep 4, 2002
27 *
28 * Functions:
Charles Clément3fc9b582010-06-24 11:02:27 -070029 * s_dwGetUINT32 - Convert from unsigned char [] to unsigned long in a portable way
30 * s_vPutUINT32 - Convert from unsigned long to unsigned char [] in a portable way
Forest Bond5449c682009-04-25 10:30:44 -040031 * s_vClear - Reset the state to the empty message.
32 * s_vSetKey - Set the key.
33 * MIC_vInit - Set the key.
34 * s_vAppendByte - Append the byte to our word-sized buffer.
35 * MIC_vAppend - call s_vAppendByte.
36 * MIC_vGetMIC - Append the minimum padding and call s_vAppendByte.
37 *
38 * Revision History:
39 *
40 */
41
Forest Bond5449c682009-04-25 10:30:44 -040042#include "tmacro.h"
Forest Bond5449c682009-04-25 10:30:44 -040043#include "michael.h"
Forest Bond5449c682009-04-25 10:30:44 -040044
45/*--------------------- Static Definitions -------------------------*/
46
47/*--------------------- Static Variables --------------------------*/
48
49/*--------------------- Static Functions --------------------------*/
50/*
Joe Perchesa51ff902013-03-18 10:44:57 -070051 static unsigned long s_dwGetUINT32(unsigned char *p); // Get unsigned long from 4 bytes LSByte first
52 static void s_vPutUINT32(unsigned char *p, unsigned long val); // Put unsigned long into 4 bytes LSByte first
Forest Bond5449c682009-04-25 10:30:44 -040053*/
Charles Clément6b35b7b2010-05-07 12:30:19 -070054static void s_vClear(void); // Clear the internal message,
Joe Perchesa51ff902013-03-18 10:44:57 -070055// resets the object to the state just after construction.
Charles Clément0f4c60d2010-06-24 11:02:25 -070056static void s_vSetKey(unsigned long dwK0, unsigned long dwK1);
Charles Clément3fc9b582010-06-24 11:02:27 -070057static void s_vAppendByte(unsigned char b); // Add a single byte to the internal message
Forest Bond5449c682009-04-25 10:30:44 -040058
59/*--------------------- Export Variables --------------------------*/
Charles Clément0f4c60d2010-06-24 11:02:25 -070060static unsigned long L, R; // Current state
Forest Bond5449c682009-04-25 10:30:44 -040061
Charles Clément0f4c60d2010-06-24 11:02:25 -070062static unsigned long K0, K1; // Key
63static unsigned long M; // Message accumulator (single word)
Charles Clémentb6e95cd2010-06-02 09:52:01 -070064static unsigned int nBytesInM; // # bytes in M
Forest Bond5449c682009-04-25 10:30:44 -040065
66/*--------------------- Export Functions --------------------------*/
67
68/*
Joe Perchesa51ff902013-03-18 10:44:57 -070069 static unsigned long s_dwGetUINT32 (unsigned char *p)
Charles Clément3fc9b582010-06-24 11:02:27 -070070// Convert from unsigned char [] to unsigned long in a portable way
Forest Bond5449c682009-04-25 10:30:44 -040071{
Joe Perchesa51ff902013-03-18 10:44:57 -070072unsigned long res = 0;
73unsigned int i;
74for (i=0; i<4; i++)
75{
76 res |= (*p++) << (8 * i);
77}
78return res;
Forest Bond5449c682009-04-25 10:30:44 -040079}
80
Charles Clément3fc9b582010-06-24 11:02:27 -070081static void s_vPutUINT32 (unsigned char *p, unsigned long val)
82// Convert from unsigned long to unsigned char [] in a portable way
Forest Bond5449c682009-04-25 10:30:44 -040083{
Joe Perchesa51ff902013-03-18 10:44:57 -070084 unsigned int i;
Joe Perches5e0cc8a2013-03-18 20:55:37 -070085 for (i=0; i<4; i++) {
Joe Perchesa51ff902013-03-18 10:44:57 -070086 *p++ = (unsigned char) (val & 0xff);
87 val >>= 8;
88 }
Forest Bond5449c682009-04-25 10:30:44 -040089}
90*/
91
Joe Perchesa51ff902013-03-18 10:44:57 -070092static void s_vClear(void)
Forest Bond5449c682009-04-25 10:30:44 -040093{
Joe Perchesa51ff902013-03-18 10:44:57 -070094 // Reset the state to the empty message.
95 L = K0;
96 R = K1;
97 nBytesInM = 0;
98 M = 0;
Forest Bond5449c682009-04-25 10:30:44 -040099}
100
Joe Perchesa51ff902013-03-18 10:44:57 -0700101static void s_vSetKey(unsigned long dwK0, unsigned long dwK1)
Forest Bond5449c682009-04-25 10:30:44 -0400102{
Joe Perchesa51ff902013-03-18 10:44:57 -0700103 // Set the key
104 K0 = dwK0;
105 K1 = dwK1;
106 // and reset the message
107 s_vClear();
Forest Bond5449c682009-04-25 10:30:44 -0400108}
109
Joe Perchesa51ff902013-03-18 10:44:57 -0700110static void s_vAppendByte(unsigned char b)
Forest Bond5449c682009-04-25 10:30:44 -0400111{
Joe Perchesa51ff902013-03-18 10:44:57 -0700112 // Append the byte to our word-sized buffer
113 M |= b << (8*nBytesInM);
114 nBytesInM++;
115 // Process the word if it is full.
Joe Perches5e0cc8a2013-03-18 20:55:37 -0700116 if (nBytesInM >= 4) {
Joe Perchesa51ff902013-03-18 10:44:57 -0700117 L ^= M;
118 R ^= ROL32(L, 17);
119 L += R;
120 R ^= ((L & 0xff00ff00) >> 8) | ((L & 0x00ff00ff) << 8);
121 L += R;
122 R ^= ROL32(L, 3);
123 L += R;
124 R ^= ROR32(L, 2);
125 L += R;
126 // Clear the buffer
127 M = 0;
128 nBytesInM = 0;
129 }
Forest Bond5449c682009-04-25 10:30:44 -0400130}
131
Joe Perchesa51ff902013-03-18 10:44:57 -0700132void MIC_vInit(unsigned long dwK0, unsigned long dwK1)
Forest Bond5449c682009-04-25 10:30:44 -0400133{
Joe Perchesa51ff902013-03-18 10:44:57 -0700134 // Set the key
135 s_vSetKey(dwK0, dwK1);
Forest Bond5449c682009-04-25 10:30:44 -0400136}
137
Joe Perchesa51ff902013-03-18 10:44:57 -0700138void MIC_vUnInit(void)
Forest Bond5449c682009-04-25 10:30:44 -0400139{
Joe Perchesa51ff902013-03-18 10:44:57 -0700140 // Wipe the key material
141 K0 = 0;
142 K1 = 0;
Forest Bond5449c682009-04-25 10:30:44 -0400143
Joe Perchesa51ff902013-03-18 10:44:57 -0700144 // And the other fields as well.
145 //Note that this sets (L,R) to (K0,K1) which is just fine.
146 s_vClear();
Forest Bond5449c682009-04-25 10:30:44 -0400147}
148
Joe Perchesa51ff902013-03-18 10:44:57 -0700149void MIC_vAppend(unsigned char *src, unsigned int nBytes)
Forest Bond5449c682009-04-25 10:30:44 -0400150{
Joe Perchesa51ff902013-03-18 10:44:57 -0700151 // This is simple
Joe Perches5e0cc8a2013-03-18 20:55:37 -0700152 while (nBytes > 0) {
Joe Perchesa51ff902013-03-18 10:44:57 -0700153 s_vAppendByte(*src++);
154 nBytes--;
155 }
Forest Bond5449c682009-04-25 10:30:44 -0400156}
157
Joe Perchesa51ff902013-03-18 10:44:57 -0700158void MIC_vGetMIC(unsigned long *pdwL, unsigned long *pdwR)
Forest Bond5449c682009-04-25 10:30:44 -0400159{
Joe Perchesa51ff902013-03-18 10:44:57 -0700160 // Append the minimum padding
161 s_vAppendByte(0x5a);
162 s_vAppendByte(0);
163 s_vAppendByte(0);
164 s_vAppendByte(0);
165 s_vAppendByte(0);
166 // and then zeroes until the length is a multiple of 4
Joe Perches5e0cc8a2013-03-18 20:55:37 -0700167 while (nBytesInM != 0) {
Joe Perchesa51ff902013-03-18 10:44:57 -0700168 s_vAppendByte(0);
169 }
170 // The s_vAppendByte function has already computed the result.
171 *pdwL = L;
172 *pdwR = R;
173 // Reset to the empty message.
174 s_vClear();
Forest Bond5449c682009-04-25 10:30:44 -0400175}