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