/*
 * Here we are going to implement Tx on Ater toward the TRAU.
 */

#include <stdint.h>
#include <stdbool.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <unistd.h>

#include <osmocom/core/msgb.h>
#include <osmocom/core/select.h>
#include <osmocom/isdn/i460_mux.h>
#include <osmocom/trau/trau_frame.h>

#include "globals.h"
#include "submux.h"
#include "out_frame.h"

void init_trau_ul_frame(int nr)
{
	struct ater_subslot *at = &subslots[nr];
	struct osmo_trau_frame *fr = &at->ul_frame;

	fr->type = at->is_efr ? OSMO_TRAU16_FT_EFR : OSMO_TRAU16_FT_FR;
	fr->dir = OSMO_TRAU_DIR_UL;
	memset(fr->c_bits + 5, 0, 6);
	memset(fr->c_bits + 15, 1, 6);
	memset(fr->t_bits, 1, 4);
}

static void handle_play(struct ater_subslot *at)
{
	if (at->play_wait_align) {
		if (at->mfrm_count)
			return;
		at->play_wait_align = false;
	}
	trau_frame_from_record(at->play_buffer + at->play_buf_ptr * 34,
				at->is_efr, &at->ul_frame);
	at->play_buf_ptr++;
	if (at->play_buf_ptr < at->play_buf_total)
		return;
	free(at->play_buffer);
	at->play_buffer = NULL;
	printf("file play finished\n");
}

static void tx_service_subslot(int nr)
{
	struct ater_subslot *at = &subslots[nr];
	struct osmo_trau_frame *fr = &at->ul_frame;
	struct msgb *msg;
	int len;

	if (!at->is_active)
		return;
	if (at->play_buffer)
		handle_play(at);
	at->mfrm_count++;
	if (at->mfrm_count >= 24) {
		at->mfrm_count = 0;
		fr->c_bits[14] = 1;
	} else {
		fr->c_bits[14] = 0;
	}
	msg = msgb_alloc_c(g_ctx, 640, "TRAU-UL-frame");
	if (!msg)
		return;
	len = osmo_trau_frame_encode(msg->tail, msgb_tailroom(msg), fr);
	if (len <= 0) {
		msgb_free(msg);
		return;
	}
	msgb_put(msg, len);
	osmo_i460_mux_enqueue(at->schan, msg);
}

void transmit_e1_ts(void)
{
	uint8_t buf[160];
	int nr;

	for (nr = 0; nr < ATER_SUBSLOTS; nr++)
		tx_service_subslot(nr);
	osmo_i460_mux_out(&i460_ts, buf, 160);
	write(ts_fd, buf, 160);
}