/**
 * \file insetert.C
 * This file is part of LyX, the document processor.
 * Licence details can be found in the file COPYING.
 *
 * \author Jürgen Vigna
 * \author Lars Gullik Bjønnes
 *
 * Full author contact details are available in file CREDITS.
 */

#include <config.h>

#include "insetert.h"

#include "buffer.h"
#include "bufferparams.h"
#include "BufferView.h"
#include "debug.h"
#include "dispatchresult.h"
#include "funcrequest.h"
#include "gettext.h"
#include "language.h"
#include "LColor.h"
#include "lyxlex.h"
#include "metricsinfo.h"
#include "paragraph.h"

#include "frontends/Alert.h"
#include "frontends/LyXView.h"

#include "support/tostr.h"

using lyx::pos_type;

using lyx::support::split;
using lyx::support::strToInt;

using std::endl;
using std::min;
using std::string;
using std::auto_ptr;
using std::ostream;


void InsetERT::init()
{
	setButtonLabel();

	LyXFont font(LyXFont::ALL_SANE);
	font.decSize();
	font.decSize();
	font.setColor(LColor::latex);
	setLabelFont(font);

	setInsetName("ERT");
}


InsetERT::InsetERT(BufferParams const & bp, bool collapsed)
	: InsetCollapsable(bp, collapsed)
{
	status_ = collapsed ? Collapsed : Open;
	init();
}


InsetERT::InsetERT(InsetERT const & in)
	: InsetCollapsable(in)
{
	init();
}


auto_ptr<InsetBase> InsetERT::clone() const
{
	return auto_ptr<InsetBase>(new InsetERT(*this));
}


InsetERT::InsetERT(BufferParams const & bp,
		   Language const * l, string const & contents, bool collapsed)
	: InsetCollapsable(bp, collapsed)
{
	status_ = collapsed ? Collapsed : Open;

	LyXFont font(LyXFont::ALL_INHERIT, l);
	string::const_iterator cit = contents.begin();
	string::const_iterator end = contents.end();
	pos_type pos = 0;
	for (; cit != end; ++cit) {
		inset.paragraphs().begin()->insertChar(pos++, *cit, font);
	}
	// the init has to be after the initialization of the paragraph
	// because of the label settings (draw_label for ert insets).
	init();
}


InsetERT::~InsetERT()
{
	InsetERTMailer(*this).hideDialog();
}


void InsetERT::read(Buffer const & buf, LyXLex & lex)
{
	bool token_found = false;
	if (lex.isOK()) {
		lex.next();
		string const token = lex.getString();
		if (token == "status") {
			lex.next();
			string const tmp_token = lex.getString();

			if (tmp_token == "Inlined") {
				status_ = Inlined;
			} else if (tmp_token == "Collapsed") {
				status_ = Collapsed;
			} else {
				// leave this as default!
				status_ = Open;
			}

			token_found = true;
		} else {
			lyxerr << "InsetERT::Read: Missing 'status'-tag!"
				   << endl;
			// take countermeasures
			lex.pushToken(token);
		}
	}
	inset.read(buf, lex);

	if (!token_found) {
		if (isOpen())
			status_ = Open;
		else
			status_ = Collapsed;
	}
	setButtonLabel();
}


void InsetERT::write(Buffer const & buf, ostream & os) const
{
	string st;

	switch (status_) {
	case Open:
		st = "Open";
		break;
	case Collapsed:
		st = "Collapsed";
		break;
	case Inlined:
		st = "Inlined";
		break;
	}

	os << getInsetName() << "\n" << "status "<< st << "\n";

	//inset.writeParagraphData(buf, os);
	string const layout(buf.params().getLyXTextClass().defaultLayoutName());
	ParagraphList::iterator par = inset.paragraphs().begin();
	ParagraphList::iterator end = inset.paragraphs().end();
	for (; par != end; ++par) {
		os << "\n\\begin_layout " << layout << "\n";
		pos_type siz = par->size();
		for (pos_type i = 0; i < siz; ++i) {
			Paragraph::value_type c = par->getChar(i);
			switch (c) {
			case Paragraph::META_INSET:
				if (par->getInset(i)->lyxCode() != InsetOld::NEWLINE_CODE) {
					lyxerr << "Element is not allowed in insertERT"
					       << endl;
				} else {
					par->getInset(i)->write(buf, os);
				}
				break;

			case '\\':
				os << "\n\\backslash \n";
				break;
			default:
				os << c;
				break;
			}
		}
		os << "\n\\end_layout\n";
	}
}


