URL https://opencores.org/ocsvn/or1k/or1k/trunk

Subversion Repositories or1k

[/] [or1k/] [trunk/] [mp3/] [bench/] [models/] [28f016s3/] [test_bad.v] - Blame information for rev 1774

Go to most recent revision | Details | Compare with Previous | View Log


/*
 INTEL DEVELOPER'S SOFTWARE LICENSE AGREEMENT
 
BY USING THIS SOFTWARE, YOU ARE AGREEING TO BE BOUND BY THE TERMS OF
THIS AGREEMENT.  DO NOT USE THE SOFTWARE UNTIL YOU HAVE CAREFULLY READ
AND AGREED TO THE FOLLOWING TERMS AND CONDITIONS.  IF YOU DO NOT AGREE
TO THE TERMS OF THIS AGREEMENT, PROMPTLY RETURN THE SOFTWARE PACKAGE AND
ANY ACCOMPANYING ITEMS.
 
IF YOU USE THIS SOFTWARE, YOU WILL BE BOUND BY THE TERMS OF THIS
AGREEMENT
 
LICENSE: Intel Corporation ("Intel") grants you the non-exclusive right
to use the enclosed software program ("Software").  You will not use,
copy, modify, rent, sell or transfer the Software or any portion
thereof, except as provided in this Agreement.
 
System OEM Developers may:
1.      Copy the Software for support, backup or archival purposes;
2.      Install, use, or distribute Intel owned Software in object code
        only;
3.      Modify and/or use Software source code that Intel directly makes
        available to you as an OEM Developer;
4.      Install, use, modify, distribute, and/or make or have made
        derivatives ("Derivatives") of Intel owned Software under the
        terms and conditions in this Agreement, ONLY if you are a System
        OEM Developer and NOT an end-user.
 
RESTRICTIONS:
 
YOU WILL NOT:
1.      Copy the Software, in whole or in part, except as provided for
        in this Agreement;
2.      Decompile or reverse engineer any Software provided in object
        code format;
3.      Distribute any Software or Derivative code to any end-users,
        unless approved by Intel in a prior writing.
 
TRANSFER: You may transfer the Software to another OEM Developer if the
receiving party agrees to the terms of this Agreement at the sole risk
of any receiving party.
 
OWNERSHIP AND COPYRIGHT OF SOFTWARE: Title to the Software and all
copies thereof remain with Intel or its vendors.  The Software is
copyrighted and is protected by United States and international
copyright laws.  You will not remove the copyright notice from the
Software.  You agree to prevent any unauthorized copying of the
Software.
 
DERIVATIVE WORK: OEM Developers that make or have made Derivatives will
not be required to provide Intel with a copy of the source or object
code.  OEM Developers shall be authorized to use, market, sell, and/or
distribute Derivatives to other OEM Developers at their own risk and
expense. Title to Derivatives and all copies thereof shall be in the
particular OEM Developer creating the Derivative.  Such OEMs shall
remove the Intel copyright notice from all Derivatives if such notice is
contained in the Software source code.
 
DUAL MEDIA SOFTWARE: If the Software package contains multiple media,
you may only use the medium appropriate for your system.
 
WARRANTY: Intel warrants that it has the right to license you to use,
modify, or distribute the Software as provided in this Agreement. The
Software is provided "AS IS".  Intel makes no representations to
upgrade, maintain, or support the Software at any time. Intel warrants
that the media on which the Software is furnished will be free from
defects in material and workmanship for a period of one (1) year from
the date of purchase.  Upon return of such defective media, Intel's
entire liability and your exclusive remedy shall be the replacement of
the Software.
 
THE ABOVE WARRANTIES ARE THE ONLY WARRANTIES OF ANY KIND, EITHER EXPRESS
OR IMPLIED, INCLUDING WARRANTIES OF MERCHANTABILITY OR FITNESS FOR ANY
PARTICULAR PURPOSE.
 
LIMITATION OF LIABILITY: NEITHER INTEL NOR ITS VENDORS OR AGENTS SHALL
BE LIABLE FOR ANY LOSS OF PROFITS, LOSS OF USE, LOSS OF DATA,
INTERRUPTION OF BUSINESS, NOR FOR INDIRECT, SPECIAL, INCIDENTAL OR
CONSEQUENTIAL DAMAGES OF ANY KIND WHETHER UNDER THIS AGREEMENT OR
OTHERWISE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGES.
 
TERMINATION OF THIS LICENSE: Intel reserves the right to conduct or have
conducted audits to verify your compliance with this Agreement.  Intel
may terminate this Agreement at any time if you are in breach of any of
its terms and conditions.  Upon termination, you will immediately
destroy, and certify in writing the destruction of, the Software or
return all copies of the Software and documentation to Intel.
 
U.S. GOVERNMENT RESTRICTED RIGHTS: The Software and documentation were
developed at private expense and are provided with "RESTRICTED RIGHTS".
Use, duplication or disclosure by the Government is subject to
restrictions as set forth in FAR52.227-14 and DFAR252.227-7013 et seq.
or its successor.
 
EXPORT LAWS: You agree that the distribution and export/re-export of the
Software is in compliance with the laws, regulations, orders or other
restrictions of the U.S. Export Administration Regulations.
 
APPLICABLE LAW: This Agreement is governed by the laws of the State of
California and the United States, including patent and copyright laws.
Any claim arising out of this Agreement will be brought in Santa Clara
County, California.
 
*/
 
 
`timescale   1ns/1ns
 
 
module test28F016SC();
 
reg [`AddrSize-1:0]  address;
 
reg [31:0]  vcc,
            vpp;
 
reg         ceb,
            oeb,
            web,
            rpb;
 
wire        ryby;
 
reg [1:0]   rpblevel;    // 00 = VIL
                         // 01 = VIH
                         // 10 = VHH
 
reg    [`MaxOutputs-1:0]  dq_reg;
wire   [`MaxOutputs-1:0]  dq = dq_reg;
 
IntelSVFF IFlash (dq, address, ceb, oeb, web, rpb, ryby, vpp, vcc, rpblevel);
 
initial
    begin
