#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)
{
{
}
-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);
// 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;
}