[proxmark3-svn] / client / cmdlfem4x.c

//-----------------------------------------------------------------------------
// Copyright (C) 2010 iZsh <izsh at fail0verflow.com>
//
// This code is licensed to you under the terms of the GNU GPL, version 2 or,
// at your option, any later version. See the LICENSE.txt file for the text of
// the license.
//-----------------------------------------------------------------------------
// Low frequency EM4x commands
//-----------------------------------------------------------------------------

#include <stdio.h>
#include <string.h>
#include <inttypes.h>
#include "proxusb.h"
#include "ui.h"
#include "graph.h"
#include "cmdparser.h"
#include "cmddata.h"
#include "cmdlf.h"
#include "cmdlfem4x.h"

static int CmdHelp(const char *Cmd);

/* Read the ID of an EM410x tag.
 * Format:
 *   1111 1111 1           <-- standard non-repeatable header
 *   XXXX [row parity bit] <-- 10 rows of 5 bits for our 40 bit tag ID
 *   ....
 *   CCCC                  <-- each bit here is parity for the 10 bits above in corresponding column
 *   0                     <-- stop bit, end of tag
 */
int CmdEM410xRead(const char *Cmd)
{
  int i, j, clock, header, rows, bit, hithigh, hitlow, first, bit2idx, high, low;
  int parity[4];
  char id[11];
  int retested = 0;
  uint8_t BitStream[MAX_GRAPH_TRACE_LEN];
  high = low = 0;

  /* Detect high and lows and clock */
  for (i = 0; i < GraphTraceLen; i++)
  {
    if (GraphBuffer[i] > high)
      high = GraphBuffer[i];
    else if (GraphBuffer[i] < low)
      low = GraphBuffer[i];
  }

  /* get clock */
  clock = GetClock(Cmd, high, 0);

  /* parity for our 4 columns */
  parity[0] = parity[1] = parity[2] = parity[3] = 0;
  header = rows = 0;

  /* manchester demodulate */
  bit = bit2idx = 0;
  for (i = 0; i < (int)(GraphTraceLen / clock); i++)
  {
    hithigh = 0;
    hitlow = 0;
    first = 1;

    /* Find out if we hit both high and low peaks */
    for (j = 0; j < clock; j++)
    {
      if (GraphBuffer[(i * clock) + j] == high)
        hithigh = 1;
      else if (GraphBuffer[(i * clock) + j] == low)
        hitlow = 1;

      /* it doesn't count if it's the first part of our read
       because it's really just trailing from the last sequence */
      if (first && (hithigh || hitlow))
        hithigh = hitlow = 0;
      else
        first = 0;

      if (hithigh && hitlow)
        break;
    }

    /* If we didn't hit both high and low peaks, we had a bit transition */
    if (!hithigh || !hitlow)
      bit ^= 1;

    BitStream[bit2idx++] = bit;
  }

retest:
  /* We go till 5 before the graph ends because we'll get that far below */
  for (i = 1; i < bit2idx - 5; i++)
  {
    /* Step 2: We have our header but need our tag ID */
    if (header == 9 && rows < 10)
    {
      /* Confirm parity is correct */
      if ((BitStream[i] ^ BitStream[i+1] ^ BitStream[i+2] ^ BitStream[i+3]) == BitStream[i+4])
      {
        /* Read another byte! */
        sprintf(id+rows, "%x", (8 * BitStream[i]) + (4 * BitStream[i+1]) + (2 * BitStream[i+2]) + (1 * BitStream[i+3]));
        rows++;

        /* Keep parity info */
        parity[0] ^= BitStream[i];
        parity[1] ^= BitStream[i+1];
        parity[2] ^= BitStream[i+2];
        parity[3] ^= BitStream[i+3];

        /* Move 4 bits ahead */
        i += 4;
      }

      /* Damn, something wrong! reset */
      else
      {
        PrintAndLog("Thought we had a valid tag but failed at word %d (i=%d)", rows + 1, i);

        /* Start back rows * 5 + 9 header bits, -1 to not start at same place */
        i -= 9 + (5 * rows) - 5;

        rows = header = 0;
      }
    }

    /* Step 3: Got our 40 bits! confirm column parity */
    else if (rows == 10)
    {
      /* We need to make sure our 4 bits of parity are correct and we have a stop bit */
      if (BitStream[i] == parity[0] && BitStream[i+1] == parity[1] &&
        BitStream[i+2] == parity[2] && BitStream[i+3] == parity[3] &&
        BitStream[i+4] == 0)
      {
        /* Sweet! */
        PrintAndLog("EM410x Tag ID: %s", id);

        /* Stop any loops */
        return 1;
      }

      /* Crap! Incorrect parity or no stop bit, start all over */
      else
      {
        rows = header = 0;

        /* Go back 59 bits (9 header bits + 10 rows at 4+1 parity) */
        i -= 59;
      }
    }

    /* Step 1: get our header */
    else if (header < 9)
    {
      /* Need 9 consecutive 1's */
      if (BitStream[i] == 1)
        header++;

      /* We don't have a header, not enough consecutive 1 bits */
      else
        header = 0;
    }
  }

  /* if we've already retested after flipping bits, return */
  if (retested++)
    return 0;

  /* if this didn't work, try flipping bits */
  for (i = 0; i < bit2idx; i++)
    BitStream[i] ^= 1;

  goto retest;
}

