| 1 |
21 |
arif_endro |
-- ------------------------------------------------------------------------
|
| 2 |
15 |
arif_endro |
-- Copyright (C) 2005 Arif Endro Nugroho
|
| 3 |
21 |
arif_endro |
-- All rights reserved.
|
| 4 |
2 |
arif_endro |
--
|
| 5 |
21 |
arif_endro |
-- Redistribution and use in source and binary forms, with or without
|
| 6 |
|
|
-- modification, are permitted provided that the following conditions
|
| 7 |
|
|
-- are met:
|
| 8 |
2 |
arif_endro |
--
|
| 9 |
21 |
arif_endro |
-- 1. Redistributions of source code must retain the above copyright
|
| 10 |
|
|
-- notice, this list of conditions and the following disclaimer.
|
| 11 |
|
|
-- 2. Redistributions in binary form must reproduce the above copyright
|
| 12 |
|
|
-- notice, this list of conditions and the following disclaimer in the
|
| 13 |
|
|
-- documentation and/or other materials provided with the distribution.
|
| 14 |
2 |
arif_endro |
--
|
| 15 |
21 |
arif_endro |
-- THIS SOFTWARE IS PROVIDED BY ARIF ENDRO NUGROHO "AS IS" AND ANY EXPRESS
|
| 16 |
|
|
-- OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
|
| 17 |
|
|
-- WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
|
| 18 |
|
|
-- DISCLAIMED. IN NO EVENT SHALL ARIF ENDRO NUGROHO BE LIABLE FOR ANY
|
| 19 |
|
|
-- DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
|
| 20 |
|
|
-- DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
|
| 21 |
|
|
-- OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
|
| 22 |
|
|
-- HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
|
| 23 |
|
|
-- STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
|
| 24 |
|
|
-- ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
|
| 25 |
|
|
-- POSSIBILITY OF SUCH DAMAGE.
|
| 26 |
2 |
arif_endro |
--
|
| 27 |
21 |
arif_endro |
-- End Of License.
|
| 28 |
|
|
-- ------------------------------------------------------------------------
|
| 29 |
2 |
arif_endro |
|
| 30 |
|
|
library ieee;
|
| 31 |
|
|
use ieee.std_logic_1164.all;
|
| 32 |
|
|
use ieee.std_logic_unsigned.all;
|
| 33 |
|
|
|
| 34 |
|
|
entity bram_block_a is
|
| 35 |
|
|
|
| 36 |
|
|
port (
|
| 37 |
|
|
clk_a_i : in std_logic;
|
| 38 |
|
|
en_a_i : in std_logic;
|
| 39 |
|
|
we_a_i : in std_logic;
|
| 40 |
|
|
di_a_i : in std_logic_vector (07 downto 00);
|
| 41 |
|
|
addr_a_1_i : in std_logic_vector (08 downto 00);
|
| 42 |
|
|
addr_a_2_i : in std_logic_vector (08 downto 00);
|
| 43 |
|
|
do_a_1_o : out std_logic_vector (07 downto 00);
|
| 44 |
|
|
do_a_2_o : out std_logic_vector (07 downto 00)
|
| 45 |
|
|
);
|
| 46 |
|
|
|
| 47 |
|
|
end bram_block_a;
|
| 48 |
|
|
|
| 49 |
|
|
architecture blockram of bram_block_a is
|
| 50 |
|
|
|
| 51 |
|
|
type bram_block is array (00 to 511) of std_logic_vector (07 downto 00);
|
| 52 |
|
|
constant bram_block_a : bram_block :=
|
| 53 |
|
|
(
|
| 54 |
|
|
X"63", X"7c", X"77", X"7b", X"f2", X"6b", X"6f", X"c5", X"30", X"01", X"67", X"2b", X"fe", X"d7", X"ab", X"76",
|
| 55 |
|
|
X"ca", X"82", X"c9", X"7d", X"fa", X"59", X"47", X"f0", X"ad", X"d4", X"a2", X"af", X"9c", X"a4", X"72", X"c0",
|
| 56 |
|
|
X"b7", X"fd", X"93", X"26", X"36", X"3f", X"f7", X"cc", X"34", X"a5", X"e5", X"f1", X"71", X"d8", X"31", X"15",
|
| 57 |
|
|
X"04", X"c7", X"23", X"c3", X"18", X"96", X"05", X"9a", X"07", X"12", X"80", X"e2", X"eb", X"27", X"b2", X"75",
|
| 58 |
|
|
|
| 59 |
|
|
X"09", X"83", X"2c", X"1a", X"1b", X"6e", X"5a", X"a0", X"52", X"3b", X"d6", X"b3", X"29", X"e3", X"2f", X"84",
|
| 60 |
|
|
X"53", X"d1", X"00", X"ed", X"20", X"fc", X"b1", X"5b", X"6a", X"cb", X"be", X"39", X"4a", X"4c", X"58", X"cf",
|
| 61 |
|
|
X"d0", X"ef", X"aa", X"fb", X"43", X"4d", X"33", X"85", X"45", X"f9", X"02", X"7f", X"50", X"3c", X"9f", X"a8",
|
| 62 |
|
|
X"51", X"a3", X"40", X"8f", X"92", X"9d", X"38", X"f5", X"bc", X"b6", X"da", X"21", X"10", X"ff", X"f3", X"d2",
|
| 63 |
|
|
|
| 64 |
|
|
X"cd", X"0c", X"13", X"ec", X"5f", X"97", X"44", X"17", X"c4", X"a7", X"7e", X"3d", X"64", X"5d", X"19", X"73",
|
| 65 |
|
|
X"60", X"81", X"4f", X"dc", X"22", X"2a", X"90", X"88", X"46", X"ee", X"b8", X"14", X"de", X"5e", X"0b", X"db",
|
| 66 |
|
|
X"e0", X"32", X"3a", X"0a", X"49", X"06", X"24", X"5c", X"c2", X"d3", X"ac", X"62", X"91", X"95", X"e4", X"79",
|
| 67 |
|
|
X"e7", X"c8", X"37", X"6d", X"8d", X"d5", X"4e", X"a9", X"6c", X"56", X"f4", X"ea", X"65", X"7a", X"ae", X"08",
|
| 68 |
|
|
|
| 69 |
|
|
X"ba", X"78", X"25", X"2e", X"1c", X"a6", X"b4", X"c6", X"e8", X"dd", X"74", X"1f", X"4b", X"bd", X"8b", X"8a",
|
| 70 |
|
|
X"70", X"3e", X"b5", X"66", X"48", X"03", X"f6", X"0e", X"61", X"35", X"57", X"b9", X"86", X"c1", X"1d", X"9e",
|
| 71 |
|
|
X"e1", X"f8", X"98", X"11", X"69", X"d9", X"8e", X"94", X"9b", X"1e", X"87", X"e9", X"ce", X"55", X"28", X"df",
|
| 72 |
|
|
X"8c", X"a1", X"89", X"0d", X"bf", X"e6", X"42", X"68", X"41", X"99", X"2d", X"0f", X"b0", X"54", X"bb", X"16",
|
| 73 |
|
|
|
| 74 |
|
|
-- inv_subbytes
|
| 75 |
|
|
|
| 76 |
|
|
X"52", X"09", X"6a", X"d5", X"30", X"36", X"a5", X"38", X"bf", X"40", X"a3", X"9e", X"81", X"f3", X"d7", X"fb",
|
| 77 |
|
|
X"7c", X"e3", X"39", X"82", X"9b", X"2f", X"ff", X"87", X"34", X"8e", X"43", X"44", X"c4", X"de", X"e9", X"cb",
|
| 78 |
|
|
X"54", X"7b", X"94", X"32", X"a6", X"c2", X"23", X"3d", X"ee", X"4c", X"95", X"0b", X"42", X"fa", X"c3", X"4e",
|
| 79 |
|
|
X"08", X"2e", X"a1", X"66", X"28", X"d9", X"24", X"b2", X"76", X"5b", X"a2", X"49", X"6d", X"8b", X"d1", X"25",
|
| 80 |
|
|
|
| 81 |
|
|
X"72", X"f8", X"f6", X"64", X"86", X"68", X"98", X"16", X"d4", X"a4", X"5c", X"cc", X"5d", X"65", X"b6", X"92",
|
| 82 |
|
|
X"6c", X"70", X"48", X"50", X"fd", X"ed", X"b9", X"da", X"5e", X"15", X"46", X"57", X"a7", X"8d", X"9d", X"84",
|
| 83 |
|
|
X"90", X"d8", X"ab", X"00", X"8c", X"bc", X"d3", X"0a", X"f7", X"e4", X"58", X"05", X"b8", X"b3", X"45", X"06",
|
| 84 |
|
|
X"d0", X"2c", X"1e", X"8f", X"ca", X"3f", X"0f", X"02", X"c1", X"af", X"bd", X"03", X"01", X"13", X"8a", X"6b",
|
| 85 |
|
|
|
| 86 |
|
|
X"3a", X"91", X"11", X"41", X"4f", X"67", X"dc", X"ea", X"97", X"f2", X"cf", X"ce", X"f0", X"b4", X"e6", X"73",
|
| 87 |
|
|
X"96", X"ac", X"74", X"22", X"e7", X"ad", X"35", X"85", X"e2", X"f9", X"37", X"e8", X"1c", X"75", X"df", X"6e",
|
| 88 |
|
|
X"47", X"f1", X"1a", X"71", X"1d", X"29", X"c5", X"89", X"6f", X"b7", X"62", X"0e", X"aa", X"18", X"be", X"1b",
|
| 89 |
|
|
X"fc", X"56", X"3e", X"4b", X"c6", X"d2", X"79", X"20", X"9a", X"db", X"c0", X"fe", X"78", X"cd", X"5a", X"f4",
|
| 90 |
|
|
|
| 91 |
|
|
X"1f", X"dd", X"a8", X"33", X"88", X"07", X"c7", X"31", X"b1", X"12", X"10", X"59", X"27", X"80", X"ec", X"5f",
|
| 92 |
|
|
X"60", X"51", X"7f", X"a9", X"19", X"b5", X"4a", X"0d", X"2d", X"e5", X"7a", X"9f", X"93", X"c9", X"9c", X"ef",
|
| 93 |
|
|
X"a0", X"e0", X"3b", X"4d", X"ae", X"2a", X"f5", X"b0", X"c8", X"eb", X"bb", X"3c", X"83", X"53", X"99", X"61",
|
| 94 |
|
|
X"17", X"2b", X"04", X"7e", X"ba", X"77", X"d6", X"26", X"e1", X"69", X"14", X"63", X"55", X"21", X"0c", X"7d"
|
| 95 |
|
|
);
|
| 96 |
|
|
|
| 97 |
|
|
signal addr_a_1 : std_logic_vector (08 downto 00);
|
| 98 |
|
|
signal addr_a_2 : std_logic_vector (08 downto 00);
|
| 99 |
|
|
|
| 100 |
|
|
begin
|
| 101 |
|
|
|
| 102 |
|
|
process (clk_a_i)
|
| 103 |
|
|
begin
|
| 104 |
|
|
if (clk_a_i = '1' and clk_a_i'event) then
|
| 105 |
|
|
if (en_a_i = '1') then
|
| 106 |
|
|
if (we_a_i = '1') then
|
| 107 |
|
|
-- bram_block_a (conv_integer(addr_a_1_i)) <= di_a_i;
|
| 108 |
|
|
end if;
|
| 109 |
|
|
addr_a_1 <= addr_a_1_i;
|
| 110 |
|
|
addr_a_2 <= addr_a_2_i;
|
| 111 |
|
|
end if;
|
| 112 |
|
|
end if;
|
| 113 |
|
|
end process;
|
| 114 |
|
|
|
| 115 |
|
|
do_a_1_o <= bram_block_a (conv_integer(addr_a_1));
|
| 116 |
|
|
do_a_2_o <= bram_block_a (conv_integer(addr_a_2));
|
| 117 |
|
|
|
| 118 |
|
|
end blockram;
|
