306 lines
9.1 KiB
Verilog

`timescale 1ns / 1ps
//////////////////////////////////////////////////////////////////////////////////
// Company:
// Engineer:
//
// Create Date: 02:43:54 02/06/2011
// Design Name:
// Module Name: bsx
// Project Name:
// Target Devices:
// Tool versions:
// Description:
//
// Dependencies:
//
// Revision:
// Revision 0.01 - File Created
// Additional Comments:
//
//////////////////////////////////////////////////////////////////////////////////
module bsx(
input clkin,
input reg_oe,
input reg_we,
input [23:0] snes_addr,
input [7:0] reg_data_in,
output [7:0] reg_data_out,
input [7:0] reg_reset_bits,
input [7:0] reg_set_bits,
output [14:0] regs_out,
input pgm_we,
input use_bsx,
output data_ovr,
output flash_writable,
input [59:0] rtc_data,
output [9:0] bs_page_out, // support only page 0000-03ff
output bs_page_enable,
output [8:0] bs_page_offset
);
wire [3:0] reg_addr = snes_addr[19:16]; // 00-0f:5000-5fff
wire [4:0] base_addr = snes_addr[4:0]; // 88-9f -> 08-1f
wire [15:0] flash_addr = snes_addr[15:0];
reg flash_ovr_r;
reg flash_we_r;
reg [7:0] flash_cmd0;
reg [15:0] flash_cmd5555;
wire cart_enable = (use_bsx) && ((snes_addr[23:12] & 12'hf0f) == 12'h005);
wire base_enable = (use_bsx) && (!snes_addr[22] && (snes_addr[15:0] >= 16'h2188)
&& (snes_addr[15:0] <= 16'h219f));
wire flash_enable = (snes_addr[23:16] == 8'hc0);
wire is_flash_special_address = (flash_addr == 16'h0002
|| flash_addr == 16'h5555
|| flash_addr == 16'h2aaa
|| flash_addr == 16'h0000
|| (flash_addr >= 16'hff00
&& flash_addr <= 16'hff13));
wire flash_ovr = (use_bsx)
&& (flash_enable & flash_ovr_r)
&& is_flash_special_address;
assign flash_writable = (use_bsx)
&& flash_enable
&& flash_we_r
&& !is_flash_special_address;
assign data_ovr = (cart_enable | base_enable | flash_ovr) & ~bs_page_enable;
reg [9:0] bs_page0;
reg [9:0] bs_page1;
reg [8:0] bs_page0_offset;
reg [8:0] bs_page1_offset;
reg [4:0] bs_stb0_offset;
reg [4:0] bs_stb1_offset;
wire bs_sta0_en = base_addr == 5'h0a;
wire bs_stb0_en = base_addr == 5'h0b;
wire bs_page0_en = base_addr == 5'h0c;
wire bs_sta1_en = base_addr == 5'h10;
wire bs_stb1_en = base_addr == 5'h11;
wire bs_page1_en = base_addr == 5'h12;
assign bs_page_enable = base_enable & ((|bs_page0 & (bs_page0_en | bs_sta0_en | bs_stb0_en))
|(|bs_page1 & (bs_page1_en | bs_sta1_en | bs_stb1_en)));
assign bs_page_out = (bs_page0_en | bs_sta0_en | bs_stb0_en) ? bs_page0 : bs_page1;
assign bs_page_offset = bs_sta0_en ? 9'h032
: bs_stb0_en ? (9'h034 + bs_stb0_offset)
: bs_sta1_en ? 9'h032
: bs_stb1_en ? (9'h034 + bs_stb1_offset)
: (9'h048 + (bs_page0_en ? bs_page0_offset : bs_page1_offset));
reg [3:0] reg_oe_sreg;
always @(posedge clkin) reg_oe_sreg <= {reg_oe_sreg[2:0], reg_oe};
wire reg_oe_falling = (reg_oe_sreg[3:0] == 4'b1000);
wire reg_oe_rising = (reg_oe_sreg[3:0] == 4'b0001);
reg [1:0] reg_we_sreg;
always @(posedge clkin) reg_we_sreg <= {reg_we_sreg[0], reg_we};
wire reg_we_rising = (reg_we_sreg[1:0] == 2'b01);
reg [1:0] pgm_we_sreg;
always @(posedge clkin) pgm_we_sreg <= {pgm_we_sreg[0], pgm_we};
wire pgm_we_rising = (pgm_we_sreg[1:0] == 2'b01);
reg [14:0] regs_tmpr;
reg [14:0] regs_outr;
reg [7:0] reg_data_outr;
reg [7:0] base_regs[31:8];
reg [4:0] bsx_counter;
reg [7:0] flash_vendor_data[7:0];
assign regs_out = regs_outr;
assign reg_data_out = reg_data_outr;
wire [7:0] rtc_sec = rtc_data[3:0] + (rtc_data[7:4] << 3) + (rtc_data[7:4] << 1);
wire [7:0] rtc_min = rtc_data[11:8] + (rtc_data[15:12] << 3) + (rtc_data[15:12] << 1);
wire [7:0] rtc_hour = rtc_data[19:16] + (rtc_data[23:20] << 3) + (rtc_data[23:20] << 1);
wire [7:0] rtc_day = rtc_data[27:24] + (rtc_data[31:28] << 3) + (rtc_data[31:28] << 1);
wire [7:0] rtc_month = rtc_data[35:32] + (rtc_data[39:36] << 3) + (rtc_data[39:36] << 1);
wire [7:0] rtc_dow = {4'b0,rtc_data[59:56]};
wire [7:0] rtc_year1 = rtc_data[43:40] + (rtc_data[47:44] << 3) + (rtc_data[47:44] << 1);
wire [7:0] rtc_year100 = rtc_data[51:48] + (rtc_data[55:52] << 3) + (rtc_data[55:52] << 1);
wire [15:0] rtc_year = (rtc_year100 << 6) + (rtc_year100 << 5) + (rtc_year100 << 2) + rtc_year1;
initial begin
regs_tmpr <= 15'b000000100000000;
regs_outr <= 15'b000000100000000;
bsx_counter <= 0;
base_regs[5'h08] <= 0;
base_regs[5'h09] <= 0;
base_regs[5'h0a] <= 8'h01;
base_regs[5'h0b] <= 0;
base_regs[5'h0c] <= 0;
base_regs[5'h0d] <= 0;
base_regs[5'h0e] <= 0;
base_regs[5'h0f] <= 0;
base_regs[5'h10] <= 8'h01;
base_regs[5'h11] <= 0;
base_regs[5'h12] <= 0;
base_regs[5'h13] <= 0;
base_regs[5'h14] <= 0;
base_regs[5'h15] <= 0;
base_regs[5'h16] <= 0;
base_regs[5'h17] <= 0;
base_regs[5'h18] <= 0;
base_regs[5'h19] <= 0;
base_regs[5'h1a] <= 0;
base_regs[5'h1b] <= 0;
base_regs[5'h1c] <= 0;
base_regs[5'h1d] <= 0;
base_regs[5'h1e] <= 0;
base_regs[5'h1f] <= 0;
flash_vendor_data[3'h0] <= 8'h4d;
flash_vendor_data[3'h1] <= 8'h00;
flash_vendor_data[3'h2] <= 8'h50;
flash_vendor_data[3'h3] <= 8'h00;
flash_vendor_data[3'h4] <= 8'h00;
flash_vendor_data[3'h5] <= 8'h00;
flash_vendor_data[3'h6] <= 8'h2a;
flash_vendor_data[3'h7] <= 8'h00;
flash_ovr_r <= 1'b0;
flash_we_r <= 1'b0;
bs_page0 <= 10'h0;
bs_page1 <= 10'h0;
bs_page0_offset <= 9'h0;
bs_page1_offset <= 9'h0;
bs_stb0_offset <= 5'h00;
bs_stb1_offset <= 5'h00;
end
always @(posedge clkin) begin
if(reg_oe_rising) begin
if(base_enable) begin
case(base_addr)
5'h0b: bs_stb0_offset <= bs_stb0_offset + 1;
5'h0c: bs_page0_offset <= bs_page0_offset + 1;
5'h11: bs_stb1_offset <= bs_stb1_offset + 1;
5'h12: bs_page1_offset <= bs_page1_offset + 1;
endcase
end
end
if(reg_oe_falling) begin
if(cart_enable)
reg_data_outr <= {regs_outr[reg_addr], 7'b0};
else if(base_enable) begin
case(base_addr)
5'h0b, 5'h11: begin
base_regs[base_addr+5'h02] <= base_regs[base_addr+5'h02] | reg_data_in;
end
5'h0c, 5'h12: begin
case (bs_page1_offset)
4: reg_data_outr <= 8'h3;
5: reg_data_outr <= 8'h1;
6: reg_data_outr <= 8'h1;
10: reg_data_outr <= rtc_sec;
11: reg_data_outr <= rtc_min;
12: reg_data_outr <= rtc_hour;
13: reg_data_outr <= rtc_dow;
14: reg_data_outr <= rtc_day;
15: reg_data_outr <= rtc_month;
16: reg_data_outr <= rtc_year[7:0];
17: reg_data_outr <= rtc_year[15:8];
default: reg_data_outr <= 8'h0;
endcase
end
5'h0d, 5'h13: begin
reg_data_outr <= base_regs[base_addr];
base_regs[base_addr] <= 8'h00;
end
default:
reg_data_outr <= base_regs[base_addr];
endcase
end else if (flash_enable) begin
casex (flash_addr)
16'h0002:
reg_data_outr <= 8'h80;
16'h5555:
reg_data_outr <= 8'h80;
16'b1111111100000xxx:
reg_data_outr <= flash_vendor_data[flash_addr&16'h0007];
default:
reg_data_outr <= 8'h00;
endcase
end
end else if(pgm_we_rising) begin
regs_tmpr[8:1] <= (regs_tmpr[8:1] | reg_set_bits[7:0]) & ~reg_reset_bits[7:0];
regs_outr[8:1] <= (regs_outr[8:1] | reg_set_bits[7:0]) & ~reg_reset_bits[7:0];
end else if(reg_we_rising && cart_enable) begin
if(reg_addr == 4'he && reg_data_in[7])
regs_outr <= regs_tmpr | 15'b100000000000000;
else
regs_tmpr[reg_addr] <= reg_data_in[7];
end else if(reg_we_rising && base_enable) begin
case(base_addr)
5'h09: begin
base_regs[8'h09] <= reg_data_in;
bs_page0 <= {reg_data_in[1:0], base_regs[8'h08]};
bs_page0_offset <= 9'h00;
end
5'h0b: begin
bs_stb0_offset <= 5'h00;
end
5'h0c: begin
bs_page0_offset <= 9'h00;
end
5'h0f: begin
base_regs[8'h0f] <= reg_data_in;
bs_page1 <= {reg_data_in[1:0], base_regs[8'h0e]};
bs_page1_offset <= 9'h00;
end
5'h11: begin
bs_stb1_offset <= 5'h00;
end
5'h12: begin
bs_page1_offset <= 9'h00;
end
default:
base_regs[base_addr] <= reg_data_in;
endcase
end else if(reg_we_rising && flash_enable) begin
case(flash_addr)
16'h0000: begin
flash_cmd0 <= reg_data_in;
if(flash_cmd0 == 8'h38 && reg_data_in == 8'hd0)
flash_ovr_r <= 1;
end
16'h5555: begin
flash_cmd5555 <= {flash_cmd5555[7:0], reg_data_in};
if(flash_cmd5555 == 16'haa55) begin
case (reg_data_in)
8'hf0: begin
flash_ovr_r <= 0;
flash_we_r <= 0;
end
8'ha0: begin
flash_ovr_r <= 1;
flash_we_r <= 1;
end
8'h70: begin
flash_we_r <= 0;
end
endcase
end
end
16'h2aaa: begin
flash_cmd5555 <= {flash_cmd5555[7:0], reg_data_in};
end
endcase
end
end
endmodule