/* emulate an EM410X tag
 * Format:
 *   1111 1111 1           <-- standard non-repeatable header
 *   XXXX [row parity bit] <-- 10 rows of 5 bits for our 40 bit tag ID
 *   ....
 *   CCCC                  <-- each bit here is parity for the 10 bits above in corresponding column
 *   0                     <-- stop bit, end of tag
 */
int CmdEM410xSim(const char *Cmd)
{
  int i, n, j, h, binary[4], parity[4];

  /* clock is 64 in EM410x tags */
  int clock = 64;

  /* clear our graph */
  ClearGraph(0);

  /* write it out a few times */
  for (h = 0; h < 4; h++)
  {
    /* write 9 start bits */
    for (i = 0; i < 9; i++)
      AppendGraph(0, clock, 1);

    /* for each hex char */
    parity[0] = parity[1] = parity[2] = parity[3] = 0;
    for (i = 0; i < 10; i++)
    {
      /* read each hex char */
      sscanf(&Cmd[i], "%1x", &n);
      for (j = 3; j >= 0; j--, n/= 2)
        binary[j] = n % 2;

      /* append each bit */
      AppendGraph(0, clock, binary[0]);
      AppendGraph(0, clock, binary[1]);
      AppendGraph(0, clock, binary[2]);
      AppendGraph(0, clock, binary[3]);

      /* append parity bit */
      AppendGraph(0, clock, binary[0] ^ binary[1] ^ binary[2] ^ binary[3]);

      /* keep track of column parity */
      parity[0] ^= binary[0];
      parity[1] ^= binary[1];
      parity[2] ^= binary[2];
      parity[3] ^= binary[3];
    }

    /* parity columns */
    AppendGraph(0, clock, parity[0]);
    AppendGraph(0, clock, parity[1]);
    AppendGraph(0, clock, parity[2]);
    AppendGraph(0, clock, parity[3]);

    /* stop bit */
    AppendGraph(0, clock, 0);
  }

  /* modulate that biatch */
  CmdManchesterMod("");

  /* booyah! */
  RepaintGraphWindow();
  
  CmdLFSim("");
  return 0;
}

/* Function is equivalent of loread + losamples + em410xread
 * looped until an EM410x tag is detected */
int CmdEM410xWatch(const char *Cmd)
{
  do
  {
    CmdLFRead("");
    CmdSamples("2000");
  } while ( ! CmdEM410xRead(""));
  return 0;
}

/* Read the transmitted data of an EM4x50 tag
 * Format:
 *
 *  XXXXXXXX [row parity bit (even)] <- 8 bits plus parity
 *  XXXXXXXX [row parity bit (even)] <- 8 bits plus parity
 *  XXXXXXXX [row parity bit (even)] <- 8 bits plus parity
 *  XXXXXXXX [row parity bit (even)] <- 8 bits plus parity
 *  CCCCCCCC                         <- column parity bits
 *  0                                <- stop bit
 *  LW                               <- Listen Window
 *
 * This pattern repeats for every block of data being transmitted.
 * Transmission starts with two Listen Windows (LW - a modulated
 * pattern of 320 cycles each (32/32/128/64/64)).
 *
 * Note that this data may or may not be the UID. It is whatever data
 * is stored in the blocks defined in the control word First and Last
 * Word Read values. UID is stored in block 32.
 */
