void krad_transmitter_mkv_test2 (int port, char *filename1, char *filename2) {
krad_transmitter_t *transmitter;
kr_mkv_t *mkv_tx;
kr_mkv_t *in[2];
krad_ticker_t *ticker;
int i;
int ret;
uint32_t track;
int bytes_read;
uint32_t out_track;
uint64_t start_tc;
uint64_t timecode;
uint64_t last_tc;
uint64_t sleeptime;
uint8_t *buffer;
int keyframe;
uint8_t flags;
int packets;
start_tc = 0;
last_tc = 0;
packets = 0;
char *stream_name = "stream.webm";
char *content_type = "video/webm";
buffer = malloc (10000000);
for (i = 0; i < 2; i++) {
if (i == 0) {
in[i] = kr_mkv_open_file (filename1);
} else {
in[i] = kr_mkv_open_file (filename2);
}
printf ("File %d: FPS %d/%d RES %dx%d\n",
i,
in[i]->tracks[VIDEO_TRACK].fps_numerator,
in[i]->tracks[VIDEO_TRACK].fps_denominator,
in[i]->tracks[VIDEO_TRACK].width,
in[i]->tracks[VIDEO_TRACK].height);
if ((i == 0) && (in[i] == NULL)) {
fprintf (stderr, "Could not open input file1: %s\n", filename1);
exit (1);
}
if ((i == 1) && (in[i] == NULL)) {
fprintf (stderr, "Could not open input file2: %s\n", filename2);
exit (1);
}
}
if ((in[0]->tracks[VIDEO_TRACK].width != in[0]->tracks[VIDEO_TRACK].width) ||
(in[1]->tracks[VIDEO_TRACK].height != in[1]->tracks[VIDEO_TRACK].height)) {
fprintf (stderr, "Resolutions are not equal\n");
exit (1);
}
ticker = krad_ticker_throttle_create ();
transmitter = krad_transmitter_create ();
ret = krad_transmitter_listen_on (transmitter, port);
if (ret != 0) {
fprintf (stderr, "transmitter could not listen on port %d\n", port);
exit (1);
}
mkv_tx = kr_mkv_create_transmission (transmitter, stream_name, content_type);
if (mkv_tx == NULL) {
fprintf (stderr, "Could not create mkv transmission\n");
exit (1);
}
out_track = kr_mkv_add_video_track (mkv_tx, VP8,
30,
1,
in[0]->tracks[VIDEO_TRACK].width,
in[0]->tracks[VIDEO_TRACK].height);
printf ("Added new track: %d\n", out_track);
for (i = 0; i < 2; i++) {
while ((bytes_read = kr_mkv_read_packet (in[i], &track, &timecode, &flags, buffer)) > 0) {
if (start_tc == 0) {
start_tc = timecode;
krad_ticker_start (ticker);
}
if (flags == 0x80) {
keyframe = 1;
} else {
keyframe = 0;
}
printf ("\rFile %d Packet %10d track %d sync %d timecode %14"PRIu64"s",
i, packets++, track, keyframe, timecode / 1000);
fflush (stdout);
if (track == 1) {
kr_mkv_add_video (mkv_tx, out_track, buffer, bytes_read, keyframe);
}
if ((last_tc) && (last_tc < timecode)) {
sleeptime = (timecode - start_tc) - (last_tc - start_tc);
krad_ticker_throttle (ticker, sleeptime);
}
if (timecode > last_tc) {
last_tc = timecode;
}
}
}
krad_ticker_destroy (ticker);
kr_mkv_destroy (&in[0]);
kr_mkv_destroy (&in[1]);
kr_mkv_destroy (&mkv_tx);
krad_transmitter_destroy (transmitter);
free (buffer);
}
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;
}
