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