git.zerfleddert.de Git - proxmark3-svn/blob - client/loclass/cipherutils.c

   1 /*****************************************************************************
   2  * WARNING
   3  *
   4  * THIS CODE IS CREATED FOR EXPERIMENTATION AND EDUCATIONAL USE ONLY.
   5  *
   6  * USAGE OF THIS CODE IN OTHER WAYS MAY INFRINGE UPON THE INTELLECTUAL
   7  * PROPERTY OF OTHER PARTIES, SUCH AS INSIDE SECURE AND HID GLOBAL,
   8  * AND MAY EXPOSE YOU TO AN INFRINGEMENT ACTION FROM THOSE PARTIES.
   9  *
  10  * THIS CODE SHOULD NEVER BE USED TO INFRINGE PATENTS OR INTELLECTUAL PROPERTY RIGHTS.
  11  *
  12  *****************************************************************************
  13  *
  14  * This file is part of loclass. It is a reconstructon of the cipher engine
  15  * used in iClass, and RFID techology.
  16  *
  17  * The implementation is based on the work performed by
  18  * Flavio D. Garcia, Gerhard de Koning Gans, Roel Verdult and
  19  * Milosch Meriac in the paper "Dismantling IClass".
  20  *
  21  * Copyright (C) 2014 Martin Holst Swende
  22  *
  23  * This is free software: you can redistribute it and/or modify
  24  * it under the terms of the GNU General Public License version 2 as published
  25  * by the Free Software Foundation.
  26  *
  27  * This file is distributed in the hope that it will be useful,
  28  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  29  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  30  * GNU General Public License for more details.
  31  *
  32  * You should have received a copy of the GNU General Public License
  33  * along with loclass.  If not, see <http://www.gnu.org/licenses/>.
  34  *
  35  *
  36  *
  37  ****************************************************************************/
  38
  39 #include <stdint.h>
  40 #include <stdio.h>
  41 #include <string.h>
  42 #include "fileutils.h"
  43 #include "cipherutils.h"
  44 /**
  45  *
  46  * @brief Return and remove the first bit (x0) in the stream : <x0 x1 x2 x3 ... xn >
  47  * @param stream
  48  * @return
  49  */
  50 bool headBit( BitstreamIn *stream)
  51 {
  52         int bytepos = stream->position >> 3; // divide by 8
  53         int bitpos = (stream->position++) & 7; // mask out 00000111
  54         return (*(stream->buffer + bytepos) >> (7-bitpos)) & 1;
  55 }
  56 /**
  57  * @brief Return and remove the last bit (xn) in the stream: <x0 x1 x2 ... xn>
  58  * @param stream
  59  * @return
  60  */
  61 bool tailBit( BitstreamIn *stream)
  62 {
  63         int bitpos = stream->numbits -1 - (stream->position++);
  64
  65         int bytepos= bitpos >> 3;
  66         bitpos &= 7;
  67         return (*(stream->buffer + bytepos) >> (7-bitpos)) & 1;
  68 }
  69 /**
  70  * @brief Pushes bit onto the stream
  71  * @param stream
  72  * @param bit
  73  */
  74 void pushBit( BitstreamOut* stream, bool bit)
  75 {
  76         int bytepos = stream->position >> 3; // divide by 8
  77         int bitpos = stream->position & 7;
  78         *(stream->buffer+bytepos) |= (bit & 1) <<  (7 - bitpos);
  79         stream->position++;
  80         stream->numbits++;
  81 }
  82
  83 /**
  84  * @brief Pushes the lower six bits onto the stream
  85  * as b0 b1 b2 b3 b4 b5 b6
  86  * @param stream
  87  * @param bits
  88  */
  89 void push6bits( BitstreamOut* stream, uint8_t bits)
  90 {
  91         pushBit(stream, bits & 0x20);
  92         pushBit(stream, bits & 0x10);
  93         pushBit(stream, bits & 0x08);
  94         pushBit(stream, bits & 0x04);
  95         pushBit(stream, bits & 0x02);
  96         pushBit(stream, bits & 0x01);
  97 }
  98
  99 /**
 100  * @brief bitsLeft
 101  * @param stream
 102  * @return number of bits left in stream
 103  */
 104 int bitsLeft( BitstreamIn *stream)
 105 {
 106         return stream->numbits - stream->position;
 107 }
 108 /**
 109  * @brief numBits
 110  * @param stream
 111  * @return Number of bits stored in stream
 112  */
 113 int numBits(BitstreamOut *stream)
 114 {
 115         return stream->numbits;
 116 }
 117
 118 void x_num_to_bytes(uint64_t n, size_t len, uint8_t* dest)
 119 {
 120         while (len--) {
 121                 dest[len] = (uint8_t) n;
 122                 n >>= 8;
 123         }
 124 }
 125
 126 uint64_t x_bytes_to_num(uint8_t* src, size_t len)
 127 {
 128         uint64_t num = 0;
 129         while (len--)
 130         {
 131                 num = (num << 8) | (*src);
 132                 src++;
 133         }
 134         return num;
 135 }
 136 uint8_t reversebytes(uint8_t b) {
 137         b = (b & 0xF0) >> 4 | (b & 0x0F) << 4;
 138         b = (b & 0xCC) >> 2 | (b & 0x33) << 2;
 139         b = (b & 0xAA) >> 1 | (b & 0x55) << 1;
 140    return b;
 141 }
 142 void reverse_arraybytes(uint8_t* arr, size_t len)
 143 {
 144         uint8_t i;
 145         for( i =0; i< len ; i++)
 146         {
 147                 arr[i] = reversebytes(arr[i]);
 148         }
 149 }
 150 void reverse_arraycopy(uint8_t* arr, uint8_t* dest, size_t len)
 151 {
 152         uint8_t i;
 153         for( i =0; i< len ; i++)
 154         {
 155                 dest[i] = reversebytes(arr[i]);
 156         }
 157 }
 158
 159 void printarr(char * name, uint8_t* arr, int len)
 160 {
 161         int cx;
 162         size_t outsize = 40+strlen(name)+len*5;
 163         char* output = malloc(outsize);
 164         memset(output, 0,outsize);
 165
 166         int i ;
 167         cx = snprintf(output,outsize, "uint8_t %s[] = {", name);
 168         for(i =0 ;  i< len ; i++)
 169         {
 170                 cx += snprintf(output+cx,outsize-cx,"0x%02x,",*(arr+i));//5 bytes per byte
 171         }
 172         cx += snprintf(output+cx,outsize-cx,"};");
 173         prnlog(output);
 174         free(output);
 175 }
 176
 177 void printvar(char * name, uint8_t* arr, int len)
 178 {
 179         int cx;
 180         size_t outsize = 40+strlen(name)+len*2;
 181         char* output = malloc(outsize);
 182         memset(output, 0,outsize);
 183
 184         int i ;
 185         cx = snprintf(output,outsize,"%s = ", name);
 186         for(i =0 ;  i< len ; i++)
 187         {
 188                 cx += snprintf(output+cx,outsize-cx,"%02x",*(arr+i));//2 bytes per byte
 189         }
 190
 191         prnlog(output);
 192         free(output);
 193 }
 194
 195 void printarr_human_readable(char * title, uint8_t* arr, int len)
 196 {
 197         int cx;
 198         size_t outsize = 100+strlen(title)+len*4;
 199         char* output = malloc(outsize);
 200         memset(output, 0,outsize);
 201
 202
 203         int i;
 204         cx = snprintf(output,outsize,  "\n\t%s\n", title);
 205         for(i =0 ;  i< len ; i++)
 206         {
 207                 if(i % 16 == 0)
 208                         cx += snprintf(output+cx,outsize-cx,"\n%02x| ", i );
 209                 cx += snprintf(output+cx,outsize-cx, "%02x ",*(arr+i));
 210         }
 211         prnlog(output);
 212         free(output);
 213 }
 214
 215 //-----------------------------
 216 // Code for testing below
 217 //-----------------------------
 218
 219 #ifndef ON_DEVICE
 220 int testBitStream()
 221 {
 222         uint8_t input [] = {0xDE,0xAD,0xBE,0xEF,0xDE,0xAD,0xBE,0xEF};
 223         uint8_t output [] = {0,0,0,0,0,0,0,0};
 224         BitstreamIn in = { input, sizeof(input) * 8,0};
 225         BitstreamOut out ={ output, 0,0}
 226                                           ;
 227         while(bitsLeft(&in) > 0)
 228         {
 229                 pushBit(&out, headBit(&in));
 230                 //printf("Bits left: %d\n", bitsLeft(&in));
 231                 //printf("Bits out: %d\n", numBits(&out));
 232         }
 233         if(memcmp(input, output, sizeof(input)) == 0)
 234         {
 235                 prnlog("    Bitstream test 1 ok");
 236         }else
 237         {
 238                 prnlog("    Bitstream test 1 failed");
 239                 uint8_t i;
 240                 for(i = 0 ; i < sizeof(input) ; i++)
 241                 {
 242                         prnlog("    IN %02x, OUT %02x", input[i], output[i]);
 243                 }
 244                 return 1;
 245         }
 246         return 0;
 247 }
 248
 249 int testReversedBitstream()
 250 {
 251         uint8_t input [] = {0xDE,0xAD,0xBE,0xEF,0xDE,0xAD,0xBE,0xEF};
 252         uint8_t reverse [] = {0,0,0,0,0,0,0,0};
 253         uint8_t output [] = {0,0,0,0,0,0,0,0};
 254         BitstreamIn in = { input, sizeof(input) * 8,0};
 255         BitstreamOut out ={ output, 0,0};
 256         BitstreamIn reversed_in ={ reverse, sizeof(input)*8,0};
 257         BitstreamOut reversed_out ={ reverse,0 ,0};
 258
 259         while(bitsLeft(&in) > 0)
 260         {
 261                 pushBit(&reversed_out, tailBit(&in));
 262         }
 263         while(bitsLeft(&reversed_in) > 0)
 264         {
 265                 pushBit(&out, tailBit(&reversed_in));
 266         }
 267         if(memcmp(input, output, sizeof(input)) == 0)
 268         {
 269                 prnlog("    Bitstream test 2 ok");
 270         }else
 271         {
 272                 prnlog("    Bitstream test 2 failed");
 273                 uint8_t i;
 274                 for(i = 0 ; i < sizeof(input) ; i++)
 275                 {
 276                         prnlog("    IN %02x, MIDDLE: %02x, OUT %02x", input[i],reverse[i], output[i]);
 277                 }
 278                 return 1;
 279         }
 280         return 0;
 281 }
 282
 283 int testCipherUtils(void)
 284 {
 285         prnlog("[+] Testing some internals...");
 286         int retval = 0;
 287         retval |= testBitStream();
 288         retval |= testReversedBitstream();
 289         return retval;
 290 }
 291 #endif