]> git.zerfleddert.de Git - proxmark3-svn/blobdiff - armsrc/lfops.c
Added a lf acquisition-mode which can do decimation and quantization, in order to...
[proxmark3-svn] / armsrc / lfops.c
index ab196325f2c5c5abb371bd0c6b48486eb65c3a2c..1d7d2036e9d5cce4967ece3924be65741ac9480e 100644 (file)
@@ -8,6 +8,7 @@
 // Also routines for raw mode reading/simulating of LF waveform
 //-----------------------------------------------------------------------------
 
+#include <stdlib.h>
 #include "proxmark3.h"
 #include "apps.h"
 #include "util.h"
 #include "string.h"
 #include "lfdemod.h"
 
+typedef struct {
+       uint8_t * buffer;
+       uint32_t numbits;
+       uint8_t position;
+} BitstreamOut;
+/**
+ * @brief Pushes bit onto the stream
+ * @param stream
+ * @param bit
+ */
+void pushBit( BitstreamOut* stream, bool bit)
+{
+       int bytepos = stream->position >> 3; // divide by 8
+       int bitpos = stream->position & 7;
+       *(stream->buffer+bytepos) |= (bit & 1) <<  (7 - bitpos);
+       stream->position++;
+       stream->numbits++;
+}
+void DoAcquisition(int decimation, int quantization, int trigger_threshold, bool averaging)
+{
+       //A decimation of 2 means we keep every 2nd sample
+       //A decimation of 3 means we keep 1 in 3 samples.
+       //A quantization of 1 means one bit is discarded from the sample (division by 2).
+       uint8_t *dest = (uint8_t *)BigBuf;
+       int bufsize = BIGBUF_SIZE;
+       memset(dest, 0, bufsize);
+       // You can't decimate 8 bits more than 7 times
+       if(quantization > 7) quantization = 7;
+       // Use a bit stream to handle the output
+       BitstreamOut data = { dest , 0, 0};
+       int sample_counter = 0;
+       uint8_t sample = 0;
+       //If we want to do averaging
+       uint32_t sample_sum =0 ;
+       uint32_t sample_total_numbers =0 ;
+       uint32_t sample_total_saved =0 ;
+
+       for(;;) {
+               WDT_HIT();
+               if (AT91C_BASE_SSC->SSC_SR & AT91C_SSC_TXRDY) {
+                       AT91C_BASE_SSC->SSC_THR = 0x43;
+                       LED_D_ON();
+               }
+               if (AT91C_BASE_SSC->SSC_SR & AT91C_SSC_RXRDY) {
+                       sample = (uint8_t)AT91C_BASE_SSC->SSC_RHR;
+                       sample_total_numbers++;
+                       if (trigger_threshold != -1 && sample < trigger_threshold)
+                               continue;
+
+                       LED_D_OFF();
+                       trigger_threshold = -1;
+                       sample_counter++;
+                       sample_sum += sample;
+                       //Check decimation
+                       if(sample_counter < decimation) continue;
+                       //Averaging
+                       if(averaging) sample = sample_sum / decimation;
+
+                       sample_counter = 0;
+                       sample_sum =0;
+                       sample_total_saved ++;
+                       pushBit(&data, sample & 0x80);
+                       if(quantization < 7)    pushBit(&data, sample & 0x40);
+                       if(quantization < 6)    pushBit(&data, sample & 0x20);
+                       if(quantization < 5)    pushBit(&data, sample & 0x10);
+                       if(quantization < 4)    pushBit(&data, sample & 0x08);
+                       if(quantization < 3)    pushBit(&data, sample & 0x04);
+                       if(quantization < 2)    pushBit(&data, sample & 0x02);
+                       if(quantization < 1)    pushBit(&data, sample & 0x01);
+
+                       if(data.numbits +1  >= bufsize) break;
+               }
+       }
+       Dbprintf("Done, saved %l out of %l seen samples.",sample_total_saved, sample_total_numbers);
+
+}
+
 
 /**
-* Does the sample acquisition. If threshold is specified, the actual sampling 
-* is not commenced until the threshold has been reached. 
+* Does the sample acquisition. If threshold is specified, the actual sampling
+* is not commenced until the threshold has been reached.
 * @param trigger_threshold - the threshold
 * @param silent - is true, now outputs are made. If false, dbprints the status
 */
