/*
    Copyright (C) 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 <libcxml/cxml.h>
#include "ffmpeg_content.h"
#include "ffmpeg_decoder.h"
#include "compose.hpp"
#include "job.h"
#include "util.h"
#include "log.h"

#include "i18n.h"

using std::string;
using std::stringstream;
using std::vector;
using std::list;
using std::cout;
using boost::shared_ptr;
using boost::lexical_cast;

int const FFmpegContentProperty::SUBTITLE_STREAMS = 100;
int const FFmpegContentProperty::SUBTITLE_STREAM = 101;
int const FFmpegContentProperty::AUDIO_STREAMS = 102;
int const FFmpegContentProperty::AUDIO_STREAM = 103;

FFmpegContent::FFmpegContent (boost::filesystem::path f)
	: Content (f)
	, VideoContent (f)
	, AudioContent (f)
{

}

FFmpegContent::FFmpegContent (shared_ptr<const cxml::Node> node)
	: Content (node)
	, VideoContent (node)
	, AudioContent (node)
{
	list<shared_ptr<cxml::Node> > c = node->node_children ("SubtitleStream");
	for (list<shared_ptr<cxml::Node> >::const_iterator i = c.begin(); i != c.end(); ++i) {
		_subtitle_streams.push_back (FFmpegSubtitleStream (*i));
		if ((*i)->optional_number_child<int> ("Selected")) {
			_subtitle_stream = _subtitle_streams.back ();
		}
	}

	c = node->node_children ("AudioStream");
	for (list<shared_ptr<cxml::Node> >::const_iterator i = c.begin(); i != c.end(); ++i) {
		_audio_streams.push_back (FFmpegAudioStream (*i));
		if ((*i)->optional_number_child<int> ("Selected")) {
			_audio_stream = _audio_streams.back ();
		}
	}
}

FFmpegContent::FFmpegContent (FFmpegContent const & o)
	: Content (o)
	, VideoContent (o)
	, AudioContent (o)
	, _subtitle_streams (o._subtitle_streams)
	, _subtitle_stream (o._subtitle_stream)
	, _audio_streams (o._audio_streams)
	, _audio_stream (o._audio_stream)
{

}

void
FFmpegContent::as_xml (xmlpp::Node* node) const
{
	node->add_child("Type")->add_child_text ("FFmpeg");
	Content::as_xml (node);
	VideoContent::as_xml (node);

	boost::mutex::scoped_lock lm (_mutex);

	for (vector<FFmpegSubtitleStream>::const_iterator i = _subtitle_streams.begin(); i != _subtitle_streams.end(); ++i) {
		xmlpp::Node* t = node->add_child("SubtitleStream");
		if (_subtitle_stream && *i == _subtitle_stream.get()) {
			t->add_child("Selected")->add_child_text("1");
		}
		i->as_xml (t);
	}

	for (vector<FFmpegAudioStream>::const_iterator i = _audio_streams.begin(); i != _audio_streams.end(); ++i) {
		xmlpp::Node* t = node->add_child("AudioStream");
		if (_audio_stream && *i == _audio_stream.get()) {
			t->add_child("Selected")->add_child_text("1");
		}
		i->as_xml (t);
	}
}

void
FFmpegContent::examine (shared_ptr<Film> film, shared_ptr<Job> job, bool quick)
{
	job->set_progress_unknown ();

	Content::examine (film, job, quick);

	shared_ptr<FFmpegDecoder> decoder (new FFmpegDecoder (film, shared_from_this (), true, false, false));

	ContentVideoFrame video_length = 0;
	if (quick) {
		video_length = decoder->video_length ();
                film->log()->log (String::compose ("Video length obtained from header as %1 frames", decoder->video_length ()));
        } else {
                while (!decoder->pass ()) {
                        /* keep going */
                }

                video_length = decoder->video_frame ();
                film->log()->log (String::compose ("Video length examined as %1 frames", decoder->video_frame ()));
        }

        {
                boost::mutex::scoped_lock lm (_mutex);

                _video_length = video_length;

                _subtitle_streams = decoder->subtitle_streams ();
                if (!_subtitle_streams.empty ()) {
                        _subtitle_stream = _subtitle_streams.front ();
                }
                
                _audio_streams = decoder->audio_streams ();
                if (!_audio_streams.empty ()) {
                        _audio_stream = _audio_streams.front ();
                }
        }

        take_from_video_decoder (decoder);

        signal_changed (VideoContentProperty::VIDEO_LENGTH);
        signal_changed (FFmpegContentProperty::SUBTITLE_STREAMS);
        signal_changed (FFmpegContentProperty::SUBTITLE_STREAM);
        signal_changed (FFmpegContentProperty::AUDIO_STREAMS);
        signal_changed (FFmpegContentProperty::AUDIO_STREAM);
        signal_changed (AudioContentProperty::AUDIO_CHANNELS);
}

