alu.pat

i need of vhdl code for 32-bit risc processor

in al1 (7 downto 0) B;
in al2 (7 downto 0) B;
in sel (3 to 0) B;
out alout (7 downto 0) B;

begin

# Patterns for OP 000 : for ADD
pat06_add : 10110110 11000111 0000 ?01111101;
pat05_add : 11000111 11111011 0000 ?11000010;
pat04_add : 11011011 01011010 0000 ?00110101;
pat03_add : 10111101 01011010 0000 ?00010111;
pat02_add : 11011101 11100111 0000 ?11000100;
pat00_add : 00000000 00000000 0000 ?00000000;
pat01_add : 11111111 11111111 0000 ?11111110;

# Patterns for OP 001 : for SUB
pat07_sub : 11111111 11111111 0001 ?00000000;
pat4_sub  : 00000010 00000100 0001 ?11111110;
pat2_sub  : 11111111 10101010 0001 ?01010101;
pat1_sub  : 01001001 00010010 0001 ?00110111;

# Patterns for OP 010 : for ROL
p_0rol    : 11111111 00000000 0010 ?11111111;
p_1rol    : 01010101 00110001 0010 ?10101010;
p_2rol    : 11011001 00101011 0010 ?00111011;
p_3rol    : 11001110 00111111 0010 ?10011101;
p_4rol    : 11000111 00011010 0010 ?11110001;
p_5rol    : 10100011 01110100 0010 ?00111010;

# Patterns for OP 011 : for XOR
pat17_xor : 00000000 00000000 0011 ?00000000;
pat18_xor : 11111111 11111111 0011 ?00000000;
pat21_xor : 11011011 01011010 0011 ?10000001;
pat22_xor : 11000111 11111011 0011 ?00111100;
pat4_xor  : 10101010 01010101 0011 ?11111111;
pat5_xor  : 10101110 01010111 0011 ?11111001;
pat6_xor  : 01110111 10011110 0011 ?11101001;
pat6_xor  : 11011011 10101111 0011 ?01110100;
pat7_xor  : 11010111 11101011 0011 ?00111100;

# Patterns for OP 100 : for AND
pat24_and : 01010101 01010101 0100 ?01010101;
pat22_and : 11000111 11111011 0100 ?11000011;
pat4_and  : 10101010 01010101 0100 ?00000000;
pat5_and  : 10101110 01010111 0100 ?00000110;
pat6_and  : 01110111 10011110 0100 ?00010110;
pat6_and  : 11011011 10101111 0100 ?10001011;
pat7_and  : 11010111 11101011 0100 ?11000011;

# Patterns for OP 101 : for OR
pat25_or  : 01010101 01010101 0101 ?01010101;
pat22_or  : 11000111 11111011 0101 ?11111111;
pat4_or   : 10101010 01010101 0101 ?11111111;
pat5_or   : 10101110 01010111 0101 ?11111111;
pat6_or   : 01110111 10011110 0101 ?11111111;
pat6_or   : 11011011 10101111 0101 ?11111111;
pat7_or   : 11010111 11101011 0101 ?11111111;
pat8_or   : 10001101 00001101 0101 ?10001101;

# Patterns for OP 111 : for fwd
p1_fwd    : 00111111 10001000 0111 ?00111111; 

# Patterns for OP 1000 : for fpadd
p1_fp 	  : 11001001 00111111 1000 ?10110010;
end;