drivers/usb/net/Zydas/zdtkipseed.c

   1 #include "zd80211.h"
   2
   3 #if!defined(AMAC)
   4
   5 /* The Sbox is reduced to 2 16-bit wide tables, each with 256 entries. */
   6 /* The 2nd table is the same as the 1st but with the upper and lower   */
   7 /* bytes swapped. To allow an endian tolerant implementation, the byte */
   8 /* halves have been expressed independently here.                      */
   9 unsigned int Tkip_Sbox_Lower[256] =
  10 {
  11     0xA5,0x84,0x99,0x8D,0x0D,0xBD,0xB1,0x54,
  12     0x50,0x03,0xA9,0x7D,0x19,0x62,0xE6,0x9A,
  13     0x45,0x9D,0x40,0x87,0x15,0xEB,0xC9,0x0B,
  14     0xEC,0x67,0xFD,0xEA,0xBF,0xF7,0x96,0x5B,
  15     0xC2,0x1C,0xAE,0x6A,0x5A,0x41,0x02,0x4F,
  16     0x5C,0xF4,0x34,0x08,0x93,0x73,0x53,0x3F,
  17     0x0C,0x52,0x65,0x5E,0x28,0xA1,0x0F,0xB5,
  18     0x09,0x36,0x9B,0x3D,0x26,0x69,0xCD,0x9F,
  19     0x1B,0x9E,0x74,0x2E,0x2D,0xB2,0xEE,0xFB,
  20     0xF6,0x4D,0x61,0xCE,0x7B,0x3E,0x71,0x97,
  21     0xF5,0x68,0x00,0x2C,0x60,0x1F,0xC8,0xED,
  22     0xBE,0x46,0xD9,0x4B,0xDE,0xD4,0xE8,0x4A,
  23     0x6B,0x2A,0xE5,0x16,0xC5,0xD7,0x55,0x94,
  24     0xCF,0x10,0x06,0x81,0xF0,0x44,0xBA,0xE3,
  25     0xF3,0xFE,0xC0,0x8A,0xAD,0xBC,0x48,0x04,
  26     0xDF,0xC1,0x75,0x63,0x30,0x1A,0x0E,0x6D,
  27     0x4C,0x14,0x35,0x2F,0xE1,0xA2,0xCC,0x39,
  28     0x57,0xF2,0x82,0x47,0xAC,0xE7,0x2B,0x95,
  29     0xA0,0x98,0xD1,0x7F,0x66,0x7E,0xAB,0x83,
  30     0xCA,0x29,0xD3,0x3C,0x79,0xE2,0x1D,0x76,
  31     0x3B,0x56,0x4E,0x1E,0xDB,0x0A,0x6C,0xE4,
  32     0x5D,0x6E,0xEF,0xA6,0xA8,0xA4,0x37,0x8B,
  33     0x32,0x43,0x59,0xB7,0x8C,0x64,0xD2,0xE0,
  34     0xB4,0xFA,0x07,0x25,0xAF,0x8E,0xE9,0x18,
  35     0xD5,0x88,0x6F,0x72,0x24,0xF1,0xC7,0x51,
  36     0x23,0x7C,0x9C,0x21,0xDD,0xDC,0x86,0x85,
  37     0x90,0x42,0xC4,0xAA,0xD8,0x05,0x01,0x12,
  38     0xA3,0x5F,0xF9,0xD0,0x91,0x58,0x27,0xB9,
  39     0x38,0x13,0xB3,0x33,0xBB,0x70,0x89,0xA7,
  40     0xB6,0x22,0x92,0x20,0x49,0xFF,0x78,0x7A,
  41     0x8F,0xF8,0x80,0x17,0xDA,0x31,0xC6,0xB8,
  42     0xC3,0xB0,0x77,0x11,0xCB,0xFC,0xD6,0x3A};
  43
  44
  45 unsigned int Tkip_Sbox_Upper[256] =
  46 {
  47     0xC6,0xF8,0xEE,0xF6,0xFF,0xD6,0xDE,0x91,
  48     0x60,0x02,0xCE,0x56,0xE7,0xB5,0x4D,0xEC,
  49     0x8F,0x1F,0x89,0xFA,0xEF,0xB2,0x8E,0xFB,
  50     0x41,0xB3,0x5F,0x45,0x23,0x53,0xE4,0x9B,
  51     0x75,0xE1,0x3D,0x4C,0x6C,0x7E,0xF5,0x83,
  52     0x68,0x51,0xD1,0xF9,0xE2,0xAB,0x62,0x2A,
  53     0x08,0x95,0x46,0x9D,0x30,0x37,0x0A,0x2F,
  54     0x0E,0x24,0x1B,0xDF,0xCD,0x4E,0x7F,0xEA,
  55     0x12,0x1D,0x58,0x34,0x36,0xDC,0xB4,0x5B,
  56     0xA4,0x76,0xB7,0x7D,0x52,0xDD,0x5E,0x13,
  57     0xA6,0xB9,0x00,0xC1,0x40,0xE3,0x79,0xB6,
  58     0xD4,0x8D,0x67,0x72,0x94,0x98,0xB0,0x85,
  59     0xBB,0xC5,0x4F,0xED,0x86,0x9A,0x66,0x11,
  60     0x8A,0xE9,0x04,0xFE,0xA0,0x78,0x25,0x4B,
  61     0xA2,0x5D,0x80,0x05,0x3F,0x21,0x70,0xF1,
  62     0x63,0x77,0xAF,0x42,0x20,0xE5,0xFD,0xBF,
  63     0x81,0x18,0x26,0xC3,0xBE,0x35,0x88,0x2E,
  64     0x93,0x55,0xFC,0x7A,0xC8,0xBA,0x32,0xE6,
  65     0xC0,0x19,0x9E,0xA3,0x44,0x54,0x3B,0x0B,
  66     0x8C,0xC7,0x6B,0x28,0xA7,0xBC,0x16,0xAD,
  67     0xDB,0x64,0x74,0x14,0x92,0x0C,0x48,0xB8,
  68     0x9F,0xBD,0x43,0xC4,0x39,0x31,0xD3,0xF2,
  69     0xD5,0x8B,0x6E,0xDA,0x01,0xB1,0x9C,0x49,
  70     0xD8,0xAC,0xF3,0xCF,0xCA,0xF4,0x47,0x10,
  71     0x6F,0xF0,0x4A,0x5C,0x38,0x57,0x73,0x97,
  72     0xCB,0xA1,0xE8,0x3E,0x96,0x61,0x0D,0x0F,
  73
  74     0xE0,0x7C,0x71,0xCC,0x90,0x06,0xF7,0x1C,
  75     0xC2,0x6A,0xAE,0x69,0x17,0x99,0x3A,0x27,
  76     0xD9,0xEB,0x2B,0x22,0xD2,0xA9,0x07,0x33,
  77     0x2D,0x3C,0x15,0xC9,0x87,0xAA,0x50,0xA5,
  78     0x03,0x59,0x09,0x1A,0x65,0xD7,0x84,0xD0,
  79     0x82,0x29,0x5A,0x1E,0x7B,0xA8,0x6D,0x2C};
  80
  81
  82 unsigned int tkip_sbox(unsigned int index)
  83 /************************************************************/
  84 /* tkip_sbox()                                              */
  85 /* Returns a 16 bit value from a 64K entry table. The Table */
  86 /* is synthesized from two 256 entry byte wide tables.      */
  87 /************************************************************/
  88 {
  89     unsigned int index_low;
  90     unsigned int index_high;
  91     unsigned int left, right;
  92
  93     index_low = (index & 0xFF);
  94     index_high = ((index >> 8) & 0xFF);
  95
  96     left = Tkip_Sbox_Lower[index_low] + (Tkip_Sbox_Upper[index_low] << 8);
  97     right = Tkip_Sbox_Upper[index_high] + (Tkip_Sbox_Lower[index_high] << 8);
  98     return (left ^ right);
  99 }
 100
 101
 102 unsigned int rotr1(unsigned int a)
 103 // rotate right by 1 bit.
 104 {
 105     unsigned int b;
 106
 107     if (a & 0x01){
 108         b = (a >> 1) | 0x8000;
 109     }
 110     else{
 111         b = (a >> 1) & 0x7fff;
 112     }
 113
 114     return b;
 115 }
 116
 117
 118 /***********************************************************************/
 119 /*                                                                     */
 120 /*   FUNCTION DESCRIPTION                   Tkip_clear                 */
 121 /*                                                                     */
 122 /*   clear all variable used in tkip seed generation function          */
 123 /*                                                                     */
 124 /*   AUTHOR                                                            */
 125 /*     Liam,Hwu            ZyDAS Technology   Corporation              */
 126 /*                                                                     */
 127 /***********************************************************************/
 128 void Tkip_clear(Seedvar *Seed)
 129 {
 130         memset(Seed, 0, sizeof(Seedvar));
 131 //      Seed->IV16=1; // According to WPA std Ver2.0 8.3.2.4.4, TSC should be
 132                                 // initialized to one.
 133         return;
 134 }
 135
 136
 137 /***********************************************************************/
 138 /*                                                                     */
 139 /*   FUNCTION DESCRIPTION                   Tkip_setkey                */
 140 /*                                                                     */
 141 /*   Set Temporal key(TK) and Transmitter Address(TA)                  */
 142 /*                                                                     */
 143 /*   AUTHOR                                                            */
 144 /*     Liam,Hwu            ZyDAS Technology   Corporation              */
 145 /*                                                                     */
 146 /***********************************************************************/
 147 void Tkip_setkey(U8 * key, U8 *ta, Seedvar *Seed)
 148 {
 149     memcpy(Seed->TA, ta, 6);
 150     memcpy(Seed->TK, key, 16);
 151 }
 152
 153
 154 /***********************************************************************/
 155 /*                                                                     */
 156 /*   FUNCTION DESCRIPTION                   Tkip_Init                  */
 157 /*                                                                     */
 158 /*   TKIP seed generation function initialization routine              */
 159 /*                                                                     */
 160 /*   AUTHOR                                                            */
 161 /*     Liam,Hwu            ZyDAS Technology   Corporation              */
 162 /*                                                                     */
 163 /***********************************************************************/
 164 void Tkip_Init(U8 *key, U8 *ta, Seedvar *Seed, U8 *initiv)
 165 {
 166     U16  iv16;
 167     U32 iv32;
 168     int i;
 169
 170     Tkip_clear(Seed);
 171     Tkip_setkey(key, ta, Seed);
 172
 173     iv16 = *initiv++;
 174     iv16 += *initiv << 8;
 175     initiv++;
 176     iv32 = 0;
 177
 178     for (i=0; i<4; i++){        // initiv is little endian
 179         iv32 += *initiv << (i*8);
 180         *initiv++;
 181     }
 182
 183         Seed->IV32 = iv32+1; // Force Recaculating on Tkip Phase1
 184     Tkip_phase1_key_mix(iv32, Seed);
 185
 186     Seed->IV16 = iv16;
 187     Seed->IV32 = iv32;
 188 }
 189
 190
 191
 192 /***********************************************************************/
 193 /*                                                                     */
 194 /*   FUNCTION DESCRIPTION                   Tkip_phase1_key_mix        */
 195 /*                                                                     */
 196 /*   TKIP seed generation function for phase1 key mixing               */
 197 /*                                                                     */
 198 /*   AUTHOR                                                            */
 199 /*     Liam,Hwu            ZyDAS Technology   Corporation              */
 200 /*   Return value:                                                                                                         */
 201 /*              Return TRUE if expected IV sequence is correct.                */
 202 /*                                                                     */
 203 /***********************************************************************/
 204 char Tkip_phase1_key_mix(U32 iv32, Seedvar *Seed)
 205 {
 206     unsigned short tsc0;
 207     unsigned short tsc1;
 208     int i, j;
 209
 210     if (iv32 == Seed->IV32)    //don't need to proceed this function the same
 211        return 1;
 212     else {
 213         tsc0 = (unsigned short)((iv32 >> 16) & 0xffff); /* msb */
 214         tsc1 = (unsigned short)(iv32 & 0xffff);
 215
 216         /* Phase 1, step 1 */
 217         Seed->TTAK[0] = tsc1;
 218         Seed->TTAK[1] = tsc0;
 219         Seed->TTAK[2] = (unsigned short)(Seed->TA[0] + (Seed->TA[1] <<8));
 220         Seed->TTAK[3] = (unsigned short)(Seed->TA[2] + (Seed->TA[3] <<8));
 221         Seed->TTAK[4] = (unsigned short)(Seed->TA[4] + (Seed->TA[5] <<8));
 222
 223         /* Phase 1, step 2 */
 224         for (i=0; i<8; i++){
 225             j = 2*(i & 1);
 226             Seed->TTAK[0] = (Seed->TTAK[0] + tkip_sbox(Seed->TTAK[4]
 227                                 ^ Mk16(Seed->TK[1+j],Seed->TK[j]))) & 0xffff;
 228             Seed->TTAK[1] = (Seed->TTAK[1] + tkip_sbox(Seed->TTAK[0]
 229                                 ^ Mk16(Seed->TK[5+j],Seed->TK[4+j] ))) & 0xffff;
 230             Seed->TTAK[2] = (Seed->TTAK[2] + tkip_sbox(Seed->TTAK[1]
 231                                 ^ Mk16(Seed->TK[9+j],Seed->TK[8+j] ))) & 0xffff;
 232             Seed->TTAK[3] = (Seed->TTAK[3] + tkip_sbox(Seed->TTAK[2]
 233                                 ^ Mk16(Seed->TK[13+j],Seed->TK[12+j])))& 0xffff;
 234             Seed->TTAK[4] = (Seed->TTAK[4] + tkip_sbox(Seed->TTAK[3]
 235                                 ^ Mk16(Seed->TK[1+j] ,Seed->TK[j]  ))) & 0xffff;
 236             Seed->TTAK[4] = (Seed->TTAK[4] + i) & 0xffff;
 237         }
 238
 239         if (iv32 == (Seed->IV32+1)){
 240             Seed->iv32tmp = iv32;
 241             return 1;
 242         }
 243         else
 244             return 0;
 245     }
 246 }
 247
 248
 249 /***********************************************************************/
 250 /*                                                                     */
 251 /*   FUNCTION DESCRIPTION                   Tkip_phase2_key_mix        */
 252 /*                                                                     */
 253 /*   TKIP seed generation function for phase2 key mixing               */
 254 /*                                                                     */
 255 /*   AUTHOR                                                            */
 256 /*     Liam,Hwu            ZyDAS Technology   Corporation              */
 257 /*   Return value:                                                                                                         */
 258 /*              Return TRUE if expected IV sequence is correct.                */
 259 /*                                                                     */
 260 /***********************************************************************/
 261 char Tkip_phase2_key_mix(U16 iv16, Seedvar *Seed)
 262 {
 263     unsigned int tsc2;
 264
 265     tsc2 = iv16;
 266     /* Phase 2, Step 1 */
 267     Seed->ppk[0] = Seed->TTAK[0];
 268     Seed->ppk[1] = Seed->TTAK[1];
 269     Seed->ppk[2] = Seed->TTAK[2];
 270     Seed->ppk[3] = Seed->TTAK[3];
 271     Seed->ppk[4] = Seed->TTAK[4];
 272     Seed->ppk[5] = (Seed->TTAK[4] + tsc2) & 0xffff;
 273
 274     /* Phase2, Step 2 */
 275     Seed->ppk[0] = Seed->ppk[0] + tkip_sbox(Seed->ppk[5] ^ Mk16(Seed->TK[1],Seed->TK[0])) ;
 276     Seed->ppk[1] = Seed->ppk[1] + tkip_sbox(Seed->ppk[0] ^ Mk16(Seed->TK[3],Seed->TK[2])) ;
 277     Seed->ppk[2] = Seed->ppk[2] + tkip_sbox(Seed->ppk[1] ^ Mk16(Seed->TK[5],Seed->TK[4])) ;
 278     Seed->ppk[3] = Seed->ppk[3] + tkip_sbox(Seed->ppk[2] ^ Mk16(Seed->TK[7],Seed->TK[6])) ;
 279     Seed->ppk[4] = Seed->ppk[4] + tkip_sbox(Seed->ppk[3] ^ Mk16(Seed->TK[9],Seed->TK[8] )) ;
 280     Seed->ppk[5] = Seed->ppk[5] + tkip_sbox(Seed->ppk[4] ^ Mk16(Seed->TK[11],Seed->TK[10])) ;
 281
 282     Seed->ppk[0] = Seed->ppk[0] + rotr1(Seed->ppk[5] ^ Mk16(Seed->TK[13],Seed->TK[12]));
 283     Seed->ppk[1] = Seed->ppk[1] + rotr1(Seed->ppk[0] ^ Mk16(Seed->TK[15],Seed->TK[14]));
 284     Seed->ppk[2] = Seed->ppk[2] + rotr1(Seed->ppk[1]);
 285     Seed->ppk[3] = Seed->ppk[3] + rotr1(Seed->ppk[2]);
 286     Seed->ppk[4] = Seed->ppk[4] + rotr1(Seed->ppk[3]);
 287     Seed->ppk[5] = Seed->ppk[5] + rotr1(Seed->ppk[4]);
 288
 289     if (iv16 == 0){
 290        if (Seed->IV16 == 0xffff){
 291                Seed->iv16tmp = 0;
 292            return 1;
 293        }
 294        else
 295             return 0;
 296     }
 297     else if (iv16 == (Seed->IV16+1)){
 298         Seed->iv16tmp = iv16;
 299         return 1;
 300     }
 301     else
 302         return 0;
 303 }
 304
 305
 306 /***********************************************************************/
 307 /*                                                                     */
 308 /*   FUNCTION DESCRIPTION                   Tkip_getseeds              */
 309 /*                                                                     */
 310
 311 /*   Get RC4Key seeds generated by TKIP                                */
 312 /*                                                                     */
 313 /*   AUTHOR                                                            */
 314 /*     Liam,Hwu            ZyDAS Technology   Corporation              */
 315 /*                                                                     */
 316 /***********************************************************************/
 317 void Tkip_getseeds(U16 iv16, U8 *RC4Key, Seedvar *Seed)
 318 {
 319     RC4Key[0]  = Hi8(iv16);
 320     RC4Key[1]  = (Hi8(iv16) | 0x20) & 0x7f;
 321     RC4Key[2]  = Lo8(iv16);
 322     RC4Key[3]  = ((Seed->ppk[5] ^ Mk16(Seed->TK[1],Seed->TK[0]))>>1) & 0xff;
 323     RC4Key[4]  = Seed->ppk[0] & 0xff;
 324     RC4Key[5]  = Seed->ppk[0] >> 8  ;
 325     RC4Key[6]  = Seed->ppk[1] & 0xff;
 326     RC4Key[7]  = Seed->ppk[1] >> 8  ;
 327     RC4Key[8]  = Seed->ppk[2] & 0xff;
 328     RC4Key[9]  = Seed->ppk[2] >> 8  ;
 329     RC4Key[10] = Seed->ppk[3] & 0xff;
 330     RC4Key[11] = Seed->ppk[3] >> 8  ;
 331     RC4Key[12] = Seed->ppk[4] & 0xff;
 332     RC4Key[13] = Seed->ppk[4] >> 8  ;
 333     RC4Key[14] = Seed->ppk[5] & 0xff;
 334     RC4Key[15] = Seed->ppk[5] >> 8  ;
 335 }
 336
 337
 338 /***********************************************************************/
 339 /*                                                                     */
 340 /*   FUNCTION DESCRIPTION                   Tkip_updateiv              */
 341 /*                                                                     */
 342 /*   update stored iv value                                            */
 343 /*                                                                     */
 344 /*   AUTHOR                                                            */
 345 /*     Liam,Hwu            ZyDAS Technology   Corporation              */
 346 /*                                                                     */
 347 /***********************************************************************/
 348 void Tkip_updateiv(Seedvar *Seed)
 349 {
 350     Seed->IV16 = Seed->iv16tmp;
 351     Seed->IV32 = Seed->iv32tmp;
 352 }
 353 #endif