`timescale 1ns / 1ps
|
/*
|
|
Author: Sebastien Riou (acapola)
|
|
Creation date: 17:16:40 01/09/2011
|
|
|
|
$LastChangedDate: 2011-01-29 13:16:17 +0100 (Sat, 29 Jan 2011) $
|
|
$LastChangedBy: acapola $
|
|
$LastChangedRevision: 11 $
|
|
$HeadURL: file:///svn/iso7816_3_master/iso7816_3_master/trunk/sources/Iso7816_3_Master.v $
|
|
|
|
This file is under the BSD licence:
|
|
Copyright (c) 2011, Sebastien Riou
|
|
|
|
All rights reserved.
|
|
|
|
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 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.
|
|
THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
|
|
"AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
|
|
LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
|
|
A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR
|
|
CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
|
|
EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
|
|
PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
|
|
PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
|
|
LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
|
|
NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
|
|
SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
|
|
*/
|
`default_nettype none
|
`default_nettype none
|
//////////////////////////////////////////////////////////////////////////////////
|
|
// Author: Sebastien Riou
|
|
// Creation date: 17:16:40 01/09/2011
|
|
//
|
|
// Last change date: $LastChangedDate: 2011-01-29 11:41:01 +0100 (Sat, 29 Jan 2011) $
|
|
// Last changed by: $LastChangedBy: acapola $
|
|
// Last revision: $LastChangedRevision: 10 $
|
|
// Head URL: $HeadURL: file:///svn/iso7816_3_master/iso7816_3_master/trunk/sources/Iso7816_3_Master.v $
|
|
//
|
|
//////////////////////////////////////////////////////////////////////////////////
|
|
module Iso7816_3_Master(
|
module Iso7816_3_Master(
|
input wire nReset,
|
input wire nReset,
|
input wire clk,
|
input wire clk,
|
input wire [15:0] clkPerCycle,//not supported yet
|
input wire [15:0] clkPerCycle,//not supported yet
|
input wire startActivation,//Starts activation sequence
|
input wire startActivation,//Starts activation sequence
|
input wire startDeactivation,//Starts deactivation sequence
|
input wire startDeactivation,//Starts deactivation sequence
|
input wire [7:0] dataIn,
|
input wire [7:0] dataIn,
|
input wire nWeDataIn,
|
input wire nWeDataIn,
|
input wire [12:0] cyclesPerEtu,
|
input wire [12:0] cyclesPerEtu,
|
output wire [7:0] dataOut,
|
output wire [7:0] dataOut,
|
input wire nCsDataOut,
|
input wire nCsDataOut,
|
output wire [7:0] statusOut,
|
output wire [7:0] statusOut,
|
input wire nCsStatusOut,
|
input wire nCsStatusOut,
|
output reg isActivated,//set to high by activation sequence, set to low by deactivation sequence
|
output reg isActivated,//set to high by activation sequence, set to low by deactivation sequence
|
output wire useIndirectConvention,
|
output wire useIndirectConvention,
|
output wire tsError,//high if TS character is wrong
|
output wire tsError,//high if TS character is wrong
|
output wire tsReceived,
|
output wire tsReceived,
|
output wire atrIsEarly,//high if TS received before 400 cycles after reset release
|
output wire atrIsEarly,//high if TS received before 400 cycles after reset release
|
output wire atrIsLate,//high if TS is still not received after 40000 cycles after reset release
|
output wire atrIsLate,//high if TS is still not received after 40000 cycles after reset release
|
//ISO7816 signals
|
//ISO7816 signals
|
inout wire isoSio,
|
inout wire isoSio,
|
output wire isoClk,
|
output wire isoClk,
|
output reg isoReset,
|
output reg isoReset,
|
output reg isoVdd
|
output reg isoVdd
|
);
|
);
|
|
|
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;
|
|
|
wire serialOut;
|
wire serialOut;
|
assign isoSio = isTx ? serialOut : 1'bz;
|
assign isoSio = isTx ? serialOut : 1'bz;
|
pullup(isoSio);
|
pullup(isoSio);
|
wire comClk;
|
wire comClk;
|
|
|
HalfDuplexUartIf #(
|
HalfDuplexUartIf #(
|
.DIVIDER_WIDTH(1'b1),
|
.DIVIDER_WIDTH(1'b1),
|
.CLOCK_PER_BIT_WIDTH(4'd13)
|
.CLOCK_PER_BIT_WIDTH(4'd13)
|
)
|
)
|
uart (
|
uart (
|
.nReset(nReset),
|
.nReset(nReset),
|
.clk(clk),
|
.clk(clk),
|
.clkPerCycle(1'b0),
|
.clkPerCycle(1'b0),
|
.dataIn(dataIn),
|
.dataIn(dataIn),
|
.nWeDataIn(nWeDataIn),
|
.nWeDataIn(nWeDataIn),
|
.clocksPerBit(cyclesPerEtu),
|
.clocksPerBit(cyclesPerEtu),
|
.dataOut(dataOut),
|
.dataOut(dataOut),
|
.nCsDataOut(nCsDataOut),
|
.nCsDataOut(nCsDataOut),
|
.statusOut(statusOut),
|
.statusOut(statusOut),
|
.nCsStatusOut(nCsStatusOut),
|
.nCsStatusOut(nCsStatusOut),
|
.serialIn(isoSio),
|
.serialIn(isoSio),
|
.serialOut(serialOut),
|
.serialOut(serialOut),
|
.comClk(comClk)
|
.comClk(comClk)
|
);
|
);
|
|
|
reg isoClkEn;
|
reg isoClkEn;
|
assign isoClk = isoClkEn ? comClk : 1'b0;
|
assign isoClk = isoClkEn ? comClk : 1'b0;
|
|
|
reg [16:0] resetCnt;
|
reg [16:0] resetCnt;
|
reg waitTs;
|
reg waitTs;
|
assign tsReceived = ~waitTs;
|
assign tsReceived = ~waitTs;
|
reg [7:0] ts;
|
reg [7:0] ts;
|
assign atrIsEarly = ~waitTs & (resetCnt<(16'h100+16'd400));
|
assign atrIsEarly = ~waitTs & (resetCnt<(16'h100+16'd400));
|
assign atrIsLate = resetCnt>(16'h100+16'd40000);
|
assign atrIsLate = resetCnt>(16'h100+16'd40000);
|
assign useIndirectConvention = ~waitTs & (ts==8'h3F);
|
assign useIndirectConvention = ~waitTs & (ts==8'h3F);
|
assign tsError = ~waitTs & (ts!=8'h3B) & ~useIndirectConvention;
|
assign tsError = ~waitTs & (ts!=8'h3B) & ~useIndirectConvention;
|
always @(posedge comClk, negedge nReset) begin
|
always @(posedge comClk, negedge nReset) begin
|
if(~nReset) begin
|
if(~nReset) begin
|
isoClkEn <= 1'b0;
|
isoClkEn <= 1'b0;
|
resetCnt<=16'b0;
|
resetCnt<=16'b0;
|
waitTs<=1'b1;
|
waitTs<=1'b1;
|
isoReset <= 1'b0;
|
isoReset <= 1'b0;
|
isoVdd <= 1'b0;
|
isoVdd <= 1'b0;
|
isActivated <= 1'b0;
|
isActivated <= 1'b0;
|
end else if(isActivated) begin
|
end else if(isActivated) begin
|
if(waitTs) begin
|
if(waitTs) begin
|
if(statusOut[0]) begin
|
if(statusOut[0]) begin
|
waitTs<=1'b0;
|
waitTs<=1'b0;
|
ts<=dataOut;
|
ts<=dataOut;
|
end
|
end
|
resetCnt<=resetCnt+1;
|
resetCnt<=resetCnt+1;
|
end
|
end
|
if(startDeactivation) begin
|
if(startDeactivation) begin
|
isoVdd <= 1'b0;
|
isoVdd <= 1'b0;
|
isoClkEn <= 1'b0;
|
isoClkEn <= 1'b0;
|
isoReset <= 1'b0;
|
isoReset <= 1'b0;
|
resetCnt<=16'b0;
|
resetCnt<=16'b0;
|
isActivated <= 1'b0;
|
isActivated <= 1'b0;
|
end
|
end
|
end else begin
|
end else begin
|
if(startActivation) begin
|
if(startActivation) begin
|
waitTs <= 1'b1;
|
waitTs <= 1'b1;
|
isoVdd <= 1'b1;
|
isoVdd <= 1'b1;
|
isoClkEn <= 1'b1;
|
isoClkEn <= 1'b1;
|
if(16'h100 == resetCnt) begin
|
if(16'h100 == resetCnt) begin
|
isActivated <=1'b1;
|
isActivated <=1'b1;
|
isoReset <=1'b1;
|
isoReset <=1'b1;
|
end else
|
end else
|
resetCnt<=resetCnt + 1;
|
resetCnt<=resetCnt + 1;
|
end else begin
|
end else begin
|
resetCnt<=16'b0;
|
resetCnt<=16'b0;
|
end
|
end
|
end
|
end
|
end
|
end
|
endmodule
|
endmodule
|
|
`default_nettype wire
|
|
|
No newline at end of file
|
No newline at end of file
|