initial support for 2 players
authornotaz <notasas@gmail.com>
Tue, 18 Nov 2014 21:49:57 +0000 (23:49 +0200)
committernotaz <notasas@gmail.com>
Tue, 18 Nov 2014 21:49:57 +0000 (23:49 +0200)
host/main.c
main.c
pkts.h

index 9cc492c..b5a65b1 100644 (file)
@@ -455,33 +455,33 @@ struct gmv_tas {
   uint8_t data[0][3];
 };
 
-static uint8_t *import_gmv(FILE *f, long size, int *byte_count, FILE *logf)
+static int import_gmv(FILE *f, long size,
+  uint8_t *out[2], int out_byte_count[2], FILE *logf)
 {
   struct gmv_tas *gmv;
   int frame_count;
   int count = 0;
   uint16_t val;
-  uint8_t *out;
   int ret;
   int i;
 
-  *byte_count = 0;
+  out_byte_count[0] = out_byte_count[1] = 0;
 
   if (size < (long)sizeof(*gmv)) {
     fprintf(stderr, "bad gmv size: %ld\n", size);
-    return NULL;
+    return -1;
   }
 
   gmv = malloc(size);
   if (gmv == NULL) {
     fprintf(stderr, "OOM?\n");
-    return NULL;
+    return -1;
   }
   ret = fread(gmv, 1, size, f);
   if (ret != size) {
     fprintf(stderr, "fread %d/%ld: ", ret, size);
     perror("");
-    return NULL;
+    return -1;
   }
 
   frame_count = (size - sizeof(*gmv)) / sizeof(gmv->data[0]);
@@ -489,25 +489,25 @@ static uint8_t *import_gmv(FILE *f, long size, int *byte_count, FILE *logf)
   /* check the GMV.. */
   if (frame_count <= 0 || size != sizeof(*gmv) + frame_count * 3) {
     fprintf(stderr, "broken gmv? frames=%d\n", frame_count);
-    return NULL;
+    return -1;
   }
 
   if (strncmp(gmv->sig, "Gens Movie TEST", 15) != 0) {
     fprintf(stderr, "bad GMV sig\n");
-    return NULL;
+    return -1;
   }
   if (gmv->ctrl1 != '3') {
     fprintf(stderr, "unhandled controlled config: '%c'\n", gmv->ctrl1);
-    //return NULL;
+    //return -1;
   }
   if (gmv->ver >= 'A') {
     if (gmv->flags & 0x40) {
       fprintf(stderr, "unhandled flag: movie requires a savestate\n");
-      return NULL;
+      return -1;
     }
     if (gmv->flags & 0x20) {
       fprintf(stderr, "unhandled flag: 3-player movie\n");
-      return NULL;
+      return -1;
     }
     if (gmv->flags & ~0x80) {
       //fprintf(stderr, "unhandled flag(s): %04x\n", gmv->flags);
@@ -519,15 +519,15 @@ static uint8_t *import_gmv(FILE *f, long size, int *byte_count, FILE *logf)
   printf("%d frames, %u rerecords\n",
          frame_count, gmv->rerecord_count);
 
-  out = malloc(frame_count * MAX_INPUT_BYTES);
-  if (out == NULL) {
+  out[0] = malloc(frame_count * MAX_INPUT_BYTES);
+  if (out[0] == NULL) {
     fprintf(stderr, "OOM?\n");
-    return NULL;
+    return -1;
   }
 
   for (i = 0; i < frame_count; i++) {
     val = gmv->data[i][0] | ((gmv->data[i][2] & 0x0f) << 8);
-    count += tas_data_to_teensy(val, out + count, logf);
+    count += tas_data_to_teensy(val, out[0] + count, logf);
 
     if (gmv->data[i][1] != 0xff || gmv->data[i][2] != 0xff)
     {
@@ -536,8 +536,8 @@ static uint8_t *import_gmv(FILE *f, long size, int *byte_count, FILE *logf)
     }
   }
 
-  *byte_count = count;
-  return out;
+  out_byte_count[0] = count;
+  return 0;
 }
 
 static int do_bkm_char(char c, char expect, uint16_t *val, int bit)
@@ -554,18 +554,21 @@ static int do_bkm_char(char c, char expect, uint16_t *val, int bit)
   return 1;
 }
 
-static uint8_t *import_bkm(FILE *f, int *byte_count, FILE *logf)
+static int import_bkm(FILE *f, uint8_t *out[2], int out_byte_count[2],
+  FILE *logf)
 {
-  uint8_t *out = NULL;
-  uint16_t val;
+  int teensy_bytes = 0;
+  int have_pl2 = 0;
+  int have_xyz = 0;
   int frames = 0;
   int count = 0;
   int alloc = 0;
   int line = 0;
   char buf[256];
   const char *r;
+  uint16_t val;
   char *p;
-  int i;
+  int pl, i;
 
   while ((p = fgets(buf, sizeof(buf), f)) != NULL)
   {
@@ -581,53 +584,78 @@ static uint8_t *import_bkm(FILE *f, int *byte_count, FILE *logf)
 
     if (count >= alloc - MAX_INPUT_BYTES) {
       alloc = alloc * 2 + 64;
-      out = realloc(out, alloc * sizeof(out[0]));
-      if (out == NULL) {
-        fprintf(stderr, "OOM?\n");
-        return NULL;
+      for (pl = 0; pl < 2; pl++) {
+        out[pl] = realloc(out[pl], alloc * sizeof(out[0][0]));
+        if (out[pl] == NULL) {
+          fprintf(stderr, "OOM?\n");
+          return -1;
+        }
       }
     }
 
-    val = 0xfff;
-
     if (strncmp(p, "|.|", 3) != 0)
       goto unhandled_line;
     p += 3;
 
-    const char ref[] = "UDLRABCS";
-    for (r = ref, i = 0; *r != 0; p++, r++, i++) {
-      if (do_bkm_char(*p, *r, &val, i))
+    for (pl = 0; pl < 2; pl++) {
+      static const char ref[] = "UDLRABCSXYZM";
+
+      val = 0xfff;
+      for (r = ref, i = 0; *r != 0; p++, r++, i++) {
+        if (do_bkm_char(*p, *r, &val, i))
+          goto unhandled_line;
+      }
+
+      if (*p++ != '|')
         goto unhandled_line;
+
+      teensy_bytes = tas_data_to_teensy(val, out[pl] + count, logf);
+
+      if ((val & 0xf00) != 0xf00)
+        have_xyz = 1;
+      if (pl == 1)
+        have_pl2 |= (val != 0xfff);
     }
+    count += teensy_bytes;
 
-    if (strcmp(p, "....|............||") != 0)
+    if (strcmp(p, "|") != 0)
       goto unhandled_line;
 
-    count += tas_data_to_teensy(val, out + count, logf);
     frames++;
     continue;
 
 unhandled_line:
     fprintf(stderr, "unhandled bkm line %d: '%s'\n", line, buf);
-    return NULL;
+    return -1;
   }
 
-  printf("loaded bkm, %d frames, %d bytes\n", frames, count);
-  *byte_count = count;
-  return out;
+  printf("loaded bkm, %d players, %d frames, %d bytes, have_xyz=%d\n",
+    have_pl2 ? 2 : 1, frames, count, have_xyz);
+  out_byte_count[0] = count;
+  if (have_pl2)
+    out_byte_count[1] = count;
+  else {
+    free(out[1]);
+    out[1] = NULL;
+  }
+
+  return 0;
 }
 
-static uint8_t *import_raw(FILE *f, int *byte_count, FILE *logf)
+static int import_raw(FILE *f, uint8_t *out[2], int out_byte_count[2],
+  FILE *logf)
 {
-  uint8_t *out = NULL, val;
   int count = 0;
   int alloc = 0;
   int line = 0;
   int first = 1;
   char buf[256];
+  uint8_t val;
   char *p;
   int i;
 
+  out_byte_count[0] = out_byte_count[1] = 0;
+
   while ((p = fgets(buf, sizeof(buf), f)) != NULL)
   {
     line++;
@@ -655,27 +683,27 @@ static uint8_t *import_raw(FILE *f, int *byte_count, FILE *logf)
 
     if (count >= alloc) {
       alloc = alloc * 2 + 64;
-      out = realloc(out, alloc * sizeof(out[0]));
-      if (out == NULL) {
+      out[0] = realloc(out[0], alloc * sizeof(out[0][0]));
+      if (out[0] == NULL) {
         fprintf(stderr, "OOM?\n");
-        return NULL;
+        return -1;
       }
     }
 
     if (logf)
       fwrite(&val, 1, 1, logf);
 
-    out[count++] = val & 0x3f;
+    out[0][count++] = val & 0x3f;
     continue;
 
 bad:
     fprintf(stderr, "bad raw line %d: '%s'\n", line, buf);
-    return NULL;
+    return -1;
   }
 
   printf("loaded raw, %d bytes\n", count);
-  *byte_count = count;
-  return out;
+  out_byte_count[0] = count;
+  return 0;
 }
 
 static int write_bkm_frame(FILE *f, const uint8_t *data)
@@ -746,12 +774,11 @@ int main(int argc, char *argv[])
   const char *tasfn = NULL;
   const char *outfn = NULL;
   const char *logfn = NULL;
-  uint8_t *tas_data = NULL;
-  int tas_data_size = 0;
-  int bytes_sent = 0;
+  uint8_t *tas_data[2] = { NULL, NULL };
+  int tas_data_size[2] = { 0, 0 };
+  int bytes_sent[2] = { 0, 0 };
   int use_vsync = 0; // frame increment on vsync
   int no_start_seq = 0;
-  int tas_skip = 0;
   int enable_sent = 0;
   int abort_sent = 0;
   int frame_count = 0;
@@ -858,11 +885,11 @@ int main(int argc, char *argv[])
       ext++;
 
     if (strcasecmp(ext, "gmv") == 0)
-      tas_data = import_gmv(f, size, &tas_data_size, logf);
+      ret = import_gmv(f, size, tas_data, tas_data_size, logf);
     else if (strcasecmp(ext, "bkm") == 0)
-      tas_data = import_bkm(f, &tas_data_size, logf);
+      ret = import_bkm(f, tas_data, tas_data_size, logf);
     else if (strcasecmp(ext, "txt") == 0)
-      tas_data = import_raw(f, &tas_data_size, logf);
+      ret = import_raw(f, tas_data, tas_data_size, logf);
     else {
       fprintf(stderr, "unknown movie type: '%s'\n", ext);
       return 1;
@@ -874,10 +901,14 @@ int main(int argc, char *argv[])
       logf = NULL;
     }
 
-    if (tas_data == NULL) {
+    if (ret != 0 || tas_data[0] == NULL || tas_data_size[0] <= 0) {
       fprintf(stderr, "failed fo parse %s\n", tasfn);
       return 1;
     }
+    if (tas_data_size[1] != 0 && tas_data[1] == NULL) {
+      fprintf(stderr, "missing tas_data[1]\n");
+      return 1;
+    }
   }
 
   if (outfn != NULL) {
@@ -913,7 +944,8 @@ int main(int argc, char *argv[])
       wait_device = 0;
       pending_urbs = 0;
       enable_sent = 0;
-      bytes_sent = 0;
+      bytes_sent[0] = 0;
+      bytes_sent[1] = 0;
 
       /* we wait first, then send commands, but if teensy
        * is started already, it won't send anything */
@@ -1016,21 +1048,25 @@ int main(int argc, char *argv[])
       }
       else if (reaped_urb == &urb[URB_DATA_IN])
       {
+        int p;
+
         /* some request from teensy */
         switch (pkt_in.type) {
         case PKT_STREAM_REQ:
-          printf("req: %d/%d/%d\n", pkt_in.req.frame * 2,
-            bytes_sent, tas_data_size);
+          p = pkt_in.req.is_p2 ? 1 : 0;
+          printf("req%d: %d/%d/%d\n", pkt_in.req.is_p2,
+            pkt_in.req.frame * 2, bytes_sent[p], tas_data_size[p]);
 
           pkt_out.size = 0;
-          if (bytes_sent < tas_data_size) {
-            pkt_out.type = PKT_STREAM_DATA_TO;
+          if (bytes_sent[p] < tas_data_size[p]) {
+            pkt_out.type = p ? PKT_STREAM_DATA_TO_P2
+                             : PKT_STREAM_DATA_TO_P1;
 
-            i = tas_data_size - bytes_sent;
+            i = tas_data_size[p] - bytes_sent[p];
             if (i > sizeof(pkt_out.data))
               i = sizeof(pkt_out.data);
-            memcpy(pkt_out.data, tas_data + bytes_sent, i);
-            bytes_sent += i;
+            memcpy(pkt_out.data, tas_data[p] + bytes_sent[p], i);
+            bytes_sent[p] += i;
             pkt_out.size = i;
           }
           else {
@@ -1086,13 +1122,18 @@ int main(int argc, char *argv[])
       // can't do that yet
       continue;
 
-    if ((tas_data != NULL || outf != NULL) && !enable_sent) {
+    if ((tas_data[0] != NULL || outf != NULL) && !enable_sent) {
       memset(&pkt_out, 0, sizeof(pkt_out));
       pkt_out.type = PKT_STREAM_ENABLE;
-      pkt_out.enable.stream_to = (tas_data != NULL);
+      pkt_out.enable.stream_to = (tas_data[0] != NULL);
       pkt_out.enable.stream_from = (outf != NULL);
-      pkt_out.enable.use_readinc = !use_vsync;
       pkt_out.enable.no_start_seq = no_start_seq;
+      if (use_vsync)
+        pkt_out.enable.inc_mode = INC_MODE_VSYNC;
+      else if (tas_data_size[1] != 0)
+        pkt_out.enable.inc_mode = INC_MODE_SHARED_PL2;
+      else
+        pkt_out.enable.inc_mode = INC_MODE_SHARED_PL1;
 
       ret = submit_urb(dev.fd, &urb[URB_DATA_OUT], dev.ifaces[0].ep_out,
                        &pkt_out, sizeof(pkt_out));
@@ -1102,10 +1143,11 @@ int main(int argc, char *argv[])
       }
       pending_urbs |= 1 << URB_DATA_OUT;
       enable_sent = 1;
-      bytes_sent = 0;
+      bytes_sent[0] = 0;
+      bytes_sent[1] = 0;
       continue;
     }
-    if (tas_data == NULL && fixed_input_changed) {
+    if (tas_data[0] == NULL && fixed_input_changed) {
       memset(&pkt_out, 0, sizeof(pkt_out));
       pkt_out.type = PKT_FIXED_STATE;
       memcpy(pkt_out.data, fixed_input_state, sizeof(fixed_input_state));
diff --git a/main.c b/main.c
index 96b895f..2aae65a 100644 (file)
--- a/main.c
+++ b/main.c
@@ -31,6 +31,8 @@
 #include "teensy3/usb_rawhid.h"
 #include "pkts.h"
 
+#define ARRAY_SIZE(x) (sizeof(x) / sizeof(x[0]))
+
 #define noinline __attribute__((noinline))
 
 // use power of 2
 #define STREAM_EL_SZ 2
 
 static struct {
-       uint8_t stream_to[STREAM_BUF_SIZE][STREAM_EL_SZ];
+       uint8_t stream_to[2][STREAM_BUF_SIZE][STREAM_EL_SZ];
        uint8_t stream_from[STREAM_BUF_SIZE][STREAM_EL_SZ];
-       union {
-               uint8_t fixed_state[4];
-               uint32_t fixed_state32;
-       };
-       union {
-               uint8_t pending_state[4];
-               uint32_t pending_state32;
-       };
+       struct {
+               union {
+                       uint8_t fixed_state[4];
+                       uint32_t fixed_state32;
+               };
+               union {
+                       uint8_t pending_state[4];
+                       uint32_t pending_state32;
+               };
+       } pl[2];
        uint32_t stream_enable_to:1;
        uint32_t stream_enable_from:1;
        uint32_t stream_started:1;
        uint32_t stream_ended:1;
-       uint32_t use_readinc:1;
+       uint32_t inc_mode:2;
        uint32_t use_pending:1;
        uint32_t frame_cnt;
        uint32_t edge_cnt;
-       uint32_t t_i;
-       uint32_t t_o;
-       uint32_t f_i;
-       uint32_t f_o;
+       struct {
+               uint32_t i;
+               uint32_t o;
+       } pos_to_p[2], pos_from;
 } g;
 
 ssize_t _write(int fd, const void *buf, size_t nbyte)
@@ -83,16 +87,21 @@ void yield(void)
 {
 }
 
-/* portb handles TH */
-static void portb_isr_fixed(void)
+static noinline void choose_isrs_idle(void);
+
+/* player1 TH */
+#define PL1_ISFR   PORTD_ISFR
+#define PL1_TH()   ((CORE_PIN21_PINREG >> CORE_PIN21_BIT) & 1)
+
+static void pl1th_isr_fixed(void)
 {
        uint32_t isfr, th;
 
-       isfr = PORTB_ISFR;
-       PORTB_ISFR = isfr;
-       th = (GPIOB_PDIR >> CORE_PIN0_BIT) & 1;
+       isfr = PL1_ISFR;
+       PL1_ISFR = isfr;
+       th = PL1_TH();
 
-       GPIOD_PDOR = g.fixed_state[th];
+       GPIOD_PDOR = g.pl[0].fixed_state[th];
        g.edge_cnt++;
 }
 
@@ -100,59 +109,109 @@ static noinline void do_to_step(void)
 {
        g.frame_cnt++;
 
-       g.t_o = (g.t_o + 1) & STREAM_BUF_MASK;
-       if (g.t_o == g.t_i)
+       g.pos_to_p[0].o = (g.pos_to_p[0].o + 1) & STREAM_BUF_MASK;
+       if (g.pos_to_p[0].o == g.pos_to_p[0].i)
                // done
-               attachInterruptVector(IRQ_PORTB, portb_isr_fixed);
+               choose_isrs_idle();
 }
 
-static void portb_isr_do_to_inc(void)
+static void pl1th_isr_do_to_inc(void)
 {
        uint32_t isfr, th;
 
-       isfr = PORTB_ISFR;
-       PORTB_ISFR = isfr;
-       th = (GPIOB_PDIR >> CORE_PIN0_BIT) & 1;
+       isfr = PL1_ISFR;
+       PL1_ISFR = isfr;
+       th = PL1_TH();
 
-       GPIOD_PDOR = g.stream_to[g.t_o][th];
+       GPIOD_PDOR = g.stream_to[0][g.pos_to_p[0].o][th];
        if (th)
                do_to_step();
 }
 
-static void portb_isr_do_to(void)
+static void pl1th_isr_do_to(void)
 {
        uint32_t isfr, th;
 
-       isfr = PORTB_ISFR;
-       PORTB_ISFR = isfr;
-       th = (GPIOB_PDIR >> CORE_PIN0_BIT) & 1;
+       isfr = PL1_ISFR;
+       PL1_ISFR = isfr;
+       th = PL1_TH();
 
-       GPIOD_PDOR = g.stream_to[g.t_o][th];
+       GPIOD_PDOR = g.stream_to[0][g.pos_to_p[0].o][th];
        g.edge_cnt++;
 }
 
-static void portc_isr_nop(void)
+/* player2 TH */
+#define PL2_ISFR   PORTC_ISFR
+#define PL2_TH()   ((CORE_PIN15_PINREG >> CORE_PIN15_BIT) & 1)
+#define PL2_ADJ(x) ((x) | ((x) << 12))
+
+static void pl2th_isr_fixed(void)
+{
+       uint32_t isfr, th, v;
+
+       isfr = PL2_ISFR;
+       PL2_ISFR = isfr;
+       th = PL2_TH();
+
+       v = g.pl[1].fixed_state[th];
+       GPIOB_PDOR = PL2_ADJ(v);
+}
+
+static void pl2th_isr_do_to(void)
+{
+       uint32_t isfr, th, v;
+
+       isfr = PL2_ISFR;
+       PL2_ISFR = isfr;
+       th = PL2_TH();
+
+       v = g.stream_to[1][g.pos_to_p[0].o][th];
+       GPIOB_PDOR = PL2_ADJ(v);
+
+       g.pos_to_p[1].o = g.pos_to_p[0].o;
+}
+
+static void pl2th_isr_do_to_inc_pl1(void)
+{
+       uint32_t isfr, th, v;
+
+       isfr = PL2_ISFR;
+       PL2_ISFR = isfr;
+       th = PL2_TH();
+
+       v = g.stream_to[1][g.pos_to_p[1].o][th];
+       GPIOB_PDOR = PL2_ADJ(v);
+       if (th) {
+               do_to_step();
+               g.pos_to_p[1].o = g.pos_to_p[0].o;
+       }
+}
+
+/* vsync handler */
+#define VSYNC_ISFR PORTC_ISFR
+
+static void vsync_isr_nop(void)
 {
        uint32_t isfr;
 
-       isfr = PORTC_ISFR;
-       PORTC_ISFR = isfr;
+       isfr = VSYNC_ISFR;
+       VSYNC_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)
+static void vsync_isr_frameinc(void)
 {
        uint32_t isfr;
 
-       isfr = PORTC_ISFR;
-       PORTC_ISFR = isfr;
+       isfr = VSYNC_ISFR;
+       VSYNC_ISFR = isfr;
 
-       g.t_o = (g.t_o + 1) & STREAM_BUF_MASK;
-       if (g.t_o == g.t_i) {
-               attachInterruptVector(IRQ_PORTB, portb_isr_fixed);
-               attachInterruptVector(IRQ_PORTC, portc_isr_nop);
-       }
+       g.pos_to_p[0].o = (g.pos_to_p[0].o + 1) & STREAM_BUF_MASK;
+       g.pos_to_p[1].o = g.pos_to_p[0].o;
+
+       if (g.pos_to_p[0].o == g.pos_to_p[0].i)
+               choose_isrs_idle();
        g.frame_cnt++;
 }
 
@@ -162,63 +221,87 @@ static noinline void do_from_step(void)
        uint32_t s;
 
        // should hopefully give atomic fixed_state read..
-       s = g.fixed_state32;
-       g.fixed_state32 = g.pending_state32;
-       g.stream_from[g.f_i][0] = s;
-       g.stream_from[g.f_i][1] = s >> 8;
-       g.f_i = (g.f_i + 1) & STREAM_BUF_MASK;
+       s = g.pl[0].fixed_state32;
+       g.pl[0].fixed_state32 = g.pl[0].pending_state32;
+       g.stream_from[g.pos_from.i][0] = s;
+       g.stream_from[g.pos_from.i][1] = s >> 8;
+       g.pos_from.i = (g.pos_from.i + 1) & STREAM_BUF_MASK;
 }
 
-static void portb_isr_fixed_do_from(void)
+static void pl1th_isr_fixed_do_from(void)
 {
        uint32_t isfr, th;
 
-       isfr = PORTB_ISFR;
-       PORTB_ISFR = isfr;
-       th = (GPIOB_PDIR >> CORE_PIN0_BIT) & 1;
+       isfr = PL1_ISFR;
+       PL1_ISFR = isfr;
+       th = PL1_TH();
 
-       GPIOD_PDOR = g.fixed_state[th];
+       GPIOD_PDOR = g.pl[0].fixed_state[th];
        if (th)
                do_from_step();
        g.edge_cnt++;
 }
 
-static void portc_isr_frameinc_do_from(void)
+static void vsync_isr_frameinc_do_from(void)
 {
        uint32_t isfr;
 
-       isfr = PORTC_ISFR;
-       PORTC_ISFR = isfr;
+       isfr = VSYNC_ISFR;
+       VSYNC_ISFR = isfr;
 
        do_from_step();
        g.frame_cnt++;
 }
 
+/* * */
 static void choose_isrs(void)
 {
+       void (*pl1th_handler)(void) = pl1th_isr_fixed;
+       void (*pl2th_handler)(void) = pl2th_isr_fixed;
+       void (*vsync_handler)(void) = vsync_isr_nop;
+
        if (g.stream_enable_to) {
-               if (g.use_readinc) {
-                       attachInterruptVector(IRQ_PORTB, portb_isr_do_to_inc);
-                       attachInterruptVector(IRQ_PORTC, portc_isr_nop);
-               }
-               else {
-                       attachInterruptVector(IRQ_PORTB, portb_isr_do_to);
-                       attachInterruptVector(IRQ_PORTC, portc_isr_frameinc);
+               switch (g.inc_mode) {
+               case INC_MODE_VSYNC:
+                       pl1th_handler = pl1th_isr_do_to;
+                       pl2th_handler = pl2th_isr_do_to;
+                       vsync_handler = vsync_isr_frameinc;
+                       break;
+               case INC_MODE_SHARED_PL1:
+                       pl1th_handler = pl1th_isr_do_to_inc;
+                       pl2th_handler = pl2th_isr_do_to;
+                       break;
+               case INC_MODE_SHARED_PL2:
+                       pl1th_handler = pl1th_isr_do_to;
+                       pl2th_handler = pl2th_isr_do_to_inc_pl1;
+                       break;
                }
        }
        else if (g.stream_enable_from) {
                g.use_pending = 1;
-               if (g.use_readinc) {
-                       attachInterruptVector(IRQ_PORTB,
-                                               portb_isr_fixed_do_from);
-                       attachInterruptVector(IRQ_PORTC, portc_isr_nop);
-               }
-               else {
-                       attachInterruptVector(IRQ_PORTB, portb_isr_fixed);
-                       attachInterruptVector(IRQ_PORTC,
-                                             portc_isr_frameinc_do_from);
+               switch (g.inc_mode) {
+               case INC_MODE_VSYNC:
+                       vsync_handler = vsync_isr_frameinc_do_from;
+                       break;
+               case INC_MODE_SHARED_PL1:
+                       pl1th_handler = pl1th_isr_fixed_do_from;
+                       break;
+               case INC_MODE_SHARED_PL2:
+                       /* TODO */
+                       break;
                }
        }
+
+       attachInterruptVector(IRQ_PORTD, pl1th_handler);
+       attachInterruptVector(IRQ_PORTC, pl2th_handler);
+       attachInterruptVector(IRQ_PORTA, vsync_handler);
+}
+
+static noinline void choose_isrs_idle(void)
+{
+       attachInterruptVector(IRQ_PORTD, pl1th_isr_fixed);
+       attachInterruptVector(IRQ_PORTC, pl2th_isr_fixed);
+       attachInterruptVector(IRQ_PORTA, vsync_isr_nop);
 }
 
 static void udelay(uint32_t us)
@@ -242,8 +325,8 @@ static void do_start_seq(void)
        edge_cnt = g.edge_cnt;
 
        /* magic value */
-       g.fixed_state[0] =
-       g.fixed_state[1] = 0x25;
+       g.pl[0].fixed_state[0] =
+       g.pl[0].fixed_state[1] = 0x25;
 
        for (tout = 10000; tout > 0; tout--) {
                edge_cnt_last = edge_cnt;
@@ -252,12 +335,12 @@ static void do_start_seq(void)
 
                if (edge_cnt != edge_cnt_last)
                        continue;
-               if (!(GPIOB_PDIR & CORE_PIN0_BITMASK))
+               if (!PL1_TH())
                        break;
        }
 
-       g.fixed_state[0] = 0x33;
-       g.fixed_state[1] = 0x3f;
+       g.pl[0].fixed_state[0] = 0x33;
+       g.pl[0].fixed_state[1] = 0x3f;
        GPIOD_PDOR = 0x33;
 
        t1 = micros();
@@ -269,7 +352,7 @@ static void do_start_seq(void)
        for (tout = 100000; tout > 0; tout--) {
                udelay(1);
 
-               if (GPIOB_PDIR & CORE_PIN0_BITMASK)
+               if (PL1_TH())
                        break;
        }
 
@@ -292,12 +375,12 @@ static void do_start_seq(void)
                return;
        }
 
-       if (g.stream_enable_to && g.t_i == g.t_o) {
+       if (g.stream_enable_to && g.pos_to_p[0].i == g.pos_to_p[0].o) {
                printf("got start_seq while stream_to is empty\n");
                return;
        }
 
-       if (g.stream_enable_from && g.f_i != g.f_o) {
+       if (g.stream_enable_from && g.pos_from.i != g.pos_from.o) {
                printf("got start_seq while stream_from is not empty\n");
                return;
        }
@@ -311,42 +394,45 @@ static void do_start_seq(void)
 // callers must disable IRQs
 static void clear_state(void)
 {
+       int i;
+
        g.stream_enable_to = 0;
        g.stream_enable_from = 0;
        g.stream_started = 0;
        g.stream_ended = 0;
-       g.use_readinc = 0;
+       g.inc_mode = INC_MODE_VSYNC;
        g.use_pending = 0;
-       g.t_i = g.t_o = 0;
-       g.f_i = g.f_o = 0;
+       for (i = 0; i < ARRAY_SIZE(g.pos_to_p); i++)
+               g.pos_to_p[i].i = g.pos_to_p[i].o = 0;
+       g.pos_from.i = g.pos_from.o = 0;
        g.frame_cnt = 0;
-       attachInterruptVector(IRQ_PORTB, portb_isr_fixed);
-       attachInterruptVector(IRQ_PORTC, portc_isr_nop);
+       choose_isrs_idle();
 }
 
-static int get_space_to(void)
+static int get_space_to(int p)
 {
-       return STREAM_BUF_SIZE - ((g.t_i - g.t_o) & STREAM_BUF_MASK);
+       return STREAM_BUF_SIZE - ((g.pos_to_p[p].i - g.pos_to_p[p].o)
+               & STREAM_BUF_MASK);
 }
 
 static int get_used_from(void)
 {
-       return (g.f_i - g.f_o) & STREAM_BUF_MASK;
+       return (g.pos_from.i - g.pos_from.o) & STREAM_BUF_MASK;
 }
 
 static void do_usb(void *buf)
 {
        struct tas_pkt *pkt = buf;
-       uint32_t t_i, i;
+       uint32_t pos_to_i, i, p;
        int space;
 
        switch (pkt->type) {
        case PKT_FIXED_STATE:
                memcpy(&i, pkt->data, sizeof(i));
                if (g.use_pending)
-                       g.pending_state32 = i;
+                       g.pl[0].pending_state32 = i;
                else
-                       g.fixed_state32 = i;
+                       g.pl[0].fixed_state32 = i;
                break;
        case PKT_STREAM_ENABLE:
                __disable_irq();
@@ -354,7 +440,7 @@ static void do_usb(void *buf)
                /* wait for start from MD */
                g.stream_enable_to = pkt->enable.stream_to;
                g.stream_enable_from = pkt->enable.stream_from;
-               g.use_readinc = pkt->enable.use_readinc;
+               g.inc_mode = pkt->enable.inc_mode;
                if (pkt->enable.no_start_seq) {
                        GPIOD_PDOR = 0x3f;
                        choose_isrs();
@@ -371,20 +457,22 @@ static void do_usb(void *buf)
                g.stream_ended = 1;
                printf("end of stream\n");
                break;
-       case PKT_STREAM_DATA_TO:
-               t_i = g.t_i;
-               space = get_space_to();
+       case PKT_STREAM_DATA_TO_P1:
+       case PKT_STREAM_DATA_TO_P2:
+               p = pkt->type == PKT_STREAM_DATA_TO_P1 ? 0 : 1;
+               pos_to_i = g.pos_to_p[p].i;
+               space = get_space_to(p);
                if (space <= pkt->size / STREAM_EL_SZ) {
                        printf("got data pkt while space=%d\n", space);
                        return;
                }
                for (i = 0; i < pkt->size / STREAM_EL_SZ; i++) {
-                       memcpy(&g.stream_to[t_i++],
+                       memcpy(&g.stream_to[p][pos_to_i++],
                               pkt->data + i * STREAM_EL_SZ,
                               STREAM_EL_SZ);
-                       t_i &= STREAM_BUF_MASK;
+                       pos_to_i &= STREAM_BUF_MASK;
                }
-               g.t_i = t_i;
+               g.pos_to_p[p].i = pos_to_i;
                break;
        default:
                printf("got unknown pkt type: %04x\n", pkt->type);
@@ -392,6 +480,38 @@ static void do_usb(void *buf)
        }
 }
 
+static void check_get_data(int p)
+{
+       struct tas_pkt pkt;
+       uint8_t buf[64];
+       int ret;
+
+       if (get_space_to(p) <= sizeof(pkt.data) / STREAM_EL_SZ)
+               return;
+
+       if (g.pos_to_p[p].i == g.pos_to_p[p].o && g.frame_cnt != 0) {
+               printf("underflow detected\n");
+               g.stream_enable_to = 0;
+               return;
+       }
+
+       pkt.type = PKT_STREAM_REQ;
+       pkt.req.frame = g.frame_cnt;
+       pkt.req.is_p2 = p;
+
+       ret = usb_rawhid_send(&pkt, 1000);
+       if (ret != sizeof(pkt)) {
+               printf("send STREAM_REQ/%d: %d\n", p, ret);
+               return;
+       }
+
+       ret = usb_rawhid_recv(buf, 1000);
+       if (ret != 64)
+               printf("usb_rawhid_recv/s: %d\n", ret);
+       else
+               do_usb(buf);
+}
+
 int main(void)
 {
        uint32_t led_time = 0;
@@ -399,31 +519,31 @@ int main(void)
        uint32_t edge_cnt_last;
        uint32_t edge_cnt;
        uint8_t buf[64];
-       int ret;
+       int i, ret;
 
        delay(1000); // wait for usb..
 
        /* ?0SA 00DU, ?1CB RLDU */
-       g.fixed_state[0] = 0x33;
-       g.fixed_state[1] = 0x3f;
+       for (i = 0; i < 2; i++) {
+               g.pl[i].fixed_state[0] = 0x33;
+               g.pl[i].fixed_state[1] = 0x3f;
+       }
 
        printf("starting, rawhid: %d\n", usb_rawhid_available());
 
-       // 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    c6
-       // t pin     0 20  6  8  7 14  2    11
+       choose_isrs_idle();
+
+       // md pin   th tr tl  r  l  d  u vsync   th  tr  tl  r  l  d  u
+       //           7  9  6  4  3  2  1          7   9   6  4  3  2  1
+       // md bit*   6  5  4  3  2  1  0          6   5   4  3  2  1  0
+       // t bit    d6 d5 d4 d3 d2 d1 d0   a12   c0 b17 b16 b3 b2 b1 b0
+       // t pin    21 20  6  8  7 14  2     3   15   1   0 18 19 17 16
        // * - note: tl/tr mixed in most docs
-       pinMode(0, INPUT);
-       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);
-       SCB_SHPR1 = SCB_SHPR2 = SCB_SHPR3 = 0x10101010;
+
+       // player1
+       pinMode(21, INPUT);
+       attachInterrupt(21, pl1th_isr_fixed, CHANGE);
+       NVIC_SET_PRIORITY(IRQ_PORTD, 0);
 
        pinMode( 2, OUTPUT);
        pinMode(14, OUTPUT);
@@ -432,9 +552,29 @@ int main(void)
        pinMode( 6, OUTPUT);
        pinMode(20, OUTPUT);
 
+       // player2
+       pinMode(15, INPUT);
+       attachInterrupt(15, pl1th_isr_fixed, CHANGE);
+       NVIC_SET_PRIORITY(IRQ_PORTC, 0);
+
+       pinMode(16, OUTPUT);
+       pinMode(17, OUTPUT);
+       pinMode(19, OUTPUT);
+       pinMode(18, OUTPUT);
+       pinMode( 0, OUTPUT);
+       pinMode( 1, OUTPUT);
+
+       // vsync line
+       pinMode(3, INPUT);
+       attachInterrupt(3, vsync_isr_nop, RISING);
+       NVIC_SET_PRIORITY(IRQ_PORTA, 16);
+
        // led
        pinMode(13, OUTPUT);
 
+       // lower other priorities
+       SCB_SHPR1 = SCB_SHPR2 = SCB_SHPR3 = 0x10101010;
+
        // 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);
@@ -453,44 +593,25 @@ int main(void)
                struct tas_pkt pkt;
                uint32_t now;
 
-               while (g.stream_enable_to && !g.stream_ended
-                 && get_space_to() > sizeof(pkt.data) / STREAM_EL_SZ)
-               {
-                       if (g.t_i == g.t_o && g.frame_cnt != 0) {
-                               printf("underflow detected\n");
-                               g.stream_enable_to = 0;
-                               break;
-                       }
-
-                       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;
-                       }
-
-                       ret = usb_rawhid_recv(buf, 1000);
-                       if (ret != 64)
-                               printf("usb_rawhid_recv/s: %d\n", ret);
-                       else
-                               do_usb(buf);
+               if (g.stream_enable_to && !g.stream_ended) {
+                       check_get_data(0);
+                       if (g.inc_mode == INC_MODE_SHARED_PL2)
+                               check_get_data(1);
                }
 
                while (g.stream_enable_from && !g.stream_ended
                  && get_used_from() >= sizeof(pkt.data) / STREAM_EL_SZ)
                {
-                       uint32_t f_o;
+                       uint32_t o;
                        int i;
 
-                       f_o = g.f_o;
+                       o = g.pos_from.o;
                        for (i = 0; i < sizeof(pkt.data); i += STREAM_EL_SZ) {
-                               memcpy(pkt.data + i, &g.stream_from[f_o++],
+                               memcpy(pkt.data + i, &g.stream_from[o++],
                                        STREAM_EL_SZ);
-                               f_o &= STREAM_BUF_MASK;
+                               o &= STREAM_BUF_MASK;
                        }
-                       g.f_o = f_o;
+                       g.pos_from.o = o;
 
                        pkt.type = PKT_STREAM_DATA_FROM;
                        pkt.size = i;
@@ -508,7 +629,7 @@ int main(void)
                if (now - scheck_time > 1000) {
                        edge_cnt = g.edge_cnt;
                        //printf("e: %d th: %d\n", edge_cnt - edge_cnt_last,
-                       //      (GPIOB_PDIR >> CORE_PIN0_BIT) & 1);
+                       //      PL1_TH());
                        if ((g.stream_enable_to || g.stream_enable_from)
                            && !g.stream_started
                            && edge_cnt - edge_cnt_last > 10000)
diff --git a/pkts.h b/pkts.h
index 16877f6..4c25019 100644 (file)
--- a/pkts.h
+++ b/pkts.h
@@ -1,12 +1,13 @@
 
 enum tas_pkt_type {
-       PKT_FIXED_STATE      = 0xef01,
-       PKT_STREAM_ENABLE    = 0xef02,
-       PKT_STREAM_REQ       = 0xef03,
-       PKT_STREAM_DATA_TO   = 0xef04,
-       PKT_STREAM_DATA_FROM = 0xef05,
-       PKT_STREAM_END       = 0xef06,
-       PKT_STREAM_ABORT     = 0xef07,
+       PKT_FIXED_STATE       = 0xef01,
+       PKT_STREAM_ENABLE     = 0xef02,
+       PKT_STREAM_REQ        = 0xef03,
+       PKT_STREAM_DATA_TO_P1 = 0xef04,
+       PKT_STREAM_DATA_TO_P2 = 0xef05,
+       PKT_STREAM_DATA_FROM  = 0xef06,
+       PKT_STREAM_END        = 0xef07,
+       PKT_STREAM_ABORT      = 0xef08,
 };
 
 struct tas_pkt {
@@ -16,13 +17,21 @@ struct tas_pkt {
                uint8_t data[60];
                struct {
                        uint32_t frame; // just fyi
+                       uint8_t is_p2;
                } req;
                struct {
                        uint8_t stream_to;
                        uint8_t stream_from;
                        // frame increment on read
-                       uint8_t use_readinc;
+                       uint8_t inc_mode;
                        uint8_t no_start_seq;
                } enable;
        };
 } __attribute__((packed));
+
+enum inc_mode {
+       INC_MODE_VSYNC = 0,
+       // shared stream index incremented by pl1 or pl2
+       INC_MODE_SHARED_PL1 = 1,
+       INC_MODE_SHARED_PL2 = 2,
+};