| 123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470 |
- 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 [191:0] DebugData_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] addrRegLSB;
- reg [7:0] shiftReg0LSB;
- reg [7:0] shiftReg1LSB;
- reg [7:0] shiftReg2LSB;
- reg [7:0] shiftReg0M;
- reg [7:0] shiftReg1M;
- reg [7:0] shiftReg2M;
- reg [7:0] addrRegM;
- reg [47:0] shiftReg0Debug;
- reg [47:0] shiftReg1Debug;
- reg [47:0] shiftReg2Debug;
- reg [47:0] shiftReg3Debug;
- //===============================================================================
- // 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
- if (!EndianSel_i) 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
- else begin
- case(WidthSel_i)
- 0: begin
- addrRegM = addrRegLSB[1:0];
- shiftReg0M = shiftReg0LSB[1:0];
- shiftReg1M = shiftReg1LSB[1:0];
- shiftReg2M = shiftReg2LSB[1:0];
- end
- 1: begin
- addrRegM = addrRegLSB[3:0];
- shiftReg0M = shiftReg0LSB[3:0];
- shiftReg1M = shiftReg1LSB[3:0];
- shiftReg2M = shiftReg2LSB[3:0];
- end
- 2: begin
- addrRegM = addrRegLSB[5:0];
- shiftReg0M = shiftReg0LSB[5:0];
- shiftReg1M = shiftReg1LSB[5:0];
- shiftReg2M = shiftReg2LSB[5:0];
- end
- 3: begin
- addrRegM = addrRegLSB[7:0];
- shiftReg0M = shiftReg0LSB[7:0];
- shiftReg1M = shiftReg1LSB[7:0];
- shiftReg2M = shiftReg2LSB[7:0];
- end
- endcase
- end
- end
- end
- always @(posedge Clk_i) begin
- if (Rst_i) begin
- Data_o <= 24'h0;
- end
- else begin
- if (!EndianSel_i) begin
- if (SELST_i) begin
- if (ssReg && !ssRegR) begin
- Data_o <= {shiftReg0M, shiftReg1M, shiftReg2M};
- end
- end
- else begin
- if (!ssReg && ssRegR) begin
- Data_o <= {shiftReg0M, shiftReg1M, shiftReg2M};
- end
- end
- 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
- end
- always @(posedge Clk_i) begin
- if (Rst_i) begin
- DebugData_o <= 192'h0;
- end
- else begin
- DebugData_o <= {shiftReg0Debug,shiftReg1Debug, shiftReg2Debug,shiftReg3Debug};
- end
- end
- always @(posedge Sck_i or posedge Rst_i) begin
- if (Rst_i) begin
- shiftReg0Debug <= 48'h0;
- end
- else begin
- if (!Ss_i) begin
- shiftReg0Debug <= {shiftReg0Debug[46:0], Mosi0_i};
- end
- else begin
- shiftReg0Debug <= 48'h0;
- end
- end
- end
- always @(posedge Sck_i or posedge Rst_i) begin
- if (Rst_i) begin
- shiftReg1Debug <= 48'h0;
- end
- else begin
- if (!Ss_i) begin
- shiftReg1Debug <= {shiftReg1Debug[46:0], Mosi1_i};
- end
- else begin
- shiftReg1Debug <= 48'h0;
- end
- end
- end
- always @(posedge Sck_i or posedge Rst_i) begin
- if (Rst_i) begin
- shiftReg2Debug <= 48'h0;
- end
- else begin
- if (!Ss_i) begin
- shiftReg2Debug <= {shiftReg2Debug[46:0], Mosi2_i};
- end
- else begin
- shiftReg2Debug <= 48'h0;
- end
- end
- end
- always @(posedge Sck_i or posedge Rst_i) begin
- if (Rst_i) begin
- shiftReg3Debug <= 48'h0;
- end
- else begin
- if (!Ss_i) begin
- shiftReg3Debug <= {shiftReg3Debug[46:0], Mosi3_i};
- end
- else begin
- shiftReg3Debug <= 48'h0;
- 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 or posedge Rst_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 Sck_i or posedge Rst_i) begin
- if (Rst_i) begin
- addrRegLSB <= 8'h0;
- end
- else begin
- if (SELST_i) begin
- if (!Ss_i) begin
- addrRegLSB <= {Mosi3_i, addrRegLSB[7:1]};
- end
- else begin
- addrRegLSB <= 8'h0;
- end
- end
- else begin
- if (Ss_i) begin
- addrRegLSB <= {Mosi3_i, addrRegLSB[7:1]};
- end
- else begin
- addrRegLSB <= 8'h0;
- end
- end
- end
- end
- always @(posedge Sck_i or posedge Rst_i) begin
- if (Rst_i) begin
- shiftReg0LSB <= 8'h0;
- end
- else begin
- if (SELST_i) begin
- if (!Ss_i) begin
- shiftReg0LSB <= {Mosi0_i, shiftReg0LSB[7:1]};
- end
- else begin
- shiftReg0LSB <= 8'h0;
- end
- end
- else begin
- if (Ss_i) begin
- shiftReg0LSB <= {Mosi0_i, shiftReg0LSB[7:1]};
- end
- else begin
- shiftReg0LSB <= 8'h0;
- end
- end
- end
- end
- always @(posedge Sck_i or posedge Rst_i) begin
- if (Rst_i) begin
- shiftReg1LSB <= 8'h0;
- end
- else begin
- if (SELST_i) begin
- if (!Ss_i) begin
- shiftReg1LSB <= {Mosi1_i, shiftReg1LSB[7:1]};
- end
- else begin
- shiftReg1LSB <= 8'h0;
- end
- end
- else begin
- if (Ss_i) begin
- shiftReg1LSB <= {Mosi1_i, shiftReg1LSB[7:1]};
- end
- else begin
- shiftReg1LSB <= 8'h0;
- end
- end
- end
- end
- always @(posedge Sck_i or posedge Rst_i) begin
- if (Rst_i) begin
- shiftReg2LSB <= 8'h0;
- end
- else begin
- if (SELST_i) begin
- if (!Ss_i) begin
- shiftReg2LSB <= {Mosi2_i, shiftReg2LSB[7:1]};
- end
- else begin
- shiftReg2LSB <= 8'h0;
- end
- end
- else begin
- if (Ss_i) begin
- shiftReg2LSB <= {Mosi2_i, shiftReg2LSB[7:1]};
- end
- else begin
- shiftReg2LSB <= 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
|