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