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