/*
 * (c) Copyright Ascensio System SIA 2010-2023
 *
 * This program is a free software product. You can redistribute it and/or
 * modify it under the terms of the GNU Affero General Public License (AGPL)
 * version 3 as published by the Free Software Foundation. In accordance with
 * Section 7(a) of the GNU AGPL its Section 15 shall be amended to the effect
 * that Ascensio System SIA expressly excludes the warranty of non-infringement
 * of any third-party rights.
 *
 * This program is distributed WITHOUT ANY WARRANTY; without even the implied
 * warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR  PURPOSE. For
 * details, see the GNU AGPL at: http://www.gnu.org/licenses/agpl-3.0.html
 *
 * You can contact Ascensio System SIA at 20A-6 Ernesta Birznieka-Upish
 * street, Riga, Latvia, EU, LV-1050.
 *
 * The  interactive user interfaces in modified source and object code versions
 * of the Program must display Appropriate Legal Notices, as required under
 * Section 5 of the GNU AGPL version 3.
 *
 * Pursuant to Section 7(b) of the License you must retain the original Product
 * logo when distributing the program. Pursuant to Section 7(e) we decline to
 * grant you any rights under trademark law for use of our trademarks.
 *
 * All the Product's GUI elements, including illustrations and icon sets, as
 * well as technical writing content are licensed under the terms of the
 * Creative Commons Attribution-ShareAlike 4.0 International. See the License
 * terms at http://creativecommons.org/licenses/by-sa/4.0/legalcode
 *
 */

#include "xlsx_textcontext.h"
#include "xlsxconversioncontext.h"
#include <iostream>
#include "xlsx_sharedstrings.h"
#include <list>

#include <xml/simple_xml_writer.h>
#include <xml/utils.h>

#include "../Format/odf_document.h"
#include "../Format/odfcontext.h"
#include "../Format/calcs_styles.h"

#include "../Format/style_paragraph_properties.h"
#include "../Format/style_text_properties.h"

namespace cpdoccore {
namespace oox {

class xlsx_text_context::Impl: boost::noncopyable
{
public:
	Impl(odf_reader::odf_read_context & odf_context);
public:
	void add_text(const std::wstring & text);
	void add_paragraph(const std::wstring & para);
    
    void			start_paragraph(const std::wstring & styleName);
    void			end_paragraph();

    void			start_span(const std::wstring & styleName);
    void			end_span();
    std::wstring	end_span2();

    void			start_cell_content();
	void			set_cell_text_properties( odf_reader::text_format_properties_ptr text_properties);
    int				end_cell_content(bool need_cache);

	void			start_comment_content();
	std::wstring	end_comment_content();

	void			start_drawing_content();
	std::wstring	end_drawing_content(); 

	void start_only_text();
	std::wstring end_only_text();
	
	void serialize_shared_strings(std::wostream & strm);
	
	void ApplyTextProperties		(std::wstring style, std::wstring para_style, odf_reader::text_format_properties & propertiesOut);
	void ApplyParagraphProperties	(std::wstring style, odf_reader::paragraph_format_properties & propertiesOut);

	void set_local_styles_container	(odf_reader::styles_container*  local_styles_);//это если стили объектов содержатся в другом документе

	bool is_drawing_context(){return in_draw;}

	void end_hyperlink(std::wstring hId);
	void start_hyperlink();

private:
	std::wstring hyperlink_hId;
	
	bool in_draw;
	bool in_comment;
	bool in_span;
	bool in_paragraph;
	bool in_cell_content;
	bool only_text;

	odf_reader::odf_read_context & odf_context_;
	odf_reader::styles_container * local_styles_ptr_;

	odf_reader::text_format_properties_ptr text_properties_cell_;
   
	std::wstring	dump_paragraph();
	std::wstring	dump_run();

    void write_rPr(std::wostream & strm);
	void write_pPr(std::wostream & strm);
  
	size_t paragraphs_cout_; //???? тока из за начала отсчета?
   
 	std::wstringstream	text_;		//приходящий текст
    std::wstringstream	paragraph_;	//перманенто скидываемые параграфы
    std::wstringstream	run_;		//перманенто скидываемые куски с быть может разными свойствами
  