int CmdEM4x50Read(const char *Cmd)
{
  int i, j, startblock, skip, block, start, end, low, high;
  bool complete= false;
  int tmpbuff[MAX_GRAPH_TRACE_LEN / 64];
  char tmp[6];

  high= low= 0;
  memset(tmpbuff, 0, MAX_GRAPH_TRACE_LEN / 64);

  /* first get high and low values */
  for (i = 0; i < GraphTraceLen; i++)
  {
    if (GraphBuffer[i] > high)
      high = GraphBuffer[i];
    else if (GraphBuffer[i] < low)
      low = GraphBuffer[i];
  }

  /* populate a buffer with pulse lengths */
  i= 0;
  j= 0;
  while (i < GraphTraceLen)
  {
    // measure from low to low
    while ((GraphBuffer[i] > low) && (i<GraphTraceLen))
      ++i;
    start= i;
    while ((GraphBuffer[i] < high) && (i<GraphTraceLen))
      ++i;
    while ((GraphBuffer[i] > low) && (i<GraphTraceLen))
      ++i;
    if (j>(MAX_GRAPH_TRACE_LEN/64)) {
      break;
    }
    tmpbuff[j++]= i - start;
  }

  /* look for data start - should be 2 pairs of LW (pulses of 192,128) */
  start= -1;
  skip= 0;
  for (i= 0; i < j - 4 ; ++i)
  {
    skip += tmpbuff[i];
    if (tmpbuff[i] >= 190 && tmpbuff[i] <= 194)
      if (tmpbuff[i+1] >= 126 && tmpbuff[i+1] <= 130)
        if (tmpbuff[i+2] >= 190 && tmpbuff[i+2] <= 194)
          if (tmpbuff[i+3] >= 126 && tmpbuff[i+3] <= 130)
          {
            start= i + 3;
            break;
          }
  }
  startblock= i + 3;

  /* skip over the remainder of the LW */
  skip += tmpbuff[i+1]+tmpbuff[i+2];
  while (skip < MAX_GRAPH_TRACE_LEN && GraphBuffer[skip] > low)
    ++skip;
  skip += 8;

  /* now do it again to find the end */
  end= start;
  for (i += 3; i < j - 4 ; ++i)
  {
    end += tmpbuff[i];
    if (tmpbuff[i] >= 190 && tmpbuff[i] <= 194)
      if (tmpbuff[i+1] >= 126 && tmpbuff[i+1] <= 130)
        if (tmpbuff[i+2] >= 190 && tmpbuff[i+2] <= 194)
          if (tmpbuff[i+3] >= 126 && tmpbuff[i+3] <= 130)
          {
            complete= true;
            break;
          }
  }

  if (start >= 0)
    PrintAndLog("Found data at sample: %i",skip);
  else
  {
    PrintAndLog("No data found!");
    PrintAndLog("Try again with more samples.");
    return 0;
  }

  if (!complete)
  {
    PrintAndLog("*** Warning!");
    PrintAndLog("Partial data - no end found!");
    PrintAndLog("Try again with more samples.");
  }

  /* get rid of leading crap */
  sprintf(tmp,"%i",skip);
  CmdLtrim(tmp);

  /* now work through remaining buffer printing out data blocks */
  block= 0;
  i= startblock;
  while (block < 6)
  {
    PrintAndLog("Block %i:", block);
    // mandemod routine needs to be split so we can call it for data
    // just print for now for debugging
    CmdManchesterDemod("i 64");
    skip= 0;
    /* look for LW before start of next block */
    for ( ; i < j - 4 ; ++i)
    {
      skip += tmpbuff[i];
      if (tmpbuff[i] >= 190 && tmpbuff[i] <= 194)
        if (tmpbuff[i+1] >= 126 && tmpbuff[i+1] <= 130)
          break;
    }
    while (GraphBuffer[skip] > low)
      ++skip;
    skip += 8;
    sprintf(tmp,"%i",skip);
    CmdLtrim(tmp);
    start += skip;
    block++;
  }
  return 0;
}

int CmdEM410xWrite(const char *Cmd)
{
  uint64_t id = 0;
  unsigned int card;

  sscanf(Cmd, "%" PRIx64 " %d", &id, &card);

  if (id >= 0x10000000000) {
    PrintAndLog("Error! Given EM410x ID is longer than 40 bits.\n");
    return 0;
  }

  if (card > 1) {
    PrintAndLog("Error! Bad card type selected.\n");
    return 0;
  }

  PrintAndLog("Writing %s tag with UID 0x%010" PRIx64, card ? "T55x7":"T5555", id);
  UsbCommand c = {CMD_EM410X_WRITE_TAG, {card, (uint32_t)(id >> 32), (uint32_t)id}};
  SendCommand(&c);

  return 0;
}

