void krad_transmitter_destroy (krad_transmitter_t *krad_transmitter) {
int t;
t = 0;
if (krad_transmitter->listening == 1) {
krad_transmitter_stop_listening (krad_transmitter);
}
pthread_rwlock_wrlock (&krad_transmitter->krad_transmissions_rwlock);
for (t = 0; t < DEFAULT_MAX_TRANSMISSIONS; t++) {
if (krad_transmitter->krad_transmissions[t].active == 1) {
krad_transmitter_transmission_destroy (&krad_transmitter->krad_transmissions[t]);
}
}
free (krad_transmitter->krad_transmission_receivers);
free (krad_transmitter->krad_transmissions);
pthread_rwlock_unlock (&krad_transmitter->krad_transmissions_rwlock);
pthread_rwlock_destroy (&krad_transmitter->krad_transmissions_rwlock);
free (krad_transmitter);
printk ("Krad Transmitter: Destroyed!");
}
int krad_transmitter_listen_on (krad_transmitter_t *krad_transmitter, uint16_t port) {
int ret;
int r;
int on;
on = 1;
r = 0;
ret = 0;
if (krad_transmitter->listening == 1) {
krad_transmitter_stop_listening (krad_transmitter);
}
if (port == 0) {
return -1;
}
krad_transmitter->port = port;
krad_transmitter->listening = 1;
krad_transmitter->local_address.sin_family = AF_INET;
krad_transmitter->local_address.sin_port = htons (krad_transmitter->port);
krad_transmitter->local_address.sin_addr.s_addr = htonl (INADDR_ANY);
if ((krad_transmitter->incoming_connections_sd = socket (AF_INET, SOCK_STREAM, 0)) < 0) {
printke ("Krad Transmitter: system call socket error");
krad_transmitter->listening = 0;
krad_transmitter->port = 0;
return -1;
}
if ((setsockopt (krad_transmitter->incoming_connections_sd, SOL_SOCKET, SO_REUSEADDR, (char *)&on, sizeof(on))) < 0) {
printke ("Krad Transmitter: Could not setsockopt SO_REUSEADDR");
}
if (bind (krad_transmitter->incoming_connections_sd, (struct sockaddr *)&krad_transmitter->local_address,
sizeof(krad_transmitter->local_address)) == -1) {
krad_transmitter->listening = 0;
krad_transmitter->port = 0;
close (krad_transmitter->incoming_connections_sd);
printke ("Krad Transmitter: bind error for tcp port %d", krad_transmitter->port);
return -1;
}
printk ("Krad Transmitter: Listening on port %d", krad_transmitter->port);
if (listen (krad_transmitter->incoming_connections_sd, SOMAXCONN) < 0) {
printke ("Krad Transmitter: system call listen error");
krad_transmitter->listening = 0;
krad_transmitter->port = 0;
close (krad_transmitter->incoming_connections_sd);
return -1;
}
krad_system_set_socket_nonblocking (krad_transmitter->incoming_connections_sd);
krad_transmitter->incoming_connections_efd = epoll_create (0);
if (krad_transmitter->incoming_connections_efd == -1) {
krad_transmitter->listening = 0;
krad_transmitter->port = 0;
close (krad_transmitter->incoming_connections_sd);
close (krad_transmitter->incoming_connections_efd);
printke ("Krad Transmitter: epoll_create");
return -1;
}
krad_transmitter->event.data.fd = krad_transmitter->incoming_connections_sd;
krad_transmitter->event.events = EPOLLIN | EPOLLET;
ret = epoll_ctl (krad_transmitter->incoming_connections_efd, EPOLL_CTL_ADD,
krad_transmitter->incoming_connections_sd, &krad_transmitter->event);
if (ret == -1) {
printke ("Krad Transmitter: epoll_ctl");
krad_transmitter->listening = 0;
krad_transmitter->port = 0;
close (krad_transmitter->incoming_connections_sd);
close (krad_transmitter->incoming_connections_efd);
return -1;
}
krad_transmitter->incoming_connection_events = calloc (KRAD_TRANSMITTER_MAXEVENTS, sizeof (struct epoll_event));
if (krad_transmitter->incoming_connection_events == NULL) {
krad_transmitter->listening = 0;
krad_transmitter->port = 0;
close (krad_transmitter->incoming_connections_sd);
close (krad_transmitter->incoming_connections_efd);
printke ("Krad Transmitter: Out of memory!");
return -1;
}
krad_transmitter->krad_transmission_receivers = calloc (TOTAL_RECEIVERS, sizeof (krad_transmission_receiver_t));
if (krad_transmitter->krad_transmission_receivers == NULL) {
free (krad_transmitter->incoming_connection_events);
krad_transmitter->listening = 0;
krad_transmitter->port = 0;
close (krad_transmitter->incoming_connections_sd);
close (krad_transmitter->incoming_connections_efd);
printke ("Krad Transmitter: Out of memory!");
return -1;
}
for (r = 0; r < TOTAL_RECEIVERS; r++) {
krad_transmitter->krad_transmission_receivers[r].krad_transmitter = krad_transmitter;
}
pthread_create (&krad_transmitter->listening_thread, NULL, krad_transmitter_listening_thread, (void *)krad_transmitter);
return 0;
}
int krad_transponder_handler ( krad_transponder_t *krad_transponder, krad_ipc_server_t *krad_ipc ) {
krad_link_t *krad_link;
uint32_t ebml_id;
uint32_t command;
uint64_t ebml_data_size;
kr_address_t address;
uint64_t element;
uint64_t response;
uint64_t payload_loc;
char string[256];
uint64_t bigint;
//int regint;
uint8_t tinyint;
int k;
int devices;
//float floatval;
string[0] = '\0';
bigint = 0;
k = 0;
krad_ipc_server_read_command ( krad_ipc, &command, &ebml_data_size);
switch ( command ) {
case EBML_ID_KRAD_TRANSPONDER_CMD_LIST_LINKS:
//printk ("krad transponder handler! LIST_LINKS");
krad_Xtransponder_list ( krad_transponder->krad_Xtransponder );
krad_ipc_server_response_start ( krad_ipc, EBML_ID_KRAD_TRANSPONDER_MSG, &response);
for (k = 0; k < KRAD_TRANSPONDER_MAX_LINKS; k++) {
if (krad_transponder->krad_link[k] != NULL) {
printk ("Link %d Active: %s", k, krad_transponder->krad_link[k]->mount);
krad_transponder_link_to_ebml ( krad_ipc->current_client, krad_transponder->krad_link[k]);
}
}
krad_ipc_server_response_finish ( krad_ipc, response );
break;
case EBML_ID_KRAD_TRANSPONDER_CMD_CREATE_LINK:
for (k = 0; k < KRAD_TRANSPONDER_MAX_LINKS; k++) {
if (krad_transponder->krad_link[k] == NULL) {
krad_transponder->krad_link[k] = krad_link_prepare (k);
krad_link = krad_transponder->krad_link[k];
krad_link->link_num = k;
krad_link->krad_radio = krad_transponder->krad_radio;
krad_link->krad_transponder = krad_transponder;
krad_transponder_ebml_to_link ( krad_ipc, krad_link );
krad_link_start (krad_link);
/*
if ((krad_link->operation_mode == TRANSMIT) || (krad_link->operation_mode == RECORD)) {
if (krad_link_wait_codec_init (krad_link) == 0) {
krad_transponder_broadcast_link_created ( krad_ipc, krad_link );
}
} else {
krad_transponder_broadcast_link_created ( krad_ipc, krad_link );
}
*/
break;
}
}
break;
case EBML_ID_KRAD_TRANSPONDER_CMD_DESTROY_LINK:
tinyint = krad_ipc_server_read_number (krad_ipc, ebml_data_size);
k = tinyint;
//printk ("krad transponder handler! DESTROY_LINK: %d %u", k, tinyint);
if (krad_transponder->krad_link[k] != NULL) {
krad_link_destroy (krad_transponder->krad_link[k]);
krad_transponder->krad_link[k] = NULL;
}
/*
krad_ipc_server_simple_number_broadcast ( krad_ipc,
EBML_ID_KRAD_TRANSPONDER_MSG,
EBML_ID_KRAD_TRANSPONDER_LINK_DESTROYED,
EBML_ID_KRAD_TRANSPONDER_LINK_NUMBER,
k);
*/
break;
case EBML_ID_KRAD_TRANSPONDER_CMD_UPDATE_LINK:
//printk ("krad transponder handler! UPDATE_LINK");
krad_ebml_read_element (krad_ipc->current_client->krad_ebml, &ebml_id, &ebml_data_size);
if (ebml_id == EBML_ID_KRAD_TRANSPONDER_LINK_NUMBER) {
tinyint = krad_ipc_server_read_number (krad_ipc, ebml_data_size);
k = tinyint;
//printk ("krad transponder handler! UPDATE_LINK: %d %u", k, tinyint);
if (krad_transponder->krad_link[k] != NULL) {
krad_ebml_read_element (krad_ipc->current_client->krad_ebml, &ebml_id, &ebml_data_size);
if (krad_transponder->krad_link[k]->audio_codec == OPUS) {
/*
if (ebml_id == EBML_ID_KRAD_LINK_LINK_OPUS_APPLICATION) {
krad_ebml_read_string (krad_ipc->current_client->krad_ebml, string, ebml_data_size);
if (strncmp(string, "OPUS_APPLICATION_VOIP", 21) == 0) {
krad_opus_set_application (krad_transponder->krad_link[k]->krad_opus, OPUS_APPLICATION_VOIP);
}
if (strncmp(string, "OPUS_APPLICATION_AUDIO", 22) == 0) {
krad_opus_set_application (krad_transponder->krad_link[k]->krad_opus, OPUS_APPLICATION_AUDIO);
}
if (strncmp(string, "OPUS_APPLICATION_RESTRICTED_LOWDELAY", 36) == 0) {
krad_opus_set_application (krad_transponder->krad_link[k]->krad_opus, OPUS_APPLICATION_RESTRICTED_LOWDELAY);
}
}
*/
if (ebml_id == EBML_ID_KRAD_LINK_LINK_OPUS_SIGNAL) {
krad_ebml_read_string (krad_ipc->current_client->krad_ebml, string, ebml_data_size);
krad_opus_set_signal (krad_transponder->krad_link[k]->krad_opus,
krad_opus_string_to_signal(string));
}
if (ebml_id == EBML_ID_KRAD_LINK_LINK_OPUS_BANDWIDTH) {
krad_ebml_read_string (krad_ipc->current_client->krad_ebml, string, ebml_data_size);
krad_opus_set_bandwidth (krad_transponder->krad_link[k]->krad_opus,
krad_opus_string_to_bandwidth(string));
}
if (ebml_id == EBML_ID_KRAD_LINK_LINK_OPUS_BITRATE) {
bigint = krad_ebml_read_number (krad_ipc->current_client->krad_ebml, ebml_data_size);
if ((bigint >= 500) && (bigint <= 512000)) {
krad_opus_set_bitrate (krad_transponder->krad_link[k]->krad_opus, bigint);
}
}
if (ebml_id == EBML_ID_KRAD_LINK_LINK_OPUS_COMPLEXITY) {
bigint = krad_ebml_read_number (krad_ipc->current_client->krad_ebml, ebml_data_size);
if ((bigint >= 0) && (bigint <= 10)) {
krad_opus_set_complexity (krad_transponder->krad_link[k]->krad_opus, bigint);
}
}
if (ebml_id == EBML_ID_KRAD_LINK_LINK_OPUS_FRAME_SIZE) {
bigint = krad_ebml_read_number (krad_ipc->current_client->krad_ebml, ebml_data_size);
if ((bigint == 120) || (bigint == 240) || (bigint == 480) || (bigint == 960) || (bigint == 1920) || (bigint == 2880)) {
krad_opus_set_frame_size (krad_transponder->krad_link[k]->krad_opus, bigint);
}
}
//FIXME verify ogg container
if (ebml_id == EBML_ID_KRAD_LINK_LINK_OGG_MAX_PACKETS_PER_PAGE) {
bigint = krad_ebml_read_number (krad_ipc->current_client->krad_ebml, ebml_data_size);
if ((bigint > 0) && (bigint < 200)) {
krad_ogg_set_max_packets_per_page (krad_transponder->krad_link[k]->krad_container->krad_ogg, bigint);
}
}
}
if (krad_transponder->krad_link[k]->video_codec == THEORA) {
if (ebml_id == EBML_ID_KRAD_LINK_LINK_THEORA_QUALITY) {
bigint = krad_ebml_read_number (krad_ipc->current_client->krad_ebml, ebml_data_size);
krad_theora_encoder_quality_set (krad_transponder->krad_link[k]->krad_theora_encoder, bigint);
}
}
if (krad_transponder->krad_link[k]->video_codec == VP8) {
if (ebml_id == EBML_ID_KRAD_LINK_LINK_VP8_BITRATE) {
bigint = krad_ebml_read_number (krad_ipc->current_client->krad_ebml, ebml_data_size);
if (bigint > 0) {
krad_vpx_encoder_bitrate_set (krad_transponder->krad_link[k]->krad_vpx_encoder, bigint);
}
}
if (ebml_id == EBML_ID_KRAD_LINK_LINK_VP8_MIN_QUANTIZER) {
bigint = krad_ebml_read_number (krad_ipc->current_client->krad_ebml, ebml_data_size);
if (bigint > 0) {
krad_vpx_encoder_min_quantizer_set (krad_transponder->krad_link[k]->krad_vpx_encoder, bigint);
}
}
if (ebml_id == EBML_ID_KRAD_LINK_LINK_VP8_MAX_QUANTIZER) {
bigint = krad_ebml_read_number (krad_ipc->current_client->krad_ebml, ebml_data_size);
if (bigint > 0) {
krad_vpx_encoder_max_quantizer_set (krad_transponder->krad_link[k]->krad_vpx_encoder, bigint);
}
}
if (ebml_id == EBML_ID_KRAD_LINK_LINK_VP8_DEADLINE) {
bigint = krad_ebml_read_number (krad_ipc->current_client->krad_ebml, ebml_data_size);
if (bigint > 0) {
krad_vpx_encoder_deadline_set (krad_transponder->krad_link[k]->krad_vpx_encoder, bigint);
}
}
if (ebml_id == EBML_ID_KRAD_LINK_LINK_VP8_FORCE_KEYFRAME) {
bigint = krad_ebml_read_number (krad_ipc->current_client->krad_ebml, ebml_data_size);
if (bigint > 0) {
krad_vpx_encoder_want_keyframe (krad_transponder->krad_link[k]->krad_vpx_encoder);
}
}
}
/*
if ((ebml_id == EBML_ID_KRAD_LINK_LINK_OPUS_BANDWIDTH) || (ebml_id == EBML_ID_KRAD_LINK_LINK_OPUS_SIGNAL)) {
krad_ipc_server_advanced_string_broadcast ( krad_ipc,
EBML_ID_KRAD_TRANSPONDER_MSG,
EBML_ID_KRAD_TRANSPONDER_LINK_UPDATED,
EBML_ID_KRAD_TRANSPONDER_LINK_NUMBER,
k,
ebml_id,
string);
} else {
krad_ipc_server_advanced_number_broadcast ( krad_ipc,
EBML_ID_KRAD_TRANSPONDER_MSG,
EBML_ID_KRAD_TRANSPONDER_LINK_UPDATED,
EBML_ID_KRAD_TRANSPONDER_LINK_NUMBER,
k,
ebml_id,
bigint);
}
*/
}
}
break;
case EBML_ID_KRAD_TRANSPONDER_CMD_LIST_ADAPTERS:
address.path.unit = KR_TRANSPONDER;
address.path.subunit.transponder_subunit = KR_ADAPTER;
#ifdef KR_LINUX
devices = krad_v4l2_detect_devices ();
for (k = 0; k < devices; k++) {
if (krad_v4l2_get_device_filename (k, string) > 0) {
address.id.number = k;
krad_ipc_server_response_start_with_address_and_type ( krad_ipc,
&address,
EBML_ID_KRAD_SUBUNIT_INFO,
&response);
krad_ipc_server_payload_start ( krad_ipc, &payload_loc);
krad_ebml_write_string (krad_ipc->current_client->krad_ebml2, EBML_ID_KRAD_TRANSPONDER_V4L2_DEVICE_FILENAME, string);
//krad_ebml_start_element (kr_ipc->current_client->krad_ebml2, EBML_ID_KRAD_RADIO_REMOTE_STATUS, &element);
//krad_ipc_server_respond_string ( kr_ipc, EBML_ID_KRAD_RADIO_REMOTE_INTERFACE, kr_ipc->tcp_interface[i]);
//krad_ipc_server_respond_number ( kr_ipc, EBML_ID_KRAD_RADIO_REMOTE_PORT, kr_ipc->tcp_port[i]);
//krad_ebml_finish_element (kr_ipc->current_client->krad_ebml2, element);
krad_ipc_server_payload_finish ( krad_ipc, payload_loc );
krad_ipc_server_response_finish ( krad_ipc, response );
}
}
#endif
devices = krad_decklink_detect_devices();
for (k = 0; k < devices; k++) {
krad_decklink_get_device_name (k, string);
address.id.number = k;
krad_ipc_server_response_start_with_address_and_type ( krad_ipc,
&address,
EBML_ID_KRAD_SUBUNIT_INFO,
&response);
krad_ipc_server_payload_start ( krad_ipc, &payload_loc);
krad_ebml_write_string (krad_ipc->current_client->krad_ebml2, EBML_ID_KRAD_TRANSPONDER_DECKLINK_DEVICE_NAME, string);
//krad_ebml_start_element (kr_ipc->current_client->krad_ebml2, EBML_ID_KRAD_RADIO_REMOTE_STATUS, &element);
//krad_ipc_server_respond_string ( kr_ipc, EBML_ID_KRAD_RADIO_REMOTE_INTERFACE, kr_ipc->tcp_interface[i]);
//krad_ipc_server_respond_number ( kr_ipc, EBML_ID_KRAD_RADIO_REMOTE_PORT, kr_ipc->tcp_port[i]);
//krad_ebml_finish_element (kr_ipc->current_client->krad_ebml2, element);
krad_ipc_server_payload_finish ( krad_ipc, payload_loc );
krad_ipc_server_response_finish ( krad_ipc, response );
}
return 1;
case EBML_ID_KRAD_TRANSPONDER_CMD_LISTEN_ENABLE:
krad_ebml_read_element ( krad_ipc->current_client->krad_ebml, &ebml_id, &ebml_data_size);
if (ebml_id != EBML_ID_KRAD_RADIO_TCP_PORT) {
printke ("hrm wtf6");
}
bigint = krad_ebml_read_number ( krad_ipc->current_client->krad_ebml, ebml_data_size);
krad_receiver_listen_on (krad_transponder->krad_receiver, bigint);
break;
case EBML_ID_KRAD_TRANSPONDER_CMD_LISTEN_DISABLE:
krad_receiver_stop_listening (krad_transponder->krad_receiver);
break;
case EBML_ID_KRAD_TRANSPONDER_CMD_TRANSMITTER_ENABLE:
krad_ebml_read_element ( krad_ipc->current_client->krad_ebml, &ebml_id, &ebml_data_size);
if (ebml_id != EBML_ID_KRAD_RADIO_TCP_PORT) {
printke ("hrm wtf6");
}
bigint = krad_ebml_read_number ( krad_ipc->current_client->krad_ebml, ebml_data_size);
krad_transmitter_listen_on (krad_transponder->krad_transmitter, bigint);
break;
case EBML_ID_KRAD_TRANSPONDER_CMD_TRANSMITTER_DISABLE:
krad_transmitter_stop_listening (krad_transponder->krad_transmitter);
break;
}
return 0;
}