string const InsetERT::editMessage() const
{
	return _("Opened ERT Inset");
}


void InsetERT::updateStatus(bool swap) const
{
	if (status_ != Inlined) {
		if (isOpen())
			status_ = swap ? Collapsed : Open;
		else
			status_ = swap ? Open : Collapsed;
		setButtonLabel();
	}
}


void InsetERT::lfunMousePress(FuncRequest const & cmd)
{
	if (status_ == Inlined)
		inset.dispatch(cmd);
	else {
		idx_type idx = 0;
		pos_type pos = 0;
		InsetCollapsable::priv_dispatch(cmd, idx, pos);
	}
}


bool InsetERT::lfunMouseRelease(FuncRequest const & cmd)
{
	BufferView * bv = cmd.view();

	if (cmd.button() == mouse_button::button3) {
		showInsetDialog(bv);
		return true;
	}

	if (status_ != Inlined && hitButton(cmd)) {
		updateStatus(true);
	} else {
		FuncRequest cmd1 = cmd;
#warning metrics?
		cmd1.y = ascent() + cmd.y - inset.ascent();

		// inlined is special - the text appears above
		if (status_ == Inlined)
			inset.dispatch(cmd1);
		else if (isOpen() && cmd.y > buttonDim().y2) {
			cmd1.y -= height_collapsed();
			inset.dispatch(cmd1);
		}
	}
	return false;
}


void InsetERT::lfunMouseMotion(FuncRequest const & cmd)
{
	if (status_ == Inlined)
		inset.dispatch(cmd);
	else {
		idx_type idx = 0;
		pos_type pos = 0;
		InsetCollapsable::priv_dispatch(cmd, idx, pos);
	}
}


int InsetERT::latex(Buffer const &, ostream & os,
		    OutputParams const &) const
{
	ParagraphList::iterator par = inset.paragraphs().begin();
	ParagraphList::iterator end = inset.paragraphs().end();

	int lines = 0;
	while (par != end) {
		pos_type siz = par->size();
		for (pos_type i = 0; i < siz; ++i) {
			// ignore all struck out text
			if (isDeletedText(*par, i))
				continue;

			if (par->isNewline(i)) {
				os << '\n';
				++lines;
			} else {
				os << par->getChar(i);
			}
		}
		++par;
		if (par != end) {
			os << "\n";
			++lines;
		}
	}

	return lines;
}


int InsetERT::plaintext(Buffer const &, ostream &,
		    OutputParams const & /*runparams*/) const
{
	return 0;
}


int InsetERT::linuxdoc(Buffer const &, ostream & os,
		       OutputParams const &)const
{
	ParagraphList::iterator par = inset.paragraphs().begin();
	ParagraphList::iterator end = inset.paragraphs().end();

	int lines = 0;
	while (par != end) {
		pos_type siz = par->size();
		for (pos_type i = 0; i < siz; ++i) {
			if (par->isNewline(i)) {
				os << '\n';
				++lines;
			} else {
				os << par->getChar(i);
			}
		}
		++par;
		if (par != end) {
			os << "\n";
			lines ++;
		}
	}

	return lines;
}


int InsetERT::docbook(Buffer const &, ostream & os,
		      OutputParams const &) const
{
	ParagraphList::iterator par = inset.paragraphs().begin();
	ParagraphList::iterator end = inset.paragraphs().end();

	int lines = 0;
	while (par != end) {
		pos_type siz = par->size();
		for (pos_type i = 0; i < siz; ++i) {
			if (par->isNewline(i)) {
				os << '\n';
				++lines;
			} else {
				os << par->getChar(i);
			}
		}
		++par;
		if (par != end) {
			os << "\n";
			lines ++;
		}
	}

	return lines;
}


