/*
|
/*
|
Author: Sebastien Riou (acapola)
|
Author: Sebastien Riou (acapola)
|
Creation date: 22:22:43 01/10/2011
|
Creation date: 22:22:43 01/10/2011
|
|
|
$LastChangedDate: 2011-02-10 16:40:57 +0100 (Thu, 10 Feb 2011) $
|
$LastChangedDate: 2011-02-13 16:20:10 +0100 (Sun, 13 Feb 2011) $
|
$LastChangedBy: acapola $
|
$LastChangedBy: acapola $
|
$LastChangedRevision: 14 $
|
$LastChangedRevision: 15 $
|
$HeadURL: file:///svn/iso7816_3_master/iso7816_3_master/trunk/test/DummyCard.v $
|
$HeadURL: file:///svn/iso7816_3_master/iso7816_3_master/trunk/test/DummyCard.v $
|
|
|
This file is under the BSD licence:
|
This file is under the BSD licence:
|
Copyright (c) 2011, Sebastien Riou
|
Copyright (c) 2011, Sebastien Riou
|
|
|
All rights reserved.
|
All rights reserved.
|
|
|
Redistribution and use in source and binary forms, with or without modification, are permitted provided that the following conditions are met:
|
Redistribution and use in source and binary forms, with or without modification, are permitted provided that the following conditions are met:
|
|
|
Redistributions of source code must retain the above copyright notice, this list of conditions and the following disclaimer.
|
Redistributions of source code must retain the above copyright notice, this list of conditions and the following disclaimer.
|
Redistributions in binary form must reproduce the above copyright notice, this list of conditions and the following disclaimer in the documentation and/or other materials provided with the distribution.
|
Redistributions in binary form must reproduce the above copyright notice, this list of conditions and the following disclaimer in the documentation and/or other materials provided with the distribution.
|
The names of contributors may not be used to endorse or promote products derived from this software without specific prior written permission.
|
The names of contributors may not be used to endorse or promote products derived from this software without specific prior written permission.
|
THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
|
THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
|
"AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
|
"AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
|
LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
|
LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
|
A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR
|
A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR
|
CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
|
CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
|
EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
|
EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
|
PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
|
PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
|
PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
|
PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
|
LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
|
LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
|
NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
|
NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
|
SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
|
SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
|
*/
|
*/
|
`default_nettype none
|
`default_nettype none
|
|
|
module DummyCard(
|
module DummyCard(
|
input wire isoReset,
|
input wire isoReset,
|
input wire isoClk,
|
input wire isoClk,
|
input wire isoVdd,
|
input wire isoVdd,
|
inout wire isoSio
|
inout wire isoSio
|
);
|
);
|
|
|
// Inputs
|
// Inputs
|
wire [0:0] clkPerCycle=0;
|
wire [0:0] clkPerCycle=0;
|
reg [7:0] dataIn;
|
reg [7:0] dataIn;
|
reg nWeDataIn;
|
reg nWeDataIn;
|
reg nCsDataOut;
|
reg nCsDataOut;
|
reg nCsStatusOut;
|
reg nCsStatusOut;
|
|
|
// Outputs
|
// Outputs
|
wire [7:0] dataOut;
|
wire [7:0] uart_dataOut;
|
wire [7:0] statusOut;
|
wire [7:0] statusOut;
|
wire serialOut;
|
wire serialOut;
|
reg [12:0] cyclesPerEtu;
|
reg [12:0] cyclesPerEtu;
|
|
|
wire cardIsoClk;//card use its own generated clock (like true UARTs)
|
wire cardIsoClk;//card use its own generated clock (like true UARTs)
|
|
|
|
reg useIndirectConventionConfig;//can be changed by commands
|
|
reg useIndirectConvention;
|
|
|
|
wire stopBit2=1'b1;//0: 1 stop bit, 1: 2 stop bits
|
|
wire msbFirst = useIndirectConvention;//if 1, bits order is: startBit, b7, b6, b5...b0, parity
|
|
wire oddParity = 1'b0;//if 1, parity bit is such that data+parity have an odd number of 1
|
|
wire sioHighValue = ~useIndirectConvention;//apply only to data bits
|
|
|
|
wire [7:0] uart_dataIn = sioHighValue ? dataIn : ~dataIn;
|
|
wire [7:0] dataOut = sioHighValue ? uart_dataOut : ~uart_dataOut;
|
|
|
HalfDuplexUartIf uartIf (
|
HalfDuplexUartIf uartIf (
|
.nReset(isoReset),
|
.nReset(isoReset),
|
.clk(isoClk),
|
.clk(isoClk),
|
.clkPerCycle(clkPerCycle),
|
.clkPerCycle(clkPerCycle),
|
.dataIn(dataIn),
|
.dataIn(uart_dataIn),
|
.nWeDataIn(nWeDataIn),
|
.nWeDataIn(nWeDataIn),
|
.clocksPerBit(cyclesPerEtu),
|
.clocksPerBit(cyclesPerEtu),
|
.dataOut(dataOut),
|
.stopBit2(stopBit2),
|
|
.oddParity(oddParity),
|
|
.msbFirst(msbFirst),
|
|
.dataOut(uart_dataOut),
|
.nCsDataOut(nCsDataOut),
|
.nCsDataOut(nCsDataOut),
|
.statusOut(statusOut),
|
.statusOut(statusOut),
|
.nCsStatusOut(nCsStatusOut),
|
.nCsStatusOut(nCsStatusOut),
|
.serialIn(isoSio),
|
.serialIn(isoSio),
|
.serialOut(serialOut),
|
.serialOut(serialOut),
|
.comClk(cardIsoClk)
|
.comClk(cardIsoClk)
|
);
|
);
|
|
|
reg sendAtr;
|
reg sendAtr;
|
reg [8:0] tsCnt;//counter to start ATR 400 cycles after reset release
|
reg [8:0] tsCnt;//counter to start ATR 400 cycles after reset release
|
|
|
reg [7:0] buffer[256+5:0];
|
reg [7:0] buffer[256+5:0];
|
localparam CLA_I= 8*4;
|
localparam CLA_I= 8*4;
|
localparam INS_I= 8*3;
|
localparam INS_I= 8*3;
|
localparam P1_I = 8*2;
|
localparam P1_I = 8*2;
|
localparam P2_I = 8*1;
|
localparam P2_I = 8*1;
|
localparam P3_I = 0;
|
localparam P3_I = 0;
|
reg [CLA_I+7:0] tpduHeader;
|
reg [CLA_I+7:0] tpduHeader;
|
|
|
wire COM_statusOut=statusOut;
|
wire COM_statusOut=statusOut;
|
wire COM_clk=isoClk;
|
wire COM_clk=isoClk;
|
integer COM_errorCnt;
|
integer COM_errorCnt;
|
|
|
wire txRun,txPending, rxRun, rxStartBit, isTx, overrunErrorFlag, frameErrorFlag, bufferFull;
|
wire txRun,txPending, rxRun, rxStartBit, isTx, overrunErrorFlag, frameErrorFlag, bufferFull;
|
assign {txRun, txPending, rxRun, rxStartBit, isTx, overrunErrorFlag, frameErrorFlag, bufferFull} = statusOut;
|
assign {txRun, txPending, rxRun, rxStartBit, isTx, overrunErrorFlag, frameErrorFlag, bufferFull} = statusOut;
|
|
|
`include "ComDriverTasks.v"
|
`include "ComDriverTasks.v"
|
|
|
assign isoSio = isTx ? serialOut : 1'bz;
|
assign isoSio = isTx ? serialOut : 1'bz;
|
|
|
|
|
/*T=0 card model
|
/*T=0 card model
|
|
|
ATR:
|
ATR:
|
3B/3F 94 97 80 1F 42 BA BE BA BE
|
3B/3F 94 97 80 1F 42 BA BE BA BE
|
3B 9E 96 80 1F C7 80 31 E0 73 FE 21 1B 66 D0 00 28 24 01 00 0D
|
3B 9E 96 80 1F C7 80 31 E0 73 FE 21 1B 66 D0 00 28 24 01 00 0D
|
|
|
|
|
Implemented commands:
|
Implemented commands:
|
write buffer:
|
write buffer:
|
tpdu: 00 0C 00 00 LC data
|
tpdu: 00 0C 00 00 LC data
|
sw: 90 00
|
sw: 90 00
|
read buffer:
|
read buffer:
|
tpdu: 00 0A 00 00 LE
|
tpdu: 00 0A 00 00 LE
|
response: data
|
response: data
|
sw: 90 00
|
sw: 90 00
|
|
toggle communication convention (take effect at next reset):
|
|
tpdu 00 FC 00 00 00
|
|
sw: 90 00
|
any other:
|
any other:
|
sw: 69 86
|
sw: 69 86
|
*/
|
*/
|
task sendAckByte;
|
task sendAckByte;
|
sendByte(tpduHeader[INS_I+7:INS_I]);
|
sendByte(tpduHeader[INS_I+7:INS_I]);
|
endtask
|
endtask
|
|
|
task writeBufferCmd;
|
task writeBufferCmd;
|
integer i;
|
integer i;
|
begin
|
begin
|
sendAckByte;
|
sendAckByte;
|
for(i=0;i<tpduHeader[P3_I+7:P3_I];i=i+1) begin
|
for(i=0;i<tpduHeader[P3_I+7:P3_I];i=i+1) begin
|
receiveByte(buffer[i]);
|
receiveByte(buffer[i]);
|
end
|
end
|
sendHexBytes("9000");//sendWord(16'h9000);
|
sendHexBytes("9000");//sendWord(16'h9000);
|
end
|
end
|
endtask
|
endtask
|
|
|
task readBufferCmd;
|
task readBufferCmd;
|
integer i;
|
integer i;
|
integer le;
|
integer le;
|
begin
|
begin
|
sendAckByte;
|
sendAckByte;
|
le=tpduHeader[P3_I+7:P3_I];
|
le=tpduHeader[P3_I+7:P3_I];
|
if(0==le) le=256;
|
if(0==le) le=256;
|
for(i=0;i<le;i=i+1) begin
|
for(i=0;i<le;i=i+1) begin
|
sendByte(buffer[i]);
|
sendByte(buffer[i]);
|
end
|
end
|
sendHexBytes("9000");//sendWord(16'h9000);
|
sendHexBytes("9000");//sendWord(16'h9000);
|
end
|
end
|
endtask
|
endtask
|
|
|
|
task toggleConventionCmd;
|
|
integer i;
|
|
begin
|
|
useIndirectConventionConfig=~useIndirectConventionConfig;
|
|
sendHexBytes("9000");//sendWord(16'h9000);
|
|
end
|
|
endtask
|
|
|
|
//stuff which can be changed by command and affect ATR
|
|
always @(posedge isoVdd) begin
|
|
useIndirectConventionConfig<=1'b1;
|
|
end
|
|
|
integer i;
|
integer i;
|
always @(posedge isoClk, negedge isoReset) begin
|
always @(posedge isoClk, negedge isoReset) begin
|
if(~isoReset) begin
|
if(~isoReset) begin
|
nWeDataIn<=1'b1;
|
nWeDataIn<=1'b1;
|
nCsDataOut<=1'b1;
|
nCsDataOut<=1'b1;
|
nCsStatusOut<=1'b1;
|
nCsStatusOut<=1'b1;
|
tsCnt<=9'b0;
|
tsCnt<=9'b0;
|
sendAtr<=1'b1;
|
sendAtr<=1'b1;
|
cyclesPerEtu <= 13'd372-1'b1;
|
cyclesPerEtu <= 13'd372-1'b1;
|
|
useIndirectConvention<=useIndirectConventionConfig;
|
end else if(tsCnt!=9'd400) begin
|
end else if(tsCnt!=9'd400) begin
|
tsCnt <= tsCnt + 1'b1;
|
tsCnt <= tsCnt + 1'b1;
|
end else if(sendAtr) begin
|
end else if(sendAtr) begin
|
sendAtr<=1'b0;
|
sendAtr<=1'b0;
|
//sendHexBytes("3B00");
|
//sendHexBytes("3B00");
|
|
if(useIndirectConvention)
|
|
sendHexBytes("3F");
|
|
else
|
sendHexBytes("3B");
|
sendHexBytes("3B");
|
//sendHexBytes("3F");
|
|
//sendHexBytes("9497801F42BABEBABE");
|
//sendHexBytes("9497801F42BABEBABE");
|
//sendHexBytes("9E 97 80 1F C7 80 31 E0 73 FE 21 1B 66 D0 00 28 24 01 00 0D");
|
//sendHexBytes("9E 97 80 1F C7 80 31 E0 73 FE 21 1B 66 D0 00 28 24 01 00 0D");
|
sendHexBytes("9E 97 80 1F C7 80 31 E0 73 FE 21 1B 66 D0 00 28 24 01 00 ");
|
sendHexBytes("9E 97 80 1F C7 80 31 E0 73 FE 21 1B 66 D0 00 28 24 01 00 ");
|
waitEndOfTx;
|
waitEndOfTx;
|
end else begin
|
end else begin
|
//get CLA
|
//get CLA
|
receiveByte(tpduHeader[CLA_I+:8]);
|
receiveByte(tpduHeader[CLA_I+:8]);
|
|
|
//get INS~P2 or PPS
|
//get INS~P2 or PPS
|
for(i=1;i<4;i=i+1)
|
for(i=1;i<4;i=i+1)
|
receiveByte(tpduHeader[(CLA_I-(i*8))+:8]);
|
receiveByte(tpduHeader[(CLA_I-(i*8))+:8]);
|
|
|
if(8'hFF==tpduHeader[CLA_I+:8]) begin
|
if(8'hFF==tpduHeader[CLA_I+:8]) begin
|
//support only PPS8 for the time being
|
//support only PPS8 for the time being
|
if(32'hFF109778==tpduHeader[7+CLA_I:P2_I]) begin
|
if(32'hFF109778==tpduHeader[7+CLA_I:P2_I]) begin
|
sendHexBytes("FF109778");
|
sendHexBytes("FF109778");
|
waitEndOfTx;
|
waitEndOfTx;
|
cyclesPerEtu <= 13'd8-1'b1;
|
cyclesPerEtu <= 13'd8-1'b1;
|
end
|
end
|
end else begin
|
end else begin
|
//tpdu: get P3
|
//tpdu: get P3
|
receiveByte(tpduHeader[P3_I+:8]);
|
receiveByte(tpduHeader[P3_I+:8]);
|
//dispatch
|
//dispatch
|
case(tpduHeader[7+CLA_I:P2_I])
|
case(tpduHeader[7+CLA_I:P2_I])
|
32'h000C0000: writeBufferCmd;
|
32'h000C0000: writeBufferCmd;
|
32'h000A0000: readBufferCmd;
|
32'h000A0000: readBufferCmd;
|
default: sendHexBytes("6986");//sendWord(16'h6986);
|
32'h00FC0000: toggleConventionCmd;
|
|
default: sendHexBytes("6986");
|
endcase
|
endcase
|
end
|
end
|
end
|
end
|
end
|
end
|
|
|
endmodule
|
endmodule
|
`default_nettype wire
|
`default_nettype wire
|
|
|
|
|
