| 123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258 |
- module QuadSPIs (
- input Clk_i,
- input Rst_i,
- input Sck_i,
- input Ss_i,
- input Mosi0_i,
- input Mosi1_i,
- input Mosi2_i,
- input Mosi3_i,
- input [1:0] WidthSel_i,
- input SELST_i,
- input EndianSel_i,
-
- output reg [23:0] Data_o,
- output reg [7:0] Addr_o,
- output [31:0] DataToRxFifo_o,
- output reg Val_o
- );
- //================================================================================
- // REG/WIRE
- //================================================================================
- reg ssReg;
- reg ssRegR;
- reg SckReg;
- reg [7:0] addrReg;
- reg [7:0] shiftReg0;
- reg [7:0] shiftReg1;
- reg [7:0] shiftReg2;
- reg [7:0] shiftReg0M;
- reg [7:0] shiftReg1M;
- reg [7:0] shiftReg2M;
- reg [7:0] addrRegM;
- //===============================================================================
- // ASSIGNMENTS
- assign DataToRxFifo_o = {Addr_o, Data_o};
- //================================================================================
- // CODING
- //================================================================================
- always @(posedge Clk_i) begin
- ssReg <= Ss_i;
- ssRegR <= ssReg;
- end
- always @(*) begin
- if (Rst_i) begin
- addrRegM = 8'h0;
- shiftReg0M = 8'h0;
- shiftReg1M = 8'h0;
- shiftReg2M = 8'h0;
- end
- else begin
- case(WidthSel_i)
- 0: begin
- addrRegM = addrReg [1:0];
- shiftReg0M = shiftReg0[1:0];
- shiftReg1M = shiftReg1[1:0];
- shiftReg2M = shiftReg2[1:0];
- end
- 1: begin
- addrRegM = addrReg [3:0];
- shiftReg0M = shiftReg0[3:0];
- shiftReg1M = shiftReg1[3:0];
- shiftReg2M = shiftReg2[3:0];
- end
- 2: begin
- addrRegM = addrReg [5:0];
- shiftReg0M = shiftReg0[5:0];
- shiftReg1M = shiftReg1[5:0];
- shiftReg2M = shiftReg2[5:0];
- end
- 3: begin
- addrRegM = addrReg [7:0];
- shiftReg0M = shiftReg0[7:0];
- shiftReg1M = shiftReg1[7:0];
- shiftReg2M = shiftReg2[7:0];
- end
- endcase
- end
- end
- always @(posedge Clk_i) begin
- if (Rst_i) begin
- Data_o <= 24'h0;
- end
- else begin
- if (SELST_i) begin
- if (ssReg && !ssRegR) begin
- Data_o <= {shiftReg2M, shiftReg1M, shiftReg0M};
- end
- end
- else begin
- if (!ssReg && ssRegR) begin
- Data_o <= {shiftReg2M, shiftReg1M, shiftReg0M};
- end
- end
- end
- end
- always @(posedge Clk_i) begin
- if (Rst_i) begin
- Addr_o <= 8'h0;
- end
- else begin
- if (SELST_i) begin
- if (ssReg && !ssRegR) begin
- Addr_o <= addrRegM;
- end
- end
- else begin
- if (!ssReg && ssRegR) begin
- Addr_o <= addrRegM;
- end
- end
- end
- end
- always @(posedge Sck_i) begin
- if (Rst_i) begin
- shiftReg0 <= 8'h0;
- end
- else begin
- if (SELST_i) begin
- if (!Ss_i) begin
- shiftReg0 <= {shiftReg0[6:0], Mosi1_i};
- end
- else begin
- shiftReg0 <= 8'h0;
- end
- end
- else begin
- if (Ss_i) begin
- shiftReg0 <= {shiftReg0[6:0], Mosi1_i};
- end
- else begin
- shiftReg0<= 8'h0;
- end
- end
- end
- end
- always @(posedge Sck_i ) begin
- if (Rst_i) begin
- shiftReg1 <= 8'h0;
- end
- else begin
- if (SELST_i) begin
- if (!Ss_i) begin
- shiftReg1 <= {shiftReg1[6:0], Mosi2_i};
- end
- else begin
- shiftReg1 <= 8'h0;
- end
- end
- else begin
- if (Ss_i) begin
- shiftReg1 <= {shiftReg1[6:0], Mosi2_i};
- end
- else begin
- shiftReg1 <= 8'h0;
- end
- end
- end
- end
- always @(posedge Sck_i ) begin
- if (Rst_i) begin
- shiftReg2 <= 8'h0;
- end
- else begin
- if (SELST_i) begin
- if (!Ss_i) begin
- shiftReg2 <= {shiftReg2[6:0], Mosi3_i};
- end
- else begin
- shiftReg2 <= 8'h0;
- end
- end
- else begin
- if (Ss_i) begin
- shiftReg2 <= {shiftReg2[6:0], Mosi3_i};
- end
- else begin
- shiftReg2 <= 8'h0;
- end
- end
- end
- end
- always @(posedge Sck_i ) begin
- if (Rst_i) begin
- addrReg <= 8'h0;
- end
- else begin
- if (SELST_i) begin
- if (!Ss_i) begin
- addrReg <= {addrReg[6:0], Mosi0_i};
- end
- else begin
- addrReg <= 8'h0;
- end
- end
- else begin
- if (Ss_i) begin
- addrReg <= {addrReg[6:0], Mosi0_i};
- end
- else begin
- addrReg <= 8'h0;
- end
- end
- end
- end
- always @(posedge Clk_i) begin
- if (SELST_i) begin
- if (ssReg && !ssRegR) begin
- Val_o <= 1'b1;
- end
- else begin
- Val_o <= 1'b0;
- end
- end
- else begin
- if (!ssReg&& ssRegR) begin
- Val_o <= 1'b1;
- end
- else begin
- Val_o <= 1'b0;
- end
- end
- end
- endmodule
|