void InsetERT::edit(BufferView * bv, bool left)
{
	if (status_ == Inlined)
		inset.edit(bv, left);
	else
		InsetCollapsable::edit(bv, left);
	updateStatus();
}


DispatchResult
InsetERT::priv_dispatch(FuncRequest const & cmd, idx_type & idx, pos_type & pos)
{
	switch (cmd.action) {

	case LFUN_MOUSE_PRESS:
		lfunMousePress(cmd);
		return DispatchResult(true, true);

	case LFUN_MOUSE_MOTION:
		lfunMouseMotion(cmd);
		return DispatchResult(true, true);

	case LFUN_MOUSE_RELEASE:
		lfunMouseRelease(cmd);
		return DispatchResult(true, true);

	case LFUN_INSET_MODIFY:
		InsetERTMailer::string2params(cmd.argument, status_);
		setButtonLabel();
		return DispatchResult(true, true);

	case LFUN_LAYOUT:
	case LFUN_BOLD:
	case LFUN_CODE:
	case LFUN_DEFAULT:
	case LFUN_EMPH:
	case LFUN_FREEFONT_APPLY:
	case LFUN_FREEFONT_UPDATE:
	case LFUN_NOUN:
	case LFUN_ROMAN:
	case LFUN_SANS:
	case LFUN_FRAK:
	case LFUN_ITAL:
	case LFUN_FONT_SIZE:
	case LFUN_FONT_STATE:
	case LFUN_UNDERLINE:
		return DispatchResult(true);

	default:
		return InsetCollapsable::priv_dispatch(cmd, idx, pos);
	}
}


void InsetERT::setButtonLabel() const
{
	setLabel(status_ == Collapsed ? getNewLabel(_("ERT")) : _("ERT"));
}


bool InsetERT::insetAllowed(InsetOld::Code code) const
{
	return code == InsetOld::NEWLINE_CODE;
}


void InsetERT::metrics(MetricsInfo & mi, Dimension & dim) const
{
	LyXFont tmpfont = mi.base.font;
	getDrawFont(mi.base.font);
	InsetCollapsable::metrics(mi, dim);
	mi.base.font = tmpfont;
	dim_ = dim;
}


void InsetERT::draw(PainterInfo & pi, int x, int y) const
{
	LyXFont tmpfont = pi.base.font;
	getDrawFont(pi.base.font);
	InsetCollapsable::draw(pi, x, y);
	pi.base.font = tmpfont;
}


void InsetERT::setStatus(CollapseStatus st)
{
	status_ = st;
	setButtonLabel();
}


bool InsetERT::showInsetDialog(BufferView * bv) const
{
	InsetERTMailer(const_cast<InsetERT &>(*this)).showDialog(bv);
	return true;
}


void InsetERT::getDrawFont(LyXFont & font) const
{
	font = LyXFont(LyXFont::ALL_INHERIT, latex_language);
	font.setFamily(LyXFont::TYPEWRITER_FAMILY);
	font.setColor(LColor::latex);
}


string const InsetERTMailer::name_("ert");

InsetERTMailer::InsetERTMailer(InsetERT & inset)
	: inset_(inset)
{}


string const InsetERTMailer::inset2string(Buffer const &) const
{
	return params2string(inset_.status());
}


void InsetERTMailer::string2params(string const & in,
				   InsetCollapsable::InsetCollapsable::CollapseStatus & status)
{
	status = InsetCollapsable::Collapsed;

	string name;
	string body = split(in, name, ' ');

	if (body.empty())
		return;

	status = static_cast<InsetCollapsable::CollapseStatus>(strToInt(body));
}


string const
InsetERTMailer::params2string(InsetCollapsable::CollapseStatus status)
{
	return name_ + ' ' + tostr(status);
}