git.sesse.net Git - pistorm/blob - buptest.c

   1 #include <assert.h>
   2 #include <dirent.h>
   3 #include <endian.h>
   4 #include <fcntl.h>
   5 #include <pthread.h>
   6 #include <sched.h>
   7 #include <signal.h>
   8 #include <stdint.h>
   9 #include <stdio.h>
  10 #include <time.h>
  11 #include <stdlib.h>
  12 #include <string.h>
  13 #include <sys/mman.h>
  14 #include <sys/stat.h>
  15 #include <sys/types.h>
  16 #include <unistd.h>
  17 #include <sys/ioctl.h>
  18 #include "main.h"
  19 #include "gpio/gpio.h"
  20 #include "platforms/amiga/gayle-ide/ide.h"
  21
  22 uint8_t garbege_datas[2 * 1024 * 1024];
  23
  24 struct timespec f2;
  25
  26 uint8_t gayle_int;
  27 uint32_t mem_fd;
  28 uint32_t errors = 0;
  29
  30 void sigint_handler(int sig_num) {
  31   //if (sig_num) { }
  32   //cpu_emulation_running = 0;
  33
  34   //return;
  35   printf("Received sigint %d, exiting.\n", sig_num);
  36   if (mem_fd)
  37     close(mem_fd);
  38
  39   exit(0);
  40 }
  41
  42 int main() {
  43     clock_gettime(CLOCK_PROCESS_CPUTIME_ID, &f2);
  44     srand((unsigned int)f2.tv_nsec);
  45
  46     signal(SIGINT, sigint_handler);
  47     setup_io();
  48
  49     printf("Enable 200MHz GPCLK0 on GPIO4\n");
  50     gpio_enable_200mhz();
  51
  52     write_reg(0x01);
  53     usleep(100);
  54     usleep(1500);
  55     write_reg(0x00);
  56     usleep(100);
  57
  58     usleep(1500);
  59
  60     write_reg(0x00);
  61     // printf("Status Reg%x\n",read_reg());
  62     usleep(100000);
  63     write_reg(0x02);
  64     usleep(1500);
  65
  66     write8(0xbfe201, 0x0101);       //CIA OVL
  67         write8(0xbfe001, 0x0000);       //CIA OVL LOW
  68
  69     printf("Writing garbege datas.\n");
  70     for (uint32_t i = 0; i < 512 * 1024; i++) {
  71         garbege_datas[i] = (uint8_t)(rand() % 0xFF);
  72         write8(i, (uint32_t)garbege_datas[i]);
  73     }
  74     printf("Reading back garbege datas, read8()...\n");
  75     for (uint32_t i = 0; i < 512 * 1024; i++) {
  76         uint32_t c = read8(i);
  77         if (c != garbege_datas[i]) {
  78             if (errors < 512)
  79                 printf("READ8: Garbege data mismatch at $%.6X: %.2X should be %.2X.\n", i, c, garbege_datas[i]);
  80             errors++;
  81         }
  82     }
  83     printf("read8 errors total: %d.\n", errors);
  84     errors = 0;
  85     sleep (1);
  86     printf("Reading back garbege datas, read16(), even addresses...\n");
  87     for (uint32_t i = 0; i < (512 * 1024) - 2; i += 2) {
  88         uint32_t c = be16toh(read16(i));
  89         if (c != *((uint16_t *)&garbege_datas[i])) {
  90             if (errors < 512)
  91                 printf("READ16_EVEN: Garbege data mismatch at $%.6X: %.4X should be %.4X.\n", i, c, *((uint16_t *)&garbege_datas[i]));
  92             errors++;
  93         }
  94     }
  95     printf("read16 even errors total: %d.\n", errors);
  96     errors = 0;
  97     sleep (1);
  98     for (int x = 0; x < 20; x++) {
  99         printf("Reading back garbege datas, read16(), odd addresses...\n");
 100         for (uint32_t i = 1; i < (512 * 1024) - 2; i += 2) {
 101             uint32_t c = be16toh((read8(i) << 8) | read8(i + 1));
 102             if (c != *((uint16_t *)&garbege_datas[i])) {
 103                 if (errors < 512)
 104                     printf("READ16_ODD: Garbege data mismatch at $%.6X: %.4X should be %.4X.\n", i, c, *((uint16_t *)&garbege_datas[i]));
 105                 errors++;
 106             }
 107         }
 108         printf("read16 odd loop %d errors total: %d.\n", x+1, errors);
 109         errors = 0;
 110     }
 111     sleep (1);
 112     printf("Reading back garbege datas, read32(), even addresses...\n");
 113     for (uint32_t i = 0; i < (512 * 1024) - 4; i += 2) {
 114         uint32_t c = be32toh(read32(i));
 115         if (c != *((uint32_t *)&garbege_datas[i])) {
 116             if (errors < 512)
 117                 printf("READ32_EVEN: Garbege data mismatch at $%.6X: %.8X should be %.8X.\n", i, c, *((uint32_t *)&garbege_datas[i]));
 118             errors++;
 119         }
 120     }
 121     printf("read32 even errors total: %d.\n", errors);
 122     errors = 0;
 123     sleep (1);
 124     for (int x = 0; x < 20; x++) {
 125         printf("Reading back garbege datas, read32(), odd addresses...\n");
 126         for (uint32_t i = 1; i < (512 * 1024) - 4; i += 2) {
 127             uint32_t c = be32toh(read32(i));
 128             c = (c >> 8) | (read8(i + 3) << 24);
 129             if (c != *((uint32_t *)&garbege_datas[i])) {
 130                 if (errors < 512)
 131                     printf("READ32_ODD: Garbege data mismatch at $%.6X: %.8X should be %.8X.\n", i, c, *((uint32_t *)&garbege_datas[i]));
 132                 errors++;
 133             }
 134         }
 135         printf("read32 odd loop %d errors total: %d.\n", x+1, errors);
 136         errors = 0;
 137     }
 138     sleep (1);
 139
 140     return 0;
 141 }
 142
 143 void m68k_set_irq(unsigned int level) {
 144 }
 145
 146 struct ide_controller *get_ide(int index) {
 147     return NULL;
 148 }