2009-07-05 00:45:17 +08:00
|
|
|
//-----------------------------------------------------------------------------
|
|
|
|
// The main application code. This is the first thing called after start.c
|
|
|
|
// executes.
|
|
|
|
// Jonathan Westhues, Mar 2006
|
|
|
|
// Edits by Gerhard de Koning Gans, Sep 2007 (##)
|
|
|
|
//-----------------------------------------------------------------------------
|
|
|
|
|
|
|
|
#include <proxmark3.h>
|
2009-07-08 01:19:42 +08:00
|
|
|
#include <stdlib.h>
|
2009-07-05 00:45:17 +08:00
|
|
|
#include "apps.h"
|
|
|
|
#ifdef WITH_LCD
|
|
|
|
#include "fonts.h"
|
|
|
|
#include "LCD.h"
|
|
|
|
#endif
|
|
|
|
|
|
|
|
//=============================================================================
|
|
|
|
// A buffer where we can queue things up to be sent through the FPGA, for
|
|
|
|
// any purpose (fake tag, as reader, whatever). We go MSB first, since that
|
|
|
|
// is the order in which they go out on the wire.
|
|
|
|
//=============================================================================
|
|
|
|
|
|
|
|
BYTE ToSend[256];
|
|
|
|
int ToSendMax;
|
|
|
|
static int ToSendBit;
|
2009-09-01 22:44:38 +08:00
|
|
|
struct common_area common_area __attribute__((section(".commonarea")));
|
2009-07-05 00:45:17 +08:00
|
|
|
|
2009-07-03 18:17:52 +08:00
|
|
|
void BufferClear(void)
|
|
|
|
{
|
|
|
|
memset(BigBuf,0,sizeof(BigBuf));
|
|
|
|
DbpString("Buffer cleared");
|
|
|
|
}
|
|
|
|
|
2009-07-05 00:45:17 +08:00
|
|
|
void ToSendReset(void)
|
|
|
|
{
|
|
|
|
ToSendMax = -1;
|
|
|
|
ToSendBit = 8;
|
|
|
|
}
|
|
|
|
|
|
|
|
void ToSendStuffBit(int b)
|
|
|
|
{
|
|
|
|
if(ToSendBit >= 8) {
|
|
|
|
ToSendMax++;
|
|
|
|
ToSend[ToSendMax] = 0;
|
|
|
|
ToSendBit = 0;
|
|
|
|
}
|
|
|
|
|
|
|
|
if(b) {
|
|
|
|
ToSend[ToSendMax] |= (1 << (7 - ToSendBit));
|
|
|
|
}
|
|
|
|
|
|
|
|
ToSendBit++;
|
|
|
|
|
|
|
|
if(ToSendBit >= sizeof(ToSend)) {
|
|
|
|
ToSendBit = 0;
|
|
|
|
DbpString("ToSendStuffBit overflowed!");
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
//=============================================================================
|
|
|
|
// Debug print functions, to go out over USB, to the usual PC-side client.
|
|
|
|
//=============================================================================
|
|
|
|
|
|
|
|
void DbpString(char *str)
|
|
|
|
{
|
2009-07-13 12:54:37 +08:00
|
|
|
/* this holds up stuff unless we're connected to usb */
|
2009-08-08 15:42:51 +08:00
|
|
|
if (!UsbConnected())
|
|
|
|
return;
|
2009-07-19 12:37:07 +08:00
|
|
|
|
2009-07-05 00:45:17 +08:00
|
|
|
UsbCommand c;
|
|
|
|
c.cmd = CMD_DEBUG_PRINT_STRING;
|
|
|
|
c.ext1 = strlen(str);
|
|
|
|
memcpy(c.d.asBytes, str, c.ext1);
|
|
|
|
|
|
|
|
UsbSendPacket((BYTE *)&c, sizeof(c));
|
|
|
|
// TODO fix USB so stupid things like this aren't req'd
|
|
|
|
SpinDelay(50);
|
|
|
|
}
|
|
|
|
|
|
|
|
void DbpIntegers(int x1, int x2, int x3)
|
|
|
|
{
|
2009-07-13 12:54:37 +08:00
|
|
|
/* this holds up stuff unless we're connected to usb */
|
2009-08-08 15:42:51 +08:00
|
|
|
if (!UsbConnected())
|
|
|
|
return;
|
2009-07-13 12:54:37 +08:00
|
|
|
|
2009-07-05 00:45:17 +08:00
|
|
|
UsbCommand c;
|
|
|
|
c.cmd = CMD_DEBUG_PRINT_INTEGERS;
|
|
|
|
c.ext1 = x1;
|
|
|
|
c.ext2 = x2;
|
|
|
|
c.ext3 = x3;
|
|
|
|
|
|
|
|
UsbSendPacket((BYTE *)&c, sizeof(c));
|
|
|
|
// XXX
|
|
|
|
SpinDelay(50);
|
|
|
|
}
|
|
|
|
|
|
|
|
//-----------------------------------------------------------------------------
|
|
|
|
// Read an ADC channel and block till it completes, then return the result
|
|
|
|
// in ADC units (0 to 1023). Also a routine to average 32 samples and
|
|
|
|
// return that.
|
|
|
|
//-----------------------------------------------------------------------------
|
|
|
|
static int ReadAdc(int ch)
|
|
|
|
{
|
|
|
|
DWORD d;
|
|
|
|
|
|
|
|
ADC_CONTROL = ADC_CONTROL_RESET;
|
|
|
|
ADC_MODE = ADC_MODE_PRESCALE(32) | ADC_MODE_STARTUP_TIME(16) |
|
|
|
|
ADC_MODE_SAMPLE_HOLD_TIME(8);
|
|
|
|
ADC_CHANNEL_ENABLE = ADC_CHANNEL(ch);
|
|
|
|
|
|
|
|
ADC_CONTROL = ADC_CONTROL_START;
|
|
|
|
while(!(ADC_STATUS & ADC_END_OF_CONVERSION(ch)))
|
|
|
|
;
|
|
|
|
d = ADC_CHANNEL_DATA(ch);
|
|
|
|
|
|
|
|
return d;
|
|
|
|
}
|
|
|
|
|
|
|
|
static int AvgAdc(int ch)
|
|
|
|
{
|
|
|
|
int i;
|
|
|
|
int a = 0;
|
|
|
|
|
|
|
|
for(i = 0; i < 32; i++) {
|
|
|
|
a += ReadAdc(ch);
|
|
|
|
}
|
|
|
|
|
|
|
|
return (a + 15) >> 5;
|
|
|
|
}
|
2009-04-15 16:09:06 +08:00
|
|
|
|
2009-07-13 19:20:29 +08:00
|
|
|
void MeasureAntennaTuning(void)
|
2009-07-05 00:45:17 +08:00
|
|
|
{
|
|
|
|
BYTE *dest = (BYTE *)BigBuf;
|
2009-07-13 19:20:29 +08:00
|
|
|
int i, ptr = 0, adcval = 0, peak = 0, peakv = 0, peakf = 0;;
|
|
|
|
int vLf125 = 0, vLf134 = 0, vHf = 0; // in mV
|
|
|
|
|
|
|
|
UsbCommand c;
|
2009-07-05 00:45:17 +08:00
|
|
|
|
2009-07-13 19:20:29 +08:00
|
|
|
DbpString("Measuring antenna characteristics, please wait.");
|
2009-07-05 00:45:17 +08:00
|
|
|
memset(BigBuf,0,sizeof(BigBuf));
|
|
|
|
|
2009-07-13 19:20:29 +08:00
|
|
|
/*
|
|
|
|
* Sweeps the useful LF range of the proxmark from
|
|
|
|
* 46.8kHz (divisor=255) to 600kHz (divisor=19) and
|
|
|
|
* read the voltage in the antenna, the result left
|
|
|
|
* in the buffer is a graph which should clearly show
|
|
|
|
* the resonating frequency of your LF antenna
|
|
|
|
* ( hopefully around 95 if it is tuned to 125kHz!)
|
|
|
|
*/
|
2009-07-05 00:45:17 +08:00
|
|
|
FpgaWriteConfWord(FPGA_MAJOR_MODE_LF_READER);
|
|
|
|
for (i=255; i>19; i--) {
|
|
|
|
FpgaSendCommand(FPGA_CMD_SET_DIVISOR, i);
|
|
|
|
SpinDelay(20);
|
2009-07-13 19:20:29 +08:00
|
|
|
// Vref = 3.3V, and a 10000:240 voltage divider on the input
|
|
|
|
// can measure voltages up to 137500 mV
|
|
|
|
adcval = ((137500 * AvgAdc(ADC_CHAN_LF)) >> 10);
|
|
|
|
if (i==95) vLf125 = adcval; // voltage at 125Khz
|
|
|
|
if (i==89) vLf134 = adcval; // voltage at 134Khz
|
|
|
|
|
|
|
|
dest[i] = adcval>>8; // scale int to fit in byte for graphing purposes
|
2009-07-08 10:15:22 +08:00
|
|
|
if(dest[i] > peak) {
|
2009-07-13 19:20:29 +08:00
|
|
|
peakv = adcval;
|
|
|
|
peak = dest[i];
|
|
|
|
peakf = i;
|
|
|
|
ptr = i;
|
2009-07-08 10:15:22 +08:00
|
|
|
}
|
2009-07-13 19:20:29 +08:00
|
|
|
}
|
2009-07-05 00:45:17 +08:00
|
|
|
|
|
|
|
// Let the FPGA drive the high-frequency antenna around 13.56 MHz.
|
|
|
|
FpgaWriteConfWord(FPGA_MAJOR_MODE_HF_READER_RX_XCORR);
|
|
|
|
SpinDelay(20);
|
|
|
|
// Vref = 3300mV, and an 10:1 voltage divider on the input
|
|
|
|
// can measure voltages up to 33000 mV
|
2009-07-13 19:20:29 +08:00
|
|
|
vHf = (33000 * AvgAdc(ADC_CHAN_HF)) >> 10;
|
2009-07-05 00:45:17 +08:00
|
|
|
|
|
|
|
c.cmd = CMD_MEASURED_ANTENNA_TUNING;
|
|
|
|
c.ext1 = (vLf125 << 0) | (vLf134 << 16);
|
|
|
|
c.ext2 = vHf;
|
2009-07-19 12:37:07 +08:00
|
|
|
c.ext3 = peakf | (peakv << 16);
|
2009-07-05 00:45:17 +08:00
|
|
|
UsbSendPacket((BYTE *)&c, sizeof(c));
|
|
|
|
}
|
|
|
|
|
2009-07-25 19:47:43 +08:00
|
|
|
void SimulateTagHfListen(void)
|
2009-07-05 00:45:17 +08:00
|
|
|
{
|
2009-07-25 19:47:43 +08:00
|
|
|
BYTE *dest = (BYTE *)BigBuf;
|
|
|
|
int n = sizeof(BigBuf);
|
|
|
|
BYTE v = 0;
|
2009-07-05 00:45:17 +08:00
|
|
|
int i;
|
2009-07-25 19:47:43 +08:00
|
|
|
int p = 0;
|
2009-07-05 00:45:17 +08:00
|
|
|
|
2009-07-25 19:47:43 +08:00
|
|
|
// We're using this mode just so that I can test it out; the simulated
|
|
|
|
// tag mode would work just as well and be simpler.
|
|
|
|
FpgaWriteConfWord(FPGA_MAJOR_MODE_HF_READER_RX_XCORR | FPGA_HF_READER_RX_XCORR_848_KHZ | FPGA_HF_READER_RX_XCORR_SNOOP);
|
2009-07-05 00:45:17 +08:00
|
|
|
|
2009-07-25 19:47:43 +08:00
|
|
|
// We need to listen to the high-frequency, peak-detected path.
|
|
|
|
SetAdcMuxFor(GPIO_MUXSEL_HIPKD);
|
2009-07-05 00:45:17 +08:00
|
|
|
|
2009-07-25 19:47:43 +08:00
|
|
|
FpgaSetupSsc();
|
2009-07-05 00:45:17 +08:00
|
|
|
|
|
|
|
i = 0;
|
|
|
|
for(;;) {
|
2009-07-25 19:47:43 +08:00
|
|
|
if(SSC_STATUS & (SSC_STATUS_TX_READY)) {
|
|
|
|
SSC_TRANSMIT_HOLDING = 0xff;
|
2009-07-05 00:45:17 +08:00
|
|
|
}
|
2009-07-25 19:47:43 +08:00
|
|
|
if(SSC_STATUS & (SSC_STATUS_RX_READY)) {
|
|
|
|
BYTE r = (BYTE)SSC_RECEIVE_HOLDING;
|
2009-07-05 00:45:17 +08:00
|
|
|
|
2009-07-25 19:47:43 +08:00
|
|
|
v <<= 1;
|
|
|
|
if(r & 1) {
|
|
|
|
v |= 1;
|
|
|
|
}
|
|
|
|
p++;
|
2009-07-19 12:37:07 +08:00
|
|
|
|
2009-07-25 19:47:43 +08:00
|
|
|
if(p >= 8) {
|
|
|
|
dest[i] = v;
|
|
|
|
v = 0;
|
|
|
|
p = 0;
|
|
|
|
i++;
|
2009-07-05 00:45:17 +08:00
|
|
|
|
2009-07-25 19:47:43 +08:00
|
|
|
if(i >= n) {
|
|
|
|
break;
|
|
|
|
}
|
2009-07-05 00:45:17 +08:00
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
2009-07-25 19:47:43 +08:00
|
|
|
DbpString("simulate tag (now type bitsamples)");
|
2009-07-05 00:45:17 +08:00
|
|
|
}
|
|
|
|
|
2009-07-25 19:47:43 +08:00
|
|
|
void ReadMem(int addr)
|
|
|
|
{
|
|
|
|
const DWORD *data = ((DWORD *)addr);
|
|
|
|
int i;
|
2009-07-05 00:45:17 +08:00
|
|
|
|
2009-07-25 19:47:43 +08:00
|
|
|
DbpString("Reading memory at address");
|
|
|
|
DbpIntegers(0, 0, addr);
|
|
|
|
for (i = 0; i < 8; i+= 2)
|
|
|
|
DbpIntegers(0, data[i], data[i+1]);
|
2009-07-05 00:45:17 +08:00
|
|
|
}
|
|
|
|
|
2009-08-28 14:40:44 +08:00
|
|
|
/* osimage version information is linked in */
|
|
|
|
extern struct version_information version_information;
|
2009-08-29 14:14:28 +08:00
|
|
|
/* bootrom version information is pointed to from _bootphase1_version_pointer */
|
|
|
|
extern char _bootphase1_version_pointer, _flash_start, _flash_end;
|
2009-08-28 08:37:28 +08:00
|
|
|
void SendVersion(void)
|
|
|
|
{
|
|
|
|
char temp[48]; /* Limited data payload in USB packets */
|
|
|
|
DbpString("Prox/RFID mark3 RFID instrument");
|
2009-08-28 14:40:44 +08:00
|
|
|
|
2009-08-29 14:14:28 +08:00
|
|
|
/* Try to find the bootrom version information. Expect to find a pointer at
|
|
|
|
* symbol _bootphase1_version_pointer, perform slight sanity checks on the
|
|
|
|
* pointer, then use it.
|
2009-08-28 14:40:44 +08:00
|
|
|
*/
|
2009-08-29 14:14:28 +08:00
|
|
|
void *bootrom_version = *(void**)&_bootphase1_version_pointer;
|
|
|
|
if( bootrom_version < (void*)&_flash_start || bootrom_version >= (void*)&_flash_end ) {
|
2009-08-28 14:40:44 +08:00
|
|
|
DbpString("bootrom version information appears invalid");
|
|
|
|
} else {
|
|
|
|
FormatVersionInformation(temp, sizeof(temp), "bootrom: ", bootrom_version);
|
|
|
|
DbpString(temp);
|
|
|
|
}
|
|
|
|
|
|
|
|
FormatVersionInformation(temp, sizeof(temp), "os: ", &version_information);
|
|
|
|
DbpString(temp);
|
|
|
|
|
2009-08-28 08:37:28 +08:00
|
|
|
FpgaGatherVersion(temp, sizeof(temp));
|
|
|
|
DbpString(temp);
|
|
|
|
}
|
|
|
|
|
2009-07-25 19:47:43 +08:00
|
|
|
// samy's sniff and repeat routine
|
|
|
|
void SamyRun()
|
2009-07-05 00:45:17 +08:00
|
|
|
{
|
2009-07-25 19:47:43 +08:00
|
|
|
DbpString("Stand-alone mode! No PC necessary.");
|
2009-07-05 00:45:17 +08:00
|
|
|
|
2009-07-25 19:47:43 +08:00
|
|
|
// 3 possible options? no just 2 for now
|
|
|
|
#define OPTS 2
|
2009-07-05 00:45:17 +08:00
|
|
|
|
2009-07-25 19:47:43 +08:00
|
|
|
int high[OPTS], low[OPTS];
|
2009-07-19 12:37:07 +08:00
|
|
|
|
2009-07-25 19:47:43 +08:00
|
|
|
// Oooh pretty -- notify user we're in elite samy mode now
|
|
|
|
LED(LED_RED, 200);
|
|
|
|
LED(LED_ORANGE, 200);
|
|
|
|
LED(LED_GREEN, 200);
|
|
|
|
LED(LED_ORANGE, 200);
|
|
|
|
LED(LED_RED, 200);
|
|
|
|
LED(LED_ORANGE, 200);
|
|
|
|
LED(LED_GREEN, 200);
|
|
|
|
LED(LED_ORANGE, 200);
|
|
|
|
LED(LED_RED, 200);
|
2009-07-05 00:45:17 +08:00
|
|
|
|
2009-07-25 19:47:43 +08:00
|
|
|
int selected = 0;
|
|
|
|
int playing = 0;
|
2009-07-05 00:45:17 +08:00
|
|
|
|
2009-07-25 19:47:43 +08:00
|
|
|
// Turn on selected LED
|
|
|
|
LED(selected + 1, 0);
|
2009-07-05 00:45:17 +08:00
|
|
|
|
2009-07-25 19:47:43 +08:00
|
|
|
for (;;)
|
|
|
|
{
|
2009-08-08 15:42:51 +08:00
|
|
|
UsbPoll(FALSE);
|
2009-07-25 19:47:43 +08:00
|
|
|
WDT_HIT();
|
2009-07-05 00:45:17 +08:00
|
|
|
|
2009-07-25 19:47:43 +08:00
|
|
|
// Was our button held down or pressed?
|
|
|
|
int button_pressed = BUTTON_HELD(1000);
|
|
|
|
SpinDelay(300);
|
2009-07-05 00:45:17 +08:00
|
|
|
|
2009-07-25 19:47:43 +08:00
|
|
|
// Button was held for a second, begin recording
|
|
|
|
if (button_pressed > 0)
|
|
|
|
{
|
|
|
|
LEDsoff();
|
|
|
|
LED(selected + 1, 0);
|
|
|
|
LED(LED_RED2, 0);
|
2009-07-05 00:45:17 +08:00
|
|
|
|
2009-07-25 19:47:43 +08:00
|
|
|
// record
|
|
|
|
DbpString("Starting recording");
|
2009-07-05 00:45:17 +08:00
|
|
|
|
2009-07-25 19:47:43 +08:00
|
|
|
// wait for button to be released
|
|
|
|
while(BUTTON_PRESS())
|
|
|
|
WDT_HIT();
|
2009-07-05 00:45:17 +08:00
|
|
|
|
2009-07-25 19:47:43 +08:00
|
|
|
/* need this delay to prevent catching some weird data */
|
|
|
|
SpinDelay(500);
|
2009-07-05 00:45:17 +08:00
|
|
|
|
2009-07-25 19:47:43 +08:00
|
|
|
CmdHIDdemodFSK(1, &high[selected], &low[selected], 0);
|
|
|
|
DbpString("Recorded");
|
|
|
|
DbpIntegers(selected, high[selected], low[selected]);
|
2009-07-05 00:45:17 +08:00
|
|
|
|
2009-07-25 19:47:43 +08:00
|
|
|
LEDsoff();
|
|
|
|
LED(selected + 1, 0);
|
|
|
|
// Finished recording
|
2009-07-05 00:45:17 +08:00
|
|
|
|
2009-07-25 19:47:43 +08:00
|
|
|
// If we were previously playing, set playing off
|
|
|
|
// so next button push begins playing what we recorded
|
|
|
|
playing = 0;
|
2009-07-05 00:45:17 +08:00
|
|
|
}
|
|
|
|
|
2009-07-25 19:47:43 +08:00
|
|
|
// Change where to record (or begin playing)
|
|
|
|
else if (button_pressed)
|
|
|
|
{
|
|
|
|
// Next option if we were previously playing
|
|
|
|
if (playing)
|
|
|
|
selected = (selected + 1) % OPTS;
|
|
|
|
playing = !playing;
|
2009-07-05 00:45:17 +08:00
|
|
|
|
2009-07-25 19:47:43 +08:00
|
|
|
LEDsoff();
|
|
|
|
LED(selected + 1, 0);
|
|
|
|
|
|
|
|
// Begin transmitting
|
|
|
|
if (playing)
|
2009-07-05 00:45:17 +08:00
|
|
|
{
|
2009-07-25 19:47:43 +08:00
|
|
|
LED(LED_GREEN, 0);
|
|
|
|
DbpString("Playing");
|
|
|
|
// wait for button to be released
|
|
|
|
while(BUTTON_PRESS())
|
|
|
|
WDT_HIT();
|
|
|
|
DbpIntegers(selected, high[selected], low[selected]);
|
|
|
|
CmdHIDsimTAG(high[selected], low[selected], 0);
|
|
|
|
DbpString("Done playing");
|
|
|
|
if (BUTTON_HELD(1000) > 0)
|
2009-07-13 12:54:37 +08:00
|
|
|
{
|
2009-07-25 19:47:43 +08:00
|
|
|
DbpString("Exiting");
|
|
|
|
LEDsoff();
|
|
|
|
return;
|
2009-07-13 12:54:37 +08:00
|
|
|
}
|
2009-07-25 19:47:43 +08:00
|
|
|
|
|
|
|
/* We pressed a button so ignore it here with a delay */
|
|
|
|
SpinDelay(300);
|
|
|
|
|
|
|
|
// when done, we're done playing, move to next option
|
|
|
|
selected = (selected + 1) % OPTS;
|
|
|
|
playing = !playing;
|
|
|
|
LEDsoff();
|
|
|
|
LED(selected + 1, 0);
|
2009-07-05 00:45:17 +08:00
|
|
|
}
|
2009-07-25 19:47:43 +08:00
|
|
|
else
|
|
|
|
while(BUTTON_PRESS())
|
|
|
|
WDT_HIT();
|
2009-07-05 00:45:17 +08:00
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2009-07-25 19:47:43 +08:00
|
|
|
|
|
|
|
/*
|
|
|
|
OBJECTIVE
|
|
|
|
Listen and detect an external reader. Determine the best location
|
|
|
|
for the antenna.
|
|
|
|
|
|
|
|
INSTRUCTIONS:
|
|
|
|
Inside the ListenReaderField() function, there is two mode.
|
|
|
|
By default, when you call the function, you will enter mode 1.
|
|
|
|
If you press the PM3 button one time, you will enter mode 2.
|
|
|
|
If you press the PM3 button a second time, you will exit the function.
|
|
|
|
|
|
|
|
DESCRIPTION OF MODE 1:
|
|
|
|
This mode just listens for an external reader field and lights up green
|
|
|
|
for HF and/or red for LF. This is the original mode of the detectreader
|
|
|
|
function.
|
|
|
|
|
|
|
|
DESCRIPTION OF MODE 2:
|
|
|
|
This mode will visually represent, using the LEDs, the actual strength of the
|
|
|
|
current compared to the maximum current detected. Basically, once you know
|
|
|
|
what kind of external reader is present, it will help you spot the best location to place
|
|
|
|
your antenna. You will probably not get some good results if there is a LF and a HF reader
|
|
|
|
at the same place! :-)
|
|
|
|
|
|
|
|
LIGHT SCHEME USED:
|
|
|
|
*/
|
2009-08-20 07:35:35 +08:00
|
|
|
static const char LIGHT_SCHEME[] = {
|
|
|
|
0x0, /* ---- | No field detected */
|
|
|
|
0x1, /* X--- | 14% of maximum current detected */
|
|
|
|
0x2, /* -X-- | 29% of maximum current detected */
|
|
|
|
0x4, /* --X- | 43% of maximum current detected */
|
|
|
|
0x8, /* ---X | 57% of maximum current detected */
|
|
|
|
0xC, /* --XX | 71% of maximum current detected */
|
|
|
|
0xE, /* -XXX | 86% of maximum current detected */
|
|
|
|
0xF, /* XXXX | 100% of maximum current detected */
|
|
|
|
};
|
|
|
|
static const int LIGHT_LEN = sizeof(LIGHT_SCHEME)/sizeof(LIGHT_SCHEME[0]);
|
|
|
|
|
2009-07-25 19:47:43 +08:00
|
|
|
void ListenReaderField(int limit)
|
2009-07-05 00:45:17 +08:00
|
|
|
{
|
2009-08-20 07:35:35 +08:00
|
|
|
int lf_av, lf_av_new, lf_baseline= 0, lf_count= 0, lf_max;
|
2009-07-25 19:47:43 +08:00
|
|
|
int hf_av, hf_av_new, hf_baseline= 0, hf_count= 0, hf_max;
|
2009-08-20 07:35:35 +08:00
|
|
|
int mode=1, display_val, display_max, i;
|
2009-07-05 00:45:17 +08:00
|
|
|
|
2009-07-25 19:47:43 +08:00
|
|
|
#define LF_ONLY 1
|
|
|
|
#define HF_ONLY 2
|
2009-07-05 00:45:17 +08:00
|
|
|
|
2009-08-20 07:35:35 +08:00
|
|
|
LEDsoff();
|
2009-07-05 00:45:17 +08:00
|
|
|
|
2009-08-20 07:35:35 +08:00
|
|
|
lf_av=lf_max=ReadAdc(ADC_CHAN_LF);
|
2009-07-05 00:45:17 +08:00
|
|
|
|
2009-08-20 07:35:35 +08:00
|
|
|
if(limit != HF_ONLY) {
|
2009-07-25 19:47:43 +08:00
|
|
|
DbpString("LF 125/134 Baseline:");
|
|
|
|
DbpIntegers(lf_av,0,0);
|
|
|
|
lf_baseline= lf_av;
|
2009-08-20 07:35:35 +08:00
|
|
|
}
|
2009-07-05 00:45:17 +08:00
|
|
|
|
2009-07-25 19:47:43 +08:00
|
|
|
hf_av=hf_max=ReadAdc(ADC_CHAN_HF);
|
2009-07-05 00:45:17 +08:00
|
|
|
|
2009-08-20 07:35:35 +08:00
|
|
|
if (limit != LF_ONLY) {
|
2009-07-25 19:47:43 +08:00
|
|
|
DbpString("HF 13.56 Baseline:");
|
|
|
|
DbpIntegers(hf_av,0,0);
|
|
|
|
hf_baseline= hf_av;
|
2009-08-20 07:35:35 +08:00
|
|
|
}
|
2009-07-05 00:45:17 +08:00
|
|
|
|
2009-08-20 07:35:35 +08:00
|
|
|
for(;;) {
|
2009-07-25 19:47:43 +08:00
|
|
|
if (BUTTON_PRESS()) {
|
|
|
|
SpinDelay(500);
|
|
|
|
switch (mode) {
|
|
|
|
case 1:
|
|
|
|
mode=2;
|
|
|
|
DbpString("Signal Strength Mode");
|
2009-07-05 00:45:17 +08:00
|
|
|
break;
|
2009-07-25 19:47:43 +08:00
|
|
|
case 2:
|
|
|
|
default:
|
|
|
|
DbpString("Stopped");
|
2009-08-20 07:35:35 +08:00
|
|
|
LEDsoff();
|
2009-07-25 19:47:43 +08:00
|
|
|
return;
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
WDT_HIT();
|
|
|
|
|
2009-08-20 07:35:35 +08:00
|
|
|
if (limit != HF_ONLY) {
|
|
|
|
if(mode==1) {
|
|
|
|
if (abs(lf_av - lf_baseline) > 10) LED_D_ON();
|
|
|
|
else LED_D_OFF();
|
|
|
|
}
|
|
|
|
|
2009-07-25 19:47:43 +08:00
|
|
|
++lf_count;
|
|
|
|
lf_av_new= ReadAdc(ADC_CHAN_LF);
|
|
|
|
// see if there's a significant change
|
2009-08-20 07:35:35 +08:00
|
|
|
if(abs(lf_av - lf_av_new) > 10) {
|
2009-07-25 19:47:43 +08:00
|
|
|
DbpString("LF 125/134 Field Change:");
|
|
|
|
DbpIntegers(lf_av,lf_av_new,lf_count);
|
|
|
|
lf_av= lf_av_new;
|
2009-08-20 07:35:35 +08:00
|
|
|
if (lf_av > lf_max)
|
|
|
|
lf_max = lf_av;
|
2009-07-25 19:47:43 +08:00
|
|
|
lf_count= 0;
|
|
|
|
}
|
2009-08-20 07:35:35 +08:00
|
|
|
}
|
2009-07-25 19:47:43 +08:00
|
|
|
|
2009-08-20 07:35:35 +08:00
|
|
|
if (limit != LF_ONLY) {
|
|
|
|
if (mode == 1){
|
|
|
|
if (abs(hf_av - hf_baseline) > 10) LED_B_ON();
|
|
|
|
else LED_B_OFF();
|
2009-07-25 19:47:43 +08:00
|
|
|
}
|
2009-08-20 07:35:35 +08:00
|
|
|
|
2009-07-25 19:47:43 +08:00
|
|
|
++hf_count;
|
|
|
|
hf_av_new= ReadAdc(ADC_CHAN_HF);
|
|
|
|
// see if there's a significant change
|
2009-08-20 07:35:35 +08:00
|
|
|
if(abs(hf_av - hf_av_new) > 10) {
|
2009-07-25 19:47:43 +08:00
|
|
|
DbpString("HF 13.56 Field Change:");
|
|
|
|
DbpIntegers(hf_av,hf_av_new,hf_count);
|
|
|
|
hf_av= hf_av_new;
|
|
|
|
if (hf_av > hf_max)
|
|
|
|
hf_max = hf_av;
|
|
|
|
hf_count= 0;
|
2009-08-20 07:35:35 +08:00
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
if(mode == 2) {
|
|
|
|
if (limit == LF_ONLY) {
|
|
|
|
display_val = lf_av;
|
|
|
|
display_max = lf_max;
|
|
|
|
} else if (limit == HF_ONLY) {
|
|
|
|
display_val = hf_av;
|
|
|
|
display_max = hf_max;
|
|
|
|
} else { /* Pick one at random */
|
|
|
|
if( (hf_max - hf_baseline) > (lf_max - lf_baseline) ) {
|
|
|
|
display_val = hf_av;
|
|
|
|
display_max = hf_max;
|
|
|
|
} else {
|
|
|
|
display_val = lf_av;
|
|
|
|
display_max = lf_max;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
for (i=0; i<LIGHT_LEN; i++) {
|
|
|
|
if (display_val >= ((display_max/LIGHT_LEN)*i) && display_val <= ((display_max/LIGHT_LEN)*(i+1))) {
|
|
|
|
if (LIGHT_SCHEME[i] & 0x1) LED_C_ON(); else LED_C_OFF();
|
|
|
|
if (LIGHT_SCHEME[i] & 0x2) LED_A_ON(); else LED_A_OFF();
|
|
|
|
if (LIGHT_SCHEME[i] & 0x4) LED_B_ON(); else LED_B_OFF();
|
|
|
|
if (LIGHT_SCHEME[i] & 0x8) LED_D_ON(); else LED_D_OFF();
|
|
|
|
break;
|
2009-07-05 00:45:17 +08:00
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
2009-08-20 07:35:35 +08:00
|
|
|
}
|
2009-07-05 00:45:17 +08:00
|
|
|
}
|
|
|
|
|
|
|
|
void UsbPacketReceived(BYTE *packet, int len)
|
|
|
|
{
|
|
|
|
UsbCommand *c = (UsbCommand *)packet;
|
|
|
|
|
|
|
|
switch(c->cmd) {
|
|
|
|
case CMD_ACQUIRE_RAW_ADC_SAMPLES_125K:
|
|
|
|
AcquireRawAdcSamples125k(c->ext1);
|
|
|
|
break;
|
|
|
|
|
|
|
|
case CMD_MOD_THEN_ACQUIRE_RAW_ADC_SAMPLES_125K:
|
|
|
|
ModThenAcquireRawAdcSamples125k(c->ext1,c->ext2,c->ext3,c->d.asBytes);
|
|
|
|
break;
|
|
|
|
|
|
|
|
case CMD_ACQUIRE_RAW_ADC_SAMPLES_ISO_15693:
|
|
|
|
AcquireRawAdcSamplesIso15693();
|
|
|
|
break;
|
2009-07-03 18:17:52 +08:00
|
|
|
|
|
|
|
case CMD_BUFF_CLEAR:
|
|
|
|
BufferClear();
|
|
|
|
break;
|
2009-07-05 00:45:17 +08:00
|
|
|
|
|
|
|
case CMD_READER_ISO_15693:
|
|
|
|
ReaderIso15693(c->ext1);
|
|
|
|
break;
|
|
|
|
|
|
|
|
case CMD_SIMTAG_ISO_15693:
|
|
|
|
SimTagIso15693(c->ext1);
|
|
|
|
break;
|
|
|
|
|
|
|
|
case CMD_ACQUIRE_RAW_ADC_SAMPLES_ISO_14443:
|
|
|
|
AcquireRawAdcSamplesIso14443(c->ext1);
|
|
|
|
break;
|
2009-04-16 16:37:24 +08:00
|
|
|
|
|
|
|
case CMD_READ_SRI512_TAG:
|
|
|
|
ReadSRI512Iso14443(c->ext1);
|
|
|
|
break;
|
2009-07-05 00:45:17 +08:00
|
|
|
|
|
|
|
case CMD_READER_ISO_14443a:
|
|
|
|
ReaderIso14443a(c->ext1);
|
|
|
|
break;
|
|
|
|
|
|
|
|
case CMD_SNOOP_ISO_14443:
|
|
|
|
SnoopIso14443();
|
|
|
|
break;
|
|
|
|
|
|
|
|
case CMD_SNOOP_ISO_14443a:
|
|
|
|
SnoopIso14443a();
|
|
|
|
break;
|
|
|
|
|
|
|
|
case CMD_SIMULATE_TAG_HF_LISTEN:
|
|
|
|
SimulateTagHfListen();
|
|
|
|
break;
|
|
|
|
|
|
|
|
case CMD_SIMULATE_TAG_ISO_14443:
|
|
|
|
SimulateIso14443Tag();
|
|
|
|
break;
|
|
|
|
|
|
|
|
case CMD_SIMULATE_TAG_ISO_14443a:
|
|
|
|
SimulateIso14443aTag(c->ext1, c->ext2); // ## Simulate iso14443a tag - pass tag type & UID
|
|
|
|
break;
|
|
|
|
|
|
|
|
case CMD_MEASURE_ANTENNA_TUNING:
|
|
|
|
MeasureAntennaTuning();
|
|
|
|
break;
|
|
|
|
|
2009-07-08 01:19:42 +08:00
|
|
|
case CMD_LISTEN_READER_FIELD:
|
|
|
|
ListenReaderField(c->ext1);
|
|
|
|
break;
|
|
|
|
|
2009-07-05 00:45:17 +08:00
|
|
|
case CMD_HID_DEMOD_FSK:
|
2009-07-13 12:54:37 +08:00
|
|
|
CmdHIDdemodFSK(0, 0, 0, 1); // Demodulate HID tag
|
2009-07-05 00:45:17 +08:00
|
|
|
break;
|
|
|
|
|
|
|
|
case CMD_HID_SIM_TAG:
|
2009-07-13 12:54:37 +08:00
|
|
|
CmdHIDsimTAG(c->ext1, c->ext2, 1); // Simulate HID tag by ID
|
2009-07-05 00:45:17 +08:00
|
|
|
break;
|
|
|
|
|
|
|
|
case CMD_FPGA_MAJOR_MODE_OFF: // ## FPGA Control
|
|
|
|
FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF);
|
|
|
|
SpinDelay(200);
|
|
|
|
LED_D_OFF(); // LED D indicates field ON or OFF
|
|
|
|
break;
|
|
|
|
|
2009-07-25 19:47:43 +08:00
|
|
|
case CMD_READ_TI_TYPE:
|
|
|
|
ReadTItag();
|
|
|
|
break;
|
|
|
|
|
|
|
|
case CMD_WRITE_TI_TYPE:
|
|
|
|
WriteTItag(c->ext1,c->ext2,c->ext3);
|
|
|
|
break;
|
|
|
|
|
2009-08-06 20:53:06 +08:00
|
|
|
case CMD_DOWNLOAD_RAW_ADC_SAMPLES_125K: {
|
2009-07-05 00:45:17 +08:00
|
|
|
UsbCommand n;
|
|
|
|
if(c->cmd == CMD_DOWNLOAD_RAW_ADC_SAMPLES_125K) {
|
|
|
|
n.cmd = CMD_DOWNLOADED_RAW_ADC_SAMPLES_125K;
|
|
|
|
} else {
|
|
|
|
n.cmd = CMD_DOWNLOADED_RAW_BITS_TI_TYPE;
|
|
|
|
}
|
|
|
|
n.ext1 = c->ext1;
|
|
|
|
memcpy(n.d.asDwords, BigBuf+c->ext1, 12*sizeof(DWORD));
|
|
|
|
UsbSendPacket((BYTE *)&n, sizeof(n));
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
case CMD_DOWNLOADED_SIM_SAMPLES_125K: {
|
|
|
|
BYTE *b = (BYTE *)BigBuf;
|
|
|
|
memcpy(b+c->ext1, c->d.asBytes, 48);
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
case CMD_SIMULATE_TAG_125K:
|
|
|
|
LED_A_ON();
|
2009-07-13 12:54:37 +08:00
|
|
|
SimulateTagLowFrequency(c->ext1, 1);
|
2009-07-05 00:45:17 +08:00
|
|
|
LED_A_OFF();
|
|
|
|
break;
|
2009-07-13 16:22:24 +08:00
|
|
|
case CMD_READ_MEM:
|
|
|
|
ReadMem(c->ext1);
|
|
|
|
break;
|
2009-07-05 00:45:17 +08:00
|
|
|
case CMD_SET_LF_DIVISOR:
|
|
|
|
FpgaSendCommand(FPGA_CMD_SET_DIVISOR, c->ext1);
|
|
|
|
break;
|
2009-08-28 08:37:28 +08:00
|
|
|
case CMD_VERSION:
|
|
|
|
SendVersion();
|
|
|
|
break;
|
2009-08-29 05:56:43 +08:00
|
|
|
case CMD_LF_SIMULATE_BIDIR:
|
|
|
|
SimulateTagLowFrequencyBidir(c->ext1, c->ext2);
|
|
|
|
break;
|
2009-07-05 00:45:17 +08:00
|
|
|
#ifdef WITH_LCD
|
2009-08-06 20:53:06 +08:00
|
|
|
case CMD_LCD_RESET:
|
|
|
|
LCDReset();
|
|
|
|
break;
|
2009-07-05 00:45:17 +08:00
|
|
|
case CMD_LCD:
|
|
|
|
LCDSend(c->ext1);
|
|
|
|
break;
|
|
|
|
#endif
|
2009-07-25 19:47:43 +08:00
|
|
|
case CMD_SETUP_WRITE:
|
2009-07-05 00:45:17 +08:00
|
|
|
case CMD_FINISH_WRITE:
|
|
|
|
case CMD_HARDWARE_RESET:
|
|
|
|
USB_D_PLUS_PULLUP_OFF();
|
|
|
|
SpinDelay(1000);
|
|
|
|
SpinDelay(1000);
|
|
|
|
RSTC_CONTROL = RST_CONTROL_KEY | RST_CONTROL_PROCESSOR_RESET;
|
|
|
|
for(;;) {
|
|
|
|
// We're going to reset, and the bootrom will take control.
|
|
|
|
}
|
|
|
|
break;
|
2009-09-01 22:44:38 +08:00
|
|
|
case CMD_START_FLASH:
|
|
|
|
if(common_area.flags.bootrom_present) {
|
|
|
|
common_area.command = COMMON_AREA_COMMAND_ENTER_FLASH_MODE;
|
|
|
|
}
|
|
|
|
USB_D_PLUS_PULLUP_OFF();
|
|
|
|
RSTC_CONTROL = RST_CONTROL_KEY | RST_CONTROL_PROCESSOR_RESET;
|
|
|
|
for(;;);
|
|
|
|
break;
|
|
|
|
|
|
|
|
case CMD_DEVICE_INFO: {
|
|
|
|
UsbCommand c;
|
|
|
|
c.cmd = CMD_DEVICE_INFO;
|
|
|
|
c.ext1 = DEVICE_INFO_FLAG_OSIMAGE_PRESENT | DEVICE_INFO_FLAG_CURRENT_MODE_OS;
|
|
|
|
if(common_area.flags.bootrom_present) c.ext1 |= DEVICE_INFO_FLAG_BOOTROM_PRESENT;
|
|
|
|
UsbSendPacket((BYTE*)&c, sizeof(c));
|
|
|
|
}
|
|
|
|
break;
|
2009-07-05 00:45:17 +08:00
|
|
|
default:
|
|
|
|
DbpString("unknown command");
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
void AppMain(void)
|
|
|
|
{
|
|
|
|
memset(BigBuf,0,sizeof(BigBuf));
|
|
|
|
SpinDelay(100);
|
2009-09-01 22:44:38 +08:00
|
|
|
|
|
|
|
if(common_area.magic != COMMON_AREA_MAGIC || common_area.version != 1) {
|
|
|
|
/* Initialize common area */
|
|
|
|
memset(&common_area, 0, sizeof(common_area));
|
|
|
|
common_area.magic = COMMON_AREA_MAGIC;
|
|
|
|
common_area.version = 1;
|
|
|
|
}
|
|
|
|
common_area.flags.osimage_present = 1;
|
2009-07-05 00:45:17 +08:00
|
|
|
|
2009-07-13 20:14:50 +08:00
|
|
|
LED_D_OFF();
|
|
|
|
LED_C_OFF();
|
|
|
|
LED_B_OFF();
|
|
|
|
LED_A_OFF();
|
2009-07-05 00:45:17 +08:00
|
|
|
|
|
|
|
UsbStart();
|
|
|
|
|
|
|
|
// The FPGA gets its clock from us from PCK0 output, so set that up.
|
|
|
|
PIO_PERIPHERAL_B_SEL = (1 << GPIO_PCK0);
|
|
|
|
PIO_DISABLE = (1 << GPIO_PCK0);
|
|
|
|
PMC_SYS_CLK_ENABLE = PMC_SYS_CLK_PROGRAMMABLE_CLK_0;
|
|
|
|
// PCK0 is PLL clock / 4 = 96Mhz / 4 = 24Mhz
|
|
|
|
PMC_PROGRAMMABLE_CLK_0 = PMC_CLK_SELECTION_PLL_CLOCK |
|
|
|
|
PMC_CLK_PRESCALE_DIV_4;
|
|
|
|
PIO_OUTPUT_ENABLE = (1 << GPIO_PCK0);
|
|
|
|
|
|
|
|
// Reset SPI
|
|
|
|
SPI_CONTROL = SPI_CONTROL_RESET;
|
|
|
|
// Reset SSC
|
|
|
|
SSC_CONTROL = SSC_CONTROL_RESET;
|
|
|
|
|
|
|
|
// Load the FPGA image, which we have stored in our flash.
|
|
|
|
FpgaDownloadAndGo();
|
|
|
|
|
|
|
|
#ifdef WITH_LCD
|
|
|
|
|
|
|
|
LCDInit();
|
|
|
|
|
|
|
|
// test text on different colored backgrounds
|
2009-07-13 20:14:50 +08:00
|
|
|
LCDString(" The quick brown fox ", &FONT6x8,1,1+8*0,WHITE ,BLACK );
|
|
|
|
LCDString(" jumped over the ", &FONT6x8,1,1+8*1,BLACK ,WHITE );
|
|
|
|
LCDString(" lazy dog. ", &FONT6x8,1,1+8*2,YELLOW ,RED );
|
|
|
|
LCDString(" AaBbCcDdEeFfGgHhIiJj ", &FONT6x8,1,1+8*3,RED ,GREEN );
|
|
|
|
LCDString(" KkLlMmNnOoPpQqRrSsTt ", &FONT6x8,1,1+8*4,MAGENTA,BLUE );
|
|
|
|
LCDString("UuVvWwXxYyZz0123456789", &FONT6x8,1,1+8*5,BLUE ,YELLOW);
|
|
|
|
LCDString("`-=[]_;',./~!@#$%^&*()", &FONT6x8,1,1+8*6,BLACK ,CYAN );
|
|
|
|
LCDString(" _+{}|:\\\"<>? ",&FONT6x8,1,1+8*7,BLUE ,MAGENTA);
|
2009-07-05 00:45:17 +08:00
|
|
|
|
|
|
|
// color bands
|
|
|
|
LCDFill(0, 1+8* 8, 132, 8, BLACK);
|
|
|
|
LCDFill(0, 1+8* 9, 132, 8, WHITE);
|
|
|
|
LCDFill(0, 1+8*10, 132, 8, RED);
|
|
|
|
LCDFill(0, 1+8*11, 132, 8, GREEN);
|
|
|
|
LCDFill(0, 1+8*12, 132, 8, BLUE);
|
|
|
|
LCDFill(0, 1+8*13, 132, 8, YELLOW);
|
|
|
|
LCDFill(0, 1+8*14, 132, 8, CYAN);
|
|
|
|
LCDFill(0, 1+8*15, 132, 8, MAGENTA);
|
|
|
|
|
|
|
|
#endif
|
|
|
|
|
|
|
|
for(;;) {
|
2009-08-08 15:42:51 +08:00
|
|
|
UsbPoll(FALSE);
|
2009-07-05 00:45:17 +08:00
|
|
|
WDT_HIT();
|
|
|
|
|
2009-07-13 12:54:37 +08:00
|
|
|
if (BUTTON_HELD(1000) > 0)
|
|
|
|
SamyRun();
|
2009-07-05 00:45:17 +08:00
|
|
|
}
|
|
|
|
}
|