X-Git-Url: https://notaz.gp2x.de/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=main.c;h=a3062c2f75369ee6c1dfbd1b00e63e5d11e1411e;hb=de3f807e329bc3e814bce5dac37982062be770c0;hp=8287fb5f845eb843815f020417e749dcf1465a74;hpb=9c4f55f45a932dd6c79f99c5e5471d902c72ae9e;p=teensytas.git

diff --git a/main.c b/main.c
index 8287fb5..a3062c2 100644
--- a/main.c
+++ b/main.c
@@ -4,9 +4,27 @@
 #include "teensy3/core_pins.h"
 #include "teensy3/usb_seremu.h"
 #include "teensy3/usb_rawhid.h"
+#include "pkts.h"
+
+// use power of 2
+#define STREAM_BUF_SIZE 512
+#define STREAM_BUF_MASK (512 - 1)
 
 /* ?0SA 00DU, ?1CB RLDU */
-static uint8_t fixed_state[4] = { 0x33, 0x3f };
+static struct {
+	uint8_t stream[STREAM_BUF_SIZE][2];
+	uint8_t fixed_state[4];
+	uint32_t stream_enable:1;
+	uint32_t stream_started:1;
+	uint32_t stream_received:1;
+	uint32_t use_readinc:1;
+	uint32_t frame_cnt;
+	uint32_t edge_cnt;
+	uint32_t i;
+	uint32_t o;
+} g;
+
+#define STREAM_EL_SZ sizeof(g.stream[0])
 
 ssize_t _write(int fd, const void *buf, size_t nbyte)
 {
@@ -26,37 +44,246 @@ void yield(void)
 {
 }
 
-static void pin0_irq(void)
+static void portb_isr_fixed(void)
 {
+	uint32_t isfr, th;
+
+	isfr = PORTB_ISFR;
+	PORTB_ISFR = isfr;
+	th = (GPIOB_PDIR >> CORE_PIN0_BIT) & 1;
+
+	GPIOD_PDOR = g.fixed_state[th];
+	g.edge_cnt++;
 }
 
-void portb_isr(void)
+static void portb_isr_readinc(void)
 {
-	uint32_t isfr;
+	uint32_t isfr, th;
 
-	//printf("irq, GPIOB_PDIR: %08x\n", GPIOB_PDIR);
+	isfr = PORTB_ISFR;
+	PORTB_ISFR = isfr;
+	th = (GPIOB_PDIR >> CORE_PIN0_BIT) & 1;
 
-	GPIOD_PDOR = fixed_state[(GPIOB_PDIR >> CORE_PIN0_BIT) & 1];
+	GPIOD_PDOR = g.stream[g.o][th];
+	if (th) {
+		g.o = (g.o + 1) & STREAM_BUF_MASK;
+		if (g.o == g.i)
+			// done
+			attachInterruptVector(IRQ_PORTB, portb_isr_fixed);
+		g.frame_cnt++;
+	}
+	g.edge_cnt++;
+}
+
+static void portb_isr_read(void)
+{
+	uint32_t isfr, th;
 
 	isfr = PORTB_ISFR;
 	PORTB_ISFR = isfr;
+	th = (GPIOB_PDIR >> CORE_PIN0_BIT) & 1;
+
+	GPIOD_PDOR = g.stream[g.o][th];
+	g.edge_cnt++;
+}
+
+static void portc_isr_nop(void)
+{
+	uint32_t isfr;
+
+	isfr = PORTC_ISFR;
+	PORTC_ISFR = isfr;
+}
+
+// /vsync starts at line 235/259 (ntsc/pal), just as vcounter jumps back
+// we care when it comes out (/vsync goes high) after 3 lines at 238/262
+static void portc_isr_frameinc(void)
+{
+	uint32_t isfr;
+
+	isfr = PORTC_ISFR;
+	PORTC_ISFR = isfr;
+
+	g.o = (g.o + 1) & STREAM_BUF_MASK;
+	if (g.o == g.i) {
+		attachInterruptVector(IRQ_PORTB, portb_isr_fixed);
+		attachInterruptVector(IRQ_PORTC, portc_isr_nop);
+	}
+	g.frame_cnt++;
+}
+
+static void udelay(uint32_t us)
+{
+	uint32_t start = micros();
+
+	while ((micros() - start) < us) {
+		asm volatile("nop; nop; nop; nop");
+		yield();
+	}
+}
+
+static void do_start_seq(void)
+{
+	uint32_t edge_cnt_last;
+	uint32_t edge_cnt;
+	uint32_t start, t1, t2;
+	int tout;
+
+	start = micros();
+	edge_cnt = g.edge_cnt;
+
+	/* magic value */
+	g.fixed_state[0] =
+	g.fixed_state[1] = 0x25;
+
+	for (tout = 10000; tout > 0; tout--) {
+		edge_cnt_last = edge_cnt;
+		udelay(100);
+		edge_cnt = g.edge_cnt;
+
+		if (edge_cnt != edge_cnt_last)
+			continue;
+		if (!(GPIOB_PDIR & CORE_PIN0_BITMASK))
+			break;
+	}
+
+	g.fixed_state[0] = 0x33;
+	g.fixed_state[1] = 0x3f;
+	GPIOD_PDOR = 0x33;
+
+	t1 = micros();
+	if (tout == 0) {
+		printf("start_seq timeout1, t=%u\n", t1 - start);
+		return;
+	}
+
+	for (tout = 100000; tout > 0; tout--) {
+		udelay(1);
+
+		if (GPIOB_PDIR & CORE_PIN0_BITMASK)
+			break;
+	}
+
+	t2 = micros();
+	if (tout == 0) {
+		printf("start_seq timeout2, t1=%u, t2=%u\n",
+			t1 - start, t2 - t1);
+		return;
+	}
+
+	//printf(" t1=%u, t2=%u\n", t1 - start, t2 - t1);
+
+	if (g.stream_started) {
+		printf("got start_seq when already started\n");
+		return;
+	}
+
+	if (!g.stream_enable) {
+		printf("got start_seq, without enable from USB\n");
+		return;
+	}
+
+	if (g.i == g.o) {
+		printf("got start_seq while buffer is empty\n");
+		return;
+	}
+
+	__disable_irq();
+	g.stream_started = 1;
+	if (g.use_readinc) {
+		attachInterruptVector(IRQ_PORTB, portb_isr_readinc);
+		attachInterruptVector(IRQ_PORTC, portc_isr_nop);
+	}
+	else {
+		attachInterruptVector(IRQ_PORTB, portb_isr_read);
+		attachInterruptVector(IRQ_PORTC, portc_isr_frameinc);
+	}
+	__enable_irq();
+}
+
+static int get_space(void)
+{
+	return STREAM_BUF_SIZE - ((g.i - g.o) & STREAM_BUF_MASK);
+}
+
+static void do_usb(void *buf)
+{
+	struct tas_pkt *pkt = buf;
+	uint32_t i, g_i;
+	int space;
+
+	switch (pkt->type) {
+	case PKT_FIXED_STATE:
+		memcpy(g.fixed_state, pkt->data, sizeof(g.fixed_state));
+		break;
+	case PKT_STREAM_ENABLE:
+		__disable_irq();
+		/* wait for start from MD */
+		g.stream_enable = 1;
+		g.stream_started = 0;
+		g.stream_received = 0;
+		g.use_readinc = pkt->start.use_readinc;
+		g.i = g.o = 0;
+		g.frame_cnt = 0;
+		attachInterruptVector(IRQ_PORTB, portb_isr_fixed);
+		attachInterruptVector(IRQ_PORTC, portc_isr_nop);
+		__enable_irq();
+		break;
+	case PKT_STREAM_END:
+		g.stream_received = 1;
+		printf("end of stream\n");
+		break;
+	case PKT_STREAM_DATA:
+		g_i = g.i;
+		space = get_space();
+		if (space <= sizeof(pkt->data) / STREAM_EL_SZ) {
+			printf("got data pkt while space=%d\n", space);
+			return;
+		}
+		for (i = 0; i < sizeof(pkt->data) / STREAM_EL_SZ; i++) {
+			memcpy(&g.stream[g_i++],
+			       pkt->data + i * STREAM_EL_SZ,
+			       STREAM_EL_SZ);
+			g_i &= STREAM_BUF_MASK;
+		}
+		g.i = g_i;
+		break;
+	default:
+		printf("got unknown pkt type: %04x\n", pkt->type);
+		break;
+	}
 }
 
 int main(void)
 {
-	//int ret;
+	uint32_t edge_cnt_last;
+	uint32_t edge_cnt;
+	uint8_t buf[64];
+	int timeout;
+	int ret;
 
 	delay(1000); // wait for usb..
 
+	/* ?0SA 00DU, ?1CB RLDU */
+	g.fixed_state[0] = 0x33;
+	g.fixed_state[1] = 0x3f;
+
 	printf("starting, rawhid: %d\n", usb_rawhid_available());
 
-	// md pin   th tr tl  r  l  d  u
+	// md pin   th tr tl  r  l  d  u vsync
 	// md bit*   6  5  4  3  2  1  0
-	// t bit   b16 d5 d4 d3 d2 d1 d0
-	// t pin     0 20  6  8  7 14  2
+	// t bit   b16 d5 d4 d3 d2 d1 d0    c6
+	// t pin     0 20  6  8  7 14  2    11
 	// * - note: tl/tr mixed in most docs
 	pinMode(0, INPUT);
-	attachInterrupt(0, pin0_irq, CHANGE);
+	attachInterrupt(0, portb_isr_fixed, CHANGE);
+	attachInterruptVector(IRQ_PORTB, portb_isr_fixed);
+	pinMode(11, INPUT);
+	attachInterrupt(11, portc_isr_nop, RISING);
+	attachInterruptVector(IRQ_PORTC, portc_isr_nop);
+
+	NVIC_SET_PRIORITY(IRQ_PORTB, 0);
+	NVIC_SET_PRIORITY(IRQ_PORTC, 16);
 
 	pinMode( 2, OUTPUT);
 	pinMode(14, OUTPUT);
@@ -67,24 +294,68 @@ int main(void)
 
 	// led
 	pinMode(13, OUTPUT);
-	// CORE_PIN13_PORTSET = CORE_PIN13_BITMASK;
-	// CORE_PIN13_PORTCLEAR = CORE_PIN13_BITMASK;
 
 	// CORE_PIN0_PORTSET CORE_PIN0_BITMASK PORTB_PCR16
+	printf("GPIOB PDDR, PDIR: %08x %08x\n", GPIOB_PDIR, GPIOB_PDDR);
 	printf("GPIOC PDDR, PDIR: %08x %08x\n", GPIOC_PDIR, GPIOC_PDDR);
 	printf("GPIOD PDDR, PDIR: %08x %08x\n", GPIOD_PDIR, GPIOD_PDDR);
 	printf("PORTB_PCR16: %08x\n", PORTB_PCR16);
+	printf("PORTC_PCR6:  %08x\n", PORTC_PCR6);
 
-	// ret = usb_rawhid_recv(buf, 2000);
-	// ret = usb_rawhid_send(buf, 2000);
+	asm("mrs %0, BASEPRI" : "=r"(ret));
+	printf("BASEPRI: %d\n", ret);
+
+	timeout = 1000;
+	edge_cnt_last = g.edge_cnt;
 
 	while (1) {
-		delay(4000);
-		fixed_state[1] &= ~0x20;
-		CORE_PIN13_PORTSET = CORE_PIN13_BITMASK;
+		struct tas_pkt pkt;
+		while (g.stream_enable && !g.stream_received
+		       && get_space() > sizeof(pkt.data) / STREAM_EL_SZ)
+		{
+			pkt.type = PKT_STREAM_REQ;
+			pkt.req.frame = g.frame_cnt;
+
+			ret = usb_rawhid_send(&pkt, 1000);
+			if (ret != sizeof(pkt)) {
+				printf("send STREAM_REQ: %d\n", ret);
+				break;
+			}
 
-		delay(700);
-		fixed_state[1] |= 0x20;
-		CORE_PIN13_PORTCLEAR = CORE_PIN13_BITMASK;
+			ret = usb_rawhid_recv(buf, 1000);
+			if (ret != 64)
+				printf("usb_rawhid_recv/s: %d\n", ret);
+			else
+				do_usb(buf);
+		}
+
+		if (timeout == 1000) {
+			edge_cnt = g.edge_cnt;
+			//printf("e: %d th: %d\n", edge_cnt - edge_cnt_last,
+			//      (GPIOB_PDIR >> CORE_PIN0_BIT) & 1);
+			if (edge_cnt - edge_cnt_last > 10000) {
+				do_start_seq();
+				edge_cnt = g.edge_cnt;
+			}
+			edge_cnt_last = edge_cnt;
+		}
+
+		ret = usb_rawhid_recv(buf, timeout);
+		if (ret == 64) {
+			CORE_PIN13_PORTSET = CORE_PIN13_BITMASK;
+
+			do_usb(buf);
+			timeout = 20;
+		}
+		else if (ret == 0) {
+			CORE_PIN13_PORTCLEAR = CORE_PIN13_BITMASK;
+			timeout = 1000;
+		}
+		else {
+			printf("usb_rawhid_recv: %d\n", ret);
+			timeout = 1000;
+		}
 	}
+
+	return 0;
 }