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]);
/* 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);
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)
{
}
}
- *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)
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)
{
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++;
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)
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;
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;
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) {
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 */
}
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 {
// 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));
}
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));
#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)
{
}
-/* 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++;
}
{
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++;
}
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)
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;
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();
for (tout = 100000; tout > 0; tout--) {
udelay(1);
- if (GPIOB_PDIR & CORE_PIN0_BITMASK)
+ if (PL1_TH())
break;
}
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;
}
// 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();
/* 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();
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);
}
}
+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;
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);
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);
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;
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)