static command_t CommandTable[] =
{
  {"help",        CmdHelp,        1, "This help"},
  {"em410xread",  CmdEM410xRead,  1, "[clock rate] -- Extract ID from EM410x tag"},
  {"em410xsim",   CmdEM410xSim,   0, "<UID> -- Simulate EM410x tag"},
  {"em410xwatch", CmdEM410xWatch, 0, "Watches for EM410x tags"},
  {"em410xwrite", CmdEM410xWrite, 1, "<UID> <'0' T5555> <'1' T55x7> -- Write EM410x UID to T5555(Q5) or T55x7 tag"},
  {"em4x50read",  CmdEM4x50Read,  1, "Extract data from EM4x50 tag"},
  {NULL, NULL, 0, NULL}
};

int CmdLFEM4X(const char *Cmd)
{
  CmdsParse(CommandTable, Cmd);
  return 0;
}

int CmdHelp(const char *Cmd)
{
  CmdsHelp(CommandTable);
  return 0;
}
Commit	Line	Data
a553f267	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	// Low frequency EM4x commands
	9	//-----------------------------------------------------------------------------
	10
7fe9b0b7	11	#include <stdio.h>
9e13f875	12	#include <string.h>
ec564290	13	#include <inttypes.h>
7fe9b0b7	14	#include "proxusb.h"
	15	#include "ui.h"
	16	#include "graph.h"
	17	#include "cmdparser.h"
	18	#include "cmddata.h"
	19	#include "cmdlf.h"
	20	#include "cmdlfem4x.h"
	21
	22	static int CmdHelp(const char *Cmd);
	23
	24	/* Read the ID of an EM410x tag.
	25	* Format:
	26	* 1111 1111 1 <-- standard non-repeatable header
	27	* XXXX [row parity bit] <-- 10 rows of 5 bits for our 40 bit tag ID
	28	* ....
	29	* CCCC <-- each bit here is parity for the 10 bits above in corresponding column
	30	* 0 <-- stop bit, end of tag
	31	*/
	32	int CmdEM410xRead(const char *Cmd)
	33	{
	34	int i, j, clock, header, rows, bit, hithigh, hitlow, first, bit2idx, high, low;
	35	int parity[4];
	36	char id[11];
	37	int retested = 0;
15cdabd4	38	uint8_t BitStream[MAX_GRAPH_TRACE_LEN];
7fe9b0b7	39	high = low = 0;
	40
	41	/* Detect high and lows and clock */
	42	for (i = 0; i < GraphTraceLen; i++)
	43	{
	44	if (GraphBuffer[i] > high)
	45	high = GraphBuffer[i];
	46	else if (GraphBuffer[i] < low)
	47	low = GraphBuffer[i];
	48	}
	49
	50	/* get clock */
	51	clock = GetClock(Cmd, high, 0);
	52
	53	/* parity for our 4 columns */
	54	parity[0] = parity[1] = parity[2] = parity[3] = 0;
	55	header = rows = 0;
	56
	57	/* manchester demodulate */
	58	bit = bit2idx = 0;
	59	for (i = 0; i < (int)(GraphTraceLen / clock); i++)
	60	{
	61	hithigh = 0;
	62	hitlow = 0;
	63	first = 1;
	64
	65	/* Find out if we hit both high and low peaks */
	66	for (j = 0; j < clock; j++)
	67	{
	68	if (GraphBuffer[(i * clock) + j] == high)
	69	hithigh = 1;
	70	else if (GraphBuffer[(i * clock) + j] == low)
	71	hitlow = 1;
	72
	73	/* it doesn't count if it's the first part of our read
	74	because it's really just trailing from the last sequence */
	75	if (first && (hithigh \|\| hitlow))
	76	hithigh = hitlow = 0;
	77	else
	78	first = 0;
	79
	80	if (hithigh && hitlow)
	81	break;
	82	}
	83
	84	/* If we didn't hit both high and low peaks, we had a bit transition */
	85	if (!hithigh \|\| !hitlow)
	86	bit ^= 1;
	87
	88	BitStream[bit2idx++] = bit;
	89	}
	90
	91	retest:
	92	/* We go till 5 before the graph ends because we'll get that far below */
	93	for (i = 1; i < bit2idx - 5; i++)
	94	{
	95	/* Step 2: We have our header but need our tag ID */
	96	if (header == 9 && rows < 10)
	97	{
	98	/* Confirm parity is correct */
	99	if ((BitStream[i] ^ BitStream[i+1] ^ BitStream[i+2] ^ BitStream[i+3]) == BitStream[i+4])
	100	{
	101	/* Read another byte! */
	102	sprintf(id+rows, "%x", (8 * BitStream[i]) + (4 * BitStream[i+1]) + (2 * BitStream[i+2]) + (1 * BitStream[i+3]));
103	rows++;
104
105	/* Keep parity info */
106	parity[0] ^= BitStream[i];
107	parity[1] ^= BitStream[i+1];
108	parity[2] ^= BitStream[i+2];
109	parity[3] ^= BitStream[i+3];
110
111	/* Move 4 bits ahead */
112	i += 4;
113	}
114
115	/* Damn, something wrong! reset */
116	else
117	{
118	PrintAndLog("Thought we had a valid tag but failed at word %d (i=%d)", rows + 1, i);
119
120	/* Start back rows * 5 + 9 header bits, -1 to not start at same place */
121	i -= 9 + (5 * rows) - 5;
122
123	rows = header = 0;
124	}
125	}
126
127	/* Step 3: Got our 40 bits! confirm column parity */
128	else if (rows == 10)
129	{
130	/* We need to make sure our 4 bits of parity are correct and we have a stop bit */
131	if (BitStream[i] == parity[0] && BitStream[i+1] == parity[1] &&
132	BitStream[i+2] == parity[2] && BitStream[i+3] == parity[3] &&
133	BitStream[i+4] == 0)
134	{
135	/* Sweet! */
136	PrintAndLog("EM410x Tag ID: %s", id);
137
138	/* Stop any loops */
139	return 1;
140	}
141
142	/* Crap! Incorrect parity or no stop bit, start all over */
143	else
144	{
145	rows = header = 0;
146
147	/* Go back 59 bits (9 header bits + 10 rows at 4+1 parity) */
148	i -= 59;
149	}
150	}
151
152	/* Step 1: get our header */
153	else if (header < 9)
154	{
155	/* Need 9 consecutive 1's */
156	if (BitStream[i] == 1)
157	header++;
158
159	/* We don't have a header, not enough consecutive 1 bits */
160	else
161	header = 0;
162	}
163	}
164
165	/* if we've already retested after flipping bits, return */
166	if (retested++)
167	return 0;
168
169	/* if this didn't work, try flipping bits */
170	for (i = 0; i < bit2idx; i++)
171	BitStream[i] ^= 1;
172
173	goto retest;
174	}
175
176	/* emulate an EM410X tag
177	* Format:
178	* 1111 1111 1 <-- standard non-repeatable header
179	* XXXX [row parity bit] <-- 10 rows of 5 bits for our 40 bit tag ID
180	* ....
181	* CCCC <-- each bit here is parity for the 10 bits above in corresponding column
182	* 0 <-- stop bit, end of tag
183	*/
184	int CmdEM410xSim(const char *Cmd)
185	{
186	int i, n, j, h, binary[4], parity[4];
187
188	/* clock is 64 in EM410x tags */
189	int clock = 64;
190
191	/* clear our graph */
192	ClearGraph(0);
193
194	/* write it out a few times */
195	for (h = 0; h < 4; h++)
196	{
197	/* write 9 start bits */
198	for (i = 0; i < 9; i++)
199	AppendGraph(0, clock, 1);
200
201	/* for each hex char */
202	parity[0] = parity[1] = parity[2] = parity[3] = 0;
203	for (i = 0; i < 10; i++)
204	{
205	/* read each hex char */
206	sscanf(&Cmd[i], "%1x", &n);
207	for (j = 3; j >= 0; j--, n/= 2)
208	binary[j] = n % 2;
209
210	/* append each bit */
211	AppendGraph(0, clock, binary[0]);
212	AppendGraph(0, clock, binary[1]);
213	AppendGraph(0, clock, binary[2]);
214	AppendGraph(0, clock, binary[3]);
215
216	/* append parity bit */
217	AppendGraph(0, clock, binary[0] ^ binary[1] ^ binary[2] ^ binary[3]);
218
219	/* keep track of column parity */
220	parity[0] ^= binary[0];
221	parity[1] ^= binary[1];
222	parity[2] ^= binary[2];
223	parity[3] ^= binary[3];
224	}
225
226	/* parity columns */
227	AppendGraph(0, clock, parity[0]);
228	AppendGraph(0, clock, parity[1]);
229	AppendGraph(0, clock, parity[2]);
230	AppendGraph(0, clock, parity[3]);
231
232	/* stop bit */
233	AppendGraph(0, clock, 0);
234	}
235
236	/* modulate that biatch */
237	CmdManchesterMod("");
238
239	/* booyah! */
240	RepaintGraphWindow();
241
242	CmdLFSim("");
243	return 0;
244	}
245
246	/* Function is equivalent of loread + losamples + em410xread
247	* looped until an EM410x tag is detected */
248	int CmdEM410xWatch(const char *Cmd)
249	{
7fe9b0b7	250	do
7fe9b0b7	251	{
ab2fd3d6	252	CmdLFRead("");
	253	CmdSamples("2000");
	254	} while ( ! CmdEM410xRead(""));
7fe9b0b7	255	return 0;
	256	}
	257
	258	/* Read the transmitted data of an EM4x50 tag
	259	* Format:
	260	*
	261	* XXXXXXXX [row parity bit (even)] <- 8 bits plus parity
	262	* XXXXXXXX [row parity bit (even)] <- 8 bits plus parity
	263	* XXXXXXXX [row parity bit (even)] <- 8 bits plus parity
	264	* XXXXXXXX [row parity bit (even)] <- 8 bits plus parity
	265	* CCCCCCCC <- column parity bits
	266	* 0 <- stop bit
	267	* LW <- Listen Window
	268	*
	269	* This pattern repeats for every block of data being transmitted.
	270	* Transmission starts with two Listen Windows (LW - a modulated
	271	* pattern of 320 cycles each (32/32/128/64/64)).
	272	*
	273	* Note that this data may or may not be the UID. It is whatever data
	274	* is stored in the blocks defined in the control word First and Last
	275	* Word Read values. UID is stored in block 32.
	276	*/
	277	int CmdEM4x50Read(const char *Cmd)
	278	{
31b6e9af	279	int i, j, startblock, skip, block, start, end, low, high;
7fe9b0b7	280	bool complete= false;
	281	int tmpbuff[MAX_GRAPH_TRACE_LEN / 64];
	282	char tmp[6];
	283
	284	high= low= 0;
913d23c6	285	memset(tmpbuff, 0, MAX_GRAPH_TRACE_LEN / 64);
7fe9b0b7	286
	287	/* first get high and low values */
	288	for (i = 0; i < GraphTraceLen; i++)
	289	{
	290	if (GraphBuffer[i] > high)
	291	high = GraphBuffer[i];
	292	else if (GraphBuffer[i] < low)
	293	low = GraphBuffer[i];
	294	}
	295
	296	/* populate a buffer with pulse lengths */
	297	i= 0;
	298	j= 0;
	299	while (i < GraphTraceLen)
	300	{
	301	// measure from low to low
	302	while ((GraphBuffer[i] > low) && (i<GraphTraceLen))
	303	++i;
	304	start= i;
	305	while ((GraphBuffer[i] < high) && (i<GraphTraceLen))
	306	++i;
	307	while ((GraphBuffer[i] > low) && (i<GraphTraceLen))
	308	++i;
	309	if (j>(MAX_GRAPH_TRACE_LEN/64)) {
	310	break;
	311	}
	312	tmpbuff[j++]= i - start;
	313	}
	314
	315	/* look for data start - should be 2 pairs of LW (pulses of 192,128) */
	316	start= -1;
	317	skip= 0;
	318	for (i= 0; i < j - 4 ; ++i)
	319	{
	320	skip += tmpbuff[i];
	321	if (tmpbuff[i] >= 190 && tmpbuff[i] <= 194)
	322	if (tmpbuff[i+1] >= 126 && tmpbuff[i+1] <= 130)
	323	if (tmpbuff[i+2] >= 190 && tmpbuff[i+2] <= 194)
	324	if (tmpbuff[i+3] >= 126 && tmpbuff[i+3] <= 130)
	325	{
	326	start= i + 3;
	327	break;
	328	}
	329	}
	330	startblock= i + 3;
	331
	332	/* skip over the remainder of the LW */
	333	skip += tmpbuff[i+1]+tmpbuff[i+2];
	334	while (skip < MAX_GRAPH_TRACE_LEN && GraphBuffer[skip] > low)
	335	++skip;
	336	skip += 8;
	337
	338	/* now do it again to find the end */
	339	end= start;
	340	for (i += 3; i < j - 4 ; ++i)
	341	{
	342	end += tmpbuff[i];
	343	if (tmpbuff[i] >= 190 && tmpbuff[i] <= 194)
	344	if (tmpbuff[i+1] >= 126 && tmpbuff[i+1] <= 130)
	345	if (tmpbuff[i+2] >= 190 && tmpbuff[i+2] <= 194)
	346	if (tmpbuff[i+3] >= 126 && tmpbuff[i+3] <= 130)
	347	{
	348	complete= true;
	349	break;
350	}
351	}
352
353	if (start >= 0)
354	PrintAndLog("Found data at sample: %i",skip);
355	else
356	{
357	PrintAndLog("No data found!");
358	PrintAndLog("Try again with more samples.");
359	return 0;
360	}
361
362	if (!complete)
363	{
364	PrintAndLog("*** Warning!");
365	PrintAndLog("Partial data - no end found!");
366	PrintAndLog("Try again with more samples.");
367	}
368
369	/* get rid of leading crap */
370	sprintf(tmp,"%i",skip);
371	CmdLtrim(tmp);
372
373	/* now work through remaining buffer printing out data blocks */
374	block= 0;
375	i= startblock;
376	while (block < 6)
377	{
378	PrintAndLog("Block %i:", block);
379	// mandemod routine needs to be split so we can call it for data
380	// just print for now for debugging
381	CmdManchesterDemod("i 64");
382	skip= 0;
383	/* look for LW before start of next block */
384	for ( ; i < j - 4 ; ++i)
385	{
386	skip += tmpbuff[i];
387	if (tmpbuff[i] >= 190 && tmpbuff[i] <= 194)
388	if (tmpbuff[i+1] >= 126 && tmpbuff[i+1] <= 130)
389	break;
390	}
391	while (GraphBuffer[skip] > low)
392	++skip;
393	skip += 8;
394	sprintf(tmp,"%i",skip);
395	CmdLtrim(tmp);
396	start += skip;
397	block++;
398	}
399	return 0;
400	}
401
2d4eae76	402	int CmdEM410xWrite(const char *Cmd)
	403	{
	404	uint64_t id = 0;
	405	unsigned int card;
	406
ec564290	407	sscanf(Cmd, "%" PRIx64 " %d", &id, &card);
2d4eae76	408
	409	if (id >= 0x10000000000) {
	410	PrintAndLog("Error! Given EM410x ID is longer than 40 bits.\n");
	411	return 0;
	412	}
	413
	414	if (card > 1) {
	415	PrintAndLog("Error! Bad card type selected.\n");
	416	return 0;
	417	}
	418
ec564290	419	PrintAndLog("Writing %s tag with UID 0x%010" PRIx64, card ? "T55x7":"T5555", id);
2d4eae76	420	UsbCommand c = {CMD_EM410X_WRITE_TAG, {card, (uint32_t)(id >> 32), (uint32_t)id}};
	421	SendCommand(&c);
	422
	423	return 0;
	424	}
	425
	426	static command_t CommandTable[] =
7fe9b0b7	427	{
	428	{"help", CmdHelp, 1, "This help"},
	429	{"em410xread", CmdEM410xRead, 1, "[clock rate] -- Extract ID from EM410x tag"},
	430	{"em410xsim", CmdEM410xSim, 0, "<UID> -- Simulate EM410x tag"},
	431	{"em410xwatch", CmdEM410xWatch, 0, "Watches for EM410x tags"},
2d4eae76	432	{"em410xwrite", CmdEM410xWrite, 1, "<UID> <'0' T5555> <'1' T55x7> -- Write EM410x UID to T5555(Q5) or T55x7 tag"},
7fe9b0b7	433	{"em4x50read", CmdEM4x50Read, 1, "Extract data from EM4x50 tag"},
	434	{NULL, NULL, 0, NULL}
	435	};
	436
	437	int CmdLFEM4X(const char *Cmd)
	438	{
	439	CmdsParse(CommandTable, Cmd);
	440	return 0;
	441	}
	442
	443	int CmdHelp(const char *Cmd)
	444	{
	445	CmdsHelp(CommandTable);
	446	return 0;
	447	}