#include "colormodels.h"
#include "funcprotos.h"
#include "quicktime.h"
#include "workarounds.h"
#include "v308.h"

#include <stdint.h>
#include <stdlib.h>


typedef struct
{
	unsigned char *work_buffer;
} quicktime_v308_codec_t;

static void delete_codec(quicktime_video_map_t *vtrack)
{
	quicktime_v308_codec_t *codec;

	codec = ((quicktime_codec_t*)vtrack->codec)->priv;
	if(codec->work_buffer) free(codec->work_buffer);
	free(codec);
}

static int reads_colormodel(quicktime_t *file, 
		int colormodel, 
		int track)
{
	return (colormodel == BC_RGB888 ||
		colormodel == BC_RGB_FLOAT ||
		colormodel == BC_RGBA_FLOAT ||
		colormodel == BC_RGBA8888 ||
		colormodel == BC_RGB161616 ||
		colormodel == BC_RGBA16161616 ||
		colormodel == BC_YUV888 ||
		colormodel == BC_YUVA8888 ||
		colormodel == BC_YUV161616 ||
		colormodel == BC_YUVA16161616 ||
		colormodel == BC_RGB8 ||
		colormodel == BC_RGB565 ||
		colormodel == BC_BGR888 ||
		colormodel == BC_BGR8888);
}

static int writes_colormodel(quicktime_t *file, 
		int colormodel, 
		int track)
{
	return (colormodel == BC_RGB888 ||
		colormodel == BC_RGB_FLOAT ||
		colormodel == BC_RGBA_FLOAT ||
		colormodel == BC_RGBA8888 ||
		colormodel == BC_RGB161616 ||
		colormodel == BC_RGBA16161616 ||
		colormodel == BC_YUV888 ||
		colormodel == BC_YUVA8888 ||
		colormodel == BC_YUV161616 ||
		colormodel == BC_YUVA16161616);
}


static int decode(quicktime_t *file, unsigned char **row_pointers, int track)
{
	unsigned char *data, **input_rows;
	int i, row_size, result;
	quicktime_video_map_t *vtrack = &(file->vtracks[track]);
	quicktime_v308_codec_t *codec = ((quicktime_codec_t*)vtrack->codec)->priv;
	int width = vtrack->track->tkhd.track_width;
	int height = vtrack->track->tkhd.track_height;
	int sz = width * height, bytes = sz * 3;
	if(!codec->work_buffer)
		codec->work_buffer = (unsigned char *)malloc(bytes);
	data = codec->work_buffer;

	quicktime_set_video_position(file, vtrack->current_position, track);
	bytes = quicktime_frame_size(file, vtrack->current_position, track);
	result = !quicktime_read_data(file, (char*)codec->work_buffer, bytes);

	input_rows = (unsigned char **)malloc(sizeof(*input_rows) * height);
	row_size = 3 * width;
	for( i=0; i<height; ++i ) input_rows[i] = data + i*row_size;

	cmodel_transfer(row_pointers, input_rows,
		row_pointers[0], row_pointers[1], row_pointers[2],
		0, 0, 0,
		file->in_x, file->in_y, file->in_w, file->in_h,
		0, 0, file->out_w, file->out_h,
		BC_VYU888, file->color_model,
		0, width, file->out_w);

	free(input_rows);
	return result;
}


static int encode(quicktime_t *file, unsigned char **row_pointers, int track)
{
//	int64_t offset = quicktime_position(file);
	unsigned char *data, **output_rows;
	int i, row_size, result;
	quicktime_video_map_t *vtrack = &(file->vtracks[track]);
	quicktime_v308_codec_t *codec = ((quicktime_codec_t*)vtrack->codec)->priv;
	quicktime_trak_t *trak = vtrack->track;
	quicktime_atom_t chunk_atom;
	int width = vtrack->track->tkhd.track_width;
	int height = vtrack->track->tkhd.track_height;
	int sz = width * height, bytes = sz * 3;
	if(!codec->work_buffer)
		codec->work_buffer = (unsigned char *)malloc(bytes);
	data = codec->work_buffer;

	output_rows = (unsigned char **)malloc(sizeof(*output_rows) * height);
	row_size = 3 * width;
	for( i=0; i<height; ++i ) output_rows[i] = data + i*row_size;

	cmodel_transfer(output_rows, row_pointers,
		0, 0, 0,
		row_pointers[0], row_pointers[1], row_pointers[2],
		0, 0, width, height,
		0, 0, width, height,
		file->color_model, BC_VYU888, 
		0, width, width);

	quicktime_write_chunk_header(file, trak, &chunk_atom);
	result = !quicktime_write_data(file, (char*)codec->work_buffer, bytes);
	quicktime_write_chunk_footer(file, trak, vtrack->current_chunk, &chunk_atom, 1);
	vtrack->current_chunk++;
	
	free(output_rows);
	return result;
}

void quicktime_init_codec_v308(quicktime_video_map_t *vtrack)
{
	quicktime_codec_t *codec_base = (quicktime_codec_t*)vtrack->codec;

/* Init public items */
	codec_base->priv = calloc(1, sizeof(quicktime_v308_codec_t));
	codec_base->delete_vcodec = delete_codec;
	codec_base->decode_video = decode;
	codec_base->encode_video = encode;
	codec_base->decode_audio = 0;
	codec_base->encode_audio = 0;
	codec_base->reads_colormodel = reads_colormodel;
	codec_base->writes_colormodel = writes_colormodel;
	codec_base->fourcc = QUICKTIME_YUV444;
	codec_base->title = "Component Y'CbCr 8-bit 4:4:4";
	codec_base->desc = "Component Y'CbCr 8-bit 4:4:4";
}