| 1 | // ========== Copyright Header Begin ========================================== |
| 2 | // |
| 3 | // OpenSPARC T2 Processor File: siu_common.vr |
| 4 | // Copyright (C) 1995-2007 Sun Microsystems, Inc. All Rights Reserved |
| 5 | // 4150 Network Circle, Santa Clara, California 95054, U.S.A. |
| 6 | // |
| 7 | // * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. |
| 8 | // |
| 9 | // This program is free software; you can redistribute it and/or modify |
| 10 | // it under the terms of the GNU General Public License as published by |
| 11 | // the Free Software Foundation; version 2 of the License. |
| 12 | // |
| 13 | // This program is distributed in the hope that it will be useful, |
| 14 | // but WITHOUT ANY WARRANTY; without even the implied warranty of |
| 15 | // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
| 16 | // GNU General Public License for more details. |
| 17 | // |
| 18 | // You should have received a copy of the GNU General Public License |
| 19 | // along with this program; if not, write to the Free Software |
| 20 | // Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA |
| 21 | // |
| 22 | // For the avoidance of doubt, and except that if any non-GPL license |
| 23 | // choice is available it will apply instead, Sun elects to use only |
| 24 | // the General Public License version 2 (GPLv2) at this time for any |
| 25 | // software where a choice of GPL license versions is made |
| 26 | // available with the language indicating that GPLv2 or any later version |
| 27 | // may be used, or where a choice of which version of the GPL is applied is |
| 28 | // otherwise unspecified. |
| 29 | // |
| 30 | // Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara, |
| 31 | // CA 95054 USA or visit www.sun.com if you need additional information or |
| 32 | // have any questions. |
| 33 | // |
| 34 | // ========== Copyright Header End ============================================ |
| 35 | #include <vera_defines.vrh> |
| 36 | |
| 37 | function reg[2:0] pbank_sel(reg[3:0] pbank, reg[2:0] bank_sel) |
| 38 | { |
| 39 | reg [2:0] result = bank_sel; |
| 40 | |
| 41 | case (pbank) { |
| 42 | 4'b0001: result[2:1] = 2'b0; |
| 43 | 4'b0010: result[2:1] = 2'b01; |
| 44 | 4'b0011: result[2] = 1'b0; |
| 45 | 4'b0100: result[2:1] = 2'b10; |
| 46 | 4'b0101: result[2:1] = {bank_sel[1], 1'b0}; |
| 47 | 4'b0110: result[2:1] = {bank_sel[1], ~bank_sel[1]}; |
| 48 | 4'b1000: result[2:1] = 2'b11; |
| 49 | 4'b1001: result[2:1] = {bank_sel[1], bank_sel[1]}; |
| 50 | 4'b1010: result[1] = 1'b1; |
| 51 | 4'b1100: result[2:1] = {1'b1, bank_sel[1]}; |
| 52 | 4'b1111: result = bank_sel; |
| 53 | default: |
| 54 | printf ("ERROR! illegal partial bank selections!\n"); |
| 55 | } |
| 56 | |
| 57 | pbank_sel = result; |
| 58 | } |
| 59 | |
| 60 | function reg[1:0] interleave_parity(reg[39:0] data, integer size) |
| 61 | { |
| 62 | integer i; |
| 63 | reg oparity = 0; |
| 64 | reg eparity = 0; |
| 65 | |
| 66 | size = (size > 40) ? 40 : size; |
| 67 | |
| 68 | for (i=0; i<size; i=i+2) eparity ^= data[i]; |
| 69 | for (i=1; i<size; i=i+2) oparity ^= data[i]; |
| 70 | |
| 71 | interleave_parity = {~oparity, ~eparity}; |
| 72 | } |
| 73 | |
| 74 | function reg[5:0] gen_ctag_ecc(reg[15:0] data) |
| 75 | { |
| 76 | bit [5:0] temp_ecc; |
| 77 | |
| 78 | temp_ecc[0] = data[0] ^ data[1] ^ data[3] ^ data[4] ^ data[6] ^ data[8] ^ |
| 79 | data[10] ^ data[11] ^ data[13] ^ data[15]; |
| 80 | |
| 81 | temp_ecc[1] = data[0] ^ data[2] ^ data[3] ^ data[5] ^ data[6] ^ data[9] ^ |
| 82 | data[10] ^ data[12] ^ data[13]; |
| 83 | |
| 84 | temp_ecc[2] = data[1] ^ data[2] ^ data[3] ^ data[7] ^ data[8] ^ data[9] ^ |
| 85 | data[10] ^ data[14] ^ data[15]; |
| 86 | |
| 87 | temp_ecc[3] = data[4] ^ data[5] ^ data[6] ^ data[7] ^ data[8] ^ data[9] ^ |
| 88 | data[10]; |
| 89 | |
| 90 | temp_ecc[4] = data[11] ^ data[12] ^ data[13] ^ data[14] ^ data[15]; |
| 91 | |
| 92 | //temp_ecc[5] = ~(temp_ecc[0] ^ temp_ecc[1] ^ temp_ecc[2] ^ temp_ecc[3] ^ temp_ecc[4]); |
| 93 | temp_ecc[5] = data[0] ^ data[1] ^ data[2] ^ data[3] ^ temp_ecc[0] ^ temp_ecc[1] ^ temp_ecc[2]; |
| 94 | gen_ctag_ecc = temp_ecc; |
| 95 | } |
| 96 | |
| 97 | function reg gen_beparity(reg[15:0] data) |
| 98 | { |
| 99 | bit temp_beparity; |
| 100 | |
| 101 | temp_beparity = data[0] ^ data[1] ^ data[2] ^ data[3] ^ data[4] ^ data[5] ^ data[6] ^ data[7] ^ data[8] ^ data[9] ^ data[10] ^ data[11] ^ data[12] ^ data[13] ^ data[14] ^ data[15]; |
| 102 | gen_beparity = !(temp_beparity); |
| 103 | } |