123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366 |
- /* ___DISCLAIMER___ */
- #include <arm/NXP/LPC17xx/LPC17xx.h>
- #include "bits.h"
- #include "config.h"
- #include "uart.h"
- #include "timer.h"
- #include "led.h"
- #include "cli.h"
- #include "fpga.h"
- #include "fpga_spi.h"
- #include "ff.h"
- #include "fileops.h"
- #include "crc32.h"
- #include "diskio.h"
- #include "cic.h"
- #include "rtc.h"
- #include "memory.h"
- #include "snes.h"
- #include "cli.h"
- #include "tests.h"
- #define PROGRESS ("-\\|/")
- int test_sd() {
- printf("SD test... please insert card\n=============================\n");
- while(disk_status(0) & (STA_NOINIT|STA_NODISK)) cli_entrycheck();
- file_open((uint8_t*)"/sd2snes/testfile.bin", FA_WRITE | FA_CREATE_ALWAYS);
- if(file_res) {
- printf("could not open /sd2snes/testfile.bin: Error %d\n", file_res);
- printf("FAILED\n\n\n");
- return FAILED;
- }
- uint32_t testval = 0x55AA55AA;
- uint32_t crc = 0;
- uint32_t count, blkcount;
- for(count=0; count < 8192; count++) {
- for(blkcount=0; blkcount < 512; blkcount++) {
- file_buf[blkcount] = testval&0xff;
- crc=crc32_update(crc, testval&0xff);
- testval ^= (crc * (count + blkcount + 7)) - 1;
- }
- file_write();
- }
- printf("crc1 = %08lx ", crc);
- file_close();
- file_open((uint8_t*)"/sd2snes/testfile.bin", FA_READ);
- uint32_t crc2 = 0;
- for(count=0; count < 8192; count++) {
- file_read();
- for(blkcount=0; blkcount < 512; blkcount++) {
- testval = file_buf[blkcount];
- crc2 = crc32_update(crc2, testval&0xff);
- }
- }
- file_close();
- printf("crc2 = %08lx ", crc2);
- if(crc==crc2) {
- printf(" PASSED\n\n\n");
- return PASSED;
- } else {
- printf(" FAILED\n\n\n");
- return FAILED;
- }
- }
- int test_cic() {
- int cic_state = get_cic_state();
- printf("CIC Test:\n=========\n");
- printf("Current CIC state: %s\n", get_cic_statename(cic_state));
- if(cic_state == CIC_FAIL) {
- printf("CIC reports error, push reset...\n");
- while((cic_state = get_cic_state()) == CIC_FAIL);
- }
- if(cic_state == CIC_OK) {
- printf("CIC reports OK; no pair mode available. Provoking CIC error...\n");
- cic_pair(1,1);
- delay_ms(200);
- cic_init(0);
- printf("new CIC state: %s\n", get_cic_statename(get_cic_state()));
- if(get_cic_state() == CIC_FAIL) {
- printf("***Please reset SNES***\n");
- int failcount=2;
- while(failcount--) {
- while(get_cic_state() == CIC_FAIL);
- delay_ms(200);
- }
- if(get_cic_state() != CIC_FAIL) {
- printf("PASSED\n\n\n");
- return PASSED;
- }
- printf("CIC did not recover properly.\nFAILED\n");
- return FAILED;
- }
- printf("FAILED\n\n\n");
- return FAILED;
- }
- if(cic_state == CIC_SCIC) {
- printf("CIC reports OK; pair mode available. Switching to pair mode...\n");
- cic_init(1);
- delay_ms(100);
- cic_pair(0,0);
- delay_ms(1000);
- printf("new CIC state: %s\n", get_cic_statename(cic_state = get_cic_state()));
- if(get_cic_state() != CIC_PAIR) {
- printf("FAILED to switch to pair mode!!!\n");
- return FAILED;
- }
- }
- if(cic_state == CIC_PAIR) {
- cic_init(1);
- cic_pair(0,0);
- printf("cycling modes, observe power LED color\n");
- for(cic_state = 0; cic_state < 17; cic_state++) {
- cic_videomode(cic_state & 1);
- delay_ms(200);
- }
- }
- printf("PASSED\n\n\n");
- return PASSED;
- }
- int test_rtc() {
- struct tm time;
- printf("RTC Test\n========\n");
- printf("setting clock to 2011-01-01 00:00:00\n");
- set_bcdtime(0x20110101000000LL);
- printf("waiting 5 seconds\n");
- delay_ms(5000);
- // uint64_t newtime = get_bcdtime();
- printf("new time: ");
- read_rtc(&time);
- printtime(&time);
- if((get_bcdtime() & 0xffffffffffffff) >= 0x20110101000004LL) {
- printf("PASSED\n\n\n");
- return PASSED;
- } else printf("FAILED\n\n\n");
- return FAILED;
- }
- int test_fpga() {
- printf("FPGA test\n=========\n");
- printf("configuring fpga...\n");
- fpga_pgm((uint8_t*)"/sd2snes/test.bit");
- printf("basic communication test...");
- if(fpga_test() != FPGA_TEST_TOKEN) {
- printf("FAILED\n\n\n");
- return FAILED;
- } else printf("PASSED\n\n\n");
- return PASSED;
- }
- /*************************************************************************************/
- /*************************************************************************************/
- typedef struct memory_test
- {
- char name[20];
- int a_len;
- int d_len;
- unsigned int (*read)(unsigned int addr);
- void (*write)(unsigned int addr, unsigned int data);
- void (*open)(void);
- void (*close)(void);
- } memory_test;
- /*************************************************************************************/
- void rom_open(void)
- {
- snes_reset(1);
- fpga_select_mem(0);
- FPGA_DESELECT();
- delay_ms(1);
- FPGA_SELECT();
- delay_ms(1);
- }
- void rom_close(void)
- {
- }
- unsigned int rom_read(unsigned int addr)
- {
- return sram_readbyte(addr);
- }
- void rom_write(unsigned int addr, unsigned int data)
- {
- sram_writebyte(data, addr);
- }
- memory_test rom = {
- .name = "RAM0 (128Mbit)",
- .a_len = 22,
- .d_len = 8,
- .read = rom_read,
- .write = rom_write,
- .open = rom_open,
- .close = rom_close,
- };
- /*************************************************************************************/
- void sram_open(void)
- {
- snes_reset(1);
- fpga_select_mem(1);
- }
- void sram_close(void)
- {
- }
- unsigned int sram_read(unsigned int addr)
- {
- return sram_readbyte(addr);
- }
- void sram_write(unsigned int addr, unsigned int data)
- {
- sram_writebyte(data, addr);
- }
- memory_test sram =
- {
- .name = "RAM1(4Mbit)",
- .a_len = 19,
- .d_len = 8,
- .read = sram_read,
- .write = sram_write,
- .open = sram_open,
- .close = sram_close,
- };
- int do_test(memory_test *test)
- {
- int i, j, read, want;
- int ret = 0;
- int a_mask = (1 << test->a_len) - 1;
- int d_mask = (1 << test->d_len) - 1;
- test->open();
- printf("-- Will test %s\n", test->name);
- printf("---- Fill with AA55 ");
- test->write(0, 0xAA);
- for (i = 1; i < a_mask; i++)
- {
- if((i&0xffff) == 0)printf("\x8%c", PROGRESS[(i>>16)&3]);
- want = (i&1)?0x55:0xAA;
- test->write(i, want);
- want = ((i-1)&1)?0x55:0xAA;
- read = test->read(i-1);
- if (read != want)
- {
- printf("Failed [@%8X Want: %02X Get: %02X]", i-1, want, read);
- ret |= 1;
- break;
- }
- }
- printf("Ok \n---- Fill with 00 ");
- for (i = 0; i < a_mask; i++)
- {
- if((i&0xffff) == 0)printf("\x8%c", PROGRESS[(i>>16)&3]);
- test->write(i, 0);
- }
- printf("Ok \n---- Check data lines...\n"
- "----- ");
- for (i = 0; i < test->d_len; i++) printf("%X", i);
- printf("\n");
- /* Check on 4 addresses, taken evenly */
- #define TEST_NUM (10)
- for (j = 0; j < TEST_NUM; j ++)
- {
- printf("----- %8X [", j * a_mask/TEST_NUM);
- for (i = 0; i < test->d_len; i++)
- {
- read = test->read(j * a_mask/TEST_NUM);
- if ((test->read(j * a_mask/TEST_NUM) & (1<<i)) != 0)
- {
- printf("1", read);
- ret |= 2;
- goto next_data;
- }
- test->write(j * a_mask/TEST_NUM, (1<<i));
- read = test->read(j * a_mask/TEST_NUM);
- if (read == 0)
- {
- printf("0");
- ret |= 4;
- goto next_data;
- }
- printf("x");
- next_data:
- test->write(j * a_mask/4, 0);
- }
- printf("]\n");
- }
- test->close();
- return ret;
- }
- int test_mem()
- {
- int ret = PASSED;
- printf("RAM test\n========\n");
- if (do_test(&rom) != 0)
- ret = FAILED;
- if (do_test(&sram) != 0);
- ret = FAILED;
- return PASSED;
- }
- int test_clk() {
- uint32_t sysclk[4];
- int32_t diff, max_diff = 0;
- int i, error=0;
- printf("sysclk test\n===========\n");
- printf("measuring SNES clock...\n");
- for(i=0; i<4; i++) {
- sysclk[i]=get_snes_sysclk();
- if(sysclk[i] < 21000000 || sysclk[i] > 22000000) error = 1;
- printf("%lu Hz ", sysclk[i]);
- if(i) {
- diff = sysclk[i] - sysclk[i-1];
- if(diff < 0) diff = -diff;
- if(diff > max_diff) max_diff = diff;
- printf("diff = %ld max = %ld", diff, max_diff);
- }
- printf("\n");
- delay_ms(1010);
- }
- if(error) {
- printf("clock frequency out of range!\n");
- }
- if(diff > 1000000) {
- printf("clock variation too great!\n");
- error = 1;
- }
- printf(" CPUCLK: %lu\n", get_snes_cpuclk());
- printf(" READCLK: %lu\n", get_snes_readclk());
- printf(" WRITECLK: %lu\n", get_snes_writeclk());
- printf(" PARDCLK: %lu\n", get_snes_pardclk());
- printf(" PAWRCLK: %lu\n", get_snes_pawrclk());
- printf(" REFRCLK: %lu\n", get_snes_refreshclk());
- printf("ROMSELCLK: %lu\n", get_snes_romselclk());
- if(error) {
- printf("FAILED\n\n\n");
- return FAILED;
- }
- printf("PASSED\n\n\n");
- return PASSED;
- }
|