11 #include "../platforms/amiga/Gayle.h"
12 #include "../platforms/amiga/gayle-ide/ide.h"
16 volatile unsigned int *gpio;
17 volatile unsigned int *gpclk;
18 volatile unsigned int gpfsel0;
19 volatile unsigned int gpfsel1;
20 volatile unsigned int gpfsel2;
21 volatile unsigned int gpfsel0_o;
22 volatile unsigned int gpfsel1_o;
23 volatile unsigned int gpfsel2_o;
25 volatile uint16_t srdata;
26 volatile uint32_t srdata2;
27 volatile uint32_t srdata2_old;
29 extern int mem_fd, mouse_fd, keyboard_fd;
30 extern int mem_fd_gpclk;
39 inline void write16(uint32_t address, uint32_t data) {
40 uint32_t addr_h_s = (address & 0x0000ffff) << 8;
41 uint32_t addr_h_r = (~address & 0x0000ffff) << 8;
42 uint32_t addr_l_s = (address >> 16) << 8;
43 uint32_t addr_l_r = (~address >> 16) << 8;
44 uint32_t data_s = (data & 0x0000ffff) << 8;
45 uint32_t data_r = (~data & 0x0000ffff) << 8;
47 // asm volatile ("dmb" ::: "memory");
50 *(gpio + 1) = gpfsel1_o;
51 *(gpio + 2) = gpfsel2_o;
53 *(gpio + 7) = addr_h_s;
54 *(gpio + 10) = addr_h_r;
58 *(gpio + 7) = addr_l_s;
59 *(gpio + 10) = addr_l_r;
65 *(gpio + 10) = data_r;
70 *(gpio + 1) = gpfsel1;
71 *(gpio + 2) = gpfsel2;
74 // asm volatile ("dmb" ::: "memory");
77 inline void write8(uint32_t address, uint32_t data) {
78 if ((address & 1) == 0)
79 data = data + (data << 8); // EVEN, A0=0,UDS
81 data = data & 0xff; // ODD , A0=1,LDS
82 uint32_t addr_h_s = (address & 0x0000ffff) << 8;
83 uint32_t addr_h_r = (~address & 0x0000ffff) << 8;
84 uint32_t addr_l_s = (address >> 16) << 8;
85 uint32_t addr_l_r = (~address >> 16) << 8;
86 uint32_t data_s = (data & 0x0000ffff) << 8;
87 uint32_t data_r = (~data & 0x0000ffff) << 8;
89 // asm volatile ("dmb" ::: "memory");
92 *(gpio + 1) = gpfsel1_o;
93 *(gpio + 2) = gpfsel2_o;
95 *(gpio + 7) = addr_h_s;
96 *(gpio + 10) = addr_h_r;
100 *(gpio + 7) = addr_l_s;
101 *(gpio + 10) = addr_l_r;
106 *(gpio + 7) = data_s;
107 *(gpio + 10) = data_r;
112 *(gpio + 1) = gpfsel1;
113 *(gpio + 2) = gpfsel2;
114 while ((GET_GPIO(0)))
116 // asm volatile ("dmb" ::: "memory");
119 inline uint32_t read16(uint32_t address) {
121 uint32_t addr_h_s = (address & 0x0000ffff) << 8;
122 uint32_t addr_h_r = (~address & 0x0000ffff) << 8;
123 uint32_t addr_l_s = (address >> 16) << 8;
124 uint32_t addr_l_r = (~address >> 16) << 8;
126 // asm volatile ("dmb" ::: "memory");
129 *(gpio + 1) = gpfsel1_o;
130 *(gpio + 2) = gpfsel2_o;
132 *(gpio + 7) = addr_h_s;
133 *(gpio + 10) = addr_h_r;
137 *(gpio + 7) = addr_l_s;
138 *(gpio + 10) = addr_l_r;
144 *(gpio + 1) = gpfsel1;
145 *(gpio + 2) = gpfsel2;
147 while (!(GET_GPIO(0)))
152 // asm volatile ("dmb" ::: "memory");
153 return (val >> 8) & 0xffff;
156 inline uint32_t read8(uint32_t address) {
158 uint32_t addr_h_s = (address & 0x0000ffff) << 8;
159 uint32_t addr_h_r = (~address & 0x0000ffff) << 8;
160 uint32_t addr_l_s = (address >> 16) << 8;
161 uint32_t addr_l_r = (~address >> 16) << 8;
163 // asm volatile ("dmb" ::: "memory");
166 *(gpio + 1) = gpfsel1_o;
167 *(gpio + 2) = gpfsel2_o;
169 *(gpio + 7) = addr_h_s;
170 *(gpio + 10) = addr_h_r;
174 *(gpio + 7) = addr_l_s;
175 *(gpio + 10) = addr_l_r;
181 *(gpio + 1) = gpfsel1;
182 *(gpio + 2) = gpfsel2;
185 while (!(GET_GPIO(0)))
190 // asm volatile ("dmb" ::: "memory");
192 val = (val >> 8) & 0xffff;
193 if ((address & 1) == 0)
194 return (val >> 8) & 0xff; // EVEN, A0=0,UDS
196 return val & 0xff; // ODD , A0=1,LDS
199 /******************************************************/
201 void write_reg(unsigned int value) {
204 *(gpio + 1) = gpfsel1_o;
205 *(gpio + 2) = gpfsel2_o;
206 *(gpio + 7) = (value & 0xffff) << 8;
207 *(gpio + 10) = (~value & 0xffff) << 8;
209 GPIO_CLR = 1 << 7; // delay
214 *(gpio + 1) = gpfsel1;
215 *(gpio + 2) = gpfsel2;
218 uint16_t read_reg(void) {
223 *(gpio + 1) = gpfsel1;
224 *(gpio + 2) = gpfsel2;
226 GPIO_CLR = 1 << 6; // delay
231 return (uint16_t)(val >> 8);
235 // Set up a memory regions to access GPIO
239 if ((mem_fd = open("/dev/mem", O_RDWR | O_SYNC)) < 0) {
240 printf("can't open /dev/mem \n");
246 NULL, // Any adddress in our space will do
247 BCM2708_PERI_SIZE, // Map length
248 PROT_READ | PROT_WRITE, // Enable reading & writting to mapped memory
249 MAP_SHARED, // Shared with other processes
250 mem_fd, // File to map
251 BCM2708_PERI_BASE // Offset to GPIO peripheral
254 close(mem_fd); // No need to keep mem_fd open after mmap
256 if (gpio_map == MAP_FAILED) {
257 printf("gpio mmap error %d\n", (int)gpio_map); // errno also set!
261 gpio = ((volatile unsigned *)gpio_map) + GPIO_ADDR / 4;
262 gpclk = ((volatile unsigned *)gpio_map) + GPCLK_ADDR / 4;
266 void gpio_enable_200mhz() {
267 *(gpclk + (CLK_GP0_CTL / 4)) = CLK_PASSWD | (1 << 5);
269 while ((*(gpclk + (CLK_GP0_CTL / 4))) & (1 << 7))
272 *(gpclk + (CLK_GP0_DIV / 4)) =
273 CLK_PASSWD | (6 << 12); // divider , 6=200MHz on pi3
275 *(gpclk + (CLK_GP0_CTL / 4)) =
276 CLK_PASSWD | 5 | (1 << 4); // pll? 6=plld, 5=pllc
278 while (((*(gpclk + (CLK_GP0_CTL / 4))) & (1 << 7)) == 0)
282 SET_GPIO_ALT(4, 0); // gpclk0
292 // set gpio0 (aux0) and gpio1 (aux1) to input
296 // Set GPIO pins 6,7 and 8-23 to output
297 for (g = 6; g <= 23; g++) {
301 printf("Precalculate GPIO8-23 as Output\n");
302 gpfsel0_o = *(gpio); // store gpio ddr
303 printf("gpfsel0: %#x\n", gpfsel0_o);
304 gpfsel1_o = *(gpio + 1); // store gpio ddr
305 printf("gpfsel1: %#x\n", gpfsel1_o);
306 gpfsel2_o = *(gpio + 2); // store gpio ddr
307 printf("gpfsel2: %#x\n", gpfsel2_o);
309 // Set GPIO pins 8-23 to input
310 for (g = 8; g <= 23; g++) {
313 printf("Precalculate GPIO8-23 as Input\n");
314 gpfsel0 = *(gpio); // store gpio ddr
315 printf("gpfsel0: %#x\n", gpfsel0);
316 gpfsel1 = *(gpio + 1); // store gpio ddr
317 printf("gpfsel1: %#x\n", gpfsel1);
318 gpfsel2 = *(gpio + 2); // store gpio ddr
319 printf("gpfsel2: %#x\n", gpfsel2);
329 inline void gpio_handle_irq() {
330 if (GET_GPIO(1) == 0) {
332 m68k_set_irq((srdata >> 13) & 0xff);
334 if ((gayle_int & 0x80) && get_ide(0)->drive->intrq) {
335 write16(0xdff09c, 0x8008);
343 void *iplThread(void *args) {
344 printf("IPL thread running/n");
348 if (GET_GPIO(1) == 0) {
350 m68k_end_timeslice();
351 //printf("thread!/n");