@@ -54,7 +132,7 @@ void DoAcquisition125k_internal(int trigger_threshold,bool silent)
     }
 }
 /**
-* Perform sample aquisition. 
+* Perform sample aquisition.
 */
 void DoAcquisition125k(int trigger_threshold)
 {
@@ -62,11 +140,11 @@ void DoAcquisition125k(int trigger_threshold)
 }
 
 /**
-* Setup the FPGA to listen for samples. This method downloads the FPGA bitstream 
-* if not already loaded, sets divisor and starts up the antenna. 
+* Setup the FPGA to listen for samples. This method downloads the FPGA bitstream
+* if not already loaded, sets divisor and starts up the antenna.
 * @param divisor : 1, 88> 255 or negative ==> 134.8 KHz
 *                                 0 or 95 ==> 125 KHz
-*                                 
+*
 **/
 void LFSetupFPGAForADC(int divisor, bool lf_field)
 {
@@ -88,7 +166,7 @@ void LFSetupFPGAForADC(int divisor, bool lf_field)
     FpgaSetupSsc();
 }
 /**
-* Initializes the FPGA, and acquires the samples. 
+* Initializes the FPGA, and acquires the samples.
 **/
 void AcquireRawAdcSamples125k(int divisor)
 {
@@ -97,7 +175,7 @@ void AcquireRawAdcSamples125k(int divisor)
     DoAcquisition125k_internal(-1,false);
 }
 /**
-* Initializes the FPGA for snoop-mode, and acquires the samples. 
+* Initializes the FPGA for snoop-mode, and acquires the samples.
 **/
 
 void SnoopLFRawAdcSamples(int divisor, int trigger_threshold)
@@ -173,15 +251,12 @@ void ReadTItag(void)
     // when we read a TI tag we sample the zerocross line at 2Mhz
     // TI tags modulate a 1 as 16 cycles of 123.2Khz
     // TI tags modulate a 0 as 16 cycles of 134.2Khz
-#define FSAMPLE 2000000
-#define FREQLO 123200
-#define FREQHI 134200
+ #define FSAMPLE 2000000
+ #define FREQLO 123200
+ #define FREQHI 134200
 
     signed char *dest = (signed char *)BigBuf;
     int n = sizeof(BigBuf);
-    // int *dest = GraphBuffer;
-    // int n = GraphTraceLen;
-
     // 128 bit shift register [shift3:shift2:shift1:shift0]
     uint32_t shift3 = 0, shift2 = 0, shift1 = 0, shift0 = 0;
 
@@ -263,10 +338,10 @@ void ReadTItag(void)
         shift2 = ((shift2>>24) | (shift3 << 8)) & 0x0ffff;
 
         // if r/w tag, check ident match
