forked from PAWPAW-Mirror/lib_xua
145 lines
3.7 KiB
Plaintext
145 lines
3.7 KiB
Plaintext
// Copyright 2017-2022 XMOS LIMITED.
|
|
// This Software is subject to the terms of the XMOS Public Licence: Version 1.
|
|
|
|
/* A very simple *example* of a USB audio application (and as such is un-verified for production)
|
|
*
|
|
* It uses the main blocks from the lib_xua
|
|
*
|
|
* - 2 channels out I2S only
|
|
* - No DFU
|
|
* - I2S only
|
|
*
|
|
*/
|
|
|
|
#include <xs1.h>
|
|
#include <platform.h>
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <stdint.h>
|
|
#include <xclib.h>
|
|
|
|
#include "xua.h"
|
|
#include "xud_device.h"
|
|
#include "midiinparse.h"
|
|
#include "midioutparse.h"
|
|
|
|
on tile[MIDI_TILE] : port p_midi_tx = XS1_PORT_4C;
|
|
#if(MIDI_RX_PORT_WIDTH == 4)
|
|
on tile[MIDI_TILE] : buffered in port:4 p_midi_rx = XS1_PORT_1F;
|
|
#elif(MIDI_RX_PORT_WIDTH == 1)
|
|
on tile[MIDI_TILE] : buffered in port:1 p_midi_rx = XS1_PORT_1F;
|
|
#endif
|
|
#define CLKBLK_MIDI XS1_CLKBLK_2
|
|
on tile[MIDI_TILE] : clock clk_midi = CLKBLK_MIDI;
|
|
|
|
#define MAX_TEST_COMMANDS 10
|
|
#define TEST_COMMAND_FILE "midi_tx_cmds.txt"
|
|
|
|
/* See hwsupport.xc */
|
|
void ctrlPort();
|
|
|
|
#define CABLE_NUM 0
|
|
|
|
|
|
unsigned mini_in_parse_helper(unsigned midi[3]){
|
|
// printf("Composing data: 0x%x 0x%x 0x%x\n", midi[0], midi[1], midi[2]);
|
|
|
|
struct midi_in_parse_state m_state;
|
|
reset_midi_state(m_state);
|
|
|
|
unsigned valid = 0;
|
|
unsigned packed = 0;
|
|
|
|
for(int i = 0; i < 3; i++){
|
|
{valid, packed} = midi_in_parse(m_state, CABLE_NUM, midi[i]);
|
|
if(valid){
|
|
return packed;
|
|
}
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
unsigned parse_cmd_line(uint8_t commands[MAX_TEST_COMMANDS][3])
|
|
{
|
|
FILE * movable fptr_tx = fopen(TEST_COMMAND_FILE,"rt");
|
|
if (fptr_tx == NULL) {
|
|
printf("ERROR: TX command file %s not found or unable to open.\n", TEST_COMMAND_FILE);
|
|
fclose(move(fptr_tx));
|
|
return 0;
|
|
}
|
|
|
|
unsigned line = 0;
|
|
|
|
unsigned a,b,c;
|
|
while (fscanf(fptr_tx, "%u %u %u\n", &a, &b, &c) == 3) {
|
|
commands[line][0] = a;
|
|
commands[line][1] = b;
|
|
commands[line][2] = c;
|
|
// printf("Line %u params: 0x%x 0x%x 0x%x\n", line, commands[line][0], commands[line][1], commands[line][2]);
|
|
line++;
|
|
if(line > MAX_TEST_COMMANDS){
|
|
printf("ERROR: Too many lines in TX command file\n");
|
|
|
|
fclose(move(fptr_tx));
|
|
return MAX_TEST_COMMANDS;
|
|
}
|
|
}
|
|
|
|
fclose(move(fptr_tx));
|
|
return line;
|
|
}
|
|
|
|
void test(chanend c_midi){
|
|
uint8_t commands[MAX_TEST_COMMANDS][3] = {{0}};
|
|
unsigned num_tx = parse_cmd_line(commands);
|
|
|
|
int is_ack;
|
|
unsigned datum;
|
|
|
|
unsigned line = 0;
|
|
while(1){
|
|
select{
|
|
case midi_get_ack_or_data(c_midi, is_ack, datum):
|
|
// printf("ACK: %d Datum: 0x%x\n", is_ack, datum);
|
|
line++;
|
|
if(line == num_tx){
|
|
delay_microseconds(200); // Allow frame to complete
|
|
exit(0);
|
|
}
|
|
break;
|
|
|
|
default:
|
|
if(num_tx){
|
|
unsigned midi[] = {commands[line][0], commands[line][1], commands[line][2]};
|
|
unsigned tx_packet = mini_in_parse_helper(midi);
|
|
outuint(c_midi, byterev(tx_packet));
|
|
// printf("SEND TO MIDI: 0x%x\n", tx_packet);
|
|
delay_milliseconds(2); // 30 bits at 31.25 kbps is 0.96ms
|
|
} else {
|
|
exit(0);
|
|
}
|
|
break;
|
|
}
|
|
}
|
|
|
|
}
|
|
|
|
|
|
int main(void)
|
|
{
|
|
chan c_midi;
|
|
|
|
par
|
|
{
|
|
on tile[0]: test(c_midi);
|
|
on tile[1]: usb_midi(p_midi_rx, p_midi_tx, clk_midi, c_midi, 0);
|
|
|
|
// Setup HW so we can run this on the MC board
|
|
on tile[0]: ctrlPort();
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
|