ZuluSCSI_platform.cpp 22 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620
  1. #include "ZuluSCSI_platform.h"
  2. #include "ZuluSCSI_log.h"
  3. #include "ZuluSCSI_config.h"
  4. #include <SdFat.h>
  5. #include <scsi.h>
  6. #include <assert.h>
  7. #include <hardware/gpio.h>
  8. #include <hardware/uart.h>
  9. #include <hardware/spi.h>
  10. #include <hardware/structs/xip_ctrl.h>
  11. #include <platform/mbed_error.h>
  12. #include <multicore.h>
  13. extern "C" {
  14. // As of 2022-09-13, the platformio RP2040 core is missing cplusplus guard on flash.h
  15. // For that reason this has to be inside the extern "C" here.
  16. #include <hardware/flash.h>
  17. #include "rp2040_flash_do_cmd.h"
  18. const char *g_azplatform_name = PLATFORM_NAME;
  19. static bool g_scsi_initiator = false;
  20. static uint32_t g_flash_chip_size = 0;
  21. static bool g_uart_initialized = false;
  22. void mbed_error_hook(const mbed_error_ctx * error_context);
  23. /***************/
  24. /* GPIO init */
  25. /***************/
  26. // Helper function to configure whole GPIO in one line
  27. static void gpio_conf(uint gpio, enum gpio_function fn, bool pullup, bool pulldown, bool output, bool initial_state, bool fast_slew)
  28. {
  29. gpio_put(gpio, initial_state);
  30. gpio_set_dir(gpio, output);
  31. gpio_set_pulls(gpio, pullup, pulldown);
  32. gpio_set_function(gpio, fn);
  33. if (fast_slew)
  34. {
  35. padsbank0_hw->io[gpio] |= PADS_BANK0_GPIO0_SLEWFAST_BITS;
  36. }
  37. }
  38. void azplatform_init()
  39. {
  40. // Make sure second core is stopped
  41. multicore_reset_core1();
  42. /* First configure the pins that affect external buffer directions.
  43. * RP2040 defaults to pulldowns, while these pins have external pull-ups.
  44. */
  45. // pin function pup pdown out state fast
  46. gpio_conf(SCSI_DATA_DIR, GPIO_FUNC_SIO, false,false, true, true, true);
  47. gpio_conf(SCSI_OUT_RST, GPIO_FUNC_SIO, false,false, true, true, true);
  48. gpio_conf(SCSI_OUT_BSY, GPIO_FUNC_SIO, false,false, true, true, true);
  49. gpio_conf(SCSI_OUT_SEL, GPIO_FUNC_SIO, false,false, true, true, true);
  50. /* Check dip switch settings */
  51. gpio_conf(DIP_INITIATOR, GPIO_FUNC_SIO, false, false, false, false, false);
  52. gpio_conf(DIP_DBGLOG, GPIO_FUNC_SIO, false, false, false, false, false);
  53. gpio_conf(DIP_TERM, GPIO_FUNC_SIO, false, false, false, false, false);
  54. delay(10); // 10 ms delay to let pull-ups do their work
  55. bool dbglog = !gpio_get(DIP_DBGLOG);
  56. bool termination = !gpio_get(DIP_TERM);
  57. /* Initialize logging to SWO pin (UART0) */
  58. gpio_conf(SWO_PIN, GPIO_FUNC_UART,false,false, true, false, true);
  59. uart_init(uart0, 1000000);
  60. g_uart_initialized = true;
  61. mbed_set_error_hook(mbed_error_hook);
  62. azlog("Platform: ", g_azplatform_name);
  63. azlog("FW Version: ", g_azlog_firmwareversion);
  64. azlog("DIP switch settings: debug log ", (int)dbglog, ", termination ", (int)termination);
  65. g_azlog_debug = dbglog;
  66. if (termination)
  67. {
  68. azlog("SCSI termination is enabled");
  69. }
  70. else
  71. {
  72. azlog("NOTE: SCSI termination is disabled");
  73. }
  74. // Get flash chip size
  75. uint8_t cmd_read_jedec_id[4] = {0x9f, 0, 0, 0};
  76. uint8_t response_jedec[4] = {0};
  77. flash_do_cmd(cmd_read_jedec_id, response_jedec, 4);
  78. g_flash_chip_size = (1 << response_jedec[3]);
  79. azlog("Flash chip size: ", (int)(g_flash_chip_size / 1024), " kB");
  80. // SD card pins
  81. // Card is used in SDIO mode for main program, and in SPI mode for crash handler & bootloader.
  82. // pin function pup pdown out state fast
  83. gpio_conf(SD_SPI_SCK, GPIO_FUNC_SPI, true, false, true, true, true);
  84. gpio_conf(SD_SPI_MOSI, GPIO_FUNC_SPI, true, false, true, true, true);
  85. gpio_conf(SD_SPI_MISO, GPIO_FUNC_SPI, true, false, false, true, true);
  86. gpio_conf(SD_SPI_CS, GPIO_FUNC_SIO, true, false, true, true, true);
  87. gpio_conf(SDIO_D1, GPIO_FUNC_SIO, true, false, false, true, true);
  88. gpio_conf(SDIO_D2, GPIO_FUNC_SIO, true, false, false, true, true);
  89. // LED pin
  90. gpio_conf(LED_PIN, GPIO_FUNC_SIO, false,false, true, false, false);
  91. // I2C pins
  92. // pin function pup pdown out state fast
  93. gpio_conf(GPIO_I2C_SCL, GPIO_FUNC_I2C, true,false, false, true, true);
  94. gpio_conf(GPIO_I2C_SDA, GPIO_FUNC_I2C, true,false, false, true, true);
  95. }
  96. static bool read_initiator_dip_switch()
  97. {
  98. /* Revision 2022d hardware has problems reading initiator DIP switch setting.
  99. * The 74LVT245 hold current is keeping the GPIO_ACK state too strongly.
  100. * Detect this condition by toggling the pin up and down and seeing if it sticks.
  101. */
  102. // Strong output high, then pulldown
  103. // pin function pup pdown out state fast
  104. gpio_conf(DIP_INITIATOR, GPIO_FUNC_SIO, false, false, true, true, false);
  105. gpio_conf(DIP_INITIATOR, GPIO_FUNC_SIO, false, true, false, true, false);
  106. delay(1);
  107. bool initiator_state1 = gpio_get(DIP_INITIATOR);
  108. // Strong output low, then pullup
  109. // pin function pup pdown out state fast
  110. gpio_conf(DIP_INITIATOR, GPIO_FUNC_SIO, false, false, true, false, false);
  111. gpio_conf(DIP_INITIATOR, GPIO_FUNC_SIO, true, false, false, false, false);
  112. delay(1);
  113. bool initiator_state2 = gpio_get(DIP_INITIATOR);
  114. if (initiator_state1 == initiator_state2)
  115. {
  116. // Ok, was able to read the state directly
  117. return !initiator_state1;
  118. }
  119. // Enable OUT_BSY for a short time.
  120. // If in target mode, this will force GPIO_ACK high.
  121. gpio_put(SCSI_OUT_BSY, 0);
  122. delay_100ns();
  123. gpio_put(SCSI_OUT_BSY, 1);
  124. return !gpio_get(DIP_INITIATOR);
  125. }
  126. // late_init() only runs in main application, SCSI not needed in bootloader
  127. void azplatform_late_init()
  128. {
  129. if (read_initiator_dip_switch())
  130. {
  131. g_scsi_initiator = true;
  132. azlog("SCSI initiator mode selected by DIP switch, expecting SCSI disks on the bus");
  133. }
  134. else
  135. {
  136. g_scsi_initiator = false;
  137. azlog("SCSI target/disk mode selected by DIP switch, acting as a SCSI disk");
  138. }
  139. /* Initialize SCSI pins to required modes.
  140. * SCSI pins should be inactive / input at this point.
  141. */
  142. // SCSI data bus direction is switched by DATA_DIR signal.
  143. // Pullups make sure that no glitches occur when switching direction.
  144. // pin function pup pdown out state fast
  145. gpio_conf(SCSI_IO_DB0, GPIO_FUNC_SIO, true, false, false, true, true);
  146. gpio_conf(SCSI_IO_DB1, GPIO_FUNC_SIO, true, false, false, true, true);
  147. gpio_conf(SCSI_IO_DB2, GPIO_FUNC_SIO, true, false, false, true, true);
  148. gpio_conf(SCSI_IO_DB3, GPIO_FUNC_SIO, true, false, false, true, true);
  149. gpio_conf(SCSI_IO_DB4, GPIO_FUNC_SIO, true, false, false, true, true);
  150. gpio_conf(SCSI_IO_DB5, GPIO_FUNC_SIO, true, false, false, true, true);
  151. gpio_conf(SCSI_IO_DB6, GPIO_FUNC_SIO, true, false, false, true, true);
  152. gpio_conf(SCSI_IO_DB7, GPIO_FUNC_SIO, true, false, false, true, true);
  153. gpio_conf(SCSI_IO_DBP, GPIO_FUNC_SIO, true, false, false, true, true);
  154. if (!g_scsi_initiator)
  155. {
  156. // Act as SCSI device / target
  157. // SCSI control outputs
  158. // pin function pup pdown out state fast
  159. gpio_conf(SCSI_OUT_IO, GPIO_FUNC_SIO, false,false, true, true, true);
  160. gpio_conf(SCSI_OUT_MSG, GPIO_FUNC_SIO, false,false, true, true, true);
  161. // REQ pin is switched between PIO and SIO, pull-up makes sure no glitches
  162. gpio_conf(SCSI_OUT_REQ, GPIO_FUNC_SIO, true ,false, true, true, true);
  163. // Shared pins are changed to input / output depending on communication phase
  164. gpio_conf(SCSI_IN_SEL, GPIO_FUNC_SIO, true, false, false, true, true);
  165. if (SCSI_OUT_CD != SCSI_IN_SEL)
  166. {
  167. gpio_conf(SCSI_OUT_CD, GPIO_FUNC_SIO, false,false, true, true, true);
  168. }
  169. gpio_conf(SCSI_IN_BSY, GPIO_FUNC_SIO, true, false, false, true, true);
  170. if (SCSI_OUT_MSG != SCSI_IN_BSY)
  171. {
  172. gpio_conf(SCSI_OUT_MSG, GPIO_FUNC_SIO, false,false, true, true, true);
  173. }
  174. // SCSI control inputs
  175. // pin function pup pdown out state fast
  176. gpio_conf(SCSI_IN_ACK, GPIO_FUNC_SIO, true, false, false, true, false);
  177. gpio_conf(SCSI_IN_ATN, GPIO_FUNC_SIO, true, false, false, true, false);
  178. gpio_conf(SCSI_IN_RST, GPIO_FUNC_SIO, true, false, false, true, false);
  179. }
  180. else
  181. {
  182. // Act as SCSI initiator
  183. // pin function pup pdown out state fast
  184. gpio_conf(SCSI_IN_IO, GPIO_FUNC_SIO, true ,false, false, true, false);
  185. gpio_conf(SCSI_IN_MSG, GPIO_FUNC_SIO, true ,false, false, true, false);
  186. gpio_conf(SCSI_IN_CD, GPIO_FUNC_SIO, true ,false, false, true, false);
  187. gpio_conf(SCSI_IN_REQ, GPIO_FUNC_SIO, true ,false, false, true, false);
  188. gpio_conf(SCSI_IN_BSY, GPIO_FUNC_SIO, true, false, false, true, false);
  189. gpio_conf(SCSI_IN_RST, GPIO_FUNC_SIO, true, false, false, true, false);
  190. gpio_conf(SCSI_OUT_SEL, GPIO_FUNC_SIO, false,false, true, true, true);
  191. gpio_conf(SCSI_OUT_ACK, GPIO_FUNC_SIO, false,false, true, true, true);
  192. gpio_conf(SCSI_OUT_ATN, GPIO_FUNC_SIO, false,false, true, true, true);
  193. }
  194. }
  195. bool azplatform_is_initiator_mode_enabled()
  196. {
  197. return g_scsi_initiator;
  198. }
  199. /*****************************************/
  200. /* Crash handlers */
  201. /*****************************************/
  202. extern SdFs SD;
  203. extern uint32_t __StackTop;
  204. void azplatform_emergency_log_save()
  205. {
  206. azplatform_set_sd_callback(NULL, NULL);
  207. SD.begin(SD_CONFIG_CRASH);
  208. FsFile crashfile = SD.open(CRASHFILE, O_WRONLY | O_CREAT | O_TRUNC);
  209. if (!crashfile.isOpen())
  210. {
  211. // Try to reinitialize
  212. int max_retry = 10;
  213. while (max_retry-- > 0 && !SD.begin(SD_CONFIG_CRASH));
  214. crashfile = SD.open(CRASHFILE, O_WRONLY | O_CREAT | O_TRUNC);
  215. }
  216. uint32_t startpos = 0;
  217. crashfile.write(azlog_get_buffer(&startpos));
  218. crashfile.write(azlog_get_buffer(&startpos));
  219. crashfile.flush();
  220. crashfile.close();
  221. }
  222. void mbed_error_hook(const mbed_error_ctx * error_context)
  223. {
  224. azlog("--------------");
  225. azlog("CRASH!");
  226. azlog("Platform: ", g_azplatform_name);
  227. azlog("FW Version: ", g_azlog_firmwareversion);
  228. azlog("error_status: ", (uint32_t)error_context->error_status);
  229. azlog("error_address: ", error_context->error_address);
  230. azlog("error_value: ", error_context->error_value);
  231. uint32_t *p = (uint32_t*)((uint32_t)error_context->thread_current_sp & ~3);
  232. for (int i = 0; i < 8; i++)
  233. {
  234. if (p == &__StackTop) break; // End of stack
  235. azlog("STACK ", (uint32_t)p, ": ", p[0], " ", p[1], " ", p[2], " ", p[3]);
  236. p += 4;
  237. }
  238. azplatform_emergency_log_save();
  239. while (1)
  240. {
  241. // Flash the crash address on the LED
  242. // Short pulse means 0, long pulse means 1
  243. int base_delay = 1000;
  244. for (int i = 31; i >= 0; i--)
  245. {
  246. LED_OFF();
  247. for (int j = 0; j < base_delay; j++) delay_ns(100000);
  248. int delay = (error_context->error_address & (1 << i)) ? (3 * base_delay) : base_delay;
  249. LED_ON();
  250. for (int j = 0; j < delay; j++) delay_ns(100000);
  251. LED_OFF();
  252. }
  253. for (int j = 0; j < base_delay * 10; j++) delay_ns(100000);
  254. }
  255. }
  256. /*****************************************/
  257. /* Debug logging and watchdog */
  258. /*****************************************/
  259. // This function is called for every log message.
  260. void azplatform_log(const char *s)
  261. {
  262. if (g_uart_initialized)
  263. {
  264. uart_puts(uart0, s);
  265. }
  266. }
  267. static int g_watchdog_timeout;
  268. static bool g_watchdog_initialized;
  269. static void watchdog_callback(unsigned alarm_num)
  270. {
  271. g_watchdog_timeout -= 1000;
  272. if (g_watchdog_timeout <= WATCHDOG_CRASH_TIMEOUT - WATCHDOG_BUS_RESET_TIMEOUT)
  273. {
  274. if (!scsiDev.resetFlag || !g_scsiHostPhyReset)
  275. {
  276. azlog("--------------");
  277. azlog("WATCHDOG TIMEOUT, attempting bus reset");
  278. azlog("GPIO states: out ", sio_hw->gpio_out, " oe ", sio_hw->gpio_oe, " in ", sio_hw->gpio_in);
  279. uint32_t *p = (uint32_t*)__get_PSP();
  280. for (int i = 0; i < 8; i++)
  281. {
  282. if (p == &__StackTop) break; // End of stack
  283. azlog("STACK ", (uint32_t)p, ": ", p[0], " ", p[1], " ", p[2], " ", p[3]);
  284. p += 4;
  285. }
  286. scsiDev.resetFlag = 1;
  287. g_scsiHostPhyReset = true;
  288. }
  289. if (g_watchdog_timeout <= 0)
  290. {
  291. azlog("--------------");
  292. azlog("WATCHDOG TIMEOUT!");
  293. azlog("Platform: ", g_azplatform_name);
  294. azlog("FW Version: ", g_azlog_firmwareversion);
  295. azlog("GPIO states: out ", sio_hw->gpio_out, " oe ", sio_hw->gpio_oe, " in ", sio_hw->gpio_in);
  296. uint32_t *p = (uint32_t*)__get_PSP();
  297. for (int i = 0; i < 8; i++)
  298. {
  299. if (p == &__StackTop) break; // End of stack
  300. azlog("STACK ", (uint32_t)p, ": ", p[0], " ", p[1], " ", p[2], " ", p[3]);
  301. p += 4;
  302. }
  303. azplatform_emergency_log_save();
  304. azplatform_boot_to_main_firmware();
  305. }
  306. }
  307. hardware_alarm_set_target(3, delayed_by_ms(get_absolute_time(), 1000));
  308. }
  309. // This function can be used to periodically reset watchdog timer for crash handling.
  310. // It can also be left empty if the platform does not use a watchdog timer.
  311. void azplatform_reset_watchdog()
  312. {
  313. g_watchdog_timeout = WATCHDOG_CRASH_TIMEOUT;
  314. if (!g_watchdog_initialized)
  315. {
  316. hardware_alarm_claim(3);
  317. hardware_alarm_set_callback(3, &watchdog_callback);
  318. hardware_alarm_set_target(3, delayed_by_ms(get_absolute_time(), 1000));
  319. g_watchdog_initialized = true;
  320. }
  321. }
  322. /*****************************************/
  323. /* Flash reprogramming from bootloader */
  324. /*****************************************/
  325. #ifdef AZPLATFORM_BOOTLOADER_SIZE
  326. extern uint32_t __real_vectors_start;
  327. extern uint32_t __StackTop;
  328. static volatile void *g_bootloader_exit_req;
  329. bool azplatform_rewrite_flash_page(uint32_t offset, uint8_t buffer[AZPLATFORM_FLASH_PAGE_SIZE])
  330. {
  331. if (offset == AZPLATFORM_BOOTLOADER_SIZE)
  332. {
  333. if (buffer[3] != 0x20 || buffer[7] != 0x10)
  334. {
  335. azlog("Invalid firmware file, starts with: ", bytearray(buffer, 16));
  336. return false;
  337. }
  338. }
  339. azdbg("Writing flash at offset ", offset, " data ", bytearray(buffer, 4));
  340. assert(offset % AZPLATFORM_FLASH_PAGE_SIZE == 0);
  341. assert(offset >= AZPLATFORM_BOOTLOADER_SIZE);
  342. // Avoid any mbed timer interrupts triggering during the flashing.
  343. __disable_irq();
  344. // For some reason any code executed after flashing crashes
  345. // unless we disable the XIP cache.
  346. // Not sure why this happens, as flash_range_program() is flushing
  347. // the cache correctly.
  348. // The cache is now enabled from bootloader start until it starts
  349. // flashing, and again after reset to main firmware.
  350. xip_ctrl_hw->ctrl = 0;
  351. flash_range_erase(offset, AZPLATFORM_FLASH_PAGE_SIZE);
  352. flash_range_program(offset, buffer, AZPLATFORM_FLASH_PAGE_SIZE);
  353. uint32_t *buf32 = (uint32_t*)buffer;
  354. uint32_t num_words = AZPLATFORM_FLASH_PAGE_SIZE / 4;
  355. for (int i = 0; i < num_words; i++)
  356. {
  357. uint32_t expected = buf32[i];
  358. uint32_t actual = *(volatile uint32_t*)(XIP_NOCACHE_BASE + offset + i * 4);
  359. if (actual != expected)
  360. {
  361. azlog("Flash verify failed at offset ", offset + i * 4, " got ", actual, " expected ", expected);
  362. return false;
  363. }
  364. }
  365. __enable_irq();
  366. return true;
  367. }
  368. void azplatform_boot_to_main_firmware()
  369. {
  370. // To ensure that the system state is reset properly, we perform
  371. // a SYSRESETREQ and jump straight from the reset vector to main application.
  372. g_bootloader_exit_req = &g_bootloader_exit_req;
  373. SCB->AIRCR = 0x05FA0004;
  374. while(1);
  375. }
  376. void btldr_reset_handler()
  377. {
  378. uint32_t* application_base = &__real_vectors_start;
  379. if (g_bootloader_exit_req == &g_bootloader_exit_req)
  380. {
  381. // Boot to main application
  382. application_base = (uint32_t*)(XIP_BASE + AZPLATFORM_BOOTLOADER_SIZE);
  383. }
  384. SCB->VTOR = (uint32_t)application_base;
  385. __asm__(
  386. "msr msp, %0\n\t"
  387. "bx %1" : : "r" (application_base[0]),
  388. "r" (application_base[1]) : "memory");
  389. }
  390. // Replace the reset handler when building the bootloader
  391. // The rp2040_btldr.ld places real vector table at an offset.
  392. __attribute__((section(".btldr_vectors")))
  393. const void * btldr_vectors[2] = {&__StackTop, (void*)&btldr_reset_handler};
  394. #endif
  395. /************************************/
  396. /* ROM drive in extra flash space */
  397. /************************************/
  398. #ifdef PLATFORM_HAS_ROM_DRIVE
  399. // Reserve up to 352 kB for firmware.
  400. #define ROMDRIVE_OFFSET (352 * 1024)
  401. uint32_t azplatform_get_romdrive_maxsize()
  402. {
  403. if (g_flash_chip_size >= ROMDRIVE_OFFSET)
  404. {
  405. return g_flash_chip_size - ROMDRIVE_OFFSET;
  406. }
  407. else
  408. {
  409. // Failed to read flash chip size, default to 2 MB
  410. return 2048 * 1024 - ROMDRIVE_OFFSET;
  411. }
  412. }
  413. bool azplatform_read_romdrive(uint8_t *dest, uint32_t start, uint32_t count)
  414. {
  415. xip_ctrl_hw->stream_ctr = 0;
  416. while (!(xip_ctrl_hw->stat & XIP_STAT_FIFO_EMPTY))
  417. {
  418. (void) xip_ctrl_hw->stream_fifo;
  419. }
  420. xip_ctrl_hw->stream_addr = start + ROMDRIVE_OFFSET;
  421. xip_ctrl_hw->stream_ctr = count / 4;
  422. // Transfer happens in multiples of 4 bytes
  423. assert(start < azplatform_get_romdrive_maxsize());
  424. assert((count & 3) == 0);
  425. assert((((uint32_t)dest) & 3) == 0);
  426. uint32_t *dest32 = (uint32_t*)dest;
  427. uint32_t words_remain = count / 4;
  428. while (words_remain > 0)
  429. {
  430. if (!(xip_ctrl_hw->stat & XIP_STAT_FIFO_EMPTY))
  431. {
  432. *dest32++ = xip_ctrl_hw->stream_fifo;
  433. words_remain--;
  434. }
  435. }
  436. return true;
  437. }
  438. bool azplatform_write_romdrive(const uint8_t *data, uint32_t start, uint32_t count)
  439. {
  440. assert(start < azplatform_get_romdrive_maxsize());
  441. assert((count % AZPLATFORM_ROMDRIVE_PAGE_SIZE) == 0);
  442. __disable_irq();
  443. flash_range_erase(start + ROMDRIVE_OFFSET, count);
  444. flash_range_program(start + ROMDRIVE_OFFSET, data, count);
  445. __enable_irq();
  446. return true;
  447. }
  448. #endif
  449. /**********************************************/
  450. /* Mapping from data bytes to GPIO BOP values */
  451. /**********************************************/
  452. /* A lookup table is the fastest way to calculate parity and convert the IO pin mapping for data bus.
  453. * For RP2040 we expect that the bits are consecutive and in order.
  454. * The PIO-based parity scheme also requires that the lookup table is aligned to 512-byte increment.
  455. * The parity table is placed into SRAM4 area to reduce bus contention.
  456. */
  457. #define PARITY(n) ((1 ^ (n) ^ ((n)>>1) ^ ((n)>>2) ^ ((n)>>3) ^ ((n)>>4) ^ ((n)>>5) ^ ((n)>>6) ^ ((n)>>7)) & 1)
  458. #define X(n) (\
  459. ((n & 0x01) ? 0 : (1 << SCSI_IO_DB0)) | \
  460. ((n & 0x02) ? 0 : (1 << SCSI_IO_DB1)) | \
  461. ((n & 0x04) ? 0 : (1 << SCSI_IO_DB2)) | \
  462. ((n & 0x08) ? 0 : (1 << SCSI_IO_DB3)) | \
  463. ((n & 0x10) ? 0 : (1 << SCSI_IO_DB4)) | \
  464. ((n & 0x20) ? 0 : (1 << SCSI_IO_DB5)) | \
  465. ((n & 0x40) ? 0 : (1 << SCSI_IO_DB6)) | \
  466. ((n & 0x80) ? 0 : (1 << SCSI_IO_DB7)) | \
  467. (PARITY(n) ? 0 : (1 << SCSI_IO_DBP)) \
  468. )
  469. const uint16_t g_scsi_parity_lookup[256] __attribute__((aligned(512), section(".scratch_x.parity"))) =
  470. {
  471. X(0x00), X(0x01), X(0x02), X(0x03), X(0x04), X(0x05), X(0x06), X(0x07), X(0x08), X(0x09), X(0x0a), X(0x0b), X(0x0c), X(0x0d), X(0x0e), X(0x0f),
  472. X(0x10), X(0x11), X(0x12), X(0x13), X(0x14), X(0x15), X(0x16), X(0x17), X(0x18), X(0x19), X(0x1a), X(0x1b), X(0x1c), X(0x1d), X(0x1e), X(0x1f),
  473. X(0x20), X(0x21), X(0x22), X(0x23), X(0x24), X(0x25), X(0x26), X(0x27), X(0x28), X(0x29), X(0x2a), X(0x2b), X(0x2c), X(0x2d), X(0x2e), X(0x2f),
  474. X(0x30), X(0x31), X(0x32), X(0x33), X(0x34), X(0x35), X(0x36), X(0x37), X(0x38), X(0x39), X(0x3a), X(0x3b), X(0x3c), X(0x3d), X(0x3e), X(0x3f),
  475. X(0x40), X(0x41), X(0x42), X(0x43), X(0x44), X(0x45), X(0x46), X(0x47), X(0x48), X(0x49), X(0x4a), X(0x4b), X(0x4c), X(0x4d), X(0x4e), X(0x4f),
  476. X(0x50), X(0x51), X(0x52), X(0x53), X(0x54), X(0x55), X(0x56), X(0x57), X(0x58), X(0x59), X(0x5a), X(0x5b), X(0x5c), X(0x5d), X(0x5e), X(0x5f),
  477. X(0x60), X(0x61), X(0x62), X(0x63), X(0x64), X(0x65), X(0x66), X(0x67), X(0x68), X(0x69), X(0x6a), X(0x6b), X(0x6c), X(0x6d), X(0x6e), X(0x6f),
  478. X(0x70), X(0x71), X(0x72), X(0x73), X(0x74), X(0x75), X(0x76), X(0x77), X(0x78), X(0x79), X(0x7a), X(0x7b), X(0x7c), X(0x7d), X(0x7e), X(0x7f),
  479. X(0x80), X(0x81), X(0x82), X(0x83), X(0x84), X(0x85), X(0x86), X(0x87), X(0x88), X(0x89), X(0x8a), X(0x8b), X(0x8c), X(0x8d), X(0x8e), X(0x8f),
  480. X(0x90), X(0x91), X(0x92), X(0x93), X(0x94), X(0x95), X(0x96), X(0x97), X(0x98), X(0x99), X(0x9a), X(0x9b), X(0x9c), X(0x9d), X(0x9e), X(0x9f),
  481. X(0xa0), X(0xa1), X(0xa2), X(0xa3), X(0xa4), X(0xa5), X(0xa6), X(0xa7), X(0xa8), X(0xa9), X(0xaa), X(0xab), X(0xac), X(0xad), X(0xae), X(0xaf),
  482. X(0xb0), X(0xb1), X(0xb2), X(0xb3), X(0xb4), X(0xb5), X(0xb6), X(0xb7), X(0xb8), X(0xb9), X(0xba), X(0xbb), X(0xbc), X(0xbd), X(0xbe), X(0xbf),
  483. X(0xc0), X(0xc1), X(0xc2), X(0xc3), X(0xc4), X(0xc5), X(0xc6), X(0xc7), X(0xc8), X(0xc9), X(0xca), X(0xcb), X(0xcc), X(0xcd), X(0xce), X(0xcf),
  484. X(0xd0), X(0xd1), X(0xd2), X(0xd3), X(0xd4), X(0xd5), X(0xd6), X(0xd7), X(0xd8), X(0xd9), X(0xda), X(0xdb), X(0xdc), X(0xdd), X(0xde), X(0xdf),
  485. X(0xe0), X(0xe1), X(0xe2), X(0xe3), X(0xe4), X(0xe5), X(0xe6), X(0xe7), X(0xe8), X(0xe9), X(0xea), X(0xeb), X(0xec), X(0xed), X(0xee), X(0xef),
  486. X(0xf0), X(0xf1), X(0xf2), X(0xf3), X(0xf4), X(0xf5), X(0xf6), X(0xf7), X(0xf8), X(0xf9), X(0xfa), X(0xfb), X(0xfc), X(0xfd), X(0xfe), X(0xff)
  487. };
  488. #undef X
  489. } /* extern "C" */
  490. /* Logging from mbed */
  491. static class LogTarget: public mbed::FileHandle {
  492. public:
  493. virtual ssize_t read(void *buffer, size_t size) { return 0; }
  494. virtual ssize_t write(const void *buffer, size_t size)
  495. {
  496. // A bit inefficient but mbed seems to write() one character
  497. // at a time anyways.
  498. for (int i = 0; i < size; i++)
  499. {
  500. char buf[2] = {((const char*)buffer)[i], 0};
  501. azlog_raw(buf);
  502. }
  503. return size;
  504. }
  505. virtual off_t seek(off_t offset, int whence = SEEK_SET) { return offset; }
  506. virtual int close() { return 0; }
  507. virtual off_t size() { return 0; }
  508. } g_LogTarget;
  509. mbed::FileHandle *mbed::mbed_override_console(int fd)
  510. {
  511. return &g_LogTarget;
  512. }