switch_status_t spandsp_tdd_decode_session(switch_core_session_t *session)
{
switch_channel_t *channel = switch_core_session_get_channel(session);
switch_media_bug_t *bug;
switch_status_t status;
switch_tdd_t *pvt;
//switch_codec_implementation_t read_impl = { 0 };
//switch_core_session_get_read_impl(session, &read_impl);
if (!(pvt = switch_core_session_alloc(session, sizeof(*pvt)))) {
return SWITCH_STATUS_MEMERR;
}
pvt->session = session;
pvt->tdd_state = v18_init(NULL, FALSE, get_v18_mode(session), put_text_msg, pvt);
if ((status = switch_core_media_bug_add(session, "spandsp_tdd_decode", NULL,
tdd_decode_callback, pvt, 0, SMBF_READ_REPLACE | SMBF_NO_PAUSE, &bug)) != SWITCH_STATUS_SUCCESS) {
v18_free(pvt->tdd_state);
return status;
}
switch_channel_set_private(channel, "tdd_decode", bug);
return SWITCH_STATUS_SUCCESS;
}
///XXX
static switch_bool_t tdd_decode_callback(switch_media_bug_t *bug, void *user_data, switch_abc_type_t type)
{
switch_tdd_t *pvt = (switch_tdd_t *) user_data;
switch_frame_t *frame = NULL;
switch_bool_t r = SWITCH_TRUE;
switch (type) {
case SWITCH_ABC_TYPE_INIT: {
break;
}
case SWITCH_ABC_TYPE_CLOSE:
if (pvt->tdd_state) {
v18_free(pvt->tdd_state);
}
break;
case SWITCH_ABC_TYPE_READ_REPLACE:
if ((frame = switch_core_media_bug_get_read_replace_frame(bug))) {
v18_rx(pvt->tdd_state, frame->data, frame->samples);
switch_core_media_bug_set_read_replace_frame(bug, frame);
}
break;
case SWITCH_ABC_TYPE_WRITE:
default:
break;
}
return r;
}
switch_status_t spandsp_tdd_send_session(switch_core_session_t *session, const char *text)
{
v18_state_t *tdd_state;
switch_frame_t *read_frame, write_frame = { 0 };
uint8_t write_buf[SWITCH_RECOMMENDED_BUFFER_SIZE];
switch_codec_implementation_t read_impl = { 0 };
switch_codec_t write_codec = { 0 };
switch_channel_t *channel = switch_core_session_get_channel(session);
switch_status_t status;
switch_core_session_get_read_impl(session, &read_impl);
if (switch_core_codec_init(&write_codec,
"L16",
NULL,
read_impl.actual_samples_per_second,
read_impl.microseconds_per_packet / 1000,
read_impl.number_of_channels,
SWITCH_CODEC_FLAG_ENCODE | SWITCH_CODEC_FLAG_DECODE, NULL,
switch_core_session_get_pool(session)) == SWITCH_STATUS_SUCCESS) {
write_frame.data = write_buf;
write_frame.buflen = sizeof(write_buf);
write_frame.datalen = read_impl.decoded_bytes_per_packet;
write_frame.samples = write_frame.datalen / 2;
write_frame.codec = &write_codec;
switch_core_session_set_read_codec(session, &write_codec);
} else {
return SWITCH_STATUS_FALSE;
}
tdd_state = v18_init(NULL, TRUE, get_v18_mode(session), put_text_msg, NULL);
v18_put(tdd_state, text, -1);
while(switch_channel_ready(channel)) {
status = switch_core_session_read_frame(session, &read_frame, SWITCH_IO_FLAG_NONE, 0);
if (!SWITCH_READ_ACCEPTABLE(status)) {
break;
}
if (!v18_tx(tdd_state, (void *)write_buf, write_frame.samples)) {
break;
}
if (switch_core_session_write_frame(session, &write_frame, SWITCH_IO_FLAG_NONE, 0) != SWITCH_STATUS_SUCCESS) {
break;
}
}
switch_core_codec_destroy(&write_codec);
switch_core_session_set_read_codec(session, NULL);
v18_free(tdd_state);
return SWITCH_STATUS_SUCCESS;
}
static switch_bool_t tdd_encode_callback(switch_media_bug_t *bug, void *user_data, switch_abc_type_t type)
{
switch_tdd_t *pvt = (switch_tdd_t *) user_data;
switch_frame_t *frame = NULL;
switch_bool_t r = SWITCH_TRUE;
switch (type) {
case SWITCH_ABC_TYPE_INIT: {
break;
}
case SWITCH_ABC_TYPE_CLOSE:
if (pvt->tdd_state) {
v18_free(pvt->tdd_state);
}
break;
case SWITCH_ABC_TYPE_WRITE_REPLACE:
if ((frame = switch_core_media_bug_get_write_replace_frame(bug))) {
int len;
if (pvt->tail_lead) {
if (!--pvt->tail_lead) {
r = SWITCH_FALSE;
}
memset(frame->data, 0, frame->datalen);
} else if (pvt->head_lead) {
pvt->head_lead--;
memset(frame->data, 0, frame->datalen);
} else {
len = v18_tx(pvt->tdd_state, frame->data, frame->samples);
if (!len) {
pvt->tail_lead = TDD_LEAD;
}
}
switch_core_media_bug_set_write_replace_frame(bug, frame);
}
break;
case SWITCH_ABC_TYPE_WRITE:
default:
break;
}
return r;
}
static void basic_tests(int mode)
{
int16_t amp[SAMPLES_PER_CHUNK];
int outframes;
int len;
int push;
int i;
v18_state_t *v18_a;
v18_state_t *v18_b;
printf("Testing %s\n", v18_mode_to_str(mode));
v18_a = v18_init(NULL, TRUE, mode, put_text_msg, NULL);
v18_b = v18_init(NULL, FALSE, mode, put_text_msg, NULL);
/* Fake an OK condition for the first message test */
good_message_received = TRUE;
push = 0;
if (v18_put(v18_a, qbf_tx, -1) != strlen(qbf_tx))
{
printf("V.18 put failed\n");
exit(2);
}
for (i = 0; i < 100000; i++)
{
if (push == 0)
{
if ((len = v18_tx(v18_a, amp, SAMPLES_PER_CHUNK)) == 0)
push = 10;
}
else
{
len = 0;
/* Push a little silence through, to flush things out */
if (--push == 0)
{
if (!good_message_received)
{
printf("No message received\n");
exit(2);
}
good_message_received = FALSE;
if (v18_put(v18_a, qbf_tx, -1) != strlen(qbf_tx))
{
printf("V.18 put failed\n");
exit(2);
}
}
}
if (len < SAMPLES_PER_CHUNK)
{
memset(&[len], 0, sizeof(int16_t)*(SAMPLES_PER_CHUNK - len));
len = SAMPLES_PER_CHUNK;
}
if (log_audio)
{
outframes = sf_writef_short(outhandle, amp, len);
if (outframes != len)
{
fprintf(stderr, " Error writing audio file\n");
exit(2);
}
}
v18_rx(v18_b, amp, len);
}
v18_free(v18_a);
v18_free(v18_b);
}
static void basic_tests(int mode)
{
int16_t amp[SAMPLES_PER_CHUNK];
int outframes;
int len;
int push;
int i;
v18_state_t *v18_a;
v18_state_t *v18_b;
printf("Testing %s\n", v18_mode_to_str(mode));
v18_a = v18_init(NULL, TRUE, mode, put_text_msg, NULL);
v18_b = v18_init(NULL, FALSE, mode, put_text_msg, NULL);
/* Fake an OK condition for the first message test */
good_message_received = TRUE;
push = 0;
v18_put(v18_a, "The quick Brown Fox Jumps Over The Lazy dog 0123456789!@#$%^&*()", -1);
for (i = 0; i < 100000; i++)
{
if (push == 0)
{
if ((len = v18_tx(v18_a, amp, SAMPLES_PER_CHUNK)) == 0)
push = 10;
}
else
{
len = 0;
/* Push a little silence through, to flush things out */
if (--push == 0)
{
if (!good_message_received)
{
printf("No message received\n");
exit(2);
}
good_message_received = FALSE;
v18_put(v18_a, "The quick Brown Fox Jumps Over The Lazy dog 0123456789!@#$%^&*()", -1);
}
}
if (len < SAMPLES_PER_CHUNK)
{
memset(&[len], 0, sizeof(int16_t)*(SAMPLES_PER_CHUNK - len));
len = SAMPLES_PER_CHUNK;
}
if (log_audio)
{
outframes = afWriteFrames(outhandle,
AF_DEFAULT_TRACK,
amp,
len);
if (outframes != len)
{
fprintf(stderr, " Error writing wave file\n");
exit(2);
}
}
v18_rx(v18_b, amp, len);
}
v18_free(v18_a);
v18_free(v18_b);
}