//        $dumpfile("f008sc.dmp");
//        $dumpoff;
//        $dumpvars(???,dq,address,ceb,oeb,web,rpb);
 
       dq_reg = `MaxOutputs'hz;
       rpblevel = `rpb_vil;
       powerup;
       ReadID;
       #100
       oeb = `VIH;
 
       ProgramData(`AddrSize'h2FFFF, `MaxOutputs'hAA);
       ProgramData(`AddrSize'h60000, `MaxOutputs'h06);
 
       begin:  WriteTest
         $display("rdARRAY DURING WRITE TEST");
         #100
         StartProgram(`AddrSize'h00000, `MaxOutputs'h00);
         #150
         oeb = `VIH;
         #100
         oeb = `VIL;
         #100
         oeb = `VIH;
         #(((`AC_ProgramTime_Byte_50_12/2)*`TimerPeriod_)-1000)
         SetReadMode;
         #100
         ReadData(`AddrSize'h2FFFF);
         #100
         oeb = `VIH;
         #100
         oeb = `VIL;
         #((`AC_ProgramTime_Byte_50_12/2)*`TimerPeriod_)
         begin: Poll
           forever
             begin
               oeb = `VIH;
               #500
               oeb = `VIL;
               #500
               if (dq[7] == `VIH)
                 disable Poll;
             end
         end
         #300
         SetReadMode;
         #100
         ReadData(`AddrSize'h00000);
         #100
         ReadData(`AddrSize'h2FFFF);
         #100
         oeb = `VIH;
       end  //WriteTest
 
       begin:  WriteSuspend
         $display("WRITE SUSPEND TEST");
         #100
         StartProgram(`AddrSize'h10000, `MaxOutputs'h01);
         #150
         oeb = `VIH;
         #100
         oeb = `VIL;
         #100
         oeb = `VIH;
         #(((`AC_ProgramTime_Byte_50_12/2)*`TimerPeriod_)-1000)
         Suspend;
         #100
         ClearCSRMode;
         #100
         ReadCSRMode;
         #100
         oeb = `VIH;
         #300
         Resume;
         #100
         oeb = `VIL;
         #((`AC_ProgramTime_Byte_50_12/2)*`TimerPeriod_)
         begin: Poll
           forever
             begin
               oeb = `VIH;
               #500
               oeb = `VIL;
               #500
               if (dq[7] == `VIH)
                 disable Poll;
             end
         end
         #300
         SetReadMode;
         #100
         ReadData(`AddrSize'h10000);
         #100
         oeb = `VIH;
       end  //WriteSuspend
 
       $display("SET BLOCK LOCK-BITS");
       #100
       SetBlockLockBit(`AddrSize'h75000);
       #100
       oeb = `VIH;
 
       $display("ERASE BLOCK");
       #100
       EraseBlock(`AddrSize'h7000F);
 
       $display("READ DATA, Loose Timing, Toggle Addr");
       #100
       SetReadMode;
       #100
       oeb = `VIL;
       #100
       address = `AddrSize'h70000;
       #100
       address = `AddrSize'h7FFFF;
       #100
       oeb = `VIH;
 
       begin: BadErase
         $display("BAD ERASE TEST");
         #100
         address = `AddrSize'h60000;
         #100
         dq_reg = `EraseBlockCmd;
         #100
         web = `VIL;
         #100
         web = `VIH;
         #100
         dq_reg = `ReadArrayCmd;
         #100
         web = `VIL;
         #100
         web = `VIH;
         #100
         dq_reg = `MaxOutputs'hz;
         #100
         oeb = `VIL;
         #1000
         begin: Poll
           forever
             begin
               oeb = `VIH;
               #1000
               oeb = `VIL;
               #1000
               if (dq[7] == `VIH)
                 disable Poll;
             end
         end
       end //BadErase
       #200
       ReadCSRMode;
       #200
       ClearCSRMode;
       #200
       ReadCSRMode;
       #200
       SetReadMode;
       #100
       ReadData(`AddrSize'h60000);
       #100
       oeb = `VIH;
 
       begin : BadLockBit
         $display("BAD LOCK-BIT SEQUENCE TEST");
         #100
         address = `AddrSize'h40000;
         #100
         dq_reg = `LBSetupCmd;
         #100
         web = `VIL;
         #100
         web = `VIH;
         #100
         dq_reg = `MaxOutputs'h55;
         #100
         web = `VIL;
         #100
         web = `VIH;
         #100
         dq_reg = `MaxOutputs'hz;
         #100
         oeb = `VIL;
         #((`AC_Set_LockBit_50_12*`TimerPeriod_)-5000);
         begin : Poll
           forever
             begin
               oeb = `VIH;
               #1000
               oeb = `VIL;
               #1000
               if (dq[7] == `VIH)
                 disable Poll;
             end //forever
         end //Poll
         #300
         ClearCSRMode;
       end
 
       $display("LOW Vpp OPERATION TEST");
       #100
       vpp =1300;
       #100
       ProgramData(`AddrSize'h33333, `MaxOutputs'h33);
       #100
       EraseBlock(`AddrSize'h6F000);
       #100
       vpp = 12000;
       #100
       SetReadMode;
       #100
       ReadData(`AddrSize'h33333);
       #100
       address = `AddrSize'h60000;
       #100
       oeb = `VIH;
 
       #1000
       powerdown;
       #1000 $finish;
    end
 
always @(dq or address or ceb or rpb or oeb or web or vcc or vpp or rpblevel)
  begin
    $display(
      "%d Addr = %h, Data = %h, CEb=%b, RPb=%b, OEb=%b, WEb=%d, vcc=%d, vpp = %d",
      $time, address, dq, ceb, rpb, oeb, web, vcc, vpp);
  end
 
task powerup;
  begin
    $display("  POWERUP TASK");
    rpb = `VIL;         //reset
    #100
    address = 0;
    #100
    web = `VIH;         //write enable high
    #100
    oeb = `VIH;         //output ts
    #100
    ceb = `VIH;         //disabled
    #100
    vcc = 5000;         //power up vcc
    #5000
    vpp = 12000;        //ramp up vpp
    #5000
    rpb = `VIH;         //out of reset
    rpblevel = `rpb_vih;
    #100
    oeb = `VIL;         //enable outputs
    #100
    ceb = `VIL;         //enable chip
  end
endtask
 
 
task powerdown;
  begin
    $display("  POWERDOWN TASK");
    address = 0;
    #100
    rpb = `VIL;     //reset
    #100
    oeb = `VIH;     //output ts
    #100
    web = `VIH;     //we high
    #100
    ceb = `VIH;     //disabled
    #100
    vpp = 0;        //power down vpp
    #5000
    vcc = 0;        //ramp down vcc
  end
endtask
 
 
task ReadData;
  input [`AddrSize-1:0] addr;
 
  begin
    $display("  READDATA TASK");
    oeb = `VIH;
    #100
    address = addr;
    #100
    oeb = `VIL;
  end
endtask
 
 
task SetReadMode;
  begin
    $display("  SETREADMODE TASK");
    oeb = `VIH;
    #100
    dq_reg[`Byte] = `ReadArrayCmd;
    #100
    web = `VIL;
    #100
    web = `VIH;
    #100
    dq_reg = `MaxOutputs'hz;
  end
endtask
 
 
task ReadID;
  begin
    $display("  READID TASK");
    oeb = `VIH;
    #100
    address = `AddrSize'h0;
    #100
    dq_reg[`Byte] = `ReadIDCmd;
    #100
    web = `VIL;
    #100
    web = `VIH;
    #100
    dq_reg = `MaxOutputs'hz;
    #100
    oeb = `VIL;
    #100
    address = `AddrSize'h1;
    #100
    address = `AddrSize'h3;
    #100
    address = `AddrSize'h2;
    #100
    address = `AddrSize'h10002;
  end
endtask
 
 
task ReadCSRMode;
  begin
    $display("  READCSR MODE TASK");
    oeb = `VIH;
    #100
    dq_reg[`Byte] = `ReadCSRCmd;
    #100
    web = `VIL;
    #100
    web = `VIH;
    #100
    dq_reg = `MaxOutputs'hz;
    #100
    oeb = `VIL;
  end
endtask
 
 
task ClearCSRMode;
  begin
    $display("  CLEARCSRMODE TASK");
    oeb = `VIH;
    #100
    dq_reg[`Byte] = `ClearCSRCmd;
    #100
    web = `VIL;
    #100
    web = `VIH;
    #100
    dq_reg = `MaxOutputs'hz;
  end
endtask
 
 
task StartProgram;
  input [`AddrSize-1:0] addr;
  input [`MaxOutputs-1:0] data;
  begin
    $display("  STARTPROGRAM TASK");
    #100
    address = addr;
    #100
    dq_reg[`Byte] = `Program2Cmd;
    #100
    web = `VIL;
    #100
    web = `VIH;
    #100
    dq_reg[`Byte] = data;
    #100
    web = `VIL;
    #100
    web = `VIH;
    #100
    dq_reg = `MaxOutputs'hz;
  end
endtask
 
 
task ProgramData;
  input [`AddrSize-1:0] addr;
  input [`MaxOutputs-1:0] data;
  begin
    $display("  PROGRAMDATA TASK");
    StartProgram(addr, data);
    #100
    oeb = `VIL;
    #((`AC_ProgramTime_Byte_50_12*`TimerPeriod_)-500)
    begin:  Poll
      forever
        begin
          oeb = `VIH;
          #100
          oeb = `VIL;
          #100
          if (dq[7] == `VIH)
            disable Poll;
        end //forever
    end //Poll
    #300
    ClearCSRMode;
  end
endtask
 
 
task StartProgram2;
  input [`AddrSize-1:0] addr;
  input [`MaxOutputs-1:0] data;
  begin
    $display("  STARTPROGRAM2 TASK");
    #100
    address = addr;
    #100
    dq_reg[`Byte] = `Program2Cmd;
    #100
    web = `VIL;
    #5
    ceb = `VIL;
    #100
    ceb = `VIH;
    #5
    web = `VIH;
    #100
    dq_reg[`Byte] = data;
    #100
    web = `VIL;
    #5
    ceb = `VIL;
    #100
    ceb = `VIH;
    #5
    web = `VIH;
    #100
    ceb = `VIL;
    dq_reg = `MaxOutputs'hz;
  end
endtask
 
 
task ProgramData2;
  input [`AddrSize-1:0] addr;
  input [`MaxOutputs-1:0] data;
  begin
    $display("  PROGRAMDATA2 TASK");
    ceb = `VIH;
    StartProgram2(addr, data);
    #100
    oeb = `VIL;
    #((`AC_ProgramTime_Byte_50_12*`TimerPeriod_)-500)
    begin:  Poll
      forever
        begin
          oeb = `VIH;
          #100
          oeb = `VIL;
          #100
          if (dq[7] == `VIH)
            disable Poll;
        end //forever
    end //Poll
    #300
    ClearCSRMode;
  end
endtask
 
task StartErase;
  input [`AddrSize-1:0] BlockAddr;
  begin
    $display("  STARTERASE TASK");
    #100
    address = BlockAddr;
    #100
    dq_reg = `EraseBlockCmd;
    #100
    web = `VIL;
    #100
    web = `VIH;
    #100
    dq_reg = `ConfirmCmd;
    #100
    web = `VIL;
    #100
    web = `VIH;
    #100
    dq_reg = `MaxOutputs'hz;
  end
endtask
 
 
task EraseBlock;
  input [`AddrSize-1:0] BlockAddr;
  time EraseTime;
  begin
    $display("  ERASEBLOCK TASK");
    StartErase(BlockAddr);
    #100
    oeb = `VIL;
    EraseTime = ((`AC_EraseTime_Block_50_12*`TimerPeriod_)-5000);
    #EraseTime
    begin: Poll
      forever
        begin
          oeb = `VIH;
          #1000
          oeb = `VIL;
          #1000
          if (dq[7] == `VIH)
            disable Poll;
        end
    end
    #300
    ClearCSRMode;
  end
endtask
 
 
task StartLockBit;
  input [`AddrSize-1:0] BlockAddr;
  begin
    $display("  STARTLOCKBIT TASK");
    #100
    address = BlockAddr;
    #100
    dq_reg = `LBSetupCmd;
    #100
    web = `VIL;
    #100
    web = `VIH;
    #100
    dq_reg = `SetBlockLBCmd;
    #100
    web = `VIL;
    #100
    web = `VIH;
    #100
    dq_reg = `MaxOutputs'hz;
  end
endtask
 
 
task SetBlockLockBit;
  input [`AddrSize-1:0] BlockAddr;
  time LockBitTime;
  begin
    $display("  SETBLOCKLOCKBIT TASK");
    StartLockBit(BlockAddr);
    #100
    oeb = `VIL;
    LockBitTime = ((`AC_Set_LockBit_50_12*`TimerPeriod_)-5000);
    #LockBitTime
    begin : Poll
      forever
        begin
          oeb = `VIH;
          #1000
          oeb = `VIL;
          #1000
          if (dq[7] == `VIH)
            disable Poll;
        end //forever
    end //Poll
    #300
    ClearCSRMode;
  end
endtask
 
 
task StartClearBit;
  begin
    $display("  STARTCLEARBIT TASK");
    #100
    dq_reg = `LBSetupCmd;
    #100
    web = `VIL;
    #100
    web = `VIH;
    #100
    dq_reg = `ClearLBCmd;
    #100
    web = `VIL;
    #100
    web = `VIH;
    #100
    dq_reg = `MaxOutputs'hz;
  end
endtask
 
 
task ClearBlockLockBit;
  time ClearBitTime;
  begin
    $display("  CLEARBLOCKLOCKBIT TASK");
    StartClearBit;
 
    #100
    oeb = `VIL;
    ClearBitTime = ((`AC_Clear_LockBit_50_12*`TimerPeriod_)-5000);
    #ClearBitTime
    begin : Poll
         forever
           begin
                oeb = `VIH;
                #1000
                oeb = `VIL;
                #1000
                if (dq[7] == `VIH)
                  disable Poll;
           end //forever
    end //Poll
    #300
    ClearCSRMode;
  end
endtask
 
 
task SetMasterLockBit;
  input [`AddrSize-1:0] DeviceAddr;
  time LockBitTime;
  begin
    $display("  SETMASTERLOCKBIT TASK");
    #100
    address = DeviceAddr;
    #100
    dq_reg = `LBSetupCmd;
    #100
    web = `VIL;
    #100
    web = `VIH;
    #100
    dq_reg = `SetMasterLBCmd;
    #100
    web = `VIL;
    #100
    web = `VIH;
    #100
    dq_reg = `MaxOutputs'hz;
    #100
    oeb = `VIL;
    LockBitTime = ((`AC_Set_LockBit_50_12*`TimerPeriod_)-5000);
    #LockBitTime
    begin : Poll
      forever
        begin
          oeb = `VIH;
          #1000
          oeb = `VIL;
          #1000
          if (dq[7] == `VIH)
            disable Poll;
        end //forever
    end //Poll
    #300
    ClearCSRMode;
  end
endtask
 
task Suspend;
  begin
    $display("  SUSPEND TASK");
    #100
    dq_reg = `SuspendCmd;
    #100
    web = `VIL;
    #100
    web = `VIH;
    #100
    dq_reg = `MaxOutputs'hz;
    #100
    oeb = `VIL;
    #500
    begin: Poll
      forever
        begin
          oeb = `VIH;
          #100
          oeb = `VIL;
          #100
          if (dq[7] == `VIH)
            disable Poll;
        end
    end
  end
endtask
 
 
task Resume;
  begin
    $display("  RESUME TASK");
    #100
    dq_reg = `ResumeCmd;
    #100
    web = `VIL;
    #100
    web = `VIH;
    #100
    dq_reg = `MaxOutputs'hz;
  end
endtask
 
endmodule

Browse

Tools

Subversion Repositories or1k

[/] [or1k/] [trunk/] [mp3/] [bench/] [models/] [28f016s3/] [test_bad.v] - Blame information for rev 1774

Line No.	Rev	Author	Line
1	266	lampret	`/*`
2			`INTEL DEVELOPER'S SOFTWARE LICENSE AGREEMENT`
3
4			`BY USING THIS SOFTWARE, YOU ARE AGREEING TO BE BOUND BY THE TERMS OF`
5			`THIS AGREEMENT. DO NOT USE THE SOFTWARE UNTIL YOU HAVE CAREFULLY READ`
6			`AND AGREED TO THE FOLLOWING TERMS AND CONDITIONS. IF YOU DO NOT AGREE`
7			`TO THE TERMS OF THIS AGREEMENT, PROMPTLY RETURN THE SOFTWARE PACKAGE AND`
8			`ANY ACCOMPANYING ITEMS.`
9
10			`IF YOU USE THIS SOFTWARE, YOU WILL BE BOUND BY THE TERMS OF THIS`
11			`AGREEMENT`
12
13			`LICENSE: Intel Corporation ("Intel") grants you the non-exclusive right`
14			`to use the enclosed software program ("Software"). You will not use,`
15			`copy, modify, rent, sell or transfer the Software or any portion`
16			`thereof, except as provided in this Agreement.`
17
18			`System OEM Developers may:`
19			`1. Copy the Software for support, backup or archival purposes;`
20			`2. Install, use, or distribute Intel owned Software in object code`
21			`only;`
22			`3. Modify and/or use Software source code that Intel directly makes`
23			`available to you as an OEM Developer;`
24			`4. Install, use, modify, distribute, and/or make or have made`
25			`derivatives ("Derivatives") of Intel owned Software under the`
26			`terms and conditions in this Agreement, ONLY if you are a System`
27			`OEM Developer and NOT an end-user.`
28
29			`RESTRICTIONS:`
30
31			`YOU WILL NOT:`
32			`1. Copy the Software, in whole or in part, except as provided for`
33			`in this Agreement;`
34			`2. Decompile or reverse engineer any Software provided in object`
35			`code format;`
36			`3. Distribute any Software or Derivative code to any end-users,`
37			`unless approved by Intel in a prior writing.`
38
39			`TRANSFER: You may transfer the Software to another OEM Developer if the`
40			`receiving party agrees to the terms of this Agreement at the sole risk`
41			`of any receiving party.`
42
43			`OWNERSHIP AND COPYRIGHT OF SOFTWARE: Title to the Software and all`
44			`copies thereof remain with Intel or its vendors. The Software is`
45			`copyrighted and is protected by United States and international`
46			`copyright laws. You will not remove the copyright notice from the`
47			`Software. You agree to prevent any unauthorized copying of the`
48			`Software.`
49
50			`DERIVATIVE WORK: OEM Developers that make or have made Derivatives will`
51			`not be required to provide Intel with a copy of the source or object`
52			`code. OEM Developers shall be authorized to use, market, sell, and/or`
53			`distribute Derivatives to other OEM Developers at their own risk and`
54			`expense. Title to Derivatives and all copies thereof shall be in the`
55			`particular OEM Developer creating the Derivative. Such OEMs shall`
56			`remove the Intel copyright notice from all Derivatives if such notice is`
57			`contained in the Software source code.`
58
59			`DUAL MEDIA SOFTWARE: If the Software package contains multiple media,`
60			`you may only use the medium appropriate for your system.`
61
62			`WARRANTY: Intel warrants that it has the right to license you to use,`
63			`modify, or distribute the Software as provided in this Agreement. The`
64			`Software is provided "AS IS". Intel makes no representations to`
65			`upgrade, maintain, or support the Software at any time. Intel warrants`
66			`that the media on which the Software is furnished will be free from`
67			`defects in material and workmanship for a period of one (1) year from`
68			`the date of purchase. Upon return of such defective media, Intel's`
69			`entire liability and your exclusive remedy shall be the replacement of`
70			`the Software.`
71
72			`THE ABOVE WARRANTIES ARE THE ONLY WARRANTIES OF ANY KIND, EITHER EXPRESS`
73			`OR IMPLIED, INCLUDING WARRANTIES OF MERCHANTABILITY OR FITNESS FOR ANY`
74			`PARTICULAR PURPOSE.`
75
76			`LIMITATION OF LIABILITY: NEITHER INTEL NOR ITS VENDORS OR AGENTS SHALL`
77			`BE LIABLE FOR ANY LOSS OF PROFITS, LOSS OF USE, LOSS OF DATA,`
78			`INTERRUPTION OF BUSINESS, NOR FOR INDIRECT, SPECIAL, INCIDENTAL OR`
79			`CONSEQUENTIAL DAMAGES OF ANY KIND WHETHER UNDER THIS AGREEMENT OR`
80			`OTHERWISE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGES.`
81
82			`TERMINATION OF THIS LICENSE: Intel reserves the right to conduct or have`
83			`conducted audits to verify your compliance with this Agreement. Intel`
84			`may terminate this Agreement at any time if you are in breach of any of`
85			`its terms and conditions. Upon termination, you will immediately`
86			`destroy, and certify in writing the destruction of, the Software or`
87			`return all copies of the Software and documentation to Intel.`
88
89			`U.S. GOVERNMENT RESTRICTED RIGHTS: The Software and documentation were`
90			`developed at private expense and are provided with "RESTRICTED RIGHTS".`
91			`Use, duplication or disclosure by the Government is subject to`
92			`restrictions as set forth in FAR52.227-14 and DFAR252.227-7013 et seq.`
93			`or its successor.`
94
95			`EXPORT LAWS: You agree that the distribution and export/re-export of the`
96			`Software is in compliance with the laws, regulations, orders or other`
97			`restrictions of the U.S. Export Administration Regulations.`
98
99			`APPLICABLE LAW: This Agreement is governed by the laws of the State of`
100			`California and the United States, including patent and copyright laws.`
101			`Any claim arising out of this Agreement will be brought in Santa Clara`
102			`County, California.`
103
104			`*/`
105
106
107			`timescale 1ns/1ns
108
109
110			`module test28F016SC();`
111
112			reg [`AddrSize-1:0] address;
113
114			`reg [31:0] vcc,`
115			`vpp;`
116
117			`reg ceb,`
118			`oeb,`
119			`web,`
120			`rpb;`
121
122			`wire ryby;`
123
124			`reg [1:0] rpblevel; // 00 = VIL`
125			`// 01 = VIH`
126			`// 10 = VHH`
127
128			reg [`MaxOutputs-1:0] dq_reg;
129			wire [`MaxOutputs-1:0] dq = dq_reg;
130
131			`IntelSVFF IFlash (dq, address, ceb, oeb, web, rpb, ryby, vpp, vcc, rpblevel);`
132
133			`initial`
134			`begin`
135			`// $dumpfile("f008sc.dmp");`
136			`// $dumpoff;`
137			`// $dumpvars(???,dq,address,ceb,oeb,web,rpb);`
138
139			dq_reg = `MaxOutputs'hz;
140			rpblevel = `rpb_vil;
141			`powerup;`
142			`ReadID;`
143			`#100`
144			oeb = `VIH;
145
146			ProgramData(`AddrSize'h2FFFF, `MaxOutputs'hAA);
147			ProgramData(`AddrSize'h60000, `MaxOutputs'h06);
148
149			`begin: WriteTest`
150			`$display("rdARRAY DURING WRITE TEST");`
151			`#100`
152			StartProgram(`AddrSize'h00000, `MaxOutputs'h00);
153			`#150`
154			oeb = `VIH;
155			`#100`
156			oeb = `VIL;
157			`#100`
158			oeb = `VIH;
159			#(((`AC_ProgramTime_Byte_50_12/2)*`TimerPeriod_)-1000)
160			`SetReadMode;`
161			`#100`
162			ReadData(`AddrSize'h2FFFF);
163			`#100`
164			oeb = `VIH;
165			`#100`
166			oeb = `VIL;
167			#((`AC_ProgramTime_Byte_50_12/2)*`TimerPeriod_)
168			`begin: Poll`
169			`forever`
170			`begin`
171			oeb = `VIH;
172			`#500`
173			oeb = `VIL;
174			`#500`
175			if (dq[7] == `VIH)
176			`disable Poll;`
177			`end`
178			`end`
179			`#300`
180			`SetReadMode;`
181			`#100`
182			ReadData(`AddrSize'h00000);
183			`#100`
184			ReadData(`AddrSize'h2FFFF);
185			`#100`
186			oeb = `VIH;
187			`end //WriteTest`
188
189			`begin: WriteSuspend`
190			`$display("WRITE SUSPEND TEST");`
191			`#100`
192			StartProgram(`AddrSize'h10000, `MaxOutputs'h01);
193			`#150`
194			oeb = `VIH;
195			`#100`
196			oeb = `VIL;
197			`#100`
198			oeb = `VIH;
199			#(((`AC_ProgramTime_Byte_50_12/2)*`TimerPeriod_)-1000)
200			`Suspend;`
201			`#100`
202			`ClearCSRMode;`
203			`#100`
204			`ReadCSRMode;`
205			`#100`
206			oeb = `VIH;
207			`#300`
208			`Resume;`
209			`#100`
210			oeb = `VIL;
211			#((`AC_ProgramTime_Byte_50_12/2)*`TimerPeriod_)
212			`begin: Poll`
213			`forever`
214			`begin`
215			oeb = `VIH;
216			`#500`
217			oeb = `VIL;
218			`#500`
219			if (dq[7] == `VIH)
220			`disable Poll;`
221			`end`
222			`end`
223			`#300`
224			`SetReadMode;`
225			`#100`
226			ReadData(`AddrSize'h10000);
227			`#100`
228			oeb = `VIH;
229			`end //WriteSuspend`
230
231			`$display("SET BLOCK LOCK-BITS");`
232			`#100`
233			SetBlockLockBit(`AddrSize'h75000);
234			`#100`
235			oeb = `VIH;
236
237			`$display("ERASE BLOCK");`
238			`#100`
239			EraseBlock(`AddrSize'h7000F);
240
241			`$display("READ DATA, Loose Timing, Toggle Addr");`
242			`#100`
243			`SetReadMode;`
244			`#100`
245			oeb = `VIL;
246			`#100`
247			address = `AddrSize'h70000;
248			`#100`
249			address = `AddrSize'h7FFFF;
250			`#100`
251			oeb = `VIH;
252
253			`begin: BadErase`
254			`$display("BAD ERASE TEST");`
255			`#100`
256			address = `AddrSize'h60000;
257			`#100`
258			dq_reg = `EraseBlockCmd;
259			`#100`
260			web = `VIL;
261			`#100`
262			web = `VIH;
263			`#100`
264			dq_reg = `ReadArrayCmd;
265			`#100`
266			web = `VIL;
267			`#100`
268			web = `VIH;
269			`#100`
270			dq_reg = `MaxOutputs'hz;
271			`#100`
272			oeb = `VIL;
273			`#1000`
274			`begin: Poll`
275			`forever`
276			`begin`
277			oeb = `VIH;
278			`#1000`
279			oeb = `VIL;
280			`#1000`
281			if (dq[7] == `VIH)
282			`disable Poll;`
283			`end`
284			`end`
285			`end //BadErase`
286			`#200`
287			`ReadCSRMode;`
288			`#200`
289			`ClearCSRMode;`
290			`#200`
291			`ReadCSRMode;`
292			`#200`
293			`SetReadMode;`
294			`#100`
295			ReadData(`AddrSize'h60000);
296			`#100`
297			oeb = `VIH;
298
299			`begin : BadLockBit`
300			`$display("BAD LOCK-BIT SEQUENCE TEST");`
301			`#100`
302			address = `AddrSize'h40000;
303			`#100`
304			dq_reg = `LBSetupCmd;
305			`#100`
306			web = `VIL;
307			`#100`
308			web = `VIH;
309			`#100`
310			dq_reg = `MaxOutputs'h55;
311			`#100`
312			web = `VIL;
313			`#100`
314			web = `VIH;
315			`#100`
316			dq_reg = `MaxOutputs'hz;
317			`#100`
318			oeb = `VIL;
319			#((`AC_Set_LockBit_50_12*`TimerPeriod_)-5000);
320			`begin : Poll`
321			`forever`
322			`begin`
323			oeb = `VIH;
324			`#1000`
325			oeb = `VIL;
326			`#1000`
327			if (dq[7] == `VIH)
328			`disable Poll;`
329			`end //forever`
330			`end //Poll`
331			`#300`
332			`ClearCSRMode;`
333			`end`
334
335			`$display("LOW Vpp OPERATION TEST");`
336			`#100`
337			`vpp =1300;`
338			`#100`
339			ProgramData(`AddrSize'h33333, `MaxOutputs'h33);
340			`#100`
341			EraseBlock(`AddrSize'h6F000);
342			`#100`
343			`vpp = 12000;`
344			`#100`
345			`SetReadMode;`
346			`#100`
347			ReadData(`AddrSize'h33333);
348			`#100`
349			address = `AddrSize'h60000;
350			`#100`
351			oeb = `VIH;
352
353			`#1000`
354			`powerdown;`
355			`#1000 $finish;`
356			`end`
357
358			`always @(dq or address or ceb or rpb or oeb or web or vcc or vpp or rpblevel)`
359			`begin`
360			`$display(`
361			`"%d Addr = %h, Data = %h, CEb=%b, RPb=%b, OEb=%b, WEb=%d, vcc=%d, vpp = %d",`
362			`$time, address, dq, ceb, rpb, oeb, web, vcc, vpp);`
363			`end`
364
365			`task powerup;`
366			`begin`
367			`$display(" POWERUP TASK");`
368			rpb = `VIL; //reset
369			`#100`
370			`address = 0;`
371			`#100`
372			web = `VIH; //write enable high
373			`#100`
374			oeb = `VIH; //output ts
375			`#100`
376			ceb = `VIH; //disabled
377			`#100`
378			`vcc = 5000; //power up vcc`
379			`#5000`
380			`vpp = 12000; //ramp up vpp`
381			`#5000`
382			rpb = `VIH; //out of reset
383			rpblevel = `rpb_vih;
384			`#100`
385			oeb = `VIL; //enable outputs
386			`#100`
387			ceb = `VIL; //enable chip
388			`end`
389			`endtask`
390
391
392			`task powerdown;`
393			`begin`
394			`$display(" POWERDOWN TASK");`
395			`address = 0;`
396			`#100`
397			rpb = `VIL; //reset
398			`#100`
399			oeb = `VIH; //output ts
400			`#100`
401			web = `VIH; //we high
402			`#100`
403			ceb = `VIH; //disabled
404			`#100`
405			`vpp = 0; //power down vpp`
406			`#5000`
407			`vcc = 0; //ramp down vcc`
408			`end`
409			`endtask`
410
411
412			`task ReadData;`
413			input [`AddrSize-1:0] addr;
414
415			`begin`
416			`$display(" READDATA TASK");`
417			oeb = `VIH;
418			`#100`
419			`address = addr;`
420			`#100`
421			oeb = `VIL;
422			`end`
423			`endtask`
424
425
426			`task SetReadMode;`
427			`begin`
428			`$display(" SETREADMODE TASK");`
429			oeb = `VIH;
430			`#100`
431			dq_reg[`Byte] = `ReadArrayCmd;
432			`#100`
433			web = `VIL;
434			`#100`
435			web = `VIH;
436			`#100`
437			dq_reg = `MaxOutputs'hz;
438			`end`
439			`endtask`
440
441
442			`task ReadID;`
443			`begin`
444			`$display(" READID TASK");`
445			oeb = `VIH;
446			`#100`
447			address = `AddrSize'h0;
448			`#100`
449			dq_reg[`Byte] = `ReadIDCmd;
450			`#100`
451			web = `VIL;
452			`#100`
453			web = `VIH;
454			`#100`
455			dq_reg = `MaxOutputs'hz;
456			`#100`
457			oeb = `VIL;
458			`#100`
459			address = `AddrSize'h1;
460			`#100`
461			address = `AddrSize'h3;
462			`#100`
463			address = `AddrSize'h2;
464			`#100`
465			address = `AddrSize'h10002;
466			`end`
467			`endtask`
468
469
470			`task ReadCSRMode;`
471			`begin`
472			`$display(" READCSR MODE TASK");`
473			oeb = `VIH;
474			`#100`
475			dq_reg[`Byte] = `ReadCSRCmd;
476			`#100`
477			web = `VIL;
478			`#100`
479			web = `VIH;
480			`#100`
481			dq_reg = `MaxOutputs'hz;
482			`#100`
483			oeb = `VIL;
484			`end`
485			`endtask`
486
487
488			`task ClearCSRMode;`
489			`begin`
490			`$display(" CLEARCSRMODE TASK");`
491			oeb = `VIH;
492			`#100`
493			dq_reg[`Byte] = `ClearCSRCmd;
494			`#100`
495			web = `VIL;
496			`#100`
497			web = `VIH;
498			`#100`
499			dq_reg = `MaxOutputs'hz;
500			`end`
501			`endtask`
502
503
504			`task StartProgram;`
505			input [`AddrSize-1:0] addr;
506			input [`MaxOutputs-1:0] data;
507			`begin`
508			`$display(" STARTPROGRAM TASK");`
509			`#100`
510			`address = addr;`
511			`#100`
512			dq_reg[`Byte] = `Program2Cmd;
513			`#100`
514			web = `VIL;
515			`#100`
516			web = `VIH;
517			`#100`
518			dq_reg[`Byte] = data;
519			`#100`
520			web = `VIL;
521			`#100`
522			web = `VIH;
523			`#100`
524			dq_reg = `MaxOutputs'hz;
525			`end`
526			`endtask`
527
528
529			`task ProgramData;`
530			input [`AddrSize-1:0] addr;
531			input [`MaxOutputs-1:0] data;
532			`begin`
533			`$display(" PROGRAMDATA TASK");`
534			`StartProgram(addr, data);`
535			`#100`
536			oeb = `VIL;
537			#((`AC_ProgramTime_Byte_50_12*`TimerPeriod_)-500)
538			`begin: Poll`
539			`forever`
540			`begin`
541			oeb = `VIH;
542			`#100`
543			oeb = `VIL;
544			`#100`
545			if (dq[7] == `VIH)
546			`disable Poll;`
547			`end //forever`
548			`end //Poll`
549			`#300`
550			`ClearCSRMode;`
551			`end`
552			`endtask`
553
554
555			`task StartProgram2;`
556			input [`AddrSize-1:0] addr;
557			input [`MaxOutputs-1:0] data;
558			`begin`
559			`$display(" STARTPROGRAM2 TASK");`
560			`#100`
561			`address = addr;`
562			`#100`
563			dq_reg[`Byte] = `Program2Cmd;
564			`#100`
565			web = `VIL;
566			`#5`
567			ceb = `VIL;
568			`#100`
569			ceb = `VIH;
570			`#5`
571			web = `VIH;
572			`#100`
573			dq_reg[`Byte] = data;
574			`#100`
575			web = `VIL;
576			`#5`
577			ceb = `VIL;
578			`#100`
579			ceb = `VIH;
580			`#5`
581			web = `VIH;
582			`#100`
583			ceb = `VIL;
584			dq_reg = `MaxOutputs'hz;
585			`end`
586			`endtask`
587
588
589			`task ProgramData2;`
590			input [`AddrSize-1:0] addr;
591			input [`MaxOutputs-1:0] data;
592			`begin`
593			`$display(" PROGRAMDATA2 TASK");`
594			ceb = `VIH;
595			`StartProgram2(addr, data);`
596			`#100`
597			oeb = `VIL;
598			#((`AC_ProgramTime_Byte_50_12*`TimerPeriod_)-500)
599			`begin: Poll`
600			`forever`
601			`begin`
602			oeb = `VIH;
603			`#100`
604			oeb = `VIL;
605			`#100`
606			if (dq[7] == `VIH)
607			`disable Poll;`
608			`end //forever`
609			`end //Poll`
610			`#300`
611			`ClearCSRMode;`
612			`end`
613			`endtask`
614
615			`task StartErase;`
616			input [`AddrSize-1:0] BlockAddr;
617			`begin`
618			`$display(" STARTERASE TASK");`
619			`#100`
620			`address = BlockAddr;`
621			`#100`
622			dq_reg = `EraseBlockCmd;
623			`#100`
624			web = `VIL;
625			`#100`
626			web = `VIH;
627			`#100`
628			dq_reg = `ConfirmCmd;
629			`#100`
630			web = `VIL;
631			`#100`
632			web = `VIH;
633			`#100`
634			dq_reg = `MaxOutputs'hz;
635			`end`
636			`endtask`
637
638
639			`task EraseBlock;`
640			input [`AddrSize-1:0] BlockAddr;
641			`time EraseTime;`
642			`begin`
643			`$display(" ERASEBLOCK TASK");`
644			`StartErase(BlockAddr);`
645			`#100`
646			oeb = `VIL;
647			EraseTime = ((`AC_EraseTime_Block_50_12*`TimerPeriod_)-5000);
648			`#EraseTime`
649			`begin: Poll`
650			`forever`
651			`begin`
652			oeb = `VIH;
653			`#1000`
654			oeb = `VIL;
655			`#1000`
656			if (dq[7] == `VIH)
657			`disable Poll;`
658			`end`
659			`end`
660			`#300`
661			`ClearCSRMode;`
662			`end`
663			`endtask`
664
665
666			`task StartLockBit;`
667			input [`AddrSize-1:0] BlockAddr;
668			`begin`
669			`$display(" STARTLOCKBIT TASK");`
670			`#100`
671			`address = BlockAddr;`
672			`#100`
673			dq_reg = `LBSetupCmd;
674			`#100`
675			web = `VIL;
676			`#100`
677			web = `VIH;
678			`#100`
679			dq_reg = `SetBlockLBCmd;
680			`#100`
681			web = `VIL;
682			`#100`
683			web = `VIH;
684			`#100`
685			dq_reg = `MaxOutputs'hz;
686			`end`
687			`endtask`
688
689
690			`task SetBlockLockBit;`
691			input [`AddrSize-1:0] BlockAddr;
692			`time LockBitTime;`
693			`begin`
694			`$display(" SETBLOCKLOCKBIT TASK");`
695			`StartLockBit(BlockAddr);`
696			`#100`
697			oeb = `VIL;
698			LockBitTime = ((`AC_Set_LockBit_50_12*`TimerPeriod_)-5000);
699			`#LockBitTime`
700			`begin : Poll`
701			`forever`
702			`begin`
703			oeb = `VIH;
704			`#1000`
705			oeb = `VIL;
706			`#1000`
707			if (dq[7] == `VIH)
708			`disable Poll;`
709			`end //forever`
710			`end //Poll`
711			`#300`
712			`ClearCSRMode;`
713			`end`
714			`endtask`
715
716
717			`task StartClearBit;`
718			`begin`
719			`$display(" STARTCLEARBIT TASK");`
720			`#100`
721			dq_reg = `LBSetupCmd;
722			`#100`
723			web = `VIL;
724			`#100`
725			web = `VIH;
726			`#100`
727			dq_reg = `ClearLBCmd;
728			`#100`
729			web = `VIL;
730			`#100`
731			web = `VIH;
732			`#100`
733			dq_reg = `MaxOutputs'hz;
734			`end`
735			`endtask`
736
737
738			`task ClearBlockLockBit;`
739			`time ClearBitTime;`
740			`begin`
741			`$display(" CLEARBLOCKLOCKBIT TASK");`
742			`StartClearBit;`
743
744			`#100`
745			oeb = `VIL;
746			ClearBitTime = ((`AC_Clear_LockBit_50_12*`TimerPeriod_)-5000);
747			`#ClearBitTime`
748			`begin : Poll`
749			`forever`
750			`begin`
751			oeb = `VIH;
752			`#1000`
753			oeb = `VIL;
754			`#1000`
755			if (dq[7] == `VIH)
756			`disable Poll;`
757			`end //forever`
758			`end //Poll`
759			`#300`
760			`ClearCSRMode;`
761			`end`
762			`endtask`
763
764
765			`task SetMasterLockBit;`
766			input [`AddrSize-1:0] DeviceAddr;
767			`time LockBitTime;`
768			`begin`
769			`$display(" SETMASTERLOCKBIT TASK");`
770			`#100`
771			`address = DeviceAddr;`
772			`#100`
773			dq_reg = `LBSetupCmd;
774			`#100`
775			web = `VIL;
776			`#100`
777			web = `VIH;
778			`#100`
779			dq_reg = `SetMasterLBCmd;
780			`#100`
781			web = `VIL;
782			`#100`
783			web = `VIH;
784			`#100`
785			dq_reg = `MaxOutputs'hz;
786			`#100`
787			oeb = `VIL;
788			LockBitTime = ((`AC_Set_LockBit_50_12*`TimerPeriod_)-5000);
789			`#LockBitTime`
790			`begin : Poll`
791			`forever`
792			`begin`
793			oeb = `VIH;
794			`#1000`
795			oeb = `VIL;
796			`#1000`
797			if (dq[7] == `VIH)
798			`disable Poll;`
799			`end //forever`
800			`end //Poll`
801			`#300`
802			`ClearCSRMode;`
803			`end`
804			`endtask`
805
806			`task Suspend;`
807			`begin`
808			`$display(" SUSPEND TASK");`
809			`#100`
810			dq_reg = `SuspendCmd;
811			`#100`
812			web = `VIL;
813			`#100`
814			web = `VIH;
815			`#100`
816			dq_reg = `MaxOutputs'hz;
817			`#100`
818			oeb = `VIL;
819			`#500`
820			`begin: Poll`
821			`forever`
822			`begin`
823			oeb = `VIH;
824			`#100`
825			oeb = `VIL;
826			`#100`
827			if (dq[7] == `VIH)
828			`disable Poll;`
829			`end`
830			`end`
831			`end`
832			`endtask`
833
834
835			`task Resume;`
836			`begin`
837			`$display(" RESUME TASK");`
838			`#100`
839			dq_reg = `ResumeCmd;
840			`#100`
841			web = `VIL;
842			`#100`
843			web = `VIH;
844			`#100`
845			dq_reg = `MaxOutputs'hz;
846			`end`
847			`endtask`
848
849			`endmodule`