string
FFmpegContent::summary () const
{
	return String::compose (_("Movie: %1"), file().filename().string());
}

string
FFmpegContent::information () const
{
	if (video_length() == 0 || video_frame_rate() == 0) {
		return "";
	}
	
	stringstream s;
	
	s << String::compose (_("%1 frames; %2 frames per second"), video_length(), video_frame_rate()) << "\n";
	s << VideoContent::information ();

	return s.str ();
}

void
FFmpegContent::set_subtitle_stream (FFmpegSubtitleStream s)
{
        {
                boost::mutex::scoped_lock lm (_mutex);
                _subtitle_stream = s;
        }

        signal_changed (FFmpegContentProperty::SUBTITLE_STREAM);
}

void
FFmpegContent::set_audio_stream (FFmpegAudioStream s)
{
        {
                boost::mutex::scoped_lock lm (_mutex);
                _audio_stream = s;
        }

        signal_changed (FFmpegContentProperty::AUDIO_STREAM);
}

ContentAudioFrame
FFmpegContent::audio_length () const
{
        if (!_audio_stream) {
                return 0;
        }
        
        return video_frames_to_audio_frames (_video_length, audio_frame_rate(), video_frame_rate());
}

int
FFmpegContent::audio_channels () const
{
        if (!_audio_stream) {
                return 0;
        }

        return _audio_stream->channels;
}

int
FFmpegContent::audio_frame_rate () const
{
        if (!_audio_stream) {
                return 0;
        }

        return _audio_stream->frame_rate;
}

bool
operator== (FFmpegSubtitleStream const & a, FFmpegSubtitleStream const & b)
{
        return a.id == b.id;
}

bool
operator== (FFmpegAudioStream const & a, FFmpegAudioStream const & b)
{
        return a.id == b.id;
}

FFmpegAudioStream::FFmpegAudioStream (shared_ptr<const cxml::Node> node)
{
	name = node->string_child ("Name");
	id = node->number_child<int> ("Id");
	frame_rate = node->number_child<int> ("FrameRate");
	channels = node->number_child<int64_t> ("Channels");
}

void
FFmpegAudioStream::as_xml (xmlpp::Node* root) const
{
	root->add_child("Name")->add_child_text (name);
	root->add_child("Id")->add_child_text (lexical_cast<string> (id));
	root->add_child("FrameRate")->add_child_text (lexical_cast<string> (frame_rate));
	root->add_child("Channels")->add_child_text (lexical_cast<string> (channels));
}

/** Construct a SubtitleStream from a value returned from to_string().
 *  @param t String returned from to_string().
 *  @param v State file version.
 */
FFmpegSubtitleStream::FFmpegSubtitleStream (shared_ptr<const cxml::Node> node)
{
	name = node->string_child ("Name");
	id = node->number_child<int> ("Id");
}

void
FFmpegSubtitleStream::as_xml (xmlpp::Node* root) const
{
	root->add_child("Name")->add_child_text (name);
	root->add_child("Id")->add_child_text (lexical_cast<string> (id));
}

shared_ptr<Content>
FFmpegContent::clone () const
{
	return shared_ptr<Content> (new FFmpegContent (*this));
}