------------------------------------------------------------------------- -- Project: JCPU, a portable 8-bit RISC CPU written in VHDL -- This file: loadable ROM -- -- Copyright (C) 2007 J. Ahrensfeld -- -- This program is free software: you can redistribute it and/or modify -- it under the terms of the GNU General Public License as published by -- the Free Software Foundation, either version 3 of the License, or -- (at your option) any later version. -- -- This program is distributed in the hope that it will be useful, -- but WITHOUT ANY WARRANTY; without even the implied warranty of -- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the -- GNU General Public License for more details. -- -- You should have received a copy of the GNU General Public License -- along with this program. If not, see . -- -- For questions and ideas, please contact the author at jens@jayfield.org -- -------------------------------------------------------------------------- LIBRARY ieee; use IEEE.STD_LOGIC_1164.ALL; USE ieee.numeric_std.ALL; library UNISIM; use UNISIM.VComponents.all; library work; use work.cpu_pkg.all; ENTITY irom IS Port ( clk : in STD_LOGIC; ce : in STD_LOGIC; addr : in inst_addr_t; dout : out inst_t ); END irom; ARCHITECTURE loadable OF irom IS -- JASM_ROM_INSERT_HERE -- Assembled from sdram_test.jsm type imem_rom_t is array (0 to 1023) of inst_t; signal imem_rom : imem_rom_t := ( "110000" & X"007", -- 0x000: JMP 0x007 "111100" & X"000", -- 0x001: PUSH R00 "101000" & X"040", -- 0x002: XIN R00, (0x04) "011011" & X"100", -- 0x003: OR R00, 0x10 "100100" & X"040", -- 0x004: XOUT (0x04), R00 "111101" & X"000", -- 0x005: POP R00 "111111" & X"000", -- 0x006: RETI "111011" & X"128", -- 0x007: CALL 0x128 "000011" & X"000", -- 0x008: MOV R00, 0x00 "100100" & X"010", -- 0x009: XOUT (0x01), R00 "000011" & X"040", -- 0x00A: MOV R00, 0x04 "100100" & X"040", -- 0x00B: XOUT (0x04), R00 "101001" & X"030", -- 0x00C: CIN R00, (0x03) "011011" & X"050", -- 0x00D: OR R00, 0x05 "100110" & X"030", -- 0x00E: COUT (0x03), R00 "000011" & X"010", -- 0x00F: MOV R00, 0x01 "111011" & X"145", -- 0x010: CALL 0x145 "000011" & X"000", -- 0x011: MOV R00, 0x00 "000011" & X"C01", -- 0x012: MOV R01, 0xC0 "100100" & X"101", -- 0x013: XOUT (0x10), R01 "100100" & X"111", -- 0x014: XOUT (0x11), R01 "100100" & X"121", -- 0x015: XOUT (0x12), R01 "111011" & X"1B9", -- 0x016: CALL 0x1B9 "111011" & X"19E", -- 0x017: CALL 0x19E "000011" & X"031", -- 0x018: MOV R01, 0x03 "111011" & X"14A", -- 0x019: CALL 0x14A "000011" & X"031", -- 0x01A: MOV R01, 0x03 "111011" & X"1AA", -- 0x01B: CALL 0x1AA "000011" & X"001", -- 0x01C: MOV R01, 0x00 "111011" & X"1B6", -- 0x01D: CALL 0x1B6 "101000" & X"040", -- 0x01E: XIN R00, (0x04) "011011" & X"100", -- 0x01F: OR R00, 0x10 "100100" & X"040", -- 0x020: XOUT (0x04), R00 "111011" & X"1C6", -- 0x021: CALL 0x1C6 "011011" & X"200", -- 0x022: OR R00, 0x20 "100100" & X"040", -- 0x023: XOUT (0x04), R00 "111011" & X"1C6", -- 0x024: CALL 0x1C6 "011001" & X"EF0", -- 0x025: AND R00, 0xEF "100100" & X"040", -- 0x026: XOUT (0x04), R00 "111011" & X"1C6", -- 0x027: CALL 0x1C6 "011001" & X"CF0", -- 0x028: AND R00, 0xCF "100100" & X"040", -- 0x029: XOUT (0x04), R00 "000011" & X"010", -- 0x02A: MOV R00, 0x01 "111011" & X"145", -- 0x02B: CALL 0x145 "000011" & X"0E1", -- 0x02C: MOV R01, 0x0E "111011" & X"14A", -- 0x02D: CALL 0x14A "000011" & X"0E1", -- 0x02E: MOV R01, 0x0E "111011" & X"1B3", -- 0x02F: CALL 0x1B3 "000011" & X"001", -- 0x030: MOV R01, 0x00 "111011" & X"1B6", -- 0x031: CALL 0x1B6 "111011" & X"0CC", -- 0x032: CALL 0x0CC "000011" & X"800", -- 0x033: MOV R00, 0x80 "000011" & X"08F", -- 0x034: MOV R15, 0x08 "000111" & X"000", -- 0x035: MOVX (R00), 0x00 "010001" & X"010", -- 0x036: INC R00 "010101" & X"01F", -- 0x037: DEC R15 "110010" & X"035", -- 0x038: JNZ 0x035 "101000" & X"0A0", -- 0x039: XIN R00, (0x0A) "001111" & X"FF0", -- 0x03A: CMP R00, 0xFF "111001" & X"04B", -- 0x03B: JEQ 0x04B "000011" & X"082", -- 0x03C: MOV R02, 0x08 "101000" & X"070", -- 0x03D: XIN R00, (0x07) "100100" & X"010", -- 0x03E: XOUT (0x01), R00 "011001" & X"040", -- 0x03F: AND R00, 0x04 "110010" & X"03D", -- 0x040: JNZ 0x03D "000011" & X"100", -- 0x041: MOV R00, 0x10 "100100" & X"070", -- 0x042: XOUT (0x07), R00 "010101" & X"022", -- 0x043: SUB R02, 0x02 "110010" & X"03D", -- 0x044: JNZ 0x03D "111011" & X"0AB", -- 0x045: CALL 0x0AB "000011" & X"060", -- 0x046: MOV R00, 0x06 "100100" & X"070", -- 0x047: XOUT (0x07), R00 "000011" & X"080", -- 0x048: MOV R00, 0x08 "111011" & X"0D3", -- 0x049: CALL 0x0D3 "110000" & X"039", -- 0x04A: JMP 0x039 "111011" & X"0E3", -- 0x04B: CALL 0x0E3 "111011" & X"1BF", -- 0x04C: CALL 0x1BF "110000" & X"04E", -- 0x04D: JMP 0x04E "000011" & X"010", -- 0x04E: MOV R00, 0x01 "111011" & X"145", -- 0x04F: CALL 0x145 "000011" & X"1D1", -- 0x050: MOV R01, 0x1D "111011" & X"14A", -- 0x051: CALL 0x14A "000011" & X"1D1", -- 0x052: MOV R01, 0x1D "111011" & X"1B3", -- 0x053: CALL 0x1B3 "000011" & X"001", -- 0x054: MOV R01, 0x00 "111011" & X"1B6", -- 0x055: CALL 0x1B6 "111011" & X"0CC", -- 0x056: CALL 0x0CC "000011" & X"000", -- 0x057: MOV R00, 0x00 "001101" & X"000", -- 0x058: MOVC (0x00), R00 "101000" & X"0A0", -- 0x059: XIN R00, (0x0A) "001111" & X"FF0", -- 0x05A: CMP R00, 0xFF "111001" & X"076", -- 0x05B: JEQ 0x076 "000011" & X"082", -- 0x05C: MOV R02, 0x08 "001010" & X"001", -- 0x05D: MOVC R01, (0x00) "000011" & X"800", -- 0x05E: MOV R00, 0x80 "000011" & X"08F", -- 0x05F: MOV R15, 0x08 "000110" & X"001", -- 0x060: MOVX (R01), R00 "010001" & X"010", -- 0x061: INC R00 "010001" & X"011", -- 0x062: INC R01 "010101" & X"01F", -- 0x063: DEC R15 "110010" & X"060", -- 0x064: JNZ 0x060 "101000" & X"070", -- 0x065: XIN R00, (0x07) "100100" & X"010", -- 0x066: XOUT (0x01), R00 "011001" & X"040", -- 0x067: AND R00, 0x04 "110010" & X"065", -- 0x068: JNZ 0x065 "000011" & X"100", -- 0x069: MOV R00, 0x10 "100100" & X"070", -- 0x06A: XOUT (0x07), R00 "001010" & X"000", -- 0x06B: MOVC R00, (0x00) "010001" & X"010", -- 0x06C: INC R00 "001101" & X"000", -- 0x06D: MOVC (0x00), R00 "010101" & X"022", -- 0x06E: SUB R02, 0x02 "110010" & X"05D", -- 0x06F: JNZ 0x05D "111011" & X"0AB", -- 0x070: CALL 0x0AB "000011" & X"060", -- 0x071: MOV R00, 0x06 "100100" & X"070", -- 0x072: XOUT (0x07), R00 "000011" & X"080", -- 0x073: MOV R00, 0x08 "111011" & X"0D3", -- 0x074: CALL 0x0D3 "110000" & X"059", -- 0x075: JMP 0x059 "111011" & X"0E3", -- 0x076: CALL 0x0E3 "111011" & X"1BF", -- 0x077: CALL 0x1BF "000011" & X"010", -- 0x078: MOV R00, 0x01 "111011" & X"145", -- 0x079: CALL 0x145 "000011" & X"2B1", -- 0x07A: MOV R01, 0x2B "111011" & X"14A", -- 0x07B: CALL 0x14A "000011" & X"2B1", -- 0x07C: MOV R01, 0x2B "111011" & X"1B3", -- 0x07D: CALL 0x1B3 "000011" & X"001", -- 0x07E: MOV R01, 0x00 "111011" & X"1B6", -- 0x07F: CALL 0x1B6 "111011" & X"0CC", -- 0x080: CALL 0x0CC "000011" & X"000", -- 0x081: MOV R00, 0x00 "001101" & X"000", -- 0x082: MOVC (0x00), R00 "101000" & X"0A0", -- 0x083: XIN R00, (0x0A) "001111" & X"FF0", -- 0x084: CMP R00, 0xFF "111001" & X"0B3", -- 0x085: JEQ 0x0B3 "111011" & X"0AB", -- 0x086: CALL 0x0AB "000011" & X"050", -- 0x087: MOV R00, 0x05 "100100" & X"070", -- 0x088: XOUT (0x07), R00 "000011" & X"083", -- 0x089: MOV R03, 0x08 "101000" & X"070", -- 0x08A: XIN R00, (0x07) "100100" & X"010", -- 0x08B: XOUT (0x01), R00 "011001" & X"200", -- 0x08C: AND R00, 0x20 "110010" & X"08A", -- 0x08D: JNZ 0x08A "001010" & X"001", -- 0x08E: MOVC R01, (0x00) "000011" & X"800", -- 0x08F: MOV R00, 0x80 "000011" & X"08F", -- 0x090: MOV R15, 0x08 "000100" & X"002", -- 0x091: MOVX R02, (R00) "001110" & X"012", -- 0x092: CMP R02, R01 "111010" & X"0BF", -- 0x093: JNE 0x0BF "010001" & X"010", -- 0x094: INC R00 "010001" & X"011", -- 0x095: INC R01 "010101" & X"01F", -- 0x096: DEC R15 "110010" & X"091", -- 0x097: JNZ 0x091 "000011" & X"200", -- 0x098: MOV R00, 0x20 "100100" & X"070", -- 0x099: XOUT (0x07), R00 "001010" & X"000", -- 0x09A: MOVC R00, (0x00) "010001" & X"010", -- 0x09B: INC R00 "001101" & X"000", -- 0x09C: MOVC (0x00), R00 "010101" & X"023", -- 0x09D: SUB R03, 0x02 "110010" & X"08A", -- 0x09E: JNZ 0x08A "000011" & X"080", -- 0x09F: MOV R00, 0x08 "111011" & X"0D3", -- 0x0A0: CALL 0x0D3 "110000" & X"083", -- 0x0A1: JMP 0x083 "111100" & X"000", -- 0x0A2: PUSH R00 "000011" & X"800", -- 0x0A3: MOV R00, 0x80 "100100" & X"070", -- 0x0A4: XOUT (0x07), R00 "101000" & X"070", -- 0x0A5: XIN R00, (0x07) "100100" & X"010", -- 0x0A6: XOUT (0x01), R00 "011001" & X"800", -- 0x0A7: AND R00, 0x80 "110001" & X"0A5", -- 0x0A8: JZ 0x0A5 "111101" & X"000", -- 0x0A9: POP R00 "111110" & X"000", -- 0x0AA: RET "111011" & X"0A2", -- 0x0AB: CALL 0x0A2 "111100" & X"000", -- 0x0AC: PUSH R00 "101000" & X"070", -- 0x0AD: XIN R00, (0x07) "100100" & X"010", -- 0x0AE: XOUT (0x01), R00 "011001" & X"010", -- 0x0AF: AND R00, 0x01 "110010" & X"0AD", -- 0x0B0: JNZ 0x0AD "111101" & X"000", -- 0x0B1: POP R00 "111110" & X"000", -- 0x0B2: RET "000011" & X"010", -- 0x0B3: MOV R00, 0x01 "111011" & X"145", -- 0x0B4: CALL 0x145 "000011" & X"391", -- 0x0B5: MOV R01, 0x39 "111011" & X"14A", -- 0x0B6: CALL 0x14A "000011" & X"C00", -- 0x0B7: MOV R00, 0xC0 "111011" & X"145", -- 0x0B8: CALL 0x145 "111011" & X"0EE", -- 0x0B9: CALL 0x0EE "000011" & X"391", -- 0x0BA: MOV R01, 0x39 "111011" & X"1B3", -- 0x0BB: CALL 0x1B3 "000011" & X"001", -- 0x0BC: MOV R01, 0x00 "111011" & X"1B6", -- 0x0BD: CALL 0x1B6 "110000" & X"0CA", -- 0x0BE: JMP 0x0CA "000011" & X"010", -- 0x0BF: MOV R00, 0x01 "111011" & X"145", -- 0x0C0: CALL 0x145 "000011" & X"431", -- 0x0C1: MOV R01, 0x43 "111011" & X"14A", -- 0x0C2: CALL 0x14A "111011" & X"0EE", -- 0x0C3: CALL 0x0EE "111011" & X"106", -- 0x0C4: CALL 0x106 "000011" & X"431", -- 0x0C5: MOV R01, 0x43 "111011" & X"1B3", -- 0x0C6: CALL 0x1B3 "000011" & X"001", -- 0x0C7: MOV R01, 0x00 "111011" & X"1B6", -- 0x0C8: CALL 0x1B6 "110000" & X"0CA", -- 0x0C9: JMP 0x0CA "111011" & X"1BF", -- 0x0CA: CALL 0x1BF "110000" & X"02A", -- 0x0CB: JMP 0x02A "111100" & X"000", -- 0x0CC: PUSH R00 "000011" & X"000", -- 0x0CD: MOV R00, 0x00 "100100" & X"080", -- 0x0CE: XOUT (0x08), R00 "100100" & X"090", -- 0x0CF: XOUT (0x09), R00 "100100" & X"0A0", -- 0x0D0: XOUT (0x0A), R00 "111101" & X"000", -- 0x0D1: POP R00 "111110" & X"000", -- 0x0D2: RET "111100" & X"001", -- 0x0D3: PUSH R01 "111100" & X"002", -- 0x0D4: PUSH R02 "111100" & X"003", -- 0x0D5: PUSH R03 "101000" & X"081", -- 0x0D6: XIN R01, (0x08) "101000" & X"092", -- 0x0D7: XIN R02, (0x09) "101000" & X"0A3", -- 0x0D8: XIN R03, (0x0A) "010000" & X"001", -- 0x0D9: ADD R01, R00 "010011" & X"002", -- 0x0DA: ADDC R02, 0x00 "010011" & X"003", -- 0x0DB: ADDC R03, 0x00 "100100" & X"081", -- 0x0DC: XOUT (0x08), R01 "100100" & X"092", -- 0x0DD: XOUT (0x09), R02 "100100" & X"0A3", -- 0x0DE: XOUT (0x0A), R03 "111101" & X"003", -- 0x0DF: POP R03 "111101" & X"002", -- 0x0E0: POP R02 "111101" & X"001", -- 0x0E1: POP R01 "111110" & X"000", -- 0x0E2: RET "000011" & X"C00", -- 0x0E3: MOV R00, 0xC0 "111011" & X"145", -- 0x0E4: CALL 0x145 "111011" & X"0EE", -- 0x0E5: CALL 0x0EE "111110" & X"000", -- 0x0E6: RET "111100" & X"001", -- 0x0E7: PUSH R01 "111011" & X"121", -- 0x0E8: CALL 0x121 "111011" & X"15C", -- 0x0E9: CALL 0x15C "000010" & X"010", -- 0x0EA: MOV R00, R01 "111011" & X"15C", -- 0x0EB: CALL 0x15C "111101" & X"001", -- 0x0EC: POP R01 "111110" & X"000", -- 0x0ED: RET "111100" & X"000", -- 0x0EE: PUSH R00 "101000" & X"0A0", -- 0x0EF: XIN R00, (0x0A) "111011" & X"0E7", -- 0x0F0: CALL 0x0E7 "101000" & X"090", -- 0x0F1: XIN R00, (0x09) "111011" & X"0E7", -- 0x0F2: CALL 0x0E7 "101000" & X"080", -- 0x0F3: XIN R00, (0x08) "111011" & X"0E7", -- 0x0F4: CALL 0x0E7 "111101" & X"000", -- 0x0F5: POP R00 "111110" & X"000", -- 0x0F6: RET "111100" & X"000", -- 0x0F7: PUSH R00 "010001" & X"031", -- 0x0F8: ADD R01, 0x03 "001001" & X"010", -- 0x0F9: MOVC R00, (R01) "111011" & X"0E7", -- 0x0FA: CALL 0x0E7 "010101" & X"011", -- 0x0FB: DEC R01 "001001" & X"010", -- 0x0FC: MOVC R00, (R01) "111011" & X"0E7", -- 0x0FD: CALL 0x0E7 "010101" & X"011", -- 0x0FE: DEC R01 "001001" & X"010", -- 0x0FF: MOVC R00, (R01) "111011" & X"0E7", -- 0x100: CALL 0x0E7 "010101" & X"011", -- 0x101: DEC R01 "001001" & X"010", -- 0x102: MOVC R00, (R01) "111011" & X"0E7", -- 0x103: CALL 0x0E7 "111101" & X"000", -- 0x104: POP R00 "111110" & X"000", -- 0x105: RET "111100" & X"000", -- 0x106: PUSH R00 "000011" & X"C00", -- 0x107: MOV R00, 0xC0 "111011" & X"145", -- 0x108: CALL 0x145 "000101" & X"870", -- 0x109: MOVX R00, (0x87) "111011" & X"0E7", -- 0x10A: CALL 0x0E7 "000101" & X"860", -- 0x10B: MOVX R00, (0x86) "111011" & X"0E7", -- 0x10C: CALL 0x0E7 "000101" & X"850", -- 0x10D: MOVX R00, (0x85) "111011" & X"0E7", -- 0x10E: CALL 0x0E7 "000101" & X"840", -- 0x10F: MOVX R00, (0x84) "111011" & X"0E7", -- 0x110: CALL 0x0E7 "000101" & X"830", -- 0x111: MOVX R00, (0x83) "111011" & X"0E7", -- 0x112: CALL 0x0E7 "000101" & X"820", -- 0x113: MOVX R00, (0x82) "111011" & X"0E7", -- 0x114: CALL 0x0E7 "000101" & X"810", -- 0x115: MOVX R00, (0x81) "111011" & X"0E7", -- 0x116: CALL 0x0E7 "000101" & X"800", -- 0x117: MOVX R00, (0x80) "111011" & X"0E7", -- 0x118: CALL 0x0E7 "111101" & X"000", -- 0x119: POP R00 "111110" & X"000", -- 0x11A: RET "011001" & X"0F0", -- 0x11B: AND R00, 0x0F "001111" & X"0A0", -- 0x11C: CMP R00, 0x0A "110101" & X"11F", -- 0x11D: JLT 0x11F "010001" & X"070", -- 0x11E: ADD R00, 0x07 "010001" & X"300", -- 0x11F: ADD R00, 0x30 "111110" & X"000", -- 0x120: RET "111100" & X"000", -- 0x121: PUSH R00 "111011" & X"11B", -- 0x122: CALL 0x11B "000010" & X"001", -- 0x123: MOV R01, R00 "111101" & X"000", -- 0x124: POP R00 "101010" & X"000", -- 0x125: SWAP R00 "111011" & X"11B", -- 0x126: CALL 0x11B "111110" & X"000", -- 0x127: RET "000011" & X"002", -- 0x128: MOV R02, 0x00 "000011" & X"030", -- 0x129: MOV R00, 0x03 "111011" & X"174", -- 0x12A: CALL 0x174 "111011" & X"1CD", -- 0x12B: CALL 0x1CD "000011" & X"002", -- 0x12C: MOV R02, 0x00 "000011" & X"030", -- 0x12D: MOV R00, 0x03 "111011" & X"174", -- 0x12E: CALL 0x174 "111011" & X"1CD", -- 0x12F: CALL 0x1CD "000011" & X"002", -- 0x130: MOV R02, 0x00 "000011" & X"020", -- 0x131: MOV R00, 0x02 "111011" & X"174", -- 0x132: CALL 0x174 "111011" & X"1D4", -- 0x133: CALL 0x1D4 "000011" & X"280", -- 0x134: MOV R00, 0x28 "111011" & X"145", -- 0x135: CALL 0x145 "000011" & X"0C0", -- 0x136: MOV R00, 0x0C "111011" & X"145", -- 0x137: CALL 0x145 "000011" & X"060", -- 0x138: MOV R00, 0x06 "111011" & X"145", -- 0x139: CALL 0x145 "000011" & X"010", -- 0x13A: MOV R00, 0x01 "111011" & X"145", -- 0x13B: CALL 0x145 "111110" & X"000", -- 0x13C: RET "111100" & X"000", -- 0x13D: PUSH R00 "111011" & X"168", -- 0x13E: CALL 0x168 "011001" & X"800", -- 0x13F: AND R00, 0x80 "110001" & X"143", -- 0x140: JZ 0x143 "111011" & X"1EB", -- 0x141: CALL 0x1EB "110000" & X"13E", -- 0x142: JMP 0x13E "111101" & X"000", -- 0x143: POP R00 "111110" & X"000", -- 0x144: RET "111100" & X"002", -- 0x145: PUSH R02 "000011" & X"002", -- 0x146: MOV R02, 0x00 "111011" & X"161", -- 0x147: CALL 0x161 "111101" & X"002", -- 0x148: POP R02 "111110" & X"000", -- 0x149: RET "111100" & X"000", -- 0x14A: PUSH R00 "000100" & X"010", -- 0x14B: MOVX R00, (R01) "010001" & X"011", -- 0x14C: INC R01 "001111" & X"000", -- 0x14D: TST R00 "110001" & X"151", -- 0x14E: JZ 0x151 "111011" & X"15C", -- 0x14F: CALL 0x15C "110000" & X"14B", -- 0x150: JMP 0x14B "111101" & X"000", -- 0x151: POP R00 "111110" & X"000", -- 0x152: RET "111100" & X"000", -- 0x153: PUSH R00 "001001" & X"010", -- 0x154: MOVC R00, (R01) "010001" & X"011", -- 0x155: INC R01 "001111" & X"000", -- 0x156: TST R00 "110001" & X"15A", -- 0x157: JZ 0x15A "111011" & X"15C", -- 0x158: CALL 0x15C "110000" & X"154", -- 0x159: JMP 0x154 "111101" & X"000", -- 0x15A: POP R00 "111110" & X"000", -- 0x15B: RET "111100" & X"002", -- 0x15C: PUSH R02 "000011" & X"402", -- 0x15D: MOV R02, 0x40 "111011" & X"161", -- 0x15E: CALL 0x161 "111101" & X"002", -- 0x15F: POP R02 "111110" & X"000", -- 0x160: RET "111011" & X"13D", -- 0x161: CALL 0x13D "111100" & X"000", -- 0x162: PUSH R00 "101010" & X"000", -- 0x163: SWAP R00 "111011" & X"174", -- 0x164: CALL 0x174 "111101" & X"000", -- 0x165: POP R00 "111011" & X"174", -- 0x166: CALL 0x174 "111110" & X"000", -- 0x167: RET "111100" & X"002", -- 0x168: PUSH R02 "000011" & X"002", -- 0x169: MOV R02, 0x00 "111011" & X"16D", -- 0x16A: CALL 0x16D "111101" & X"002", -- 0x16B: POP R02 "111110" & X"000", -- 0x16C: RET "111011" & X"187", -- 0x16D: CALL 0x187 "101010" & X"000", -- 0x16E: SWAP R00 "111100" & X"000", -- 0x16F: PUSH R00 "111011" & X"187", -- 0x170: CALL 0x187 "111101" & X"002", -- 0x171: POP R02 "011010" & X"020", -- 0x172: OR R00, R02 "111110" & X"000", -- 0x173: RET "111100" & X"001", -- 0x174: PUSH R01 "011001" & X"0F0", -- 0x175: AND R00, 0x0F "000010" & X"001", -- 0x176: MOV R01, R00 "011010" & X"021", -- 0x177: OR R01, R02 "100100" & X"031", -- 0x178: XOUT (0x03), R01 "111011" & X"1EB", -- 0x179: CALL 0x1EB "000010" & X"001", -- 0x17A: MOV R01, R00 "011010" & X"021", -- 0x17B: OR R01, R02 "011011" & X"801", -- 0x17C: OR R01, 0x80 "100100" & X"031", -- 0x17D: XOUT (0x03), R01 "111011" & X"1EB", -- 0x17E: CALL 0x1EB "000010" & X"001", -- 0x17F: MOV R01, R00 "011010" & X"021", -- 0x180: OR R01, R02 "100100" & X"031", -- 0x181: XOUT (0x03), R01 "111011" & X"1EB", -- 0x182: CALL 0x1EB "011011" & X"201", -- 0x183: OR R01, 0x20 "100100" & X"031", -- 0x184: XOUT (0x03), R01 "111101" & X"001", -- 0x185: POP R01 "111110" & X"000", -- 0x186: RET "111100" & X"001", -- 0x187: PUSH R01 "000011" & X"201", -- 0x188: MOV R01, 0x20 "011010" & X"021", -- 0x189: OR R01, R02 "100100" & X"031", -- 0x18A: XOUT (0x03), R01 "111011" & X"1EB", -- 0x18B: CALL 0x1EB "000011" & X"201", -- 0x18C: MOV R01, 0x20 "011010" & X"021", -- 0x18D: OR R01, R02 "011011" & X"801", -- 0x18E: OR R01, 0x80 "100100" & X"031", -- 0x18F: XOUT (0x03), R01 "111011" & X"1EB", -- 0x190: CALL 0x1EB "101000" & X"030", -- 0x191: XIN R00, (0x03) "011001" & X"0F0", -- 0x192: AND R00, 0x0F "000011" & X"201", -- 0x193: MOV R01, 0x20 "011010" & X"021", -- 0x194: OR R01, R02 "100100" & X"031", -- 0x195: XOUT (0x03), R01 "111011" & X"1EB", -- 0x196: CALL 0x1EB "111101" & X"001", -- 0x197: POP R01 "111110" & X"000", -- 0x198: RET "111100" & X"000", -- 0x199: PUSH R00 "000011" & X"020", -- 0x19A: MOV R00, 0x02 "100100" & X"0E0", -- 0x19B: XOUT (0x0E), R00 "111101" & X"000", -- 0x19C: POP R00 "111110" & X"000", -- 0x19D: RET "111100" & X"000", -- 0x19E: PUSH R00 "000011" & X"010", -- 0x19F: MOV R00, 0x01 "100100" & X"0E0", -- 0x1A0: XOUT (0x0E), R00 "111101" & X"000", -- 0x1A1: POP R00 "111110" & X"000", -- 0x1A2: RET "111011" & X"1B9", -- 0x1A3: CALL 0x1B9 "100100" & X"0C1", -- 0x1A4: XOUT (0x0C), R01 "100100" & X"0B0", -- 0x1A5: XOUT (0x0B), R00 "111110" & X"000", -- 0x1A6: RET "111011" & X"1B9", -- 0x1A7: CALL 0x1B9 "100100" & X"0D0", -- 0x1A8: XOUT (0x0D), R00 "111110" & X"000", -- 0x1A9: RET "111100" & X"000", -- 0x1AA: PUSH R00 "000100" & X"010", -- 0x1AB: MOVX R00, (R01) "010001" & X"011", -- 0x1AC: INC R01 "001111" & X"000", -- 0x1AD: TST R00 "110001" & X"1B1", -- 0x1AE: JZ 0x1B1 "111011" & X"1A7", -- 0x1AF: CALL 0x1A7 "110000" & X"1AB", -- 0x1B0: JMP 0x1AB "111101" & X"000", -- 0x1B1: POP R00 "111110" & X"000", -- 0x1B2: RET "111011" & X"199", -- 0x1B3: CALL 0x199 "111011" & X"1AA", -- 0x1B4: CALL 0x1AA "111110" & X"000", -- 0x1B5: RET "111011" & X"1AA", -- 0x1B6: CALL 0x1AA "111011" & X"199", -- 0x1B7: CALL 0x199 "111110" & X"000", -- 0x1B8: RET "111100" & X"000", -- 0x1B9: PUSH R00 "101000" & X"0E0", -- 0x1BA: XIN R00, (0x0E) "011001" & X"020", -- 0x1BB: AND R00, 0x02 "110001" & X"1BA", -- 0x1BC: JZ 0x1BA "111101" & X"000", -- 0x1BD: POP R00 "111110" & X"000", -- 0x1BE: RET "111100" & X"00F", -- 0x1BF: PUSH R15 "000011" & X"0AF", -- 0x1C0: MOV R15, 0x0A "111011" & X"1C6", -- 0x1C1: CALL 0x1C6 "010101" & X"01F", -- 0x1C2: DEC R15 "110010" & X"1C1", -- 0x1C3: JNZ 0x1C1 "111101" & X"00F", -- 0x1C4: POP R15 "111110" & X"000", -- 0x1C5: RET "111100" & X"00F", -- 0x1C6: PUSH R15 "000011" & X"0AF", -- 0x1C7: MOV R15, 0x0A "111011" & X"1CD", -- 0x1C8: CALL 0x1CD "010101" & X"01F", -- 0x1C9: DEC R15 "110010" & X"1C8", -- 0x1CA: JNZ 0x1C8 "111101" & X"00F", -- 0x1CB: POP R15 "111110" & X"000", -- 0x1CC: RET "111100" & X"00F", -- 0x1CD: PUSH R15 "000011" & X"0AF", -- 0x1CE: MOV R15, 0x0A "111011" & X"1D4", -- 0x1CF: CALL 0x1D4 "010101" & X"01F", -- 0x1D0: DEC R15 "110010" & X"1CF", -- 0x1D1: JNZ 0x1CF "111101" & X"00F", -- 0x1D2: POP R15 "111110" & X"000", -- 0x1D3: RET "111100" & X"00F", -- 0x1D4: PUSH R15 "000011" & X"0AF", -- 0x1D5: MOV R15, 0x0A "111011" & X"1DB", -- 0x1D6: CALL 0x1DB "010101" & X"01F", -- 0x1D7: DEC R15 "110010" & X"1D6", -- 0x1D8: JNZ 0x1D6 "111101" & X"00F", -- 0x1D9: POP R15 "111110" & X"000", -- 0x1DA: RET "111100" & X"00F", -- 0x1DB: PUSH R15 "000011" & X"0AF", -- 0x1DC: MOV R15, 0x0A "111011" & X"1E2", -- 0x1DD: CALL 0x1E2 "010101" & X"01F", -- 0x1DE: DEC R15 "110010" & X"1DD", -- 0x1DF: JNZ 0x1DD "111101" & X"00F", -- 0x1E0: POP R15 "111110" & X"000", -- 0x1E1: RET "111100" & X"00F", -- 0x1E2: PUSH R15 "000011" & X"63F", -- 0x1E3: MOV R15, 0x63 "000000" & X"000", -- 0x1E4: NOP "000000" & X"000", -- 0x1E5: NOP "000000" & X"000", -- 0x1E6: NOP "010101" & X"01F", -- 0x1E7: DEC R15 "110010" & X"1E4", -- 0x1E8: JNZ 0x1E4 "111101" & X"00F", -- 0x1E9: POP R15 "111110" & X"000", -- 0x1EA: RET "111100" & X"00F", -- 0x1EB: PUSH R15 "000011" & X"09F", -- 0x1EC: MOV R15, 0x09 "000000" & X"000", -- 0x1ED: NOP "000000" & X"000", -- 0x1EE: NOP "000000" & X"000", -- 0x1EF: NOP "010101" & X"01F", -- 0x1F0: DEC R15 "110010" & X"1ED", -- 0x1F1: JNZ 0x1ED "111101" & X"00F", -- 0x1F2: POP R15 "111110" & X"000", -- 0x1F3: RET "111100" & X"001", -- 0x1F4: PUSH R01 "101000" & X"061", -- 0x1F5: XIN R01, (0x06) "011001" & X"021", -- 0x1F6: AND R01, 0x02 "110010" & X"1F5", -- 0x1F7: JNZ 0x1F5 "100100" & X"020", -- 0x1F8: XOUT (0x02), R00 "111101" & X"001", -- 0x1F9: POP R01 "111110" & X"000", -- 0x1FA: RET "111100" & X"001", -- 0x1FB: PUSH R01 "101000" & X"061", -- 0x1FC: XIN R01, (0x06) "011001" & X"101", -- 0x1FD: AND R01, 0x10 "110001" & X"1FC", -- 0x1FE: JZ 0x1FC "101000" & X"020", -- 0x1FF: XIN R00, (0x02) "111101" & X"001", -- 0x200: POP R01 "111110" & X"000", -- 0x201: RET "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000", "000000" & X"000" ); signal jtag_ld_clk : STD_LOGIC; signal jtag_ld_we : STD_LOGIC; signal jtag_ld_addr : inst_addr_t; signal jtag_ld_dout : inst_t; signal jtag_ld_din : inst_t; signal bs_rst, bs_sel, bs_shift, bs_tdi, bs_tdo : std_logic; signal bs_capture, bs_clk0, bs_clk1, bs_update0, bs_update1 : std_logic; signal user_regi, user_rego : unsigned (31 downto 0); constant id : unsigned (31 downto 0) := X"BABE" & X"BEEF"; begin -------------------------------------------------------------------------- -- Virtex-4: JTAG Loader -------------------------------------------------------------------------- i00_BUFG : BUFG port map ( O => bs_clk1, I => bs_clk0 ); i01_BUFG : BUFG port map ( O => bs_update1, I => bs_update0 ); BSCAN_VIRTEX4_inst1 : BSCAN_VIRTEX4 generic map ( JTAG_CHAIN => 1 -- Value to set BSCAN site of device. Possible values: (1,2,3 or 4) ) port map ( CAPTURE => bs_capture, -- CAPTURE output from TAP controller DRCK => bs_clk0, -- Data register output for USER functions RESET => bs_rst, -- Reset output from TAP controller SEL => bs_sel, -- USER active output SHIFT => bs_shift, -- SHIFT output from TAP controller TDI => bs_tdi, -- TDI output from TAP controller UPDATE => bs_update0, -- UPDATE output from TAP controller TDO => bs_tdo -- Data input for USER function ); jtag_ld_addr <= user_regi(user_regi'left downto user_regi'left-inst_addr_t'length+1); jtag_ld_din <= user_regi(inst_t'length-1 downto 0); jtag_ld_clk <= bs_update1; jtag_ld_we <= bs_sel; sipo: process (bs_rst, bs_clk1, bs_tdi, bs_shift) begin if bs_rst = '1' then user_regi <= (others => '0'); elsif rising_edge(bs_clk1) then if bs_shift = '1' then user_regi <= bs_tdi & user_regi(user_regi'left downto 1); end if; end if; end process; piso: process (bs_rst, bs_clk1, bs_shift, user_rego) begin bs_tdo <= user_rego(0); if bs_rst = '1' then user_rego <= (others => '0'); elsif rising_edge(bs_clk1) then if bs_shift = '1' then user_rego <= user_rego(0) & user_rego(user_rego'left downto 1); else user_rego <= (user_rego'left downto inst_t'length => '0') & jtag_ld_dout; -- user_rego <= id; end if; end if; end process; -------------------------------------------------------------------------- -- ROM Read/Write -------------------------------------------------------------------------- PROM_READ: process(clk, ce) begin if rising_edge(clk) and ce = '1' then dout <= imem_rom(to_integer(addr)); end if; end process; PROM_WRITE: process(jtag_ld_clk, jtag_ld_we) begin if rising_edge(jtag_ld_clk) then if jtag_ld_we = '1' then imem_rom(to_integer(jtag_ld_addr)) <= jtag_ld_din; else jtag_ld_dout <= imem_rom(to_integer(jtag_ld_addr)); end if; end if; end process; -------------------------------------------------------------------------- end loadable;