/*
    Copyright (C) 2012-2013 Carl Hetherington <cth@carlh.net>

    This program is free software; you can redistribute it and/or modify
    it under the terms of the GNU General Public License as published by
    the Free Software Foundation; either version 2 of the License, or
    (at your option) any later version.

    This program is distributed in the hope that it will be useful,
    but WITHOUT ANY WARRANTY; without even the implied warranty of
    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
    GNU General Public License for more details.

    You should have received a copy of the GNU General Public License
    along with this program; if not, write to the Free Software
    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.

*/

#include <iostream>
#include <boost/filesystem.hpp>
#include <Magick++.h>
#include "image_content.h"
#include "image_decoder.h"
#include "image.h"
#include "film.h"
#include "exceptions.h"

#include "i18n.h"

using std::cout;
using boost::shared_ptr;
using libdcp::Size;

ImageDecoder::ImageDecoder (shared_ptr<const Film> f, shared_ptr<const ImageContent> c)
	: Decoder (f)
	, VideoDecoder (f, c)
	, _image_content (c)
	, _video_position (0)
{

}

bool
ImageDecoder::pass ()
{
	if (_video_position >= _image_content->video_length ()) {
		return true;
	}

	if (_image && _image_content->still ()) {
		video (_image, true, _video_position * TIME_HZ / _video_content->video_frame_rate ());
		++_video_position;
		return false;
	}

	Magick::Image* magick_image = 0;
	boost::filesystem::path const path = _image_content->path (_image_content->still() ? 0 : _video_position);
	try {
		magick_image = new Magick::Image (path.string ());
	} catch (...) {
		throw OpenFileError (path);
	}
	
	libdcp::Size size (magick_image->columns(), magick_image->rows());

	_image.reset (new Image (PIX_FMT_RGB24, size, true));

	using namespace MagickCore;
	
	uint8_t* p = _image->data()[0];
	for (int y = 0; y < size.height; ++y) {
		uint8_t* q = p;
		for (int x = 0; x < size.width; ++x) {
			Magick::Color c = magick_image->pixelColor (x, y);
			*q++ = c.redQuantum() * 255 / QuantumRange;
			*q++ = c.greenQuantum() * 255 / QuantumRange;
			*q++ = c.blueQuantum() * 255 / QuantumRange;
		}
		p += _image->stride()[0];
	}

	delete magick_image;

	video (_image, false, _video_position * TIME_HZ / _video_content->video_frame_rate ());
	++_video_position;

	return false;
}

void
ImageDecoder::seek (ContentTime time, bool accurate)
{
	Decoder::seek (time, accurate);
	
	_video_position = rint (time * _video_content->video_frame_rate() / TIME_HZ);
}