]> git.zerfleddert.de Git - proxmark3-svn/blob - client/cmddata.c
FIX: the #define M_PI is now optional. Moved a bunch of header invocations into...
[proxmark3-svn] / client / cmddata.c
1 //-----------------------------------------------------------------------------
2 // Copyright (C) 2010 iZsh <izsh at fail0verflow.com>
3 //
4 // This code is licensed to you under the terms of the GNU GPL, version 2 or,
5 // at your option, any later version. See the LICENSE.txt file for the text of
6 // the license.
7 //-----------------------------------------------------------------------------
8 // Data and Graph commands
9 //-----------------------------------------------------------------------------
10
11 #include <stdio.h>
12 #include <stdlib.h>
13 #include <string.h>
14 #include <limits.h>
15 #include "proxmark3.h"
16 #include "data.h"
17 #include "ui.h"
18 #include "graph.h"
19 #include "cmdparser.h"
20 #include "util.h"
21 #include "cmdmain.h"
22 #include "cmddata.h"
23 #include "lfdemod.h"
24 #include "usb_cmd.h"
25 #include "crc.h"
26 #include "crc16.h"
27 #include "loclass/cipherutils.h"
28
29 uint8_t DemodBuffer[MAX_DEMOD_BUF_LEN];
30 uint8_t g_debugMode=0;
31 size_t DemodBufferLen=0;
32 static int CmdHelp(const char *Cmd);
33
34 //set the demod buffer with given array of binary (one bit per byte)
35 //by marshmellow
36 void setDemodBuf(uint8_t *buff, size_t size, size_t startIdx)
37 {
38 if (buff == NULL)
39 return;
40
41 if ( size >= MAX_DEMOD_BUF_LEN)
42 size = MAX_DEMOD_BUF_LEN;
43
44 size_t i = 0;
45 for (; i < size; i++){
46 DemodBuffer[i]=buff[startIdx++];
47 }
48 DemodBufferLen=size;
49 return;
50 }
51
52 int CmdSetDebugMode(const char *Cmd)
53 {
54 int demod=0;
55 sscanf(Cmd, "%i", &demod);
56 g_debugMode=(uint8_t)demod;
57 return 1;
58 }
59
60 int usage_data_printdemodbuf(){
61 PrintAndLog("Usage: data printdemodbuffer x o <offset> l <length>");
62 PrintAndLog("Options:");
63 PrintAndLog(" h This help");
64 PrintAndLog(" x output in hex (omit for binary output)");
65 PrintAndLog(" o <offset> enter offset in # of bits");
66 PrintAndLog(" l <length> enter length to print in # of bits or hex characters respectively");
67 return 0;
68 }
69
70 //by marshmellow
71 void printDemodBuff(void)
72 {
73 int bitLen = DemodBufferLen;
74 if (bitLen<1) {
75 PrintAndLog("no bits found in demod buffer");
76 return;
77 }
78 if (bitLen>512) bitLen=512; //max output to 512 bits if we have more - should be plenty
79
80 char *bin = sprint_bin_break(DemodBuffer,bitLen,16);
81 PrintAndLog("%s",bin);
82
83 return;
84 }
85
86 int CmdPrintDemodBuff(const char *Cmd)
87 {
88 char hex[512]={0x00};
89 bool hexMode = false;
90 bool errors = false;
91 uint32_t offset = 0; //could be size_t but no param_get16...
92 uint32_t length = 512;
93 char cmdp = 0;
94 while(param_getchar(Cmd, cmdp) != 0x00)
95 {
96 switch(param_getchar(Cmd, cmdp))
97 {
98 case 'h':
99 case 'H':
100 return usage_data_printdemodbuf();
101 case 'x':
102 case 'X':
103 hexMode = true;
104 cmdp++;
105 break;
106 case 'o':
107 case 'O':
108 offset = param_get32ex(Cmd, cmdp+1, 0, 10);
109 if (!offset) errors = true;
110 cmdp += 2;
111 break;
112 case 'l':
113 case 'L':
114 length = param_get32ex(Cmd, cmdp+1, 512, 10);
115 if (!length) errors = true;
116 cmdp += 2;
117 break;
118 default:
119 PrintAndLog("Unknown parameter '%c'", param_getchar(Cmd, cmdp));
120 errors = true;
121 break;
122 }
123 if(errors) break;
124 }
125 //Validations
126 if(errors) return usage_data_printdemodbuf();
127 length = (length > (DemodBufferLen-offset)) ? DemodBufferLen-offset : length;
128 int numBits = (length) & 0x00FFC; //make sure we don't exceed our string
129
130 if (hexMode){
131 char *buf = (char *) (DemodBuffer + offset);
132 numBits = (numBits > sizeof(hex)) ? sizeof(hex) : numBits;
133 numBits = binarraytohex(hex, buf, numBits);
134 if (numBits==0) return 0;
135 PrintAndLog("DemodBuffer: %s",hex);
136 } else {
137 PrintAndLog("DemodBuffer:\n%s", sprint_bin_break(DemodBuffer+offset,numBits,16));
138 }
139 return 1;
140 }
141
142 //by marshmellow
143 //this function strictly converts >1 to 1 and <1 to 0 for each sample in the graphbuffer
144 int CmdGetBitStream(const char *Cmd)
145 {
146 int i;
147 CmdHpf(Cmd);
148 for (i = 0; i < GraphTraceLen; i++) {
149 if (GraphBuffer[i] >= 1) {
150 GraphBuffer[i] = 1;
151 } else {
152 GraphBuffer[i] = 0;
153 }
154 }
155 RepaintGraphWindow();
156 return 0;
157 }
158
159 //by marshmellow
160 //print 64 bit EM410x ID in multiple formats
161 void printEM410x(uint32_t hi, uint64_t id)
162 {
163 if (id || hi){
164 uint64_t iii=1;
165 uint64_t id2lo=0;
166 uint32_t ii=0;
167 uint32_t i=0;
168 for (ii=5; ii>0;ii--){
169 for (i=0;i<8;i++){
170 id2lo=(id2lo<<1LL) | ((id & (iii << (i+((ii-1)*8)))) >> (i+((ii-1)*8)));
171 }
172 }
173 if (hi){
174 //output 88 bit em id
175 PrintAndLog("\nEM TAG ID : %06X%016llX", hi, id);
176 } else{
177 //output 40 bit em id
178 PrintAndLog("\nEM TAG ID : %010llX", id);
179 PrintAndLog("Unique TAG ID : %010llX", id2lo);
180 PrintAndLog("\nPossible de-scramble patterns");
181 PrintAndLog("HoneyWell IdentKey {");
182 PrintAndLog("DEZ 8 : %08lld",id & 0xFFFFFF);
183 PrintAndLog("DEZ 10 : %010lld",id & 0xFFFFFFFF);
184 PrintAndLog("DEZ 5.5 : %05lld.%05lld",(id>>16LL) & 0xFFFF,(id & 0xFFFF));
185 PrintAndLog("DEZ 3.5A : %03lld.%05lld",(id>>32ll),(id & 0xFFFF));
186 PrintAndLog("DEZ 3.5B : %03lld.%05lld",(id & 0xFF000000) >> 24,(id & 0xFFFF));
187 PrintAndLog("DEZ 3.5C : %03lld.%05lld",(id & 0xFF0000) >> 16,(id & 0xFFFF));
188 PrintAndLog("DEZ 14/IK2 : %014lld",id);
189 PrintAndLog("DEZ 15/IK3 : %015lld",id2lo);
190 PrintAndLog("DEZ 20/ZK : %02lld%02lld%02lld%02lld%02lld%02lld%02lld%02lld%02lld%02lld",
191 (id2lo & 0xf000000000) >> 36,
192 (id2lo & 0x0f00000000) >> 32,
193 (id2lo & 0x00f0000000) >> 28,
194 (id2lo & 0x000f000000) >> 24,
195 (id2lo & 0x0000f00000) >> 20,
196 (id2lo & 0x00000f0000) >> 16,
197 (id2lo & 0x000000f000) >> 12,
198 (id2lo & 0x0000000f00) >> 8,
199 (id2lo & 0x00000000f0) >> 4,
200 (id2lo & 0x000000000f)
201 );
202 uint64_t paxton = (((id>>32) << 24) | (id & 0xffffff)) + 0x143e00;
203 PrintAndLog("}\nOther : %05lld_%03lld_%08lld",(id&0xFFFF),((id>>16LL) & 0xFF),(id & 0xFFFFFF));
204 PrintAndLog("Pattern Paxton : %lld [0x%llX]", paxton, paxton);
205
206 uint32_t p1id = (id & 0xFFFFFF);
207 uint8_t arr[32] = {0x00};
208 int i =0;
209 int j = 23;
210 for (; i < 24; ++i, --j ){
211 arr[i] = (p1id >> i) & 1;
212 }
213
214 uint32_t p1 = 0;
215
216 p1 |= arr[23] << 21;
217 p1 |= arr[22] << 23;
218 p1 |= arr[21] << 20;
219 p1 |= arr[20] << 22;
220
221 p1 |= arr[19] << 18;
222 p1 |= arr[18] << 16;
223 p1 |= arr[17] << 19;
224 p1 |= arr[16] << 17;
225
226 p1 |= arr[15] << 13;
227 p1 |= arr[14] << 15;
228 p1 |= arr[13] << 12;
229 p1 |= arr[12] << 14;
230
231 p1 |= arr[11] << 6;
232 p1 |= arr[10] << 2;
233 p1 |= arr[9] << 7;
234 p1 |= arr[8] << 1;
235
236 p1 |= arr[7] << 0;
237 p1 |= arr[6] << 8;
238 p1 |= arr[5] << 11;
239 p1 |= arr[4] << 3;
240
241 p1 |= arr[3] << 10;
242 p1 |= arr[2] << 4;
243 p1 |= arr[1] << 5;
244 p1 |= arr[0] << 9;
245 PrintAndLog("Pattern 1 : %d [0x%X]", p1, p1);
246
247 uint16_t sebury1 = id & 0xFFFF;
248 uint8_t sebury2 = (id >> 16) & 0x7F;
249 uint32_t sebury3 = id & 0x7FFFFF;
250 PrintAndLog("Pattern Sebury : %d %d %d [0x%X 0x%X 0x%X]", sebury1, sebury2, sebury3, sebury1, sebury2, sebury3);
251 }
252 }
253 return;
254 }
255
256 int AskEm410xDecode(bool verbose, uint32_t *hi, uint64_t *lo )
257 {
258 size_t idx = 0;
259 size_t BitLen = DemodBufferLen;
260 uint8_t BitStream[MAX_GRAPH_TRACE_LEN]={0};
261 memcpy(BitStream, DemodBuffer, BitLen);
262 if (Em410xDecode(BitStream, &BitLen, &idx, hi, lo)){
263 //set GraphBuffer for clone or sim command
264 setDemodBuf(BitStream, BitLen, idx);
265 if (g_debugMode){
266 PrintAndLog("DEBUG: idx: %d, Len: %d, Printing Demod Buffer:", idx, BitLen);
267 printDemodBuff();
268 }
269 if (verbose){
270 PrintAndLog("EM410x pattern found: ");
271 printEM410x(*hi, *lo);
272 }
273 return 1;
274 }
275 return 0;
276 }
277
278 int AskEm410xDemod(const char *Cmd, uint32_t *hi, uint64_t *lo, bool verbose)
279 {
280 if (!ASKDemod(Cmd, FALSE, FALSE, 1)) return 0;
281 return AskEm410xDecode(verbose, hi, lo);
282 }
283
284 //by marshmellow
285 //takes 3 arguments - clock, invert and maxErr as integers
286 //attempts to demodulate ask while decoding manchester
287 //prints binary found and saves in graphbuffer for further commands
288 int CmdAskEM410xDemod(const char *Cmd)
289 {
290 char cmdp = param_getchar(Cmd, 0);
291 if (strlen(Cmd) > 10 || cmdp == 'h' || cmdp == 'H') {
292 PrintAndLog("Usage: data askem410xdemod [clock] <0|1> [maxError]");
293 PrintAndLog(" [set clock as integer] optional, if not set, autodetect.");
294 PrintAndLog(" <invert>, 1 for invert output");
295 PrintAndLog(" [set maximum allowed errors], default = 100.");
296 PrintAndLog("");
297 PrintAndLog(" sample: data askem410xdemod = demod an EM410x Tag ID from GraphBuffer");
298 PrintAndLog(" : data askem410xdemod 32 = demod an EM410x Tag ID from GraphBuffer using a clock of RF/32");
299 PrintAndLog(" : data askem410xdemod 32 1 = demod an EM410x Tag ID from GraphBuffer using a clock of RF/32 and inverting data");
300 PrintAndLog(" : data askem410xdemod 1 = demod an EM410x Tag ID from GraphBuffer while inverting data");
301 PrintAndLog(" : data askem410xdemod 64 1 0 = demod an EM410x Tag ID from GraphBuffer using a clock of RF/64 and inverting data and allowing 0 demod errors");
302 return 0;
303 }
304 uint64_t lo = 0;
305 uint32_t hi = 0;
306 return AskEm410xDemod(Cmd, &hi, &lo, true);
307 }
308
309 //by marshmellow
310 //Cmd Args: Clock, invert, maxErr, maxLen as integers and amplify as char == 'a'
311 // (amp may not be needed anymore)
312 //verbose will print results and demoding messages
313 //emSearch will auto search for EM410x format in bitstream
314 //askType switches decode: ask/raw = 0, ask/manchester = 1
315 int ASKDemod(const char *Cmd, bool verbose, bool emSearch, uint8_t askType)
316 {
317 int invert=0;
318 int clk=0;
319 int maxErr=100;
320 int maxLen=0;
321 uint8_t askAmp = 0;
322 char amp = param_getchar(Cmd, 0);
323 uint8_t BitStream[MAX_GRAPH_TRACE_LEN]={0};
324 sscanf(Cmd, "%i %i %i %i %c", &clk, &invert, &maxErr, &maxLen, &amp);
325 if (!maxLen) maxLen = BIGBUF_SIZE;
326 if (invert != 0 && invert != 1) {
327 PrintAndLog("Invalid argument: %s", Cmd);
328 return 0;
329 }
330 if (clk==1){
331 invert=1;
332 clk=0;
333 }
334 if (amp == 'a' || amp == 'A') askAmp=1;
335 size_t BitLen = getFromGraphBuf(BitStream);
336 if (g_debugMode) PrintAndLog("DEBUG: Bitlen from grphbuff: %d",BitLen);
337 if (BitLen<255) return 0;
338 if (maxLen<BitLen && maxLen != 0) BitLen = maxLen;
339
340 int errCnt = askdemod(BitStream, &BitLen, &clk, &invert, maxErr, askAmp, askType);
341 if (errCnt<0 || BitLen<16){ //if fatal error (or -1)
342 if (g_debugMode) PrintAndLog("DEBUG: no data found %d, errors:%d, bitlen:%d, clock:%d",errCnt,invert,BitLen,clk);
343 return 0;
344 }
345 if (errCnt>maxErr){
346 if (g_debugMode) PrintAndLog("DEBUG: Too many errors found, errors:%d, bits:%d, clock:%d",errCnt, BitLen, clk);
347 return 0;
348 }
349 if (verbose || g_debugMode) PrintAndLog("\nUsing Clock:%d, Invert:%d, Bits Found:%d",clk,invert,BitLen);
350
351 //output
352 setDemodBuf(BitStream,BitLen,0);
353 if (verbose || g_debugMode){
354 if (errCnt>0) PrintAndLog("# Errors during Demoding (shown as 7 in bit stream): %d",errCnt);
355 if (askType) PrintAndLog("ASK/Manchester - Clock: %d - Decoded bitstream:",clk);
356 else PrintAndLog("ASK/Raw - Clock: %d - Decoded bitstream:",clk);
357 // Now output the bitstream to the scrollback by line of 16 bits
358 printDemodBuff();
359
360 }
361 uint64_t lo = 0;
362 uint32_t hi = 0;
363 if (emSearch){
364 AskEm410xDecode(true, &hi, &lo);
365 }
366 return 1;
367 }
368
369 //by marshmellow
370 //takes 5 arguments - clock, invert, maxErr, maxLen as integers and amplify as char == 'a'
371 //attempts to demodulate ask while decoding manchester
372 //prints binary found and saves in graphbuffer for further commands
373 int Cmdaskmandemod(const char *Cmd)
374 {
375 char cmdp = param_getchar(Cmd, 0);
376 if (strlen(Cmd) > 25 || cmdp == 'h' || cmdp == 'H') {
377 PrintAndLog("Usage: data rawdemod am [clock] <invert> [maxError] [maxLen] [amplify]");
378 PrintAndLog(" [set clock as integer] optional, if not set, autodetect");
379 PrintAndLog(" <invert>, 1 to invert output");
380 PrintAndLog(" [set maximum allowed errors], default = 100");
381 PrintAndLog(" [set maximum Samples to read], default = 32768 (512 bits at rf/64)");
382 PrintAndLog(" <amplify>, 'a' to attempt demod with ask amplification, default = no amp");
383 PrintAndLog("");
384 PrintAndLog(" sample: data rawdemod am = demod an ask/manchester tag from GraphBuffer");
385 PrintAndLog(" : data rawdemod am 32 = demod an ask/manchester tag from GraphBuffer using a clock of RF/32");
386 PrintAndLog(" : data rawdemod am 32 1 = demod an ask/manchester tag from GraphBuffer using a clock of RF/32 and inverting data");
387 PrintAndLog(" : data rawdemod am 1 = demod an ask/manchester tag from GraphBuffer while inverting data");
388 PrintAndLog(" : data rawdemod am 64 1 0 = demod an ask/manchester tag from GraphBuffer using a clock of RF/64, inverting data and allowing 0 demod errors");
389 return 0;
390 }
391 return ASKDemod(Cmd, TRUE, TRUE, 1);
392 }
393
394 //by marshmellow
395 //manchester decode
396 //stricktly take 10 and 01 and convert to 0 and 1
397 int Cmdmandecoderaw(const char *Cmd)
398 {
399 int i =0;
400 int errCnt=0;
401 size_t size=0;
402 int invert=0;
403 int maxErr = 20;
404 char cmdp = param_getchar(Cmd, 0);
405 if (strlen(Cmd) > 5 || cmdp == 'h' || cmdp == 'H') {
406 PrintAndLog("Usage: data manrawdecode [invert] [maxErr]");
407 PrintAndLog(" Takes 10 and 01 and converts to 0 and 1 respectively");
408 PrintAndLog(" --must have binary sequence in demodbuffer (run data askrawdemod first)");
409 PrintAndLog(" [invert] invert output");
410 PrintAndLog(" [maxErr] set number of errors allowed (default = 20)");
411 PrintAndLog("");
412 PrintAndLog(" sample: data manrawdecode = decode manchester bitstream from the demodbuffer");
413 return 0;
414 }
415 if (DemodBufferLen==0) return 0;
416 uint8_t BitStream[MAX_GRAPH_TRACE_LEN]={0};
417 int high=0,low=0;
418 for (;i<DemodBufferLen;++i){
419 if (DemodBuffer[i]>high) high=DemodBuffer[i];
420 else if(DemodBuffer[i]<low) low=DemodBuffer[i];
421 BitStream[i]=DemodBuffer[i];
422 }
423 if (high>7 || low <0 ){
424 PrintAndLog("Error: please raw demod the wave first then manchester raw decode");
425 return 0;
426 }
427
428 sscanf(Cmd, "%i %i", &invert, &maxErr);
429 size=i;
430 errCnt=manrawdecode(BitStream, &size, invert);
431 if (errCnt>=maxErr){
432 PrintAndLog("Too many errors: %d",errCnt);
433 return 0;
434 }
435 PrintAndLog("Manchester Decoded - # errors:%d - data:",errCnt);
436 PrintAndLog("%s", sprint_bin_break(BitStream, size, 16));
437 if (errCnt==0){
438 uint64_t id = 0;
439 uint32_t hi = 0;
440 size_t idx=0;
441 if (Em410xDecode(BitStream, &size, &idx, &hi, &id)){
442 //need to adjust to set bitstream back to manchester encoded data
443 //setDemodBuf(BitStream, size, idx);
444
445 printEM410x(hi, id);
446 }
447 }
448 return 1;
449 }
450
451 //by marshmellow
452 //biphase decode
453 //take 01 or 10 = 0 and 11 or 00 = 1
454 //takes 2 arguments "offset" default = 0 if 1 it will shift the decode by one bit
455 // and "invert" default = 0 if 1 it will invert output
456 // the argument offset allows us to manually shift if the output is incorrect - [EDIT: now auto detects]
457 int CmdBiphaseDecodeRaw(const char *Cmd)
458 {
459 size_t size=0;
460 int offset=0, invert=0, maxErr=20, errCnt=0;
461 char cmdp = param_getchar(Cmd, 0);
462 if (strlen(Cmd) > 3 || cmdp == 'h' || cmdp == 'H') {
463 PrintAndLog("Usage: data biphaserawdecode [offset] [invert] [maxErr]");
464 PrintAndLog(" Converts 10 or 01 to 1 and 11 or 00 to 0");
465 PrintAndLog(" --must have binary sequence in demodbuffer (run data askrawdemod first)");
466 PrintAndLog(" --invert for Conditional Dephase Encoding (CDP) AKA Differential Manchester");
467 PrintAndLog("");
468 PrintAndLog(" [offset <0|1>], set to 0 not to adjust start position or to 1 to adjust decode start position");
469 PrintAndLog(" [invert <0|1>], set to 1 to invert output");
470 PrintAndLog(" [maxErr int], set max errors tolerated - default=20");
471 PrintAndLog("");
472 PrintAndLog(" sample: data biphaserawdecode = decode biphase bitstream from the demodbuffer");
473 PrintAndLog(" sample: data biphaserawdecode 1 1 = decode biphase bitstream from the demodbuffer, set offset, and invert output");
474 return 0;
475 }
476 sscanf(Cmd, "%i %i %i", &offset, &invert, &maxErr);
477 if (DemodBufferLen==0){
478 PrintAndLog("DemodBuffer Empty - run 'data rawdemod ar' first");
479 return 0;
480 }
481 uint8_t BitStream[MAX_GRAPH_TRACE_LEN]={0};
482 memcpy(BitStream, DemodBuffer, DemodBufferLen);
483 size = DemodBufferLen;
484 errCnt=BiphaseRawDecode(BitStream, &size, offset, invert);
485 if (errCnt<0){
486 PrintAndLog("Error during decode:%d", errCnt);
487 return 0;
488 }
489 if (errCnt>maxErr){
490 PrintAndLog("Too many errors attempting to decode: %d",errCnt);
491 return 0;
492 }
493
494 if (errCnt>0){
495 PrintAndLog("# Errors found during Demod (shown as 7 in bit stream): %d",errCnt);
496 }
497 PrintAndLog("Biphase Decoded using offset: %d - # invert:%d - data:",offset,invert);
498 PrintAndLog("%s", sprint_bin_break(BitStream, size, 16));
499
500 if (offset) setDemodBuf(DemodBuffer,DemodBufferLen-offset, offset); //remove first bit from raw demod
501 return 1;
502 }
503
504 //by marshmellow
505 // - ASK Demod then Biphase decode GraphBuffer samples
506 int ASKbiphaseDemod(const char *Cmd, bool verbose)
507 {
508 //ask raw demod GraphBuffer first
509 int offset=0, clk=0, invert=0, maxErr=0;
510 sscanf(Cmd, "%i %i %i %i", &offset, &clk, &invert, &maxErr);
511
512 uint8_t BitStream[MAX_DEMOD_BUF_LEN];
513 size_t size = getFromGraphBuf(BitStream);
514 //invert here inverts the ask raw demoded bits which has no effect on the demod, but we need the pointer
515 int errCnt = askdemod(BitStream, &size, &clk, &invert, maxErr, 0, 0);
516 if ( errCnt < 0 || errCnt > maxErr ) {
517 if (g_debugMode) PrintAndLog("DEBUG: no data or error found %d, clock: %d", errCnt, clk);
518 return 0;
519 }
520
521 //attempt to Biphase decode BitStream
522 errCnt = BiphaseRawDecode(BitStream, &size, offset, invert);
523 if (errCnt < 0){
524 if (g_debugMode || verbose) PrintAndLog("Error BiphaseRawDecode: %d", errCnt);
525 return 0;
526 }
527 if (errCnt > maxErr) {
528 if (g_debugMode || verbose) PrintAndLog("Error BiphaseRawDecode too many errors: %d", errCnt);
529 return 0;
530 }
531 //success set DemodBuffer and return
532 setDemodBuf(BitStream, size, 0);
533 if (g_debugMode || verbose){
534 PrintAndLog("Biphase Decoded using offset: %d - clock: %d - # errors:%d - data:",offset,clk,errCnt);
535 printDemodBuff();
536 }
537 return 1;
538 }
539 //by marshmellow - see ASKbiphaseDemod
540 int Cmdaskbiphdemod(const char *Cmd)
541 {
542 char cmdp = param_getchar(Cmd, 0);
543 if (strlen(Cmd) > 25 || cmdp == 'h' || cmdp == 'H') {
544 PrintAndLog("Usage: data rawdemod ab [offset] [clock] <invert> [maxError] [maxLen] <amplify>");
545 PrintAndLog(" [offset], offset to begin biphase, default=0");
546 PrintAndLog(" [set clock as integer] optional, if not set, autodetect");
547 PrintAndLog(" <invert>, 1 to invert output");
548 PrintAndLog(" [set maximum allowed errors], default = 100");
549 PrintAndLog(" [set maximum Samples to read], default = 32768 (512 bits at rf/64)");
550 PrintAndLog(" <amplify>, 'a' to attempt demod with ask amplification, default = no amp");
551 PrintAndLog(" NOTE: <invert> can be entered as second or third argument");
552 PrintAndLog(" NOTE: <amplify> can be entered as first, second or last argument");
553 PrintAndLog(" NOTE: any other arg must have previous args set to work");
554 PrintAndLog("");
555 PrintAndLog(" NOTE: --invert for Conditional Dephase Encoding (CDP) AKA Differential Manchester");
556 PrintAndLog("");
557 PrintAndLog(" sample: data rawdemod ab = demod an ask/biph tag from GraphBuffer");
558 PrintAndLog(" : data rawdemod ab 0 a = demod an ask/biph tag from GraphBuffer, amplified");
559 PrintAndLog(" : data rawdemod ab 1 32 = demod an ask/biph tag from GraphBuffer using an offset of 1 and a clock of RF/32");
560 PrintAndLog(" : data rawdemod ab 0 32 1 = demod an ask/biph tag from GraphBuffer using a clock of RF/32 and inverting data");
561 PrintAndLog(" : data rawdemod ab 0 1 = demod an ask/biph tag from GraphBuffer while inverting data");
562 PrintAndLog(" : data rawdemod ab 0 64 1 0 = demod an ask/biph tag from GraphBuffer using a clock of RF/64, inverting data and allowing 0 demod errors");
563 PrintAndLog(" : data rawdemod ab 0 64 1 0 0 a = demod an ask/biph tag from GraphBuffer using a clock of RF/64, inverting data and allowing 0 demod errors, and amp");
564 return 0;
565 }
566 return ASKbiphaseDemod(Cmd, TRUE);
567 }
568
569 //by marshmellow
570 //attempts to demodulate and identify a G_Prox_II verex/chubb card
571 //WARNING: if it fails during some points it will destroy the DemodBuffer data
572 // but will leave the GraphBuffer intact.
573 //if successful it will push askraw data back to demod buffer ready for emulation
574 int CmdG_Prox_II_Demod(const char *Cmd)
575 {
576 if (!ASKbiphaseDemod(Cmd, FALSE)){
577 if (g_debugMode) PrintAndLog("ASKbiphaseDemod failed 1st try");
578 return 0;
579 }
580 size_t size = DemodBufferLen;
581 //call lfdemod.c demod for gProxII
582 int ans = gProxII_Demod(DemodBuffer, &size);
583 if (ans < 0){
584 if (g_debugMode) PrintAndLog("Error gProxII_Demod");
585 return 0;
586 }
587 //got a good demod
588 uint32_t ByteStream[65] = {0x00};
589 uint8_t xorKey=0;
590 uint8_t keyCnt=0;
591 uint8_t bitCnt=0;
592 uint8_t ByteCnt=0;
593 size_t startIdx = ans + 6; //start after preamble
594 for (size_t idx = 0; idx<size-6; idx++){
595 if ((idx+1) % 5 == 0){
596 //spacer bit - should be 0
597 if (DemodBuffer[startIdx+idx] != 0) {
598 if (g_debugMode) PrintAndLog("Error spacer not 0: %d, pos: %d",DemodBuffer[startIdx+idx],startIdx+idx);
599 return 0;
600 }
601 continue;
602 }
603 if (keyCnt<8){ //lsb first
604 xorKey = xorKey | (DemodBuffer[startIdx+idx]<<keyCnt);
605 keyCnt++;
606 if (keyCnt==8 && g_debugMode) PrintAndLog("xorKey Found: %02x", xorKey);
607 continue;
608 }
609 //lsb first
610 ByteStream[ByteCnt] = ByteStream[ByteCnt] | (DemodBuffer[startIdx+idx]<<bitCnt);
611 bitCnt++;
612 if (bitCnt % 8 == 0){
613 if (g_debugMode) PrintAndLog("byte %d: %02x",ByteCnt,ByteStream[ByteCnt]);
614 bitCnt=0;
615 ByteCnt++;
616 }
617 }
618 for (uint8_t i = 0; i < ByteCnt; i++){
619 ByteStream[i] ^= xorKey; //xor
620 if (g_debugMode) PrintAndLog("byte %d after xor: %02x", i, ByteStream[i]);
621 }
622 //now ByteStream contains 64 bytes of decrypted raw tag data
623 //
624 uint8_t fmtLen = ByteStream[0]>>2;
625 uint32_t FC = 0;
626 uint32_t Card = 0;
627 uint32_t raw1 = bytebits_to_byte(DemodBuffer+ans,32);
628 uint32_t raw2 = bytebits_to_byte(DemodBuffer+ans+32, 32);
629 uint32_t raw3 = bytebits_to_byte(DemodBuffer+ans+64, 32);
630
631 if (fmtLen==36){
632 FC = ((ByteStream[3] & 0x7F)<<7) | (ByteStream[4]>>1);
633 Card = ((ByteStream[4]&1)<<19) | (ByteStream[5]<<11) | (ByteStream[6]<<3) | (ByteStream[7]>>5);
634 PrintAndLog("G-Prox-II Found: FmtLen %d, FC %d, Card %d",fmtLen,FC,Card);
635 } else if(fmtLen==26){
636 FC = ((ByteStream[3] & 0x7F)<<1) | (ByteStream[4]>>7);
637 Card = ((ByteStream[4]&0x7F)<<9) | (ByteStream[5]<<1) | (ByteStream[6]>>7);
638 PrintAndLog("G-Prox-II Found: FmtLen %d, FC %d, Card %d",fmtLen,FC,Card);
639 } else {
640 PrintAndLog("Unknown G-Prox-II Fmt Found: FmtLen %d",fmtLen);
641 }
642 PrintAndLog("Raw: %08x%08x%08x", raw1,raw2,raw3);
643 setDemodBuf(DemodBuffer+ans, 96, 0);
644 return 1;
645 }
646
647 //by marshmellow
648 //see ASKDemod for what args are accepted
649 int CmdVikingDemod(const char *Cmd)
650 {
651 if (!ASKDemod(Cmd, false, false, 1)) {
652 if (g_debugMode) PrintAndLog("ASKDemod failed");
653 return 0;
654 }
655 size_t size = DemodBufferLen;
656 //call lfdemod.c demod for Viking
657 int ans = VikingDemod_AM(DemodBuffer, &size);
658 if (ans < 0) {
659 if (g_debugMode) PrintAndLog("Error Viking_Demod %d", ans);
660 return 0;
661 }
662 //got a good demod
663 uint32_t raw1 = bytebits_to_byte(DemodBuffer+ans, 32);
664 uint32_t raw2 = bytebits_to_byte(DemodBuffer+ans+32, 32);
665 uint32_t cardid = bytebits_to_byte(DemodBuffer+ans+24, 32);
666 uint8_t checksum = bytebits_to_byte(DemodBuffer+ans+32+24, 8);
667 PrintAndLog("Viking Tag Found: Card ID %08X, Checksum: %02X", cardid, checksum);
668 PrintAndLog("Raw: %08X%08X", raw1,raw2);
669 setDemodBuf(DemodBuffer+ans, 64, 0);
670 return 1;
671 }
672
673 //by marshmellow - see ASKDemod
674 int Cmdaskrawdemod(const char *Cmd)
675 {
676 char cmdp = param_getchar(Cmd, 0);
677 if (strlen(Cmd) > 25 || cmdp == 'h' || cmdp == 'H') {
678 PrintAndLog("Usage: data rawdemod ar [clock] <invert> [maxError] [maxLen] [amplify]");
679 PrintAndLog(" [set clock as integer] optional, if not set, autodetect");
680 PrintAndLog(" <invert>, 1 to invert output");
681 PrintAndLog(" [set maximum allowed errors], default = 100");
682 PrintAndLog(" [set maximum Samples to read], default = 32768 (1024 bits at rf/64)");
683 PrintAndLog(" <amplify>, 'a' to attempt demod with ask amplification, default = no amp");
684 PrintAndLog("");
685 PrintAndLog(" sample: data rawdemod ar = demod an ask tag from GraphBuffer");
686 PrintAndLog(" : data rawdemod ar a = demod an ask tag from GraphBuffer, amplified");
687 PrintAndLog(" : data rawdemod ar 32 = demod an ask tag from GraphBuffer using a clock of RF/32");
688 PrintAndLog(" : data rawdemod ar 32 1 = demod an ask tag from GraphBuffer using a clock of RF/32 and inverting data");
689 PrintAndLog(" : data rawdemod ar 1 = demod an ask tag from GraphBuffer while inverting data");
690 PrintAndLog(" : data rawdemod ar 64 1 0 = demod an ask tag from GraphBuffer using a clock of RF/64, inverting data and allowing 0 demod errors");
691 PrintAndLog(" : data rawdemod ar 64 1 0 0 a = demod an ask tag from GraphBuffer using a clock of RF/64, inverting data and allowing 0 demod errors, and amp");
692 return 0;
693 }
694 return ASKDemod(Cmd, TRUE, FALSE, 0);
695 }
696
697 int AutoCorrelate(int window, bool SaveGrph, bool verbose)
698 {
699 static int CorrelBuffer[MAX_GRAPH_TRACE_LEN];
700 size_t Correlation = 0;
701 int maxSum = 0;
702 int lastMax = 0;
703 if (verbose) PrintAndLog("performing %d correlations", GraphTraceLen - window);
704 for (int i = 0; i < GraphTraceLen - window; ++i) {
705 int sum = 0;
706 for (int j = 0; j < window; ++j) {
707 sum += (GraphBuffer[j]*GraphBuffer[i + j]) / 256;
708 }
709 CorrelBuffer[i] = sum;
710 if (sum >= maxSum-100 && sum <= maxSum+100){
711 //another max
712 Correlation = i-lastMax;
713 lastMax = i;
714 if (sum > maxSum) maxSum = sum;
715 } else if (sum > maxSum){
716 maxSum=sum;
717 lastMax = i;
718 }
719 }
720 if (Correlation==0){
721 //try again with wider margin
722 for (int i = 0; i < GraphTraceLen - window; i++){
723 if (CorrelBuffer[i] >= maxSum-(maxSum*0.05) && CorrelBuffer[i] <= maxSum+(maxSum*0.05)){
724 //another max
725 Correlation = i-lastMax;
726 lastMax = i;
727 //if (CorrelBuffer[i] > maxSum) maxSum = sum;
728 }
729 }
730 }
731 if (verbose && Correlation > 0) PrintAndLog("Possible Correlation: %d samples",Correlation);
732
733 if (SaveGrph){
734 GraphTraceLen = GraphTraceLen - window;
735 memcpy(GraphBuffer, CorrelBuffer, GraphTraceLen * sizeof (int));
736 RepaintGraphWindow();
737 }
738 return Correlation;
739 }
740
741 int usage_data_autocorr(void)
742 {
743 //print help
744 PrintAndLog("Usage: data autocorr [window] [g]");
745 PrintAndLog("Options: ");
746 PrintAndLog(" h This help");
747 PrintAndLog(" [window] window length for correlation - default = 4000");
748 PrintAndLog(" g save back to GraphBuffer (overwrite)");
749 return 0;
750 }
751
752 int CmdAutoCorr(const char *Cmd)
753 {
754 char cmdp = param_getchar(Cmd, 0);
755 if (cmdp == 'h' || cmdp == 'H')
756 return usage_data_autocorr();
757 int window = 4000; //set default
758 char grph=0;
759 bool updateGrph = FALSE;
760 sscanf(Cmd, "%i %c", &window, &grph);
761
762 if (window >= GraphTraceLen) {
763 PrintAndLog("window must be smaller than trace (%d samples)",
764 GraphTraceLen);
765 return 0;
766 }
767 if (grph == 'g') updateGrph=TRUE;
768 return AutoCorrelate(window, updateGrph, TRUE);
769 }
770
771 int CmdBitsamples(const char *Cmd)
772 {
773 int cnt = 0;
774 uint8_t got[12288];
775
776 GetFromBigBuf(got,sizeof(got),0);
777 WaitForResponse(CMD_ACK,NULL);
778
779 for (int j = 0; j < sizeof(got); j++) {
780 for (int k = 0; k < 8; k++) {
781 if(got[j] & (1 << (7 - k))) {
782 GraphBuffer[cnt++] = 1;
783 } else {
784 GraphBuffer[cnt++] = 0;
785 }
786 }
787 }
788 GraphTraceLen = cnt;
789 RepaintGraphWindow();
790 return 0;
791 }
792
793 int CmdBuffClear(const char *Cmd)
794 {
795 UsbCommand c = {CMD_BUFF_CLEAR};
796 SendCommand(&c);
797 ClearGraph(true);
798 return 0;
799 }
800
801 int CmdDec(const char *Cmd)
802 {
803 for (int i = 0; i < (GraphTraceLen / 2); ++i)
804 GraphBuffer[i] = GraphBuffer[i * 2];
805 GraphTraceLen /= 2;
806 PrintAndLog("decimated by 2");
807 RepaintGraphWindow();
808 return 0;
809 }
810 /**
811 * Undecimate - I'd call it 'interpolate', but we'll save that
812 * name until someone does an actual interpolation command, not just
813 * blindly repeating samples
814 * @param Cmd
815 * @return
816 */
817 int CmdUndec(const char *Cmd)
818 {
819 if(param_getchar(Cmd, 0) == 'h')
820 {
821 PrintAndLog("Usage: data undec [factor]");
822 PrintAndLog("This function performs un-decimation, by repeating each sample N times");
823 PrintAndLog("Options: ");
824 PrintAndLog(" h This help");
825 PrintAndLog(" factor The number of times to repeat each sample.[default:2]");
826 PrintAndLog("Example: 'data undec 3'");
827 return 0;
828 }
829
830 uint8_t factor = param_get8ex(Cmd, 0, 2, 10);
831 //We have memory, don't we?
832 int swap[MAX_GRAPH_TRACE_LEN] = { 0 };
833 uint32_t g_index = 0 ,s_index = 0;
834 while(g_index < GraphTraceLen && s_index + factor < MAX_GRAPH_TRACE_LEN)
835 {
836 int count = 0;
837 for (count = 0; count < factor && s_index + count < MAX_GRAPH_TRACE_LEN; count++)
838 swap[s_index+count] = GraphBuffer[g_index];
839 s_index += count;
840 g_index++;
841 }
842
843 memcpy(GraphBuffer, swap, s_index * sizeof(int));
844 GraphTraceLen = s_index;
845 RepaintGraphWindow();
846 return 0;
847 }
848
849 //by marshmellow
850 //shift graph zero up or down based on input + or -
851 int CmdGraphShiftZero(const char *Cmd)
852 {
853
854 int shift=0;
855 //set options from parameters entered with the command
856 sscanf(Cmd, "%i", &shift);
857 int shiftedVal=0;
858 for(int i = 0; i<GraphTraceLen; i++){
859 shiftedVal=GraphBuffer[i]+shift;
860 if (shiftedVal>127)
861 shiftedVal=127;
862 else if (shiftedVal<-127)
863 shiftedVal=-127;
864 GraphBuffer[i]= shiftedVal;
865 }
866 CmdNorm("");
867 return 0;
868 }
869
870 //by marshmellow
871 //use large jumps in read samples to identify edges of waves and then amplify that wave to max
872 //similar to dirtheshold, threshold commands
873 //takes a threshold length which is the measured length between two samples then determines an edge
874 int CmdAskEdgeDetect(const char *Cmd)
875 {
876 int thresLen = 25;
877 sscanf(Cmd, "%i", &thresLen);
878
879 for(int i = 1; i<GraphTraceLen; i++){
880 if (GraphBuffer[i]-GraphBuffer[i-1]>=thresLen) //large jump up
881 GraphBuffer[i-1] = 127;
882 else if(GraphBuffer[i]-GraphBuffer[i-1]<=-1*thresLen) //large jump down
883 GraphBuffer[i-1] = -127;
884 }
885 RepaintGraphWindow();
886 return 0;
887 }
888
889 /* Print our clock rate */
890 // uses data from graphbuffer
891 // adjusted to take char parameter for type of modulation to find the clock - by marshmellow.
892 int CmdDetectClockRate(const char *Cmd)
893 {
894 char cmdp = param_getchar(Cmd, 0);
895 if (strlen(Cmd) > 6 || strlen(Cmd) == 0 || cmdp == 'h' || cmdp == 'H') {
896 PrintAndLog("Usage: data detectclock [modulation] <clock>");
897 PrintAndLog(" [modulation as char], specify the modulation type you want to detect the clock of");
898 PrintAndLog(" <clock> , specify the clock (optional - to get best start position only)");
899 PrintAndLog(" 'a' = ask, 'f' = fsk, 'n' = nrz/direct, 'p' = psk");
900 PrintAndLog("");
901 PrintAndLog(" sample: data detectclock a = detect the clock of an ask modulated wave in the GraphBuffer");
902 PrintAndLog(" data detectclock f = detect the clock of an fsk modulated wave in the GraphBuffer");
903 PrintAndLog(" data detectclock p = detect the clock of an psk modulated wave in the GraphBuffer");
904 PrintAndLog(" data detectclock n = detect the clock of an nrz/direct modulated wave in the GraphBuffer");
905 }
906 int ans=0;
907 if (cmdp == 'a'){
908 ans = GetAskClock(Cmd+1, true, false);
909 } else if (cmdp == 'f'){
910 ans = GetFskClock("", true, false);
911 } else if (cmdp == 'n'){
912 ans = GetNrzClock("", true, false);
913 } else if (cmdp == 'p'){
914 ans = GetPskClock("", true, false);
915 } else {
916 PrintAndLog ("Please specify a valid modulation to detect the clock of - see option h for help");
917 }
918 return ans;
919 }
920
921 char *GetFSKType(uint8_t fchigh, uint8_t fclow, uint8_t invert)
922 {
923 static char fType[8];
924 memset(fType, 0x00, 8);
925 char *fskType = fType;
926 if (fchigh==10 && fclow==8){
927 if (invert) //fsk2a
928 memcpy(fskType, "FSK2a", 5);
929 else //fsk2
930 memcpy(fskType, "FSK2", 4);
931 } else if (fchigh == 8 && fclow == 5) {
932 if (invert)
933 memcpy(fskType, "FSK1", 4);
934 else
935 memcpy(fskType, "FSK1a", 5);
936 } else {
937 memcpy(fskType, "FSK??", 5);
938 }
939 return fskType;
940 }
941
942 //by marshmellow
943 //fsk raw demod and print binary
944 //takes 4 arguments - Clock, invert, fchigh, fclow
945 //defaults: clock = 50, invert=1, fchigh=10, fclow=8 (RF/10 RF/8 (fsk2a))
946 int FSKrawDemod(const char *Cmd, bool verbose)
947 {
948 //raw fsk demod no manchester decoding no start bit finding just get binary from wave
949 uint8_t rfLen, invert, fchigh, fclow;
950
951 //set defaults
952 //set options from parameters entered with the command
953 rfLen = param_get8(Cmd, 0);
954 invert = param_get8(Cmd, 1);
955 fchigh = param_get8(Cmd, 2);
956 fclow = param_get8(Cmd, 3);
957 if (strlen(Cmd)>0 && strlen(Cmd)<=2) {
958 if (rfLen==1) {
959 invert = 1; //if invert option only is used
960 rfLen = 0;
961 }
962 }
963
964 uint8_t BitStream[MAX_GRAPH_TRACE_LEN]={0};
965 size_t BitLen = getFromGraphBuf(BitStream);
966 if (BitLen==0) return 0;
967 if (g_debugMode==2) PrintAndLog("DEBUG: Got samples");
968 //get field clock lengths
969 uint16_t fcs=0;
970 if (!fchigh || !fclow) {
971 fcs = countFC(BitStream, BitLen, 1);
972 if (!fcs) {
973 fchigh = 10;
974 fclow = 8;
975 } else {
976 fchigh = (fcs >> 8) & 0x00FF;
977 fclow = fcs & 0x00FF;
978 }
979 }
980 //get bit clock length
981 if (!rfLen) {
982 rfLen = detectFSKClk(BitStream, BitLen, fchigh, fclow);
983 if (!rfLen) rfLen = 50;
984 }
985 int size = fskdemod(BitStream, BitLen, rfLen, invert, fchigh, fclow);
986 if (size > 0) {
987 setDemodBuf(BitStream, size, 0);
988
989 // Now output the bitstream to the scrollback by line of 16 bits
990 if (verbose || g_debugMode) {
991 PrintAndLog("\nUsing Clock:%u, invert:%u, fchigh:%u, fclow:%u", (unsigned int)rfLen, (unsigned int)invert, (unsigned int)fchigh, (unsigned int)fclow);
992 PrintAndLog("%s decoded bitstream:", GetFSKType(fchigh, fclow, invert));
993 printDemodBuff();
994 }
995
996 return 1;
997 } else {
998 if (g_debugMode) PrintAndLog("no FSK data found");
999 }
1000 return 0;
1001 }
1002
1003 //by marshmellow
1004 //fsk raw demod and print binary
1005 //takes 4 arguments - Clock, invert, fchigh, fclow
1006 //defaults: clock = 50, invert=1, fchigh=10, fclow=8 (RF/10 RF/8 (fsk2a))
1007 int CmdFSKrawdemod(const char *Cmd)
1008 {
1009 char cmdp = param_getchar(Cmd, 0);
1010 if (strlen(Cmd) > 10 || cmdp == 'h' || cmdp == 'H') {
1011 PrintAndLog("Usage: data rawdemod fs [clock] <invert> [fchigh] [fclow]");
1012 PrintAndLog(" [set clock as integer] optional, omit for autodetect.");
1013 PrintAndLog(" <invert>, 1 for invert output, can be used even if the clock is omitted");
1014 PrintAndLog(" [fchigh], larger field clock length, omit for autodetect");
1015 PrintAndLog(" [fclow], small field clock length, omit for autodetect");
1016 PrintAndLog("");
1017 PrintAndLog(" sample: data rawdemod fs = demod an fsk tag from GraphBuffer using autodetect");
1018 PrintAndLog(" : data rawdemod fs 32 = demod an fsk tag from GraphBuffer using a clock of RF/32, autodetect fc");
1019 PrintAndLog(" : data rawdemod fs 1 = demod an fsk tag from GraphBuffer using autodetect, invert output");
1020 PrintAndLog(" : data rawdemod fs 32 1 = demod an fsk tag from GraphBuffer using a clock of RF/32, invert output, autodetect fc");
1021 PrintAndLog(" : data rawdemod fs 64 0 8 5 = demod an fsk1 RF/64 tag from GraphBuffer");
1022 PrintAndLog(" : data rawdemod fs 50 0 10 8 = demod an fsk2 RF/50 tag from GraphBuffer");
1023 PrintAndLog(" : data rawdemod fs 50 1 10 8 = demod an fsk2a RF/50 tag from GraphBuffer");
1024 return 0;
1025 }
1026 return FSKrawDemod(Cmd, TRUE);
1027 }
1028
1029 //by marshmellow (based on existing demod + holiman's refactor)
1030 //HID Prox demod - FSK RF/50 with preamble of 00011101 (then manchester encoded)
1031 //print full HID Prox ID and some bit format details if found
1032 int CmdFSKdemodHID(const char *Cmd)
1033 {
1034 //raw fsk demod no manchester decoding no start bit finding just get binary from wave
1035 uint32_t hi2=0, hi=0, lo=0;
1036
1037 uint8_t BitStream[MAX_GRAPH_TRACE_LEN]={0};
1038 size_t BitLen = getFromGraphBuf(BitStream);
1039 if (BitLen==0) return 0;
1040 //get binary from fsk wave
1041 int idx = HIDdemodFSK(BitStream,&BitLen,&hi2,&hi,&lo);
1042 if (idx<0){
1043 if (g_debugMode){
1044 if (idx==-1){
1045 PrintAndLog("DEBUG: Just Noise Detected");
1046 } else if (idx == -2) {
1047 PrintAndLog("DEBUG: Error demoding fsk");
1048 } else if (idx == -3) {
1049 PrintAndLog("DEBUG: Preamble not found");
1050 } else if (idx == -4) {
1051 PrintAndLog("DEBUG: Error in Manchester data, SIZE: %d", BitLen);
1052 } else {
1053 PrintAndLog("DEBUG: Error demoding fsk %d", idx);
1054 }
1055 }
1056 return 0;
1057 }
1058 if (hi2==0 && hi==0 && lo==0) {
1059 if (g_debugMode) PrintAndLog("DEBUG: Error - no values found");
1060 return 0;
1061 }
1062 if (hi2 != 0){ //extra large HID tags
1063 PrintAndLog("HID Prox TAG ID: %x%08x%08x (%d)",
1064 (unsigned int) hi2, (unsigned int) hi, (unsigned int) lo, (unsigned int) (lo>>1) & 0xFFFF);
1065 }
1066 else { //standard HID tags <38 bits
1067 uint8_t fmtLen = 0;
1068 uint32_t fc = 0;
1069 uint32_t cardnum = 0;
1070 if (((hi>>5)&1)==1){//if bit 38 is set then < 37 bit format is used
1071 uint32_t lo2=0;
1072 lo2=(((hi & 31) << 12) | (lo>>20)); //get bits 21-37 to check for format len bit
1073 uint8_t idx3 = 1;
1074 while(lo2>1){ //find last bit set to 1 (format len bit)
1075 lo2=lo2>>1;
1076 idx3++;
1077 }
1078 fmtLen =idx3+19;
1079 fc =0;
1080 cardnum=0;
1081 if(fmtLen==26){
1082 cardnum = (lo>>1)&0xFFFF;
1083 fc = (lo>>17)&0xFF;
1084 }
1085 if(fmtLen==34){
1086 cardnum = (lo>>1)&0xFFFF;
1087 fc= ((hi&1)<<15)|(lo>>17);
1088 }
1089 if(fmtLen==35){
1090 cardnum = (lo>>1)&0xFFFFF;
1091 fc = ((hi&1)<<11)|(lo>>21);
1092 }
1093 }
1094 else { //if bit 38 is not set then 37 bit format is used
1095 fmtLen = 37;
1096 fc = 0;
1097 cardnum = 0;
1098 if(fmtLen == 37){
1099 cardnum = (lo>>1)&0x7FFFF;
1100 fc = ((hi&0xF)<<12)|(lo>>20);
1101 }
1102 }
1103 PrintAndLog("HID Prox TAG ID: %x%08x (%d) - Format Len: %dbit - FC: %d - Card: %d",
1104 (unsigned int) hi, (unsigned int) lo, (unsigned int) (lo>>1) & 0xFFFF,
1105 (unsigned int) fmtLen, (unsigned int) fc, (unsigned int) cardnum);
1106 }
1107 setDemodBuf(BitStream,BitLen,idx);
1108 if (g_debugMode){
1109 PrintAndLog("DEBUG: idx: %d, Len: %d, Printing Demod Buffer:", idx, BitLen);
1110 printDemodBuff();
1111 }
1112 return 1;
1113 }
1114
1115 //by marshmellow
1116 //Paradox Prox demod - FSK RF/50 with preamble of 00001111 (then manchester encoded)
1117 //print full Paradox Prox ID and some bit format details if found
1118 int CmdFSKdemodParadox(const char *Cmd)
1119 {
1120 //raw fsk demod no manchester decoding no start bit finding just get binary from wave
1121 uint32_t hi2=0, hi=0, lo=0;
1122
1123 uint8_t BitStream[MAX_GRAPH_TRACE_LEN]={0};
1124 size_t BitLen = getFromGraphBuf(BitStream);
1125 if (BitLen==0) return 0;
1126 //get binary from fsk wave
1127 int idx = ParadoxdemodFSK(BitStream,&BitLen,&hi2,&hi,&lo);
1128 if (idx<0){
1129 if (g_debugMode){
1130 if (idx==-1){
1131 PrintAndLog("DEBUG: Just Noise Detected");
1132 } else if (idx == -2) {
1133 PrintAndLog("DEBUG: Error demoding fsk");
1134 } else if (idx == -3) {
1135 PrintAndLog("DEBUG: Preamble not found");
1136 } else if (idx == -4) {
1137 PrintAndLog("DEBUG: Error in Manchester data");
1138 } else {
1139 PrintAndLog("DEBUG: Error demoding fsk %d", idx);
1140 }
1141 }
1142 return 0;
1143 }
1144 if (hi2==0 && hi==0 && lo==0){
1145 if (g_debugMode) PrintAndLog("DEBUG: Error - no value found");
1146 return 0;
1147 }
1148 uint32_t fc = ((hi & 0x3)<<6) | (lo>>26);
1149 uint32_t cardnum = (lo>>10)&0xFFFF;
1150 uint32_t rawLo = bytebits_to_byte(BitStream+idx+64,32);
1151 uint32_t rawHi = bytebits_to_byte(BitStream+idx+32,32);
1152 uint32_t rawHi2 = bytebits_to_byte(BitStream+idx,32);
1153
1154 PrintAndLog("Paradox TAG ID: %x%08x - FC: %d - Card: %d - Checksum: %02x - RAW: %08x%08x%08x",
1155 hi>>10, (hi & 0x3)<<26 | (lo>>10), fc, cardnum, (lo>>2) & 0xFF, rawHi2, rawHi, rawLo);
1156 setDemodBuf(BitStream,BitLen,idx);
1157 if (g_debugMode){
1158 PrintAndLog("DEBUG: idx: %d, len: %d, Printing Demod Buffer:", idx, BitLen);
1159 printDemodBuff();
1160 }
1161 return 1;
1162 }
1163
1164 //by marshmellow
1165 //IO-Prox demod - FSK RF/64 with preamble of 000000001
1166 //print ioprox ID and some format details
1167 int CmdFSKdemodIO(const char *Cmd)
1168 {
1169 int idx=0;
1170 //something in graphbuffer?
1171 if (GraphTraceLen < 65) {
1172 if (g_debugMode)PrintAndLog("DEBUG: not enough samples in GraphBuffer");
1173 return 0;
1174 }
1175 uint8_t BitStream[MAX_GRAPH_TRACE_LEN]={0};
1176 size_t BitLen = getFromGraphBuf(BitStream);
1177 if (BitLen==0) return 0;
1178
1179 //get binary from fsk wave
1180 idx = IOdemodFSK(BitStream,BitLen);
1181 if (idx<0){
1182 if (g_debugMode){
1183 if (idx==-1){
1184 PrintAndLog("DEBUG: Just Noise Detected");
1185 } else if (idx == -2) {
1186 PrintAndLog("DEBUG: not enough samples");
1187 } else if (idx == -3) {
1188 PrintAndLog("DEBUG: error during fskdemod");
1189 } else if (idx == -4) {
1190 PrintAndLog("DEBUG: Preamble not found");
1191 } else if (idx == -5) {
1192 PrintAndLog("DEBUG: Separator bits not found");
1193 } else {
1194 PrintAndLog("DEBUG: Error demoding fsk %d", idx);
1195 }
1196 }
1197 return 0;
1198 }
1199 if (idx==0){
1200 if (g_debugMode){
1201 PrintAndLog("DEBUG: IO Prox Data not found - FSK Bits: %d",BitLen);
1202 if (BitLen > 92) PrintAndLog("%s", sprint_bin_break(BitStream,92,16));
1203 }
1204 return 0;
1205 }
1206 //Index map
1207 //0 10 20 30 40 50 60
1208 //| | | | | | |
1209 //01234567 8 90123456 7 89012345 6 78901234 5 67890123 4 56789012 3 45678901 23
1210 //-----------------------------------------------------------------------------
1211 //00000000 0 11110000 1 facility 1 version* 1 code*one 1 code*two 1 ???????? 11
1212 //
1213 //XSF(version)facility:codeone+codetwo (raw)
1214 //Handle the data
1215 if (idx+64>BitLen) {
1216 if (g_debugMode) PrintAndLog("not enough bits found - bitlen: %d",BitLen);
1217 return 0;
1218 }
1219 PrintAndLog("%d%d%d%d%d%d%d%d %d",BitStream[idx], BitStream[idx+1], BitStream[idx+2], BitStream[idx+3], BitStream[idx+4], BitStream[idx+5], BitStream[idx+6], BitStream[idx+7], BitStream[idx+8]);
1220 PrintAndLog("%d%d%d%d%d%d%d%d %d",BitStream[idx+9], BitStream[idx+10], BitStream[idx+11],BitStream[idx+12],BitStream[idx+13],BitStream[idx+14],BitStream[idx+15],BitStream[idx+16],BitStream[idx+17]);
1221 PrintAndLog("%d%d%d%d%d%d%d%d %d facility",BitStream[idx+18], BitStream[idx+19], BitStream[idx+20],BitStream[idx+21],BitStream[idx+22],BitStream[idx+23],BitStream[idx+24],BitStream[idx+25],BitStream[idx+26]);
1222 PrintAndLog("%d%d%d%d%d%d%d%d %d version",BitStream[idx+27], BitStream[idx+28], BitStream[idx+29],BitStream[idx+30],BitStream[idx+31],BitStream[idx+32],BitStream[idx+33],BitStream[idx+34],BitStream[idx+35]);
1223 PrintAndLog("%d%d%d%d%d%d%d%d %d code1",BitStream[idx+36], BitStream[idx+37], BitStream[idx+38],BitStream[idx+39],BitStream[idx+40],BitStream[idx+41],BitStream[idx+42],BitStream[idx+43],BitStream[idx+44]);
1224 PrintAndLog("%d%d%d%d%d%d%d%d %d code2",BitStream[idx+45], BitStream[idx+46], BitStream[idx+47],BitStream[idx+48],BitStream[idx+49],BitStream[idx+50],BitStream[idx+51],BitStream[idx+52],BitStream[idx+53]);
1225 PrintAndLog("%d%d%d%d%d%d%d%d %d%d checksum",BitStream[idx+54],BitStream[idx+55],BitStream[idx+56],BitStream[idx+57],BitStream[idx+58],BitStream[idx+59],BitStream[idx+60],BitStream[idx+61],BitStream[idx+62],BitStream[idx+63]);
1226
1227 uint32_t code = bytebits_to_byte(BitStream+idx,32);
1228 uint32_t code2 = bytebits_to_byte(BitStream+idx+32,32);
1229 uint8_t version = bytebits_to_byte(BitStream+idx+27,8); //14,4
1230 uint8_t facilitycode = bytebits_to_byte(BitStream+idx+18,8) ;
1231 uint16_t number = (bytebits_to_byte(BitStream+idx+36,8)<<8)|(bytebits_to_byte(BitStream+idx+45,8)); //36,9
1232 uint8_t crc = bytebits_to_byte(BitStream+idx+54,8);
1233 uint16_t calccrc = 0;
1234
1235 for (uint8_t i=1; i<6; ++i){
1236 calccrc += bytebits_to_byte(BitStream+idx+9*i,8);
1237 }
1238 calccrc &= 0xff;
1239 calccrc = 0xff - calccrc;
1240
1241 char *crcStr = (crc == calccrc) ? "crc ok": "!crc";
1242
1243 PrintAndLog("IO Prox XSF(%02d)%02x:%05d (%08x%08x) [%02x %s]",version,facilitycode,number,code,code2, crc, crcStr);
1244 setDemodBuf(BitStream,64,idx);
1245 if (g_debugMode){
1246 PrintAndLog("DEBUG: idx: %d, Len: %d, Printing demod buffer:",idx,64);
1247 printDemodBuff();
1248 }
1249 return 1;
1250 }
1251
1252 //by marshmellow
1253 //AWID Prox demod - FSK RF/50 with preamble of 00000001 (always a 96 bit data stream)
1254 //print full AWID Prox ID and some bit format details if found
1255 int CmdFSKdemodAWID(const char *Cmd)
1256 {
1257 uint8_t BitStream[MAX_GRAPH_TRACE_LEN]={0};
1258 size_t size = getFromGraphBuf(BitStream);
1259 if (size==0) return 0;
1260
1261 //get binary from fsk wave
1262 int idx = AWIDdemodFSK(BitStream, &size);
1263 if (idx<=0){
1264 if (g_debugMode==1){
1265 if (idx == -1)
1266 PrintAndLog("DEBUG: Error - not enough samples");
1267 else if (idx == -2)
1268 PrintAndLog("DEBUG: Error - only noise found");
1269 else if (idx == -3)
1270 PrintAndLog("DEBUG: Error - problem during FSK demod");
1271 else if (idx == -4)
1272 PrintAndLog("DEBUG: Error - AWID preamble not found");
1273 else if (idx == -5)
1274 PrintAndLog("DEBUG: Error - Size not correct: %d", size);
1275 else
1276 PrintAndLog("DEBUG: Error %d",idx);
1277 }
1278 return 0;
1279 }
1280
1281 // Index map
1282 // 0 10 20 30 40 50 60
1283 // | | | | | | |
1284 // 01234567 890 1 234 5 678 9 012 3 456 7 890 1 234 5 678 9 012 3 456 7 890 1 234 5 678 9 012 3 - to 96
1285 // -----------------------------------------------------------------------------
1286 // 00000001 000 1 110 1 101 1 011 1 101 1 010 0 000 1 000 1 010 0 001 0 110 1 100 0 000 1 000 1
1287 // premable bbb o bbb o bbw o fff o fff o ffc o ccc o ccc o ccc o ccc o ccc o wxx o xxx o xxx o - to 96
1288 // |---26 bit---| |-----117----||-------------142-------------|
1289 // b = format bit len, o = odd parity of last 3 bits
1290 // f = facility code, c = card number
1291 // w = wiegand parity
1292 // (26 bit format shown)
1293
1294 //get raw ID before removing parities
1295 uint32_t rawLo = bytebits_to_byte(BitStream+idx+64,32);
1296 uint32_t rawHi = bytebits_to_byte(BitStream+idx+32,32);
1297 uint32_t rawHi2 = bytebits_to_byte(BitStream+idx,32);
1298 setDemodBuf(BitStream,96,idx);
1299
1300 size = removeParity(BitStream, idx+8, 4, 1, 88);
1301 if (size != 66){
1302 if (g_debugMode==1) PrintAndLog("DEBUG: Error - at parity check-tag size does not match AWID format");
1303 return 0;
1304 }
1305 // ok valid card found!
1306
1307 // Index map
1308 // 0 10 20 30 40 50 60
1309 // | | | | | | |
1310 // 01234567 8 90123456 7890123456789012 3 456789012345678901234567890123456
1311 // -----------------------------------------------------------------------------
1312 // 00011010 1 01110101 0000000010001110 1 000000000000000000000000000000000
1313 // bbbbbbbb w ffffffff cccccccccccccccc w xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
1314 // |26 bit| |-117--| |-----142------|
1315 // b = format bit len, o = odd parity of last 3 bits
1316 // f = facility code, c = card number
1317 // w = wiegand parity
1318 // (26 bit format shown)
1319
1320 uint32_t fc = 0;
1321 uint32_t cardnum = 0;
1322 uint32_t code1 = 0;
1323 uint32_t code2 = 0;
1324 uint8_t fmtLen = bytebits_to_byte(BitStream,8);
1325 if (fmtLen==26){
1326 fc = bytebits_to_byte(BitStream+9, 8);
1327 cardnum = bytebits_to_byte(BitStream+17, 16);
1328 code1 = bytebits_to_byte(BitStream+8,fmtLen);
1329 PrintAndLog("AWID Found - BitLength: %d, FC: %d, Card: %d - Wiegand: %x, Raw: %08x%08x%08x", fmtLen, fc, cardnum, code1, rawHi2, rawHi, rawLo);
1330 } else {
1331 cardnum = bytebits_to_byte(BitStream+8+(fmtLen-17), 16);
1332 if (fmtLen>32){
1333 code1 = bytebits_to_byte(BitStream+8,fmtLen-32);
1334 code2 = bytebits_to_byte(BitStream+8+(fmtLen-32),32);
1335 PrintAndLog("AWID Found - BitLength: %d -unknown BitLength- (%d) - Wiegand: %x%08x, Raw: %08x%08x%08x", fmtLen, cardnum, code1, code2, rawHi2, rawHi, rawLo);
1336 } else{
1337 code1 = bytebits_to_byte(BitStream+8,fmtLen);
1338 PrintAndLog("AWID Found - BitLength: %d -unknown BitLength- (%d) - Wiegand: %x, Raw: %08x%08x%08x", fmtLen, cardnum, code1, rawHi2, rawHi, rawLo);
1339 }
1340 }
1341 if (g_debugMode){
1342 PrintAndLog("DEBUG: idx: %d, Len: %d Printing Demod Buffer:", idx, 96);
1343 printDemodBuff();
1344 }
1345 //todo - convert hi2, hi, lo to demodbuffer for future sim/clone commands
1346 return 1;
1347 }
1348
1349 //by marshmellow
1350 //Pyramid Prox demod - FSK RF/50 with preamble of 0000000000000001 (always a 128 bit data stream)
1351 //print full Farpointe Data/Pyramid Prox ID and some bit format details if found
1352 int CmdFSKdemodPyramid(const char *Cmd)
1353 {
1354 //raw fsk demod no manchester decoding no start bit finding just get binary from wave
1355 uint8_t BitStream[MAX_GRAPH_TRACE_LEN]={0};
1356 size_t size = getFromGraphBuf(BitStream);
1357 if (size==0) return 0;
1358
1359 //get binary from fsk wave
1360 int idx = PyramiddemodFSK(BitStream, &size);
1361 if (idx < 0){
1362 if (g_debugMode==1){
1363 if (idx == -5)
1364 PrintAndLog("DEBUG: Error - not enough samples");
1365 else if (idx == -1)
1366 PrintAndLog("DEBUG: Error - only noise found");
1367 else if (idx == -2)
1368 PrintAndLog("DEBUG: Error - problem during FSK demod");
1369 else if (idx == -3)
1370 PrintAndLog("DEBUG: Error - Size not correct: %d", size);
1371 else if (idx == -4)
1372 PrintAndLog("DEBUG: Error - Pyramid preamble not found");
1373 else
1374 PrintAndLog("DEBUG: Error - idx: %d",idx);
1375 }
1376 return 0;
1377 }
1378 // Index map
1379 // 0 10 20 30 40 50 60
1380 // | | | | | | |
1381 // 0123456 7 8901234 5 6789012 3 4567890 1 2345678 9 0123456 7 8901234 5 6789012 3
1382 // -----------------------------------------------------------------------------
1383 // 0000000 0 0000000 1 0000000 1 0000000 1 0000000 1 0000000 1 0000000 1 0000000 1
1384 // premable xxxxxxx o xxxxxxx o xxxxxxx o xxxxxxx o xxxxxxx o xxxxxxx o xxxxxxx o
1385
1386 // 64 70 80 90 100 110 120
1387 // | | | | | | |
1388 // 4567890 1 2345678 9 0123456 7 8901234 5 6789012 3 4567890 1 2345678 9 0123456 7
1389 // -----------------------------------------------------------------------------
1390 // 0000000 1 0000000 1 0000000 1 0110111 0 0011000 1 0000001 0 0001100 1 1001010 0
1391 // xxxxxxx o xxxxxxx o xxxxxxx o xswffff o ffffccc o ccccccc o ccccccw o ppppppp o
1392 // |---115---||---------71---------|
1393 // s = format start bit, o = odd parity of last 7 bits
1394 // f = facility code, c = card number
1395 // w = wiegand parity, x = extra space for other formats
1396 // p = unknown checksum
1397 // (26 bit format shown)
1398
1399 //get bytes for checksum calc
1400 uint8_t checksum = bytebits_to_byte(BitStream + idx + 120, 8);
1401 uint8_t csBuff[14] = {0x00};
1402 for (uint8_t i = 0; i < 13; i++){
1403 csBuff[i] = bytebits_to_byte(BitStream + idx + 16 + (i*8), 8);
1404 }
1405 //check checksum calc
1406 //checksum calc thanks to ICEMAN!!
1407 uint32_t checkCS = CRC8Maxim(csBuff,13);
1408
1409 //get raw ID before removing parities
1410 uint32_t rawLo = bytebits_to_byte(BitStream+idx+96,32);
1411 uint32_t rawHi = bytebits_to_byte(BitStream+idx+64,32);
1412 uint32_t rawHi2 = bytebits_to_byte(BitStream+idx+32,32);
1413 uint32_t rawHi3 = bytebits_to_byte(BitStream+idx,32);
1414 setDemodBuf(BitStream,128,idx);
1415
1416 size = removeParity(BitStream, idx+8, 8, 1, 120);
1417 if (size != 105){
1418 if (g_debugMode==1)
1419 PrintAndLog("DEBUG: Error at parity check - tag size does not match Pyramid format, SIZE: %d, IDX: %d, hi3: %x",size, idx, rawHi3);
1420 return 0;
1421 }
1422
1423 // ok valid card found!
1424
1425 // Index map
1426 // 0 10 20 30 40 50 60 70
1427 // | | | | | | | |
1428 // 01234567890123456789012345678901234567890123456789012345678901234567890
1429 // -----------------------------------------------------------------------
1430 // 00000000000000000000000000000000000000000000000000000000000000000000000
1431 // xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
1432
1433 // 71 80 90 100
1434 // | | | |
1435 // 1 2 34567890 1234567890123456 7 8901234
1436 // ---------------------------------------
1437 // 1 1 01110011 0000000001000110 0 1001010
1438 // s w ffffffff cccccccccccccccc w ppppppp
1439 // |--115-| |------71------|
1440 // s = format start bit, o = odd parity of last 7 bits
1441 // f = facility code, c = card number
1442 // w = wiegand parity, x = extra space for other formats
1443 // p = unknown checksum
1444 // (26 bit format shown)
1445
1446 //find start bit to get fmtLen
1447 int j;
1448 for (j=0; j<size; j++){
1449 if(BitStream[j]) break;
1450 }
1451 uint8_t fmtLen = size-j-8;
1452 uint32_t fc = 0;
1453 uint32_t cardnum = 0;
1454 uint32_t code1 = 0;
1455 if (fmtLen==26){
1456 fc = bytebits_to_byte(BitStream+73, 8);
1457 cardnum = bytebits_to_byte(BitStream+81, 16);
1458 code1 = bytebits_to_byte(BitStream+72,fmtLen);
1459 PrintAndLog("Pyramid ID Found - BitLength: %d, FC: %d, Card: %d - Wiegand: %x, Raw: %08x%08x%08x%08x", fmtLen, fc, cardnum, code1, rawHi3, rawHi2, rawHi, rawLo);
1460 } else if (fmtLen==45){
1461 fmtLen=42; //end = 10 bits not 7 like 26 bit fmt
1462 fc = bytebits_to_byte(BitStream+53, 10);
1463 cardnum = bytebits_to_byte(BitStream+63, 32);
1464 PrintAndLog("Pyramid ID Found - BitLength: %d, FC: %d, Card: %d - Raw: %08x%08x%08x%08x", fmtLen, fc, cardnum, rawHi3, rawHi2, rawHi, rawLo);
1465 } else {
1466 cardnum = bytebits_to_byte(BitStream+81, 16);
1467 if (fmtLen>32){
1468 //code1 = bytebits_to_byte(BitStream+(size-fmtLen),fmtLen-32);
1469 //code2 = bytebits_to_byte(BitStream+(size-32),32);
1470 PrintAndLog("Pyramid ID Found - BitLength: %d -unknown BitLength- (%d), Raw: %08x%08x%08x%08x", fmtLen, cardnum, rawHi3, rawHi2, rawHi, rawLo);
1471 } else{
1472 //code1 = bytebits_to_byte(BitStream+(size-fmtLen),fmtLen);
1473 PrintAndLog("Pyramid ID Found - BitLength: %d -unknown BitLength- (%d), Raw: %08x%08x%08x%08x", fmtLen, cardnum, rawHi3, rawHi2, rawHi, rawLo);
1474 }
1475 }
1476 if (checksum == checkCS)
1477 PrintAndLog("Checksum %02x passed", checksum);
1478 else
1479 PrintAndLog("Checksum %02x failed - should have been %02x", checksum, checkCS);
1480
1481 if (g_debugMode){
1482 PrintAndLog("DEBUG: idx: %d, Len: %d, Printing Demod Buffer:", idx, 128);
1483 printDemodBuff();
1484 }
1485 return 1;
1486 }
1487
1488 // FDX-B ISO11784/85 demod (aka animal tag) BIPHASE, inverted, rf/32, with preamble of 00000000001 (128bits)
1489 // 8 databits + 1 parity (1)
1490 // CIITT 16 chksum
1491 // NATIONAL CODE, ICAR database
1492 // COUNTRY CODE (ISO3166) or http://cms.abvma.ca/uploads/ManufacturersISOsandCountryCodes.pdf
1493 // FLAG (animal/non-animal)
1494 /*
1495 38 IDbits
1496 10 country code
1497 1 extra app bit
1498 14 reserved bits
1499 1 animal bit
1500 16 ccitt CRC chksum over 64bit ID CODE.
1501 24 appli bits.
1502
1503 -- sample: 985121004515220 [ 37FF65B88EF94 ]
1504 */
1505 int CmdFDXBdemodBI(const char *Cmd){
1506
1507 int invert = 1;
1508 int clk = 32;
1509 int errCnt = 0;
1510 int maxErr = 0;
1511 uint8_t BitStream[MAX_DEMOD_BUF_LEN];
1512 size_t size = getFromGraphBuf(BitStream);
1513
1514 errCnt = askdemod(BitStream, &size, &clk, &invert, maxErr, 0, 0);
1515 if ( errCnt < 0 || errCnt > maxErr ) {
1516 if (g_debugMode) PrintAndLog("DEBUG: no data or error found %d, clock: %d", errCnt, clk);
1517 return 0;
1518 }
1519
1520 errCnt = BiphaseRawDecode(BitStream, &size, maxErr, 1);
1521 if (errCnt < 0 || errCnt > maxErr ) {
1522 if (g_debugMode) PrintAndLog("Error BiphaseRawDecode: %d", errCnt);
1523 return 0;
1524 }
1525
1526 int preambleIndex = FDXBdemodBI(BitStream, &size);
1527 if (preambleIndex < 0){
1528 if (g_debugMode) PrintAndLog("Error FDXBDemod , no startmarker found :: %d",preambleIndex);
1529 return 0;
1530 }
1531 if (size != 128) {
1532 if (g_debugMode) PrintAndLog("Error incorrect data length found");
1533 return 0;
1534 }
1535
1536 setDemodBuf(BitStream, 128, preambleIndex);
1537
1538 // remove marker bits (1's every 9th digit after preamble) (pType = 2)
1539 size = removeParity(BitStream, preambleIndex + 11, 9, 2, 117);
1540 if ( size != 104 ) {
1541 if (g_debugMode) PrintAndLog("Error removeParity:: %d", size);
1542 return 0;
1543 }
1544 if (g_debugMode) {
1545 char *bin = sprint_bin_break(BitStream,size,16);
1546 PrintAndLog("DEBUG BinStream:\n%s",bin);
1547 }
1548 PrintAndLog("\nFDX-B / ISO 11784/5 Animal Tag ID Found:");
1549 if (g_debugMode) PrintAndLog("Start marker %d; Size %d", preambleIndex, size);
1550
1551 //got a good demod
1552 uint64_t NationalCode = ((uint64_t)(bytebits_to_byteLSBF(BitStream+32,6)) << 32) | bytebits_to_byteLSBF(BitStream,32);
1553 uint32_t countryCode = bytebits_to_byteLSBF(BitStream+38,10);
1554 uint8_t dataBlockBit = BitStream[48];
1555 uint32_t reservedCode = bytebits_to_byteLSBF(BitStream+49,14);
1556 uint8_t animalBit = BitStream[63];
1557 uint32_t crc16 = bytebits_to_byteLSBF(BitStream+64,16);
1558 uint32_t extended = bytebits_to_byteLSBF(BitStream+80,24);
1559
1560 uint64_t rawid = ((uint64_t)bytebits_to_byte(BitStream,32)<<32) | bytebits_to_byte(BitStream+32,32);
1561 uint8_t raw[8];
1562 num_to_bytes(rawid, 8, raw);
1563
1564 if (g_debugMode) PrintAndLog("Raw ID Hex: %s", sprint_hex(raw,8));
1565
1566 uint16_t calcCrc = crc16_ccitt_kermit(raw, 8);
1567 PrintAndLog("Animal ID: %04u-%012llu", countryCode, NationalCode);
1568 PrintAndLog("National Code: %012llu", NationalCode);
1569 PrintAndLog("CountryCode: %04u", countryCode);
1570 PrintAndLog("Extended Data: %s", dataBlockBit ? "True" : "False");
1571 PrintAndLog("reserved Code: %u", reservedCode);
1572 PrintAndLog("Animal Tag: %s", animalBit ? "True" : "False");
1573 PrintAndLog("CRC: 0x%04X - [%04X] - %s", crc16, calcCrc, (calcCrc == crc16) ? "Passed" : "Failed");
1574 PrintAndLog("Extended: 0x%X\n", extended);
1575
1576 return 1;
1577 }
1578
1579
1580 //by marshmellow
1581 //attempt to psk1 demod graph buffer
1582 int PSKDemod(const char *Cmd, bool verbose)
1583 {
1584 int invert=0;
1585 int clk=0;
1586 int maxErr=100;
1587 sscanf(Cmd, "%i %i %i", &clk, &invert, &maxErr);
1588 if (clk==1){
1589 invert=1;
1590 clk=0;
1591 }
1592 if (invert != 0 && invert != 1) {
1593 if (g_debugMode || verbose) PrintAndLog("Invalid argument: %s", Cmd);
1594 return 0;
1595 }
1596 uint8_t BitStream[MAX_GRAPH_TRACE_LEN]={0};
1597 size_t BitLen = getFromGraphBuf(BitStream);
1598 if (BitLen==0) return 0;
1599 uint8_t carrier=countFC(BitStream, BitLen, 0);
1600 if (carrier!=2 && carrier!=4 && carrier!=8){
1601 //invalid carrier
1602 return 0;
1603 }
1604 if (g_debugMode){
1605 PrintAndLog("Carrier: rf/%d",carrier);
1606 }
1607 int errCnt=0;
1608 errCnt = pskRawDemod(BitStream, &BitLen, &clk, &invert);
1609 if (errCnt > maxErr){
1610 if (g_debugMode || verbose) PrintAndLog("Too many errors found, clk: %d, invert: %d, numbits: %d, errCnt: %d",clk,invert,BitLen,errCnt);
1611 return 0;
1612 }
1613 if (errCnt<0|| BitLen<16){ //throw away static - allow 1 and -1 (in case of threshold command first)
1614 if (g_debugMode || verbose) PrintAndLog("no data found, clk: %d, invert: %d, numbits: %d, errCnt: %d",clk,invert,BitLen,errCnt);
1615 return 0;
1616 }
1617 if (verbose || g_debugMode){
1618 PrintAndLog("\nUsing Clock:%d, invert:%d, Bits Found:%d",clk,invert,BitLen);
1619 if (errCnt>0){
1620 PrintAndLog("# Errors during Demoding (shown as 7 in bit stream): %d",errCnt);
1621 }
1622 }
1623 //prime demod buffer for output
1624 setDemodBuf(BitStream,BitLen,0);
1625 return 1;
1626 }
1627
1628 // Indala 26 bit decode
1629 // by marshmellow
1630 // optional arguments - same as CmdpskNRZrawDemod (clock & invert)
1631 int CmdIndalaDecode(const char *Cmd)
1632 {
1633 int ans;
1634 if (strlen(Cmd)>0){
1635 ans = PSKDemod(Cmd, 0);
1636 } else{ //default to RF/32
1637 ans = PSKDemod("32", 0);
1638 }
1639
1640 if (!ans){
1641 if (g_debugMode==1)
1642 PrintAndLog("Error1: %d",ans);
1643 return 0;
1644 }
1645 uint8_t invert=0;
1646 size_t size = DemodBufferLen;
1647 size_t startIdx = indala26decode(DemodBuffer, &size, &invert);
1648 if (startIdx < 1 || size > 224) {
1649 if (g_debugMode==1)
1650 PrintAndLog("Error2: %d",ans);
1651 return -1;
1652 }
1653 setDemodBuf(DemodBuffer, size, startIdx);
1654 if (invert)
1655 if (g_debugMode==1)
1656 PrintAndLog("Had to invert bits");
1657
1658 PrintAndLog("BitLen: %d",DemodBufferLen);
1659 //convert UID to HEX
1660 uint32_t uid1, uid2, uid3, uid4, uid5, uid6, uid7;
1661 uid1=bytebits_to_byte(DemodBuffer,32);
1662 uid2=bytebits_to_byte(DemodBuffer+32,32);
1663 if (DemodBufferLen==64){
1664 PrintAndLog("Indala UID=%s (%x%08x)", sprint_bin_break(DemodBuffer,DemodBufferLen,16), uid1, uid2);
1665 } else {
1666 uid3=bytebits_to_byte(DemodBuffer+64,32);
1667 uid4=bytebits_to_byte(DemodBuffer+96,32);
1668 uid5=bytebits_to_byte(DemodBuffer+128,32);
1669 uid6=bytebits_to_byte(DemodBuffer+160,32);
1670 uid7=bytebits_to_byte(DemodBuffer+192,32);
1671 PrintAndLog("Indala UID=%s (%x%08x%08x%08x%08x%08x%08x)",
1672 sprint_bin_break(DemodBuffer,DemodBufferLen,16), uid1, uid2, uid3, uid4, uid5, uid6, uid7);
1673 }
1674 if (g_debugMode){
1675 PrintAndLog("DEBUG: printing demodbuffer:");
1676 printDemodBuff();
1677 }
1678 return 1;
1679 }
1680
1681 int CmdPSKNexWatch(const char *Cmd)
1682 {
1683 if (!PSKDemod("", false)) return 0;
1684 uint8_t preamble[28] = {0,0,0,0,0,1,0,1,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0};
1685 size_t startIdx = 0, size = DemodBufferLen;
1686 bool invert = false;
1687 if (!preambleSearch(DemodBuffer, preamble, sizeof(preamble), &size, &startIdx)){
1688 // if didn't find preamble try again inverting
1689 if (!PSKDemod("1", false)) return 0;
1690 size = DemodBufferLen;
1691 if (!preambleSearch(DemodBuffer, preamble, sizeof(preamble), &size, &startIdx)) return 0;
1692 invert = true;
1693 }
1694 if (size != 128) return 0;
1695 setDemodBuf(DemodBuffer, size, startIdx+4);
1696 startIdx = 8+32; //4 = extra i added, 8 = preamble, 32 = reserved bits (always 0)
1697 //get ID
1698 uint32_t ID = 0;
1699 for (uint8_t wordIdx=0; wordIdx<4; wordIdx++){
1700 for (uint8_t idx=0; idx<8; idx++){
1701 ID = (ID << 1) | DemodBuffer[startIdx+wordIdx+(idx*4)];
1702 }
1703 }
1704 //parity check (TBD)
1705
1706 //checksum check (TBD)
1707
1708 //output
1709 PrintAndLog("NexWatch ID: %d", ID);
1710 if (invert){
1711 PrintAndLog("Had to Invert - probably NexKey");
1712 for (uint8_t idx=0; idx<size; idx++)
1713 DemodBuffer[idx] ^= 1;
1714 }
1715
1716 CmdPrintDemodBuff("x");
1717 return 1;
1718 }
1719
1720 // by marshmellow
1721 // takes 3 arguments - clock, invert, maxErr as integers
1722 // attempts to demodulate nrz only
1723 // prints binary found and saves in demodbuffer for further commands
1724 int NRZrawDemod(const char *Cmd, bool verbose)
1725 {
1726 int invert=0;
1727 int clk=0;
1728 int maxErr=100;
1729 sscanf(Cmd, "%i %i %i", &clk, &invert, &maxErr);
1730 if (clk==1){
1731 invert=1;
1732 clk=0;
1733 }
1734 if (invert != 0 && invert != 1) {
1735 PrintAndLog("Invalid argument: %s", Cmd);
1736 return 0;
1737 }
1738 uint8_t BitStream[MAX_GRAPH_TRACE_LEN]={0};
1739 size_t BitLen = getFromGraphBuf(BitStream);
1740 if (BitLen==0) return 0;
1741 int errCnt=0;
1742 errCnt = nrzRawDemod(BitStream, &BitLen, &clk, &invert);
1743 if (errCnt > maxErr){
1744 if (g_debugMode) PrintAndLog("Too many errors found, clk: %d, invert: %d, numbits: %d, errCnt: %d",clk,invert,BitLen,errCnt);
1745 return 0;
1746 }
1747 if (errCnt<0 || BitLen<16){ //throw away static - allow 1 and -1 (in case of threshold command first)
1748 if (g_debugMode) PrintAndLog("no data found, clk: %d, invert: %d, numbits: %d, errCnt: %d",clk,invert,BitLen,errCnt);
1749 return 0;
1750 }
1751 if (verbose || g_debugMode) PrintAndLog("Tried NRZ Demod using Clock: %d - invert: %d - Bits Found: %d",clk,invert,BitLen);
1752 //prime demod buffer for output
1753 setDemodBuf(BitStream,BitLen,0);
1754
1755 if (errCnt>0 && (verbose || g_debugMode)) PrintAndLog("# Errors during Demoding (shown as 7 in bit stream): %d",errCnt);
1756 if (verbose || g_debugMode) {
1757 PrintAndLog("NRZ demoded bitstream:");
1758 // Now output the bitstream to the scrollback by line of 16 bits
1759 printDemodBuff();
1760 }
1761 return 1;
1762 }
1763
1764 int CmdNRZrawDemod(const char *Cmd)
1765 {
1766 char cmdp = param_getchar(Cmd, 0);
1767 if (strlen(Cmd) > 10 || cmdp == 'h' || cmdp == 'H') {
1768 PrintAndLog("Usage: data rawdemod nr [clock] <0|1> [maxError]");
1769 PrintAndLog(" [set clock as integer] optional, if not set, autodetect.");
1770 PrintAndLog(" <invert>, 1 for invert output");
1771 PrintAndLog(" [set maximum allowed errors], default = 100.");
1772 PrintAndLog("");
1773 PrintAndLog(" sample: data rawdemod nr = demod a nrz/direct tag from GraphBuffer");
1774 PrintAndLog(" : data rawdemod nr 32 = demod a nrz/direct tag from GraphBuffer using a clock of RF/32");
1775 PrintAndLog(" : data rawdemod nr 32 1 = demod a nrz/direct tag from GraphBuffer using a clock of RF/32 and inverting data");
1776 PrintAndLog(" : data rawdemod nr 1 = demod a nrz/direct tag from GraphBuffer while inverting data");
1777 PrintAndLog(" : data rawdemod nr 64 1 0 = demod a nrz/direct tag from GraphBuffer using a clock of RF/64, inverting data and allowing 0 demod errors");
1778 return 0;
1779 }
1780 return NRZrawDemod(Cmd, TRUE);
1781 }
1782
1783 // by marshmellow
1784 // takes 3 arguments - clock, invert, maxErr as integers
1785 // attempts to demodulate psk only
1786 // prints binary found and saves in demodbuffer for further commands
1787 int CmdPSK1rawDemod(const char *Cmd)
1788 {
1789 int ans;
1790 char cmdp = param_getchar(Cmd, 0);
1791 if (strlen(Cmd) > 10 || cmdp == 'h' || cmdp == 'H') {
1792 PrintAndLog("Usage: data rawdemod p1 [clock] <0|1> [maxError]");
1793 PrintAndLog(" [set clock as integer] optional, if not set, autodetect.");
1794 PrintAndLog(" <invert>, 1 for invert output");
1795 PrintAndLog(" [set maximum allowed errors], default = 100.");
1796 PrintAndLog("");
1797 PrintAndLog(" sample: data rawdemod p1 = demod a psk1 tag from GraphBuffer");
1798 PrintAndLog(" : data rawdemod p1 32 = demod a psk1 tag from GraphBuffer using a clock of RF/32");
1799 PrintAndLog(" : data rawdemod p1 32 1 = demod a psk1 tag from GraphBuffer using a clock of RF/32 and inverting data");
1800 PrintAndLog(" : data rawdemod p1 1 = demod a psk1 tag from GraphBuffer while inverting data");
1801 PrintAndLog(" : data rawdemod p1 64 1 0 = demod a psk1 tag from GraphBuffer using a clock of RF/64, inverting data and allowing 0 demod errors");
1802 return 0;
1803 }
1804 ans = PSKDemod(Cmd, TRUE);
1805 //output
1806 if (!ans){
1807 if (g_debugMode) PrintAndLog("Error demoding: %d",ans);
1808 return 0;
1809 }
1810
1811 PrintAndLog("PSK1 demoded bitstream:");
1812 // Now output the bitstream to the scrollback by line of 16 bits
1813 printDemodBuff();
1814 return 1;
1815 }
1816
1817 // by marshmellow
1818 // takes same args as cmdpsk1rawdemod
1819 int CmdPSK2rawDemod(const char *Cmd)
1820 {
1821 int ans=0;
1822 char cmdp = param_getchar(Cmd, 0);
1823 if (strlen(Cmd) > 10 || cmdp == 'h' || cmdp == 'H') {
1824 PrintAndLog("Usage: data rawdemod p2 [clock] <0|1> [maxError]");
1825 PrintAndLog(" [set clock as integer] optional, if not set, autodetect.");
1826 PrintAndLog(" <invert>, 1 for invert output");
1827 PrintAndLog(" [set maximum allowed errors], default = 100.");
1828 PrintAndLog("");
1829 PrintAndLog(" sample: data rawdemod p2 = demod a psk2 tag from GraphBuffer, autodetect clock");
1830 PrintAndLog(" : data rawdemod p2 32 = demod a psk2 tag from GraphBuffer using a clock of RF/32");
1831 PrintAndLog(" : data rawdemod p2 32 1 = demod a psk2 tag from GraphBuffer using a clock of RF/32 and inverting output");
1832 PrintAndLog(" : data rawdemod p2 1 = demod a psk2 tag from GraphBuffer, autodetect clock and invert output");
1833 PrintAndLog(" : data rawdemod p2 64 1 0 = demod a psk2 tag from GraphBuffer using a clock of RF/64, inverting output and allowing 0 demod errors");
1834 return 0;
1835 }
1836 ans=PSKDemod(Cmd, TRUE);
1837 if (!ans){
1838 if (g_debugMode) PrintAndLog("Error demoding: %d",ans);
1839 return 0;
1840 }
1841 psk1TOpsk2(DemodBuffer, DemodBufferLen);
1842 PrintAndLog("PSK2 demoded bitstream:");
1843 // Now output the bitstream to the scrollback by line of 16 bits
1844 printDemodBuff();
1845 return 1;
1846 }
1847
1848 // by marshmellow - combines all raw demod functions into one menu command
1849 int CmdRawDemod(const char *Cmd)
1850 {
1851 char cmdp = Cmd[0]; //param_getchar(Cmd, 0);
1852
1853 if (strlen(Cmd) > 20 || cmdp == 'h' || cmdp == 'H' || strlen(Cmd)<2) {
1854 PrintAndLog("Usage: data rawdemod [modulation] <help>|<options>");
1855 PrintAndLog(" [modulation] as 2 char, 'ab' for ask/biphase, 'am' for ask/manchester, 'ar' for ask/raw, 'fs' for fsk, ...");
1856 PrintAndLog(" 'nr' for nrz/direct, 'p1' for psk1, 'p2' for psk2");
1857 PrintAndLog(" <help> as 'h', prints the help for the specific modulation");
1858 PrintAndLog(" <options> see specific modulation help for optional parameters");
1859 PrintAndLog("");
1860 PrintAndLog(" sample: data rawdemod fs h = print help specific to fsk demod");
1861 PrintAndLog(" : data rawdemod fs = demod GraphBuffer using: fsk - autodetect");
1862 PrintAndLog(" : data rawdemod ab = demod GraphBuffer using: ask/biphase - autodetect");
1863 PrintAndLog(" : data rawdemod am = demod GraphBuffer using: ask/manchester - autodetect");
1864 PrintAndLog(" : data rawdemod ar = demod GraphBuffer using: ask/raw - autodetect");
1865 PrintAndLog(" : data rawdemod nr = demod GraphBuffer using: nrz/direct - autodetect");
1866 PrintAndLog(" : data rawdemod p1 = demod GraphBuffer using: psk1 - autodetect");
1867 PrintAndLog(" : data rawdemod p2 = demod GraphBuffer using: psk2 - autodetect");
1868 return 0;
1869 }
1870 char cmdp2 = Cmd[1];
1871 int ans = 0;
1872 if (cmdp == 'f' && cmdp2 == 's'){
1873 ans = CmdFSKrawdemod(Cmd+2);
1874 } else if(cmdp == 'a' && cmdp2 == 'b'){
1875 ans = Cmdaskbiphdemod(Cmd+2);
1876 } else if(cmdp == 'a' && cmdp2 == 'm'){
1877 ans = Cmdaskmandemod(Cmd+2);
1878 } else if(cmdp == 'a' && cmdp2 == 'r'){
1879 ans = Cmdaskrawdemod(Cmd+2);
1880 } else if(cmdp == 'n' && cmdp2 == 'r'){
1881 ans = CmdNRZrawDemod(Cmd+2);
1882 } else if(cmdp == 'p' && cmdp2 == '1'){
1883 ans = CmdPSK1rawDemod(Cmd+2);
1884 } else if(cmdp == 'p' && cmdp2 == '2'){
1885 ans = CmdPSK2rawDemod(Cmd+2);
1886 } else {
1887 PrintAndLog("unknown modulation entered - see help ('h') for parameter structure");
1888 }
1889 return ans;
1890 }
1891
1892 int CmdGrid(const char *Cmd)
1893 {
1894 sscanf(Cmd, "%i %i", &PlotGridX, &PlotGridY);
1895 PlotGridXdefault= PlotGridX;
1896 PlotGridYdefault= PlotGridY;
1897 RepaintGraphWindow();
1898 return 0;
1899 }
1900
1901 int CmdHexsamples(const char *Cmd)
1902 {
1903 int i, j;
1904 int requested = 0;
1905 int offset = 0;
1906 char string_buf[25];
1907 char* string_ptr = string_buf;
1908 uint8_t got[BIGBUF_SIZE];
1909
1910 sscanf(Cmd, "%i %i", &requested, &offset);
1911
1912 /* if no args send something */
1913 if (requested == 0) {
1914 requested = 8;
1915 }
1916 if (offset + requested > sizeof(got)) {
1917 PrintAndLog("Tried to read past end of buffer, <bytes> + <offset> > %d", BIGBUF_SIZE);
1918 return 0;
1919 }
1920
1921 GetFromBigBuf(got,requested,offset);
1922 WaitForResponse(CMD_ACK,NULL);
1923
1924 i = 0;
1925 for (j = 0; j < requested; j++) {
1926 i++;
1927 string_ptr += sprintf(string_ptr, "%02x ", got[j]);
1928 if (i == 8) {
1929 *(string_ptr - 1) = '\0'; // remove the trailing space
1930 PrintAndLog("%s", string_buf);
1931 string_buf[0] = '\0';
1932 string_ptr = string_buf;
1933 i = 0;
1934 }
1935 if (j == requested - 1 && string_buf[0] != '\0') { // print any remaining bytes
1936 *(string_ptr - 1) = '\0';
1937 PrintAndLog("%s", string_buf);
1938 string_buf[0] = '\0';
1939 }
1940 }
1941 return 0;
1942 }
1943
1944 int CmdHide(const char *Cmd)
1945 {
1946 HideGraphWindow();
1947 return 0;
1948 }
1949
1950 //zero mean GraphBuffer
1951 int CmdHpf(const char *Cmd)
1952 {
1953 int i;
1954 int accum = 0;
1955
1956 for (i = 10; i < GraphTraceLen; ++i)
1957 accum += GraphBuffer[i];
1958 accum /= (GraphTraceLen - 10);
1959 for (i = 0; i < GraphTraceLen; ++i)
1960 GraphBuffer[i] -= accum;
1961
1962 RepaintGraphWindow();
1963 return 0;
1964 }
1965
1966 bool _headBit( BitstreamOut *stream)
1967 {
1968 int bytepos = stream->position >> 3; // divide by 8
1969 int bitpos = (stream->position++) & 7; // mask out 00000111
1970 return (*(stream->buffer + bytepos) >> (7-bitpos)) & 1;
1971 }
1972
1973 uint8_t getByte(uint8_t bits_per_sample, BitstreamOut* b)
1974 {
1975 int i;
1976 uint8_t val = 0;
1977 for(i =0 ; i < bits_per_sample; i++)
1978 {
1979 val |= (_headBit(b) << (7-i));
1980 }
1981 return val;
1982 }
1983
1984 int getSamples(const char *Cmd, bool silent)
1985 {
1986 //If we get all but the last byte in bigbuf,
1987 // we don't have to worry about remaining trash
1988 // in the last byte in case the bits-per-sample
1989 // does not line up on byte boundaries
1990
1991 uint8_t got[BIGBUF_SIZE-1] = { 0 };
1992
1993 int n = strtol(Cmd, NULL, 0);
1994
1995 if ( n == 0 || n > sizeof(got))
1996 n = sizeof(got);
1997
1998 PrintAndLog("Reading %d bytes from device memory\n", n);
1999 GetFromBigBuf(got,n,0);
2000 PrintAndLog("Data fetched");
2001 UsbCommand response;
2002 if ( !WaitForResponseTimeout(CMD_ACK, &response, 10000) ) {
2003 PrintAndLog("timeout while waiting for reply.");
2004 return 1;
2005 }
2006
2007 uint8_t bits_per_sample = 8;
2008
2009 //Old devices without this feature would send 0 at arg[0]
2010 if(response.arg[0] > 0)
2011 {
2012 sample_config *sc = (sample_config *) response.d.asBytes;
2013 PrintAndLog("Samples @ %d bits/smpl, decimation 1:%d ", sc->bits_per_sample, sc->decimation);
2014 bits_per_sample = sc->bits_per_sample;
2015 }
2016 if(bits_per_sample < 8)
2017 {
2018 PrintAndLog("Unpacking...");
2019 BitstreamOut bout = { got, bits_per_sample * n, 0};
2020 int j =0;
2021 for (j = 0; j * bits_per_sample < n * 8 && j < n; j++) {
2022 uint8_t sample = getByte(bits_per_sample, &bout);
2023 GraphBuffer[j] = ((int) sample )- 128;
2024 }
2025 GraphTraceLen = j;
2026 PrintAndLog("Unpacked %d samples" , j );
2027 }else
2028 {
2029 for (int j = 0; j < n; j++) {
2030 GraphBuffer[j] = ((int)got[j]) - 128;
2031 }
2032 GraphTraceLen = n;
2033 }
2034
2035 RepaintGraphWindow();
2036 return 0;
2037 }
2038
2039 int CmdSamples(const char *Cmd)
2040 {
2041 return getSamples(Cmd, false);
2042 }
2043
2044 int CmdTuneSamples(const char *Cmd)
2045 {
2046 int timeout = 0;
2047 printf("\nMeasuring antenna characteristics, please wait...");
2048
2049 UsbCommand c = {CMD_MEASURE_ANTENNA_TUNING, {0,0,0}};
2050 clearCommandBuffer();
2051 SendCommand(&c);
2052 UsbCommand resp;
2053 while(!WaitForResponseTimeout(CMD_MEASURED_ANTENNA_TUNING, &resp, 2000)) {
2054 timeout++;
2055 printf(".");
2056 if (timeout > 7) {
2057 PrintAndLog("\nNo response from Proxmark. Aborting...");
2058 return 1;
2059 }
2060 }
2061
2062 int peakv, peakf;
2063 int vLf125, vLf134, vHf;
2064 vLf125 = resp.arg[0] & 0xffff;
2065 vLf134 = resp.arg[0] >> 16;
2066 vHf = resp.arg[1] & 0xffff;;
2067 peakf = resp.arg[2] & 0xffff;
2068 peakv = resp.arg[2] >> 16;
2069 PrintAndLog("");
2070 PrintAndLog("# LF antenna: %5.2f V @ 125.00 kHz", vLf125/1000.0);
2071 PrintAndLog("# LF antenna: %5.2f V @ 134.00 kHz", vLf134/1000.0);
2072 PrintAndLog("# LF optimal: %5.2f V @%9.2f kHz", peakv/1000.0, 12000.0/(peakf+1));
2073 PrintAndLog("# HF antenna: %5.2f V @ 13.56 MHz", vHf/1000.0);
2074
2075 #define LF_UNUSABLE_V 2948 // was 2000. Changed due to bugfix in voltage measurements. LF results are now 47% higher.
2076 #define LF_MARGINAL_V 14739 // was 10000. Changed due to bugfix bug in voltage measurements. LF results are now 47% higher.
2077 #define HF_UNUSABLE_V 3167 // was 2000. Changed due to bugfix in voltage measurements. HF results are now 58% higher.
2078 #define HF_MARGINAL_V 7917 // was 5000. Changed due to bugfix in voltage measurements. HF results are now 58% higher.
2079
2080 if (peakv < LF_UNUSABLE_V)
2081 PrintAndLog("# Your LF antenna is unusable.");
2082 else if (peakv < LF_MARGINAL_V)
2083 PrintAndLog("# Your LF antenna is marginal.");
2084 if (vHf < HF_UNUSABLE_V)
2085 PrintAndLog("# Your HF antenna is unusable.");
2086 else if (vHf < HF_MARGINAL_V)
2087 PrintAndLog("# Your HF antenna is marginal.");
2088
2089 if (peakv >= LF_UNUSABLE_V) {
2090 for (int i = 0; i < 256; i++) {
2091 GraphBuffer[i] = resp.d.asBytes[i] - 128;
2092 }
2093 PrintAndLog("Displaying LF tuning graph. Divisor 89 is 134khz, 95 is 125khz.\n");
2094 PrintAndLog("\n");
2095 GraphTraceLen = 256;
2096 ShowGraphWindow();
2097 RepaintGraphWindow();
2098 }
2099 return 0;
2100 }
2101
2102
2103 int CmdLoad(const char *Cmd)
2104 {
2105 char filename[FILE_PATH_SIZE] = {0x00};
2106 int len = 0;
2107
2108 len = strlen(Cmd);
2109 if (len > FILE_PATH_SIZE) len = FILE_PATH_SIZE;
2110 memcpy(filename, Cmd, len);
2111
2112 FILE *f = fopen(filename, "r");
2113 if (!f) {
2114 PrintAndLog("couldn't open '%s'", filename);
2115 return 0;
2116 }
2117
2118 GraphTraceLen = 0;
2119 char line[80];
2120 while (fgets(line, sizeof (line), f)) {
2121 GraphBuffer[GraphTraceLen] = atoi(line);
2122 GraphTraceLen++;
2123 }
2124 fclose(f);
2125 PrintAndLog("loaded %d samples", GraphTraceLen);
2126 RepaintGraphWindow();
2127 return 0;
2128 }
2129
2130 int CmdLtrim(const char *Cmd)
2131 {
2132 int ds = atoi(Cmd);
2133
2134 if (GraphTraceLen <= 0) return 0;
2135
2136 for (int i = ds; i < GraphTraceLen; ++i)
2137 GraphBuffer[i-ds] = GraphBuffer[i];
2138
2139 GraphTraceLen -= ds;
2140 RepaintGraphWindow();
2141 return 0;
2142 }
2143
2144 // trim graph to input argument length
2145 int CmdRtrim(const char *Cmd)
2146 {
2147 int ds = atoi(Cmd);
2148 GraphTraceLen = ds;
2149 RepaintGraphWindow();
2150 return 0;
2151 }
2152
2153 int CmdNorm(const char *Cmd)
2154 {
2155 int i;
2156 int max = INT_MIN, min = INT_MAX;
2157
2158 for (i = 10; i < GraphTraceLen; ++i) {
2159 if (GraphBuffer[i] > max)
2160 max = GraphBuffer[i];
2161 if (GraphBuffer[i] < min)
2162 min = GraphBuffer[i];
2163 }
2164
2165 if (max != min) {
2166 for (i = 0; i < GraphTraceLen; ++i) {
2167 GraphBuffer[i] = (GraphBuffer[i] - ((max + min) / 2)) * 256 /
2168 (max - min);
2169 //marshmelow: adjusted *1000 to *256 to make +/- 128 so demod commands still work
2170 }
2171 }
2172 RepaintGraphWindow();
2173 return 0;
2174 }
2175
2176 int CmdPlot(const char *Cmd)
2177 {
2178 ShowGraphWindow();
2179 return 0;
2180 }
2181
2182 int CmdSave(const char *Cmd)
2183 {
2184 char filename[FILE_PATH_SIZE] = {0x00};
2185 int len = 0;
2186
2187 len = strlen(Cmd);
2188 if (len > FILE_PATH_SIZE) len = FILE_PATH_SIZE;
2189 memcpy(filename, Cmd, len);
2190
2191
2192 FILE *f = fopen(filename, "w");
2193 if(!f) {
2194 PrintAndLog("couldn't open '%s'", filename);
2195 return 0;
2196 }
2197 int i;
2198 for (i = 0; i < GraphTraceLen; i++) {
2199 fprintf(f, "%d\n", GraphBuffer[i]);
2200 }
2201 fclose(f);
2202 PrintAndLog("saved to '%s'", Cmd);
2203 return 0;
2204 }
2205
2206 int CmdScale(const char *Cmd)
2207 {
2208 CursorScaleFactor = atoi(Cmd);
2209 if (CursorScaleFactor == 0) {
2210 PrintAndLog("bad, can't have zero scale");
2211 CursorScaleFactor = 1;
2212 }
2213 RepaintGraphWindow();
2214 return 0;
2215 }
2216
2217 int CmdDirectionalThreshold(const char *Cmd)
2218 {
2219 int8_t upThres = param_get8(Cmd, 0);
2220 int8_t downThres = param_get8(Cmd, 1);
2221
2222 printf("Applying Up Threshold: %d, Down Threshold: %d\n", upThres, downThres);
2223
2224 int lastValue = GraphBuffer[0];
2225 GraphBuffer[0] = 0; // Will be changed at the end, but init 0 as we adjust to last samples value if no threshold kicks in.
2226
2227 for (int i = 1; i < GraphTraceLen; ++i) {
2228 // Apply first threshold to samples heading up
2229 if (GraphBuffer[i] >= upThres && GraphBuffer[i] > lastValue)
2230 {
2231 lastValue = GraphBuffer[i]; // Buffer last value as we overwrite it.
2232 GraphBuffer[i] = 1;
2233 }
2234 // Apply second threshold to samples heading down
2235 else if (GraphBuffer[i] <= downThres && GraphBuffer[i] < lastValue)
2236 {
2237 lastValue = GraphBuffer[i]; // Buffer last value as we overwrite it.
2238 GraphBuffer[i] = -1;
2239 }
2240 else
2241 {
2242 lastValue = GraphBuffer[i]; // Buffer last value as we overwrite it.
2243 GraphBuffer[i] = GraphBuffer[i-1];
2244
2245 }
2246 }
2247 GraphBuffer[0] = GraphBuffer[1]; // Aline with first edited sample.
2248 RepaintGraphWindow();
2249 return 0;
2250 }
2251
2252 int CmdZerocrossings(const char *Cmd)
2253 {
2254 // Zero-crossings aren't meaningful unless the signal is zero-mean.
2255 CmdHpf("");
2256
2257 int sign = 1;
2258 int zc = 0;
2259 int lastZc = 0;
2260
2261 for (int i = 0; i < GraphTraceLen; ++i) {
2262 if (GraphBuffer[i] * sign >= 0) {
2263 // No change in sign, reproduce the previous sample count.
2264 zc++;
2265 GraphBuffer[i] = lastZc;
2266 } else {
2267 // Change in sign, reset the sample count.
2268 sign = -sign;
2269 GraphBuffer[i] = lastZc;
2270 if (sign > 0) {
2271 lastZc = zc;
2272 zc = 0;
2273 }
2274 }
2275 }
2276
2277 RepaintGraphWindow();
2278 return 0;
2279 }
2280
2281 int usage_data_bin2hex(){
2282 PrintAndLog("Usage: data bin2hex <binary_digits>");
2283 PrintAndLog(" This function will ignore all characters not 1 or 0 (but stop reading on whitespace)");
2284 return 0;
2285 }
2286
2287 /**
2288 * @brief Utility for conversion via cmdline.
2289 * @param Cmd
2290 * @return
2291 */
2292 int Cmdbin2hex(const char *Cmd)
2293 {
2294 int bg =0, en =0;
2295 if(param_getptr(Cmd, &bg, &en, 0))
2296 {
2297 return usage_data_bin2hex();
2298 }
2299 //Number of digits supplied as argument
2300 size_t length = en - bg +1;
2301 size_t bytelen = (length+7) / 8;
2302 uint8_t* arr = (uint8_t *) malloc(bytelen);
2303 memset(arr, 0, bytelen);
2304 BitstreamOut bout = { arr, 0, 0 };
2305
2306 for(; bg <= en ;bg++)
2307 {
2308 char c = Cmd[bg];
2309 if( c == '1') pushBit(&bout, 1);
2310 else if( c == '0') pushBit(&bout, 0);
2311 else PrintAndLog("Ignoring '%c'", c);
2312 }
2313
2314 if(bout.numbits % 8 != 0)
2315 {
2316 printf("[padded with %d zeroes]\n", 8-(bout.numbits % 8));
2317 }
2318
2319 //Uses printf instead of PrintAndLog since the latter
2320 // adds linebreaks to each printout - this way was more convenient since we don't have to
2321 // allocate a string and write to that first...
2322 for(size_t x = 0; x < bytelen ; x++)
2323 {
2324 printf("%02X", arr[x]);
2325 }
2326 printf("\n");
2327 free(arr);
2328 return 0;
2329 }
2330
2331 int usage_data_hex2bin(){
2332 PrintAndLog("Usage: data hex2bin <hex_digits>");
2333 PrintAndLog(" This function will ignore all non-hexadecimal characters (but stop reading on whitespace)");
2334 return 0;
2335 }
2336
2337 int Cmdhex2bin(const char *Cmd)
2338 {
2339 int bg =0, en =0;
2340 if(param_getptr(Cmd, &bg, &en, 0)) return usage_data_hex2bin();
2341
2342 while(bg <= en )
2343 {
2344 char x = Cmd[bg++];
2345 // capitalize
2346 if (x >= 'a' && x <= 'f')
2347 x -= 32;
2348 // convert to numeric value
2349 if (x >= '0' && x <= '9')
2350 x -= '0';
2351 else if (x >= 'A' && x <= 'F')
2352 x -= 'A' - 10;
2353 else
2354 continue;
2355
2356 //Uses printf instead of PrintAndLog since the latter
2357 // adds linebreaks to each printout - this way was more convenient since we don't have to
2358 // allocate a string and write to that first...
2359
2360 for(int i= 0 ; i < 4 ; ++i)
2361 printf("%d",(x >> (3 - i)) & 1);
2362 }
2363 printf("\n");
2364
2365 return 0;
2366 }
2367
2368 static command_t CommandTable[] =
2369 {
2370 {"help", CmdHelp, 1, "This help"},
2371 {"askedgedetect", CmdAskEdgeDetect, 1, "[threshold] Adjust Graph for manual ask demod using the length of sample differences to detect the edge of a wave (use 20-45, def:25)"},
2372 {"askem410xdemod", CmdAskEM410xDemod, 1, "[clock] [invert<0|1>] [maxErr] -- Demodulate an EM410x tag from GraphBuffer (args optional)"},
2373 {"askgproxiidemod", CmdG_Prox_II_Demod, 1, "Demodulate a G Prox II tag from GraphBuffer"},
2374 {"askvikingdemod", CmdVikingDemod, 1, "Demodulate a Viking AM tag from GraphBuffer"},
2375 {"autocorr", CmdAutoCorr, 1, "[window length] [g] -- Autocorrelation over window - g to save back to GraphBuffer (overwrite)"},
2376 {"biphaserawdecode",CmdBiphaseDecodeRaw,1, "[offset] [invert<0|1>] [maxErr] -- Biphase decode bin stream in DemodBuffer (offset = 0|1 bits to shift the decode start)"},
2377 {"bin2hex", Cmdbin2hex, 1, "bin2hex <digits> -- Converts binary to hexadecimal"},
2378 {"bitsamples", CmdBitsamples, 0, "Get raw samples as bitstring"},
2379 {"buffclear", CmdBuffClear, 1, "Clear sample buffer and graph window"},
2380 {"dec", CmdDec, 1, "Decimate samples"},
2381 {"detectclock", CmdDetectClockRate, 1, "[modulation] Detect clock rate of wave in GraphBuffer (options: 'a','f','n','p' for ask, fsk, nrz, psk respectively)"},
2382 {"fdxbdemod", CmdFDXBdemodBI , 1, "Demodulate a FDX-B ISO11784/85 Biphase tag from GraphBuffer"},
2383 {"fskawiddemod", CmdFSKdemodAWID, 1, "Demodulate an AWID FSK tag from GraphBuffer"},
2384 //{"fskfcdetect", CmdFSKfcDetect, 1, "Try to detect the Field Clock of an FSK wave"},
2385 {"fskhiddemod", CmdFSKdemodHID, 1, "Demodulate a HID FSK tag from GraphBuffer"},
2386 {"fskiodemod", CmdFSKdemodIO, 1, "Demodulate an IO Prox FSK tag from GraphBuffer"},
2387 {"fskpyramiddemod", CmdFSKdemodPyramid, 1, "Demodulate a Pyramid FSK tag from GraphBuffer"},
2388 {"fskparadoxdemod", CmdFSKdemodParadox, 1, "Demodulate a Paradox FSK tag from GraphBuffer"},
2389 {"getbitstream", CmdGetBitStream, 1, "Convert GraphBuffer's >=1 values to 1 and <1 to 0"},
2390 {"grid", CmdGrid, 1, "<x> <y> -- overlay grid on graph window, use zero value to turn off either"},
2391 {"hexsamples", CmdHexsamples, 0, "<bytes> [<offset>] -- Dump big buffer as hex bytes"},
2392 {"hex2bin", Cmdhex2bin, 1, "hex2bin <hexadecimal> -- Converts hexadecimal to binary"},
2393 {"hide", CmdHide, 1, "Hide graph window"},
2394 {"hpf", CmdHpf, 1, "Remove DC offset from trace"},
2395 {"load", CmdLoad, 1, "<filename> -- Load trace (to graph window"},
2396 {"ltrim", CmdLtrim, 1, "<samples> -- Trim samples from left of trace"},
2397 {"rtrim", CmdRtrim, 1, "<location to end trace> -- Trim samples from right of trace"},
2398 {"manrawdecode", Cmdmandecoderaw, 1, "[invert] [maxErr] -- Manchester decode binary stream in DemodBuffer"},
2399 {"norm", CmdNorm, 1, "Normalize max/min to +/-128"},
2400 {"plot", CmdPlot, 1, "Show graph window (hit 'h' in window for keystroke help)"},
2401 {"printdemodbuffer",CmdPrintDemodBuff, 1, "[x] [o] <offset> [l] <length> -- print the data in the DemodBuffer - 'x' for hex output"},
2402 {"pskindalademod", CmdIndalaDecode, 1, "[clock] [invert<0|1>] -- Demodulate an indala tag (PSK1) from GraphBuffer (args optional)"},
2403 {"psknexwatchdemod",CmdPSKNexWatch, 1, "Demodulate a NexWatch tag (nexkey, quadrakey) (PSK1) from GraphBuffer"},
2404 {"rawdemod", CmdRawDemod, 1, "[modulation] ... <options> -see help (h option) -- Demodulate the data in the GraphBuffer and output binary"},
2405 {"samples", CmdSamples, 0, "[512 - 40000] -- Get raw samples for graph window (GraphBuffer)"},
2406 {"save", CmdSave, 1, "<filename> -- Save trace (from graph window)"},
2407 {"scale", CmdScale, 1, "<int> -- Set cursor display scale"},
2408 {"setdebugmode", CmdSetDebugMode, 1, "<0|1|2> -- Turn on or off Debugging Level for lf demods"},
2409 {"shiftgraphzero", CmdGraphShiftZero, 1, "<shift> -- Shift 0 for Graphed wave + or - shift value"},
2410 {"dirthreshold", CmdDirectionalThreshold, 1, "<thres up> <thres down> -- Max rising higher up-thres/ Min falling lower down-thres, keep rest as prev."},
2411 {"tune", CmdTuneSamples, 0, "Get hw tune samples for graph window"},
2412 {"undec", CmdUndec, 1, "Un-decimate samples by 2"},
2413 {"zerocrossings", CmdZerocrossings, 1, "Count time between zero-crossings"},
2414 {NULL, NULL, 0, NULL}
2415 };
2416
2417 int CmdData(const char *Cmd){
2418 clearCommandBuffer();
2419 CmdsParse(CommandTable, Cmd);
2420 return 0;
2421 }
2422
2423 int CmdHelp(const char *Cmd)
2424 {
2425 CmdsHelp(CommandTable);
2426 return 0;
2427 }
Impressum, Datenschutz