OpenCores
URL https://opencores.org/ocsvn/iso7816_3_master/iso7816_3_master/trunk

Subversion Repositories iso7816_3_master

[/] [iso7816_3_master/] [trunk/] [test/] [tbIso7816_3_Master.v] - Diff between revs 10 and 11

Go to most recent revision | Show entire file | Details | Blame | View Log

Rev 10 Rev 11
Line 1... Line 1...
`timescale 1ns / 1ps
/*
 
Author: Sebastien Riou (acapola)
 
Creation date: 22:16:42 01/10/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/test/tbIso7816_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
////////////////////////////////////////////////////////////////////////////////
`timescale 1ns / 1ps
// Company: 
 
// Engineer: Sebastien Riou
 
//
 
// Create Date:   22:16:42 01/10/2011
 
// Design Name:   Iso7816_3_Master
 
// Module Name:   tbIso7816_3_Master.v
 
// Project Name:  Uart
 
// Target Device:  
 
// Tool versions:  
 
// Description: 
 
//
 
// Verilog Test Fixture created by ISE for module: Iso7816_3_Master
 
//
 
// Dependencies:
 
// 
 
// Revision:
 
// Revision 0.01 - File Created
 
// Additional Comments:
 
// 
 
////////////////////////////////////////////////////////////////////////////////
 
 
 
module tbIso7816_3_Master;
module tbIso7816_3_Master;
parameter CLK_PERIOD = 10;//should be %2
parameter CLK_PERIOD = 10;//should be %2
        // Inputs
        // Inputs
        reg nReset;
        reg nReset;
Line 161... Line 171...
    .bytesCnt(spy_bytesCnt)
    .bytesCnt(spy_bytesCnt)
    );
    );
 
 
 
 
        integer tbErrorCnt;
        integer tbErrorCnt;
 
        reg tbTestSequenceDone;
        initial begin
        initial begin
                // Initialize Inputs
                // Initialize Inputs
 
                tbErrorCnt=0;
                COM_errorCnt=0;
                COM_errorCnt=0;
                nReset = 0;
                nReset = 0;
                clk = 0;
                clk = 0;
                clkPerCycle = 0;
                clkPerCycle = 0;
                startActivation = 0;
                startActivation = 0;
Line 198... Line 210...
                        while((txRun===1'b1)||(rxRun===1'b1)||(rxStartBit===1'b1)) begin
                        while((txRun===1'b1)||(rxRun===1'b1)||(rxStartBit===1'b1)) begin
                                @(posedge clk);
                                @(posedge clk);
                        end
                        end
                        @(posedge clk);
                        @(posedge clk);
                end
                end
                $display("Two cycle pause in communication detected, stop simulation, time=",$time);
                if(1'b1!==tbTestSequenceDone) begin
 
                        $display("ERROR: Two cycle pause in communication detected, stop simulation, time=",$time);
                #(CLK_PERIOD*372*12);
                #(CLK_PERIOD*372*12);
                $finish;
                $finish;
        end
        end
 
        end
        //T=0 tpdu stimuli
        //T=0 tpdu stimuli
        initial begin
        initial begin
                //receiveAndCheckByte(8'h3B);
                tbTestSequenceDone=1'b0;
                //receiveAndCheckByte(8'h00);
 
                receiveAndCheckHexBytes("3B00");
                receiveAndCheckHexBytes("3B00");
                sendHexBytes("000C000001");
                sendHexBytes("000C000001");
                //receiveAndCheckByte(8'h0C);
 
                receiveAndCheckHexBytes("0C");
                receiveAndCheckHexBytes("0C");
                sendHexBytes("55");
                sendHexBytes("55");
                //receiveAndCheckByte(8'h90);
 
                //receiveAndCheckByte(8'h00);
 
                receiveAndCheckHexBytes("9000");
                receiveAndCheckHexBytes("9000");
 
                tbTestSequenceDone=1'b1;
 
                $display("SUCCESS: test sequence completed.");
 
                #(CLK_PERIOD*372*12);
 
                $finish;
        end
        end
        initial begin
        initial begin
                // timeout
                // timeout
                #10000000;
                #10000000;
      tbErrorCnt=tbErrorCnt+1;
      tbErrorCnt=tbErrorCnt+1;
Line 226... Line 240...
                $finish;
                $finish;
        end
        end
        always
        always
                #(CLK_PERIOD/2) clk =  ! clk;
                #(CLK_PERIOD/2) clk =  ! clk;
endmodule
endmodule
 
`default_nettype wire
 
 
 
 
 No newline at end of file
 No newline at end of file

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.