1 //-----------------------------------------------------------------------------
 
   3 // Jonathan Westhues, April 2006
 
   4 //-----------------------------------------------------------------------------
 
   6 module hi_read_rx_xcorr(
 
   7     pck0, ck_1356meg, ck_1356megb,
 
   8     pwr_lo, pwr_hi, pwr_oe1, pwr_oe2, pwr_oe3, pwr_oe4,
 
  10     ssp_frame, ssp_din, ssp_dout, ssp_clk,
 
  15     input pck0, ck_1356meg, ck_1356megb;
 
  16     output pwr_lo, pwr_hi, pwr_oe1, pwr_oe2, pwr_oe3, pwr_oe4;
 
  20     output ssp_frame, ssp_din, ssp_clk;
 
  21     input cross_hi, cross_lo;
 
  23     input xcorr_is_848, snoop;
 
  25 // Carrier is steady on through this, unless we're snooping.
 
  26 assign pwr_hi = ck_1356megb & (~snoop);
 
  27 assign pwr_oe1 = 1'b0;
 
  28 assign pwr_oe3 = 1'b0;
 
  29 assign pwr_oe4 = 1'b0;
 
  33 always @(negedge ck_1356megb)
 
  34     fc_divider <= fc_divider + 1;
 
  35 wire fc_div2 = fc_divider[0];
 
  40                 adc_clk <= ck_1356megb;
 
  44 // When we're a reader, we just need to do the BPSK demod; but when we're an
 
  45 // eavesdropper, we also need to pick out the commands sent by the reader,
 
  46 // using AM. Do this the same way that we do it for the simulated tag.
 
  47 reg after_hysteresis, after_hysteresis_prev, after_hysteresis_prev_prev;
 
  48 reg [11:0] has_been_low_for;
 
  49 always @(negedge adc_clk)
 
  51     if(& adc_d[7:0]) after_hysteresis <= 1'b1;
 
  52     else if(~(| adc_d[7:0])) after_hysteresis <= 1'b0;
 
  56         has_been_low_for <= 7'b0;
 
  60         if(has_been_low_for == 12'd4095)
 
  62             has_been_low_for <= 12'd0;
 
  63             after_hysteresis <= 1'b1;
 
  66             has_been_low_for <= has_been_low_for + 1;
 
  70 // Let us report a correlation every 4 subcarrier cycles, or 4*16 samples,
 
  71 // so we need a 6-bit counter.
 
  73 // And a couple of registers in which to accumulate the correlations.
 
  74 // we would add at most 32 times adc_d, the result can be held in 13 bits. 
 
  75 // Need one additional bit because it can be negative as well
 
  76 reg signed [13:0] corr_i_accum;
 
  77 reg signed [13:0] corr_q_accum;
 
  78 reg signed [7:0] corr_i_out;
 
  79 reg signed [7:0] corr_q_out;
 
  80 // clock and frame signal for communication to ARM
 
  85 always @(negedge adc_clk)
 
  87                 corr_i_cnt <= corr_i_cnt + 1;
 
  91 // ADC data appears on the rising edge, so sample it on the falling edge
 
  92 always @(negedge adc_clk)
 
  94     // These are the correlators: we correlate against in-phase and quadrature
 
  95     // versions of our reference signal, and keep the (signed) result to
 
  96     // send out later over the SSP.
 
  97     if(corr_i_cnt == 6'd0)
 
 101                         // Send only 7 most significant bits of tag signal (signed), LSB is reader signal:
 
 102             corr_i_out <= {corr_i_accum[13:7], after_hysteresis_prev_prev};
 
 103             corr_q_out <= {corr_q_accum[13:7], after_hysteresis_prev};
 
 104                         after_hysteresis_prev_prev <= after_hysteresis;
 
 108             // 8 most significant bits of tag signal
 
 109             corr_i_out <= corr_i_accum[13:6];
 
 110             corr_q_out <= corr_q_accum[13:6];
 
 113         corr_i_accum <= adc_d;
 
 114         corr_q_accum <= adc_d;
 
 119             corr_i_accum <= corr_i_accum - adc_d;
 
 121             corr_i_accum <= corr_i_accum + adc_d;
 
 123         if(corr_i_cnt[3] == corr_i_cnt[2])                      // phase shifted by pi/2
 
 124             corr_q_accum <= corr_q_accum + adc_d;
 
 126             corr_q_accum <= corr_q_accum - adc_d;
 
 130     // The logic in hi_simulate.v reports 4 samples per bit. We report two
 
 131     // (I, Q) pairs per bit, so we should do 2 samples per pair.
 
 132     if(corr_i_cnt == 6'd32)
 
 133         after_hysteresis_prev <= after_hysteresis;
 
 135     // Then the result from last time is serialized and send out to the ARM.
 
 136     // We get one report each cycle, and each report is 16 bits, so the
 
 137     // ssp_clk should be the adc_clk divided by 64/16 = 4.
 
 139     if(corr_i_cnt[1:0] == 2'b10)
 
 142     if(corr_i_cnt[1:0] == 2'b00)
 
 145         // Don't shift if we just loaded new data, obviously.
 
 146         if(corr_i_cnt != 6'd0)
 
 148             corr_i_out[7:0] <= {corr_i_out[6:0], corr_q_out[7]};
 
 149             corr_q_out[7:1] <= corr_q_out[6:0];
 
 153         // set ssp_frame signal for corr_i_cnt = 0..3 and corr_i_cnt = 32..35
 
 154         // (send two frames with 8 Bits each)
 
 155     if(corr_i_cnt[5:2] == 4'b0000 || corr_i_cnt[5:2] == 4'b1000)
 
 162 assign ssp_din = corr_i_out[7];
 
 164 assign dbg = corr_i_cnt[3];
 
 167 assign pwr_lo = 1'b0;
 
 168 assign pwr_oe2 = 1'b0;