	 std::wstring		store_cell_string_;
    xlsx_shared_strings xlsx_shared_strings_;
	
	std::wstring		paragraph_style_name_;//был вектор ... не нужен, так как в один момент времени может быть тока один стиль параграфа,текста,объекта при приходе нового - дампится
    std::wstring		span_style_name_;

};

void xlsx_text_context::Impl::serialize_shared_strings(std::wostream & strm)
{
    xlsx_shared_strings_.serialize(strm);    
}


xlsx_text_context::Impl::Impl(odf_reader::odf_read_context & odf_context) :
	paragraphs_cout_(0), odf_context_(odf_context),
	in_comment(false), in_draw(false), in_paragraph(false), in_span(false), in_cell_content(false), only_text(false)
{
	local_styles_ptr_		= NULL;
	text_properties_cell_	= NULL;
}

void xlsx_text_context::Impl::add_text(const std::wstring & text)
{
    text_ << text;
	
	if (!in_comment && !in_draw && !only_text)
		dump_run();
}
void xlsx_text_context::Impl::add_paragraph(const std::wstring & para)
{
	paragraph_ << para;
}
void xlsx_text_context::Impl::set_local_styles_container(odf_reader::styles_container * local_styles_)
{
	local_styles_ptr_= local_styles_;
}

void xlsx_text_context::Impl::start_paragraph(const std::wstring & styleName)
{
    if (paragraphs_cout_++ > 0)
    {	
		if ( in_comment || only_text/* || in_cell_content*/)
		{
			//text_ << L"&#10;";
			// конец предыдущего абзаца и начало следующего
			text_ << L"\n"; // &#xA;
		}
		else/* (paragraph_style_name_ != styleName)*/
		{
			dump_paragraph();
		}
	}else
	{
		text_.str(std::wstring());
	}
	paragraph_style_name_ = styleName;
	in_paragraph = true;
}

void xlsx_text_context::Impl::end_paragraph()
{
    if (!in_comment && !in_draw && !only_text)
	{
		dump_run();
		paragraph_style_name_ = L"";
	}
	in_paragraph = false;
}

void xlsx_text_context::Impl::start_span(const std::wstring & styleName)//кусок текста в абзаце(параграфе) со своими свойствами - этто может быть и 1 буква
{
 	int text_size = text_.str().length();

	if (in_comment || in_draw || only_text)
	 {
		if (( span_style_name_ != styleName && text_size > 0 ) || in_span)
		{
			dump_run();
		}

		if (in_draw && !in_paragraph)
			start_paragraph(L"");
	 }
	 else
	 {
		text_.str(std::wstring());
	 }
	 span_style_name_	= styleName;
	 in_span			= true;
}

void xlsx_text_context::Impl::end_span() //odf корявенько написан - возможны повторы стилей в последовательных кусках текста
//пока с анализом стилей тока комменты - остальные текстовые куски как есть.. с охрененным возможно дубляжом
{
     if (!in_comment && !only_text)
	 {
		dump_run();
		span_style_name_ = L"";
	 }
	 in_span = false;
}

std::wstring xlsx_text_context::Impl::end_span2()
{
    const std::wstring content = dump_run();
    span_style_name_ = L"";
	
	in_span = false;
    return content;
}

void xlsx_text_context::Impl::start_hyperlink()
{
	dump_run();
}

void xlsx_text_context::Impl::end_hyperlink(std::wstring hId)
{
	hyperlink_hId = hId;
}

void xlsx_text_context::Impl::ApplyParagraphProperties	(std::wstring style, odf_reader::paragraph_format_properties & propertiesOut)
{
	std::vector<const odf_reader::style_instance *> instances;

	odf_reader::style_instance*	defaultStyle	= NULL;
	odf_reader::style_instance*	paraStyle		= NULL;

	if (local_styles_ptr_)
	{
		defaultStyle	= local_styles_ptr_->style_default_by_type(odf_types::style_family::Paragraph);
		paraStyle		= local_styles_ptr_->style_by_name(style, odf_types::style_family::Paragraph, false/*process_headers_footers_*/);
	}
	else
	{
		defaultStyle	= odf_context_.styleContainer().style_default_by_type(odf_types::style_family::Paragraph);
		paraStyle		= odf_context_.styleContainer().style_by_name(style, odf_types::style_family::Paragraph, false/*process_headers_footers_*/);
	}
	
	if (defaultStyle)	instances.push_back(defaultStyle);
	if (paraStyle)		instances.push_back(paraStyle);
	
	propertiesOut.apply_from(calc_paragraph_properties_content(instances));
}
void xlsx_text_context::Impl::ApplyTextProperties(std::wstring style, std::wstring para_style, odf_reader::text_format_properties & propertiesOut)
{
	std::vector<const odf_reader::style_instance *> instances;

	odf_reader::style_instance* defaultStyle = NULL;
	odf_reader::style_instance* textStyle	 = NULL;
	odf_reader::style_instance* paraStyle	 = NULL;
	
	if (local_styles_ptr_)
	{
		defaultStyle	= local_styles_ptr_->style_default_by_type(odf_types::style_family::Text);
		paraStyle		= local_styles_ptr_->style_by_name(para_style, odf_types::style_family::Paragraph, false/*process_headers_footers_*/);
		textStyle		= local_styles_ptr_->style_by_name(style, odf_types::style_family::Text, false/*process_headers_footers_*/);
	}
	else
	{
		defaultStyle	= odf_context_.styleContainer().style_default_by_type(odf_types::style_family::Text);
		paraStyle		= odf_context_.styleContainer().style_by_name(para_style, odf_types::style_family::Paragraph, false/*process_headers_footers_*/);
		textStyle		= odf_context_.styleContainer().style_by_name(style, odf_types::style_family::Text, false/*process_headers_footers_*/);
	}
	
	if (defaultStyle)	instances.push_back(defaultStyle);
	if (paraStyle)		instances.push_back(paraStyle);
	if (textStyle)		instances.push_back(textStyle);

	odf_reader::text_format_properties_ptr text_props = calc_text_properties_content(instances);
	if (text_props)
	{
		propertiesOut.apply_from(*text_props.get());
	}
}

void xlsx_text_context::Impl::set_cell_text_properties(odf_reader::text_format_properties_ptr text_properties)
{
	text_properties_cell_ = text_properties;
}

void xlsx_text_context::Impl::write_pPr	(std::wostream & strm)
{
	if (paragraph_style_name_.empty())return;

	odf_reader::paragraph_format_properties paragraph_format_properties_;	
	
	ApplyParagraphProperties (paragraph_style_name_,	paragraph_format_properties_);
	paragraph_format_properties_.xlsx_convert (strm, in_draw);
}

void xlsx_text_context::Impl::write_rPr(std::wostream & strm)
{
	if (paragraph_style_name_.empty() && span_style_name_.empty() 
			&& !(!hyperlink_hId.empty()	&& in_draw) 
			&& !(text_properties_cell_	&& in_cell_content))return;

	odf_reader::text_format_properties text_properties_;
	if (in_cell_content && text_properties_cell_)
	{
		text_properties_.apply_from(*text_properties_cell_);
	}	

	ApplyTextProperties (span_style_name_, paragraph_style_name_, text_properties_);

	if (in_draw)
	{
		text_properties_.drawing_serialize(strm, L"a:rPr", odf_context_.fontContainer());
	}
	else
	{
		CP_XML_WRITER(strm)
		{
			CP_XML_NODE(L"rPr")
			{
				std::wstring font_name;
				if (text_properties_.fo_font_family_)
				{
					font_name = *text_properties_.fo_font_family_;
				}
				else if (text_properties_.style_font_name_)
				{
					odf_reader::font_instance *font = odf_context_.fontContainer().font_by_style_name(*text_properties_.style_font_name_);
					if (font)
						font_name = font->name();
				}
				if (false == font_name.empty())
				{
					CP_XML_NODE(L"rFont")
					{
						CP_XML_ATTR(L"val", font_name);
					}
				}
				if (text_properties_.fo_font_weight_)
				{
					CP_XML_NODE(L"b")		
					{
						if (text_properties_.fo_font_weight_->get_type() > 0)
							CP_XML_ATTR(L"val", "true");
						else
							CP_XML_ATTR(L"val", "false");
					}
				}
				if (text_properties_.fo_font_style_)
				{
					CP_XML_NODE(L"i")		
					{
						if (text_properties_.fo_font_style_->get_type() > 0)
							CP_XML_ATTR(L"val", "true");
						else 
							CP_XML_ATTR(L"val", "false");
					}
				}
				if (text_properties_.fo_color_)
				{
					CP_XML_NODE(L"color")
					{
						CP_XML_ATTR(L"rgb", text_properties_.fo_color_->get_hex_value(true));
					}
				}
				if (text_properties_.fo_font_size_)
				{
					CP_XML_NODE(L"sz")		
					{
						CP_XML_ATTR(L"val", (int)text_properties_.fo_font_size_->get_length().get_value());
					}
				}
			}
		}
    }
}


std::wstring xlsx_text_context::Impl::dump_paragraph(/*bool last*/)
{				
	if (!in_draw) return L""; 

	end_span();

    std::wstring str_run = run_.str();

	if (only_text) return str_run;

	if (false == str_run.empty() || false == paragraph_style_name_.empty())
	{
		CP_XML_WRITER(paragraph_)
		{
			CP_XML_NODE(L"a:p")
			{
				write_pPr(CP_XML_STREAM());

				if (str_run.length() > 0)
				{
					CP_XML_STREAM() << run_.str();
				}
				else
				{
					CP_XML_NODE(L"a:endParaRPr");
				}
			}
		}
		run_.str(std::wstring());
	}
	return paragraph_.str();
}

std::wstring xlsx_text_context::Impl::dump_run()
{
    std::wstring content = XmlUtils::EncodeXmlStringExtend(text_.str());
	
	if (content.empty()) return L"";

	std::wstring	prefix_draw;
	if (in_draw)	prefix_draw = L"a:";

	bool bPreserve = (false == in_draw && (std::wstring::npos != content.find(L" ") || std::wstring::npos != content.find(L"&#x")));
   
	CP_XML_WRITER(run_)
    {
        if (!content.empty())
        {
			CP_XML_NODE(prefix_draw + L"r")
			{
				write_rPr(CP_XML_STREAM());                
				
				CP_XML_NODE(prefix_draw + L"t")
				{
					if (bPreserve)
					{
						CP_XML_ATTR(L"xml:space", L"preserve");
					}
					
					CP_XML_STREAM() << content;
                }
	         }
            text_.str(std::wstring());
        }
    }

    return content;
}

void xlsx_text_context::Impl::start_cell_content()
{
    paragraphs_cout_	= 0;
 	local_styles_ptr_	= NULL;
   
	run_.str(std::wstring());
	paragraph_.str(std::wstring());
    text_.str(std::wstring());

	store_cell_string_.clear();
 	hyperlink_hId.clear();
   
	paragraph_style_name_	= L"";
    span_style_name_		= L"";

	in_cell_content			= true;
	
	text_properties_cell_	= NULL;
}
void xlsx_text_context::Impl::start_only_text()
{
    paragraphs_cout_ = 0;
   
	run_.str(std::wstring());
	paragraph_.str(std::wstring());
    text_.str(std::wstring());
    
	paragraph_style_name_	= L"";
    span_style_name_		= L"";
	
	only_text				= true;
}
std::wstring xlsx_text_context::Impl::end_only_text()
{
	std::wstring message = dump_run();
  
	paragraphs_cout_ = 0;
    
	run_.str(std::wstring());
	paragraph_.str(std::wstring());
    text_.str(std::wstring());

	paragraph_style_name_	= L"";
    span_style_name_		= L"";

	only_text				= false;
	return message;
}
void xlsx_text_context::Impl::start_comment_content()
{
    paragraphs_cout_ = 0;
   
	run_.str(std::wstring());
	paragraph_.str(std::wstring());
    text_.str(std::wstring());
    
	paragraph_style_name_	= L"";
    span_style_name_		= L"";

	in_comment				= true;
}
void xlsx_text_context::Impl::start_drawing_content()
{
	if (in_cell_content)
	{
		dump_run();

		store_cell_string_ = run_.str();	
	}

    paragraphs_cout_ = 0;
   
	run_.str(std::wstring());
	paragraph_.str(std::wstring());
    text_.str(std::wstring());
    
	paragraph_style_name_	= L"";
    span_style_name_		= L"";

	in_draw					= true;
}
std::wstring xlsx_text_context::Impl::end_comment_content()
{
	dump_run();//если в комменте куча абзацев со одним стилем - сдампится здесь - иначе дампится по мере прихода каждого нового стиля

	std::wstring comment= run_.str();
  
	paragraphs_cout_ = 0;
    
	run_.str(std::wstring());
	paragraph_.str(std::wstring());
    text_.str(std::wstring());

	paragraph_style_name_	= L"";
    span_style_name_		= L"";

	in_comment				= false;
	return comment;
}
std::wstring xlsx_text_context::Impl::end_drawing_content()
{
	dump_paragraph();//если в draw куча абзацев со одним стилем - сдампится здесь - иначе дампится по мере прихода каждого нового стиля

	std::wstring draw = paragraph_.str();
  
	paragraphs_cout_ = 0;    
	
	run_.str(std::wstring());
	paragraph_.str(std::wstring());
    text_.str(std::wstring());

	paragraph_style_name_	= L"";
    span_style_name_		= L"";

	in_draw = false;
	return draw;
}
int xlsx_text_context::Impl::end_cell_content(bool need_cache)
{
	dump_run();

	std::wstring cell_string = store_cell_string_ + run_.str();
	store_cell_string_.clear();
	
	in_cell_content = false;  

	const int sharedStrId = (!need_cache || cell_string.empty()) ? (-1) :  xlsx_shared_strings_.add(cell_string);
	return sharedStrId;
}

/////////////////////////////////////////////////////////////////////////////////////////////////////

xlsx_text_context::xlsx_text_context(odf_reader::odf_read_context & odfContext) :
	impl_(new xlsx_text_context::Impl(odfContext))
{}


xlsx_text_context::~xlsx_text_context()
{
}
void xlsx_text_context::set_local_styles_container(odf_reader::styles_container*  local_styles_)
{
	return impl_->set_local_styles_container(local_styles_);
}
void xlsx_text_context::set_cell_text_properties(odf_reader::text_format_properties_ptr text_properties)
{
	return impl_->set_cell_text_properties(text_properties);
}
void xlsx_text_context::add_text(const std::wstring & text)
{
    return impl_->add_text(text);
}
void xlsx_text_context::add_paragraph(const std::wstring & para)
{
	return impl_->add_paragraph(para);
}
void xlsx_text_context::start_paragraph(const std::wstring & styleName)
{
    return impl_->start_paragraph(styleName);
}

void xlsx_text_context::end_paragraph()
{
    return impl_->end_paragraph();
}

void xlsx_text_context::start_span(const std::wstring & styleName)
{
    return impl_->start_span(styleName);
}

void xlsx_text_context::end_span()
{
    return impl_->end_span();
}

std::wstring xlsx_text_context::end_span2()
{
    return impl_->end_span2();
}
bool xlsx_text_context::is_drawing_context()
{
	return impl_->is_drawing_context();
}
void xlsx_text_context::start_cell_content()
{
    return impl_->start_cell_content();
}
int xlsx_text_context::end_cell_content(bool need_cache)
{
    return impl_->end_cell_content(need_cache);
}
void xlsx_text_context::start_comment_content()
{
	return impl_->start_comment_content();
}
std::wstring xlsx_text_context::end_comment_content()
{
	return impl_->end_comment_content();
}
void xlsx_text_context::start_only_text()
{
	return impl_->start_only_text();
}
std::wstring xlsx_text_context::end_only_text()
{
	return impl_->end_only_text();
}
void xlsx_text_context::start_drawing_content()
{
	return impl_->start_drawing_content();
}
void xlsx_text_context::start_hyperlink()
{
	return impl_->start_hyperlink();
}
void xlsx_text_context::end_hyperlink(std::wstring hId)
{
	return impl_->end_hyperlink(hId);
}
std::wstring xlsx_text_context::end_drawing_content()
{
	return impl_->end_drawing_content();
}
void xlsx_text_context::serialize_shared_strings(std::wostream & strm)
{
    return impl_->serialize_shared_strings(strm);
}

    
}
}