1 // Copyright (C) 2013 Michael McMaster <michael@codesrc.com>
3 // This file is part of SCSI2SD.
5 // SCSI2SD is free software: you can redistribute it and/or modify
6 // it under the terms of the GNU General Public License as published by
7 // the Free Software Foundation, either version 3 of the License, or
8 // (at your option) any later version.
10 // SCSI2SD is distributed in the hope that it will be useful,
11 // but WITHOUT ANY WARRANTY; without even the implied warranty of
12 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 // GNU General Public License for more details.
15 // You should have received a copy of the GNU General Public License
16 // along with SCSI2SD. If not, see <http://www.gnu.org/licenses/>.
18 #include "stm32f2xx.h"
19 #include "stm32f2xx_hal.h"
20 #include "stm32f2xx_hal_dma.h"
31 // 5MB/s sync and async.
32 // Assumes a 96MHz fpga clock.
33 // 2:0 Deskew count, 55ns
34 // 6:4 Hold count, 53ns
35 // 3:0 Assertion count, 80ns
36 #define SCSI_DEFAULT_DESKEW 0x6
37 #define SCSI_DEFAULT_TIMING ((0x5 << 4) | 0x8)
40 // 2:0 Deskew count, 25ns
41 // 6:4 Hold count, 33ns
42 // 3:0 Assertion count, 30ns
43 #define SCSI_FAST10_DESKEW 3
44 #define SCSI_FAST10_TIMING ((0x3 << 4) | 0x3)
47 // 2:0 Deskew count, 12ns
48 // 6:4 Hold count, 17ns
49 // 3:0 Assertion count, 15ns
50 #define SCSI_FAST20_DESKEW 2
51 #define SCSI_FAST20_TIMING ((0x2 << 4) | 0x2)
53 // Private DMA variables.
54 static int dmaInProgress
= 0;
56 static DMA_HandleTypeDef memToFSMC
;
57 static DMA_HandleTypeDef fsmcToMem
;
60 volatile uint8_t scsiRxDMAComplete
;
61 volatile uint8_t scsiTxDMAComplete
;
64 CY_ISR_PROTO(scsiRxCompleteISR
);
65 CY_ISR(scsiRxCompleteISR
)
67 traceIrq(trace_scsiRxCompleteISR
);
68 scsiRxDMAComplete
= 1;
71 CY_ISR_PROTO(scsiTxCompleteISR
);
72 CY_ISR(scsiTxCompleteISR
)
74 traceIrq(trace_scsiTxCompleteISR
);
75 scsiTxDMAComplete
= 1;
79 uint8_t scsiPhyFifoSel
= 0; // global
81 // scsi IRQ handler is initialised by the STM32 HAL. Connected to
83 // Note: naming is important to ensure this function is listed in the
85 void EXTI4_IRQHandler()
87 traceIrq(trace_scsiResetISR
);
89 // Make sure that interrupt flag is set
90 if (__HAL_GPIO_EXTI_GET_IT(GPIO_PIN_4
) != RESET
) {
92 // Clear interrupt flag
93 __HAL_GPIO_EXTI_CLEAR_IT(GPIO_PIN_4
);
95 scsiDev
.resetFlag
= scsiDev
.resetFlag
|| scsiStatusRST();
96 // TODO grab SEL status as well
101 static void assertFail()
113 scsiSetDataCount(uint32_t count
)
115 *SCSI_DATA_CNT_HI
= count
>> 8;
116 *SCSI_DATA_CNT_LO
= count
& 0xff;
117 *SCSI_DATA_CNT_SET
= 1;
124 if (!scsiPhyFifoAltEmpty()) {
131 trace(trace_spinPhyRxFifo
);
132 while (!scsiPhyComplete() && likely(!scsiDev
.resetFlag
)) {}
134 uint8_t val
= scsiPhyRx();
135 // TODO scsiDev.parityError = scsiDev.parityError || SCSI_Parity_Error_Read();
138 if (!scsiPhyFifoEmpty()) {
140 uint8_t k
__attribute((unused
));
141 while (!scsiPhyFifoEmpty()) { k
= scsiPhyRx(); ++j
; }
152 scsiReadPIO(uint8_t* data
, uint32_t count
)
154 uint16_t* fifoData
= (uint16_t*)data
;
155 for (int i
= 0; i
< (count
+ 1) / 2; ++i
)
157 fifoData
[i
] = scsiPhyRx(); // TODO ASSUMES LITTLE ENDIAN
162 scsiReadDMA(uint8_t* data
, uint32_t count
)
164 // Prepare DMA transfer
166 trace(trace_doRxSingleDMA
);
168 scsiTxDMAComplete
= 1; // TODO not used much
169 scsiRxDMAComplete
= 0; // TODO not used much
173 (uint32_t) SCSI_FIFO_DATA
,
181 int complete
= __HAL_DMA_GET_COUNTER(&fsmcToMem
) == 0;
182 complete
= complete
&& (HAL_DMA_PollForTransfer(&fsmcToMem
, HAL_DMA_FULL_TRANSFER
, 0xffffffff) == HAL_OK
);
185 scsiTxDMAComplete
= 1; // TODO MM FIX IRQ
186 scsiRxDMAComplete
= 1;
190 // TODO MM scsiDev.parityError = scsiDev.parityError || SCSI_Parity_Error_Read();
202 scsiRead(uint8_t* data
, uint32_t count
, int* parityError
)
208 uint32_t chunk
= ((count
- i
) > SCSI_FIFO_DEPTH
)
209 ? SCSI_FIFO_DEPTH
: (count
- i
);
213 // DMA is doing 32bit transfers.
214 chunk
= chunk
& 0xFFFFFFF8;
217 scsiSetDataCount(chunk
);
219 while (i
< count
&& likely(!scsiDev
.resetFlag
))
221 while (!scsiPhyComplete() && likely(!scsiDev
.resetFlag
)) {}
222 *parityError
|= scsiParityError();
225 uint32_t nextChunk
= ((count
- i
- chunk
) > SCSI_FIFO_DEPTH
)
226 ? SCSI_FIFO_DEPTH
: (count
- i
- chunk
);
230 nextChunk
= nextChunk
& 0xFFFFFFF8;
235 scsiSetDataCount(nextChunk
);
242 scsiReadPIO(data
+ i
, chunk
);
247 scsiReadDMA(data
+ i
, chunk
);
249 trace(trace_spinReadDMAPoll
);
251 while (!scsiReadDMAPoll() && likely(!scsiDev
.resetFlag
))
262 if (!scsiPhyFifoEmpty() || !scsiPhyFifoAltEmpty()) {
264 while (!scsiPhyFifoEmpty()) { scsiPhyRx(); ++j
; }
267 while (!scsiPhyFifoEmpty()) { scsiPhyRx(); ++k
; }
275 scsiWriteByte(uint8_t value
)
278 if (!scsiPhyFifoEmpty()) {
283 trace(trace_spinPhyTxFifo
);
289 trace(trace_spinTxComplete
);
290 while (!scsiPhyComplete() && likely(!scsiDev
.resetFlag
)) {}
293 if (!scsiPhyFifoAltEmpty()) {
301 scsiWritePIO(const uint8_t* data
, uint32_t count
)
303 uint16_t* fifoData
= (uint16_t*)data
;
304 for (int i
= 0; i
< (count
+ 1) / 2; ++i
)
306 scsiPhyTx(fifoData
[i
]);
311 scsiWriteDMA(const uint8_t* data
, uint32_t count
)
313 // Prepare DMA transfer
315 trace(trace_doTxSingleDMA
);
317 scsiTxDMAComplete
= 0;
318 scsiRxDMAComplete
= 1;
323 (uint32_t) SCSI_FIFO_DATA
,
330 int complete
= __HAL_DMA_GET_COUNTER(&memToFSMC
) == 0;
331 complete
= complete
&& (HAL_DMA_PollForTransfer(&memToFSMC
, HAL_DMA_FULL_TRANSFER
, 0xffffffff) == HAL_OK
);
334 scsiTxDMAComplete
= 1; // TODO MM FIX IRQ
335 scsiRxDMAComplete
= 1;
347 scsiWrite(const uint8_t* data
, uint32_t count
)
350 while (i
< count
&& likely(!scsiDev
.resetFlag
))
352 uint32_t chunk
= ((count
- i
) > SCSI_FIFO_DEPTH
)
353 ? SCSI_FIFO_DEPTH
: (count
- i
);
356 if (!scsiPhyFifoEmpty()) {
366 scsiWritePIO(data
+ i
, chunk
);
371 // DMA is doing 32bit transfers.
372 chunk
= chunk
& 0xFFFFFFF8;
373 scsiWriteDMA(data
+ i
, chunk
);
375 trace(trace_spinReadDMAPoll
);
377 while (!scsiWriteDMAPoll() && likely(!scsiDev
.resetFlag
))
383 while (!scsiPhyComplete() && likely(!scsiDev
.resetFlag
))
388 if (!scsiPhyFifoAltEmpty()) {
395 scsiSetDataCount(chunk
);
398 while (!scsiPhyComplete() && likely(!scsiDev
.resetFlag
))
403 if (!scsiPhyFifoAltEmpty()) {
410 static inline void busSettleDelay(void)
412 // Data Release time (switching IO) = 400ns
413 // + Bus Settle time (switching phase) = 400ns.
414 s2s_delay_us(1); // Close enough.
417 void scsiEnterBusFree()
419 *SCSI_CTRL_BSY
= 0x00;
420 // We now have a Bus Clear Delay of 800ns to release remaining signals.
421 *SCSI_CTRL_PHASE
= 0;
424 void scsiEnterPhase(int phase
)
426 // ANSI INCITS 362-2002 SPI-3 10.7.1:
427 // Phase changes are not allowed while REQ or ACK is asserted.
428 while (likely(!scsiDev
.resetFlag
) && scsiStatusACK()) {}
430 int newPhase
= phase
> 0 ? phase
: 0;
431 int oldPhase
= *SCSI_CTRL_PHASE
;
433 if (!scsiDev
.resetFlag
&& (!scsiPhyFifoEmpty() || !scsiPhyFifoAltEmpty())) {
437 if (newPhase
!= oldPhase
)
439 if ((newPhase
== DATA_IN
|| newPhase
== DATA_OUT
) &&
440 scsiDev
.target
->syncOffset
)
442 if (scsiDev
.target
->syncPeriod
== 12)
444 // SCSI2 FAST-20 Timing. 20MB/s.
445 *SCSI_CTRL_DESKEW
= SCSI_FAST20_DESKEW
;
446 *SCSI_CTRL_TIMING
= SCSI_FAST20_TIMING
;
448 else if (scsiDev
.target
->syncPeriod
== 25)
450 // SCSI2 FAST Timing. 10MB/s.
451 *SCSI_CTRL_DESKEW
= SCSI_FAST10_DESKEW
;
452 *SCSI_CTRL_TIMING
= SCSI_FAST10_TIMING
;
455 *SCSI_CTRL_DESKEW
= SCSI_DEFAULT_DESKEW
;
456 *SCSI_CTRL_TIMING
= SCSI_DEFAULT_TIMING
;
459 *SCSI_CTRL_SYNC_OFFSET
= scsiDev
.target
->syncOffset
;
461 *SCSI_CTRL_SYNC_OFFSET
= 0;
464 *SCSI_CTRL_DESKEW
= SCSI_DEFAULT_DESKEW
;
465 *SCSI_CTRL_TIMING
= SCSI_DEFAULT_TIMING
;
468 *SCSI_CTRL_PHASE
= newPhase
;
471 if (scsiDev
.compatMode
< COMPAT_SCSI2
)
481 trace(trace_scsiPhyReset
);
484 trace(trace_spinDMAReset
);
485 HAL_DMA_Abort(&memToFSMC
);
486 HAL_DMA_Abort(&fsmcToMem
);
491 *SCSI_CTRL_PHASE
= 0x00;
492 *SCSI_CTRL_BSY
= 0x00;
493 s2s_fpgaReset(); // Clears fifos etc.
499 *SCSI_CTRL_SYNC_OFFSET
= 0;
500 *SCSI_CTRL_DESKEW
= SCSI_DEFAULT_DESKEW
;
501 *SCSI_CTRL_TIMING
= SCSI_DEFAULT_TIMING
;
503 // DMA Benchmark code
510 for (int i
= 0; i
< (100LL * 1024 * 1024 / SCSI_FIFO_DEPTH
); ++i
)
514 (uint32_t) &scsiDev
.data
[0],
515 (uint32_t) SCSI_FIFO_DATA
,
516 SCSI_FIFO_DEPTH
/ 4);
518 HAL_DMA_PollForTransfer(
520 HAL_DMA_FULL_TRANSFER
,
527 for(int i
= 0; i
< 10; ++i
) s2s_delay_ms(1000);
531 // FPGA comms test code
535 for (int j
= 0; j
< SCSI_FIFO_DEPTH
; ++j
)
540 if (!scsiPhyFifoEmpty())
545 *SCSI_CTRL_PHASE
= DATA_IN
;
548 (uint32_t) &scsiDev
.data
[0],
549 (uint32_t) SCSI_FIFO_DATA
,
550 SCSI_FIFO_DEPTH
/ 4);
552 HAL_DMA_PollForTransfer(
554 HAL_DMA_FULL_TRANSFER
,
557 if (!scsiPhyFifoFull())
562 memset(&scsiDev
.data
[0], 0, SCSI_FIFO_DEPTH
);
564 *SCSI_CTRL_PHASE
= DATA_OUT
;
567 (uint32_t) SCSI_FIFO_DATA
,
568 (uint32_t) &scsiDev
.data
[0],
569 SCSI_FIFO_DEPTH
/ 2);
571 HAL_DMA_PollForTransfer(
573 HAL_DMA_FULL_TRANSFER
,
576 if (!scsiPhyFifoEmpty())
582 for (int j
= 0; j
< SCSI_FIFO_DEPTH
; ++j
)
584 if (scsiDev
.data
[j
] != (uint8_t) j
)
595 #ifdef SCSI_FREQ_TEST
598 *SCSI_CTRL_DBX
= 0xAA;
599 *SCSI_CTRL_DBX
= 0x55;
605 static void scsiPhyInitDMA()
607 // One-time init only.
608 static uint8_t init
= 0;
613 // Memory to memory transfers can only be done using DMA2
616 // Transmit SCSI data. The source data is treated as the
617 // peripheral (even though this is memory-to-memory)
618 memToFSMC
.Instance
= DMA2_Stream0
;
619 memToFSMC
.Init
.Channel
= DMA_CHANNEL_0
;
620 memToFSMC
.Init
.Direction
= DMA_MEMORY_TO_MEMORY
;
621 memToFSMC
.Init
.PeriphInc
= DMA_PINC_ENABLE
;
622 memToFSMC
.Init
.MemInc
= DMA_MINC_DISABLE
;
623 memToFSMC
.Init
.PeriphDataAlignment
= DMA_PDATAALIGN_WORD
;
624 memToFSMC
.Init
.MemDataAlignment
= DMA_MDATAALIGN_HALFWORD
;
625 memToFSMC
.Init
.Mode
= DMA_NORMAL
;
626 memToFSMC
.Init
.Priority
= DMA_PRIORITY_LOW
;
627 // FIFO mode is needed to allow conversion from 32bit words to the
628 // 16bit FSMC interface.
629 memToFSMC
.Init
.FIFOMode
= DMA_FIFOMODE_ENABLE
;
631 // We only use 1 word (4 bytes) in the fifo at a time. Normally it's
632 // better to let the DMA fifo fill up then do burst transfers, but
633 // bursting out the FSMC interface will be very slow and may starve
634 // other (faster) transfers. We don't want to risk the SDIO transfers
635 // from overrun/underrun conditions.
636 memToFSMC
.Init
.FIFOThreshold
= DMA_FIFO_THRESHOLD_1QUARTERFULL
;
637 memToFSMC
.Init
.MemBurst
= DMA_MBURST_SINGLE
;
638 memToFSMC
.Init
.PeriphBurst
= DMA_PBURST_SINGLE
;
639 HAL_DMA_Init(&memToFSMC
);
641 // Receive SCSI data. The source data (fsmc) is treated as the
642 // peripheral (even though this is memory-to-memory)
643 fsmcToMem
.Instance
= DMA2_Stream1
;
644 fsmcToMem
.Init
.Channel
= DMA_CHANNEL_0
;
645 fsmcToMem
.Init
.Direction
= DMA_MEMORY_TO_MEMORY
;
646 fsmcToMem
.Init
.PeriphInc
= DMA_PINC_DISABLE
;
647 fsmcToMem
.Init
.MemInc
= DMA_MINC_ENABLE
;
648 fsmcToMem
.Init
.PeriphDataAlignment
= DMA_PDATAALIGN_HALFWORD
;
649 fsmcToMem
.Init
.MemDataAlignment
= DMA_MDATAALIGN_WORD
;
650 fsmcToMem
.Init
.Mode
= DMA_NORMAL
;
651 fsmcToMem
.Init
.Priority
= DMA_PRIORITY_LOW
;
652 fsmcToMem
.Init
.FIFOMode
= DMA_FIFOMODE_ENABLE
;
653 fsmcToMem
.Init
.FIFOThreshold
= DMA_FIFO_THRESHOLD_1QUARTERFULL
;
654 fsmcToMem
.Init
.MemBurst
= DMA_MBURST_SINGLE
;
655 fsmcToMem
.Init
.PeriphBurst
= DMA_PBURST_SINGLE
;
656 HAL_DMA_Init(&fsmcToMem
);
658 // TODO configure IRQs
667 *SCSI_CTRL_IDMASK
= 0x00; // Reset in scsiPhyConfig
668 *SCSI_CTRL_PHASE
= 0x00;
669 *SCSI_CTRL_BSY
= 0x00;
674 *SCSI_CTRL_SYNC_OFFSET
= 0;
675 *SCSI_CTRL_DESKEW
= SCSI_DEFAULT_DESKEW
;
676 *SCSI_CTRL_TIMING
= SCSI_DEFAULT_TIMING
;
682 if (scsiDev
.boardCfg
.flags6
& S2S_CFG_ENABLE_TERMINATOR
)
684 HAL_GPIO_WritePin(nTERM_EN_GPIO_Port
, nTERM_EN_Pin
, GPIO_PIN_RESET
);
688 HAL_GPIO_WritePin(nTERM_EN_GPIO_Port
, nTERM_EN_Pin
, GPIO_PIN_SET
);
693 for (int i
= 0; i
< 8; ++i
)
695 const S2S_TargetCfg
* cfg
= s2s_getConfigById(i
);
696 if (cfg
&& (cfg
->scsiId
& S2S_CFG_TARGET_ENABLED
))
701 *SCSI_CTRL_IDMASK
= idMask
;
704 ((scsiDev
.boardCfg
.flags
& S2S_CFG_DISABLE_GLITCH
) ?
705 SCSI_CTRL_FLAGS_DISABLE_GLITCH
: 0) |
706 ((scsiDev
.boardCfg
.flags
& S2S_CFG_ENABLE_PARITY
) ?
707 SCSI_CTRL_FLAGS_ENABLE_PARITY
: 0);
720 if (scsiDev
.phase
!= BUS_FREE
)
725 // Acquire the SCSI bus.
726 for (int i
= 0; i
< 100; ++i
)
735 // Error, couldn't acquire scsi bus
739 if (! scsiStatusBSY())
741 // Error, BSY doesn't work.
745 // Should be safe to use the bus now.
752 for (i
= 0; i
< 256; ++i
)
756 if (*SCSI_STS_DBX
!= (i
& 0xff))
760 /*if (Lookup_OddParity[i & 0xff] != SCSI_ReadPin(SCSI_In_DBP))
769 for (i = 0; i < 8; ++i)
771 SCSI_CTL_PHASE_Write(i);
774 if (SCSI_ReadPin(SCSI_In_MSG) != !!(i & __scsiphase_msg))
778 if (SCSI_ReadPin(SCSI_In_CD) != !!(i & __scsiphase_cd))
782 if (SCSI_ReadPin(SCSI_In_IO) != !!(i & __scsiphase_io))
787 SCSI_CTL_PHASE_Write(0);
789 uint32_t signalsOut[] = { SCSI_Out_ATN, SCSI_Out_BSY, SCSI_Out_RST, SCSI_Out_SEL };
790 uint32_t signalsIn[] = { SCSI_Filt_ATN, SCSI_Filt_BSY, SCSI_Filt_RST, SCSI_Filt_SEL };
792 for (i = 0; i < 4; ++i)
794 SCSI_SetPin(signalsOut[i]);
798 for (j = 0; j < 4; ++j)
802 if (! SCSI_ReadFilt(signalsIn[j]))
809 if (SCSI_ReadFilt(signalsIn[j]))
815 SCSI_ClearPin(signalsOut[i]);