-        if ( shift3&(1<<15) ) {
+               if (shift3 & (1<<15) ) {
             DbpString("Info: TI tag is rewriteable");
             // only 15 bits compare, last bit of ident is not valid
-            if ( ((shift3>>16)^shift0)&0x7fff ) {
+                       if (((shift3 >> 16) ^ shift0) & 0x7fff ) {
                 DbpString("Error: Ident mismatch!");
             } else {
                 DbpString("Info: TI tag ident is valid");
@@ -330,7 +405,7 @@ void AcquireTiType(void)
     int i, j, n;
     // tag transmission is <20ms, sampling at 2M gives us 40K samples max
     // each sample is 1 bit stuffed into a uint32_t so we need 1250 uint32_t
-#define TIBUFLEN 1250
+ #define TIBUFLEN 1250
 
     // clear buffer
     memset(BigBuf,0,sizeof(BigBuf));
@@ -471,18 +546,18 @@ void SimulateTagLowFrequency(int period, int gap, int ledcontrol)
 {
     int i;
     uint8_t *tab = (uint8_t *)BigBuf;
-    
+
     FpgaDownloadAndGo(FPGA_BITSTREAM_LF);
     FpgaWriteConfWord(FPGA_MAJOR_MODE_LF_EDGE_DETECT);
-    
+
     AT91C_BASE_PIOA->PIO_PER = GPIO_SSC_DOUT | GPIO_SSC_CLK;
-    
+
     AT91C_BASE_PIOA->PIO_OER = GPIO_SSC_DOUT;
     AT91C_BASE_PIOA->PIO_ODR = GPIO_SSC_CLK;
-    
+
 #define SHORT_COIL()   LOW(GPIO_SSC_DOUT)
 #define OPEN_COIL()            HIGH(GPIO_SSC_DOUT)
-    
+
     i = 0;
     for(;;) {
         while(!(AT91C_BASE_PIOA->PIO_PDSR & GPIO_SSC_CLK)) {
@@ -492,18 +567,18 @@ void SimulateTagLowFrequency(int period, int gap, int ledcontrol)
             }
             WDT_HIT();
         }
-        
+
         if (ledcontrol)
             LED_D_ON();
-        
+
         if(tab[i])
             OPEN_COIL();
         else
             SHORT_COIL();
-        
+
         if (ledcontrol)
             LED_D_OFF();
-        
+
         while(AT91C_BASE_PIOA->PIO_PDSR & GPIO_SSC_CLK) {
             if(BUTTON_PRESS()) {
                 DbpString("Stopped");
@@ -511,7 +586,7 @@ void SimulateTagLowFrequency(int period, int gap, int ledcontrol)
             }
             WDT_HIT();
         }
-        
+
         i++;
         if(i == period) {
             i = 0;
@@ -648,15 +723,12 @@ void CmdHIDdemodFSK(int findone, int *high, int *low, int ledcontrol)
         if (ledcontrol) LED_A_ON();
 
         DoAcquisition125k_internal(-1,true);
-        size  = sizeof(BigBuf);
-        if (size < 2000) continue;
         // FSK demodulator
-
-        int bitLen = HIDdemodFSK(dest,size,&hi2,&hi,&lo);
+               size = HIDdemodFSK(dest, sizeof(BigBuf), &hi2, &hi, &lo);
 
         WDT_HIT();
 
-        if (bitLen>0 && lo>0){
+               if (size>0 && lo>0){
             // final loop, go over previously decoded manchester data and decode into usable tag ID
             // 111000 bit pattern represent start of frame, 01 pattern represents a 1 and 10 represents a 0
             if (hi2 != 0){ //extra large HID tags
@@ -667,30 +739,30 @@ void CmdHIDdemodFSK(int findone, int *high, int *low, int ledcontrol)
                 uint8_t bitlen = 0;
                 uint32_t fc = 0;
                 uint32_t cardnum = 0;
-                if (((hi>>5)&1)==1){//if bit 38 is set then < 37 bit format is used
+                               if (((hi>>5)&1) == 1){//if bit 38 is set then < 37 bit format is used
                     uint32_t lo2=0;
                     lo2=(((hi & 31) << 12) | (lo>>20)); //get bits 21-37 to check for format len bit
                     uint8_t idx3 = 1;
-                    while(lo2>1){ //find last bit set to 1 (format len bit)
-                        lo2=lo2>>1;
+                                       while(lo2 > 1){ //find last bit set to 1 (format len bit)
+                                               lo2=lo2 >> 1;
                         idx3++;
                     }
-                    bitlen =idx3+19;
+                                       bitlen = idx3+19;
                     fc =0;
                     cardnum=0;
-                    if(bitlen==26){
+                                       if(bitlen == 26){
                         cardnum = (lo>>1)&0xFFFF;
                         fc = (lo>>17)&0xFF;
                     }
-                    if(bitlen==37){
+                                       if(bitlen == 37){
                         cardnum = (lo>>1)&0x7FFFF;
                         fc = ((hi&0xF)<<12)|(lo>>20);
                     }
-                    if(bitlen==34){
+                                       if(bitlen == 34){
                         cardnum = (lo>>1)&0xFFFF;
                         fc= ((hi&1)<<15)|(lo>>17);
                     }
-                    if(bitlen==35){
+                                       if(bitlen == 35){
                         cardnum = (lo>>1)&0xFFFFF;
                         fc = ((hi&1)<<11)|(lo>>21);
                     }
@@ -718,7 +790,6 @@ void CmdHIDdemodFSK(int findone, int *high, int *low, int ledcontrol)
             hi2 = hi = lo = 0;
         }
         WDT_HIT();
-        //SpinDelay(50);
     }
     DbpString("Stopped");
     if (ledcontrol) LED_A_OFF();
@@ -728,8 +799,7 @@ void CmdEM410xdemod(int findone, int *high, int *low, int ledcontrol)
 {
     uint8_t *dest = (uint8_t *)BigBuf;
 
-    size_t size=0; //, found=0;
-    uint32_t bitLen=0;
+       size_t size=0;
     int clk=0, invert=0, errCnt=0;
     uint64_t lo=0;
     // Configure to go in 125Khz listen mode
@@ -742,21 +812,22 @@ void CmdEM410xdemod(int findone, int *high, int *low, int ledcontrol)
 
         DoAcquisition125k_internal(-1,true);
         size  = sizeof(BigBuf);
-        if (size < 2000) continue;
-        // FSK demodulator
-        //int askmandemod(uint8_t *BinStream,uint32_t *BitLen,int *clk, int *invert);
-        bitLen=size;
         //Dbprintf("DEBUG: Buffer got");
-        errCnt = askmandemod(dest,&bitLen,&clk,&invert); //HIDdemodFSK(dest,size,&hi2,&hi,&lo);
+               //askdemod and manchester decode
+               errCnt = askmandemod(dest, &size, &clk, &invert);
         //Dbprintf("DEBUG: ASK Got");
         WDT_HIT();
 
         if (errCnt>=0){
-            lo = Em410xDecode(dest,bitLen);
+                       lo = Em410xDecode(dest,size);
             //Dbprintf("DEBUG: EM GOT");
-            //printEM410x(lo);
             if (lo>0){
-                Dbprintf("EM TAG ID: %02x%08x - (%05d_%03d_%08d)",(uint32_t)(lo>>32),(uint32_t)lo,(uint32_t)(lo&0xFFFF),(uint32_t)((lo>>16LL) & 0xFF),(uint32_t)(lo & 0xFFFFFF));
+                               Dbprintf("EM TAG ID: %02x%08x - (%05d_%03d_%08d)",
+                                   (uint32_t)(lo>>32),
+                                   (uint32_t)lo,
+                                   (uint32_t)(lo&0xFFFF),
+                                   (uint32_t)((lo>>16LL) & 0xFF),
+                                   (uint32_t)(lo & 0xFFFFFF));
             }
             if (findone){
                 if (ledcontrol)        LED_A_OFF();
@@ -771,7 +842,6 @@ void CmdEM410xdemod(int findone, int *high, int *low, int ledcontrol)
         invert=0;
         errCnt=0;
         size=0;
-        //SpinDelay(50);
     }
     DbpString("Stopped");
     if (ledcontrol) LED_A_OFF();
@@ -1210,7 +1280,7 @@ void CopyIOtoT55x7(uint32_t hi, uint32_t lo, uint8_t longFMT)
 
     data1 = hi;  // load preamble
     data2 = lo;
-    
+
     LED_D_ON();
     // Program the data blocks for supplied ID
     // and the block 0 for HID format
@@ -1352,7 +1422,7 @@ void CopyIndala64toT55x7(int hi, int lo)
 
     DbpString("DONE!");
 
-}      
+}
 
 void CopyIndala224toT55x7(int uid1, int uid2, int uid3, int uid4, int uid5, int uid6, int uid7)
 {
Impressum, Datenschutz