/*
 * Copyright (C) Ascensio System SIA, 2009-2026
 *
 * 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, together with the
 * additional terms provided in the LICENSE file.
 *
 * 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: https://www.gnu.org/licenses/agpl-3.0.html
 *
 * You can contact Ascensio System SIA by email at info@onlyoffice.com
 * or by postal mail at 20A-6 Ernesta Birznieka-Upisha Street, Riga,
 * LV-1050, Latvia, European Union.
 *
 * The interactive user interfaces in modified versions of the Program
 * are required to display Appropriate Legal Notices in accordance with
 * Section 5 of the GNU AGPL version 3.
 *
 * No trademark rights are granted under this License.
 *
 * All non-code elements of the Product, including illustrations,
 * icon sets, and technical writing content, are licensed under the
 * Creative Commons Attribution-ShareAlike 4.0 International License:
 * https://creativecommons.org/licenses/by-sa/4.0/legalcode
 *
 * This license applies only to such non-code elements and does not
 * modify or replace the licensing terms applicable to the Program's
 * source code, which remains licensed under the GNU Affero General
 * Public License v3.
 *
 * SPDX-License-Identifier: AGPL-3.0-only
 */
#include "Info.h"
#include "Utils.h"
#include "Objects.h"

#include <ctime>

static const char  *c_asInfoItemNames[] =
{
	"CreationDate",
	"ModDate",
	"Author",
	"Creator",
	"Producer",
	"Title",
	"Subject",
	"Keywords",
	NULL
};

namespace PdfWriter
{
	static const char* InfoTypeToName(EInfoType eType)
	{
		unsigned int nIndex = (unsigned int)eType;
		return c_asInfoItemNames[nIndex];
	}
	void TDate::AppendToString(std::string& s) const
	{
		s += std::to_string(nYear);
		if (nMonth < 10)
			s += "-0";
		else
			s += "-";
		s += std::to_string(nMonth);

		if (nDay < 10)
			s += "-0";
		else
			s +=  "-";

		s += std::to_string(nDay);

		if (nHour < 10)
			s += "T0";
		else
			s += "T";

		s += std::to_string(nHour);

		if (nMinutes < 10)
			s += ":0";
		else
			s += ":";

		s += std::to_string(nMinutes);

		if (nSeconds < 10)
			s += ":0";
		else
			s += ":";

		s += std::to_string(nSeconds);

		s += "+00:00";			 
	}
	//----------------------------------------------------------------------------------------
	// CInfoDict
	//----------------------------------------------------------------------------------------
	CInfoDict::CInfoDict(CXref* pXref)
	{
		pXref->Add(this);
	}
	void CInfoDict::SetInfo(EInfoType eType, const char* sValue)
	{
		const char* sName = InfoTypeToName(eType);

		if (eType <= InfoModaDate)
			return;

        Add(sName, new CStringObject(sValue, true));
	}
	const char* CInfoDict::GetInfo(EInfoType eType)
	{
		const char* sName = InfoTypeToName(eType);
		CObjectBase* pString = Get(std::string(sName));

		if (!pString)
			return NULL;

		if (object_type_STRING == pString->GetType())
			return (const char*)((CStringObject*)pString)->GetString();

		return NULL;
	}
	void CInfoDict::SetInfo(EInfoType eType, const TDate& oDate)
	{
		char sTemp[DATE_TIME_STR_LEN + 1];
		char* pTemp = NULL;
		const char* sName = InfoTypeToName(eType);

		if (eType > InfoModaDate)
			return;

		MemSet(sTemp, 0, DATE_TIME_STR_LEN + 1);

		if (oDate.nMonth < 1 
			|| 12 < oDate.nMonth 
			|| oDate.nDay < 1 
			|| 23 < oDate.nHour 
			|| 59 < oDate.nMinutes 
			|| 59 < oDate.nSeconds 
			|| 23 < oDate.nOffHour
			|| 59 < oDate.nOffMinutes)
		{
			return;
		}

		switch (oDate.nMonth)
		{
		case 1:
		case 3:
		case 5:
		case 7:
		case 8:
		case 10:
		case 12:
			if (oDate.nDay > 31)
				return;

			break;
		case 4:
		case 6:
		case 9:
		case 11:
			if (oDate.nDay > 30)
				return;

			break;
		case 2:
			if (oDate.nDay > 29 || (oDate.nDay == 29 && (oDate.nYear % 4 != 0 || (oDate.nYear % 100 == 0 && oDate.nYear % 400 != 0))))
				return;

			break;
		default:
			return;
		}

		pTemp = (char*)MemCpy((BYTE*)sTemp, (BYTE*)"D:", 2); 
		*pTemp++; 
		*pTemp++;
		pTemp = ItoA2(pTemp, oDate.nYear, 5);
		pTemp = ItoA2(pTemp, oDate.nMonth, 3);
		pTemp = ItoA2(pTemp, oDate.nDay, 3);
		pTemp = ItoA2(pTemp, oDate.nHour, 3);
		pTemp = ItoA2(pTemp, oDate.nMinutes, 3);
		pTemp = ItoA2(pTemp, oDate.nSeconds, 3);
		*pTemp++ = '+';
		pTemp = ItoA2(pTemp, oDate.nOffHour, 3);
		*pTemp++ = '\'';
		pTemp = ItoA2(pTemp, oDate.nOffMinutes, 3);
		*pTemp++ = '\'';
		*pTemp = 0;

		Add(sName, new CStringObject(sTemp));
	}
	void CInfoDict::SetTime(EInfoType eType)
	{
		if (eType > InfoModaDate)
			return;

		time_t oTime = time(0);
		struct tm oNowBuf;

#if defined(_WIN32) || defined(_MSC_VER)
        gmtime_s(&oNowBuf, &oTime);
#else
        gmtime_r(&oTime, &oNowBuf);
#endif
        struct tm* oNow = &oNowBuf;

		TDate oDate;

		oDate.nYear       = oNow->tm_year + 1900;
		oDate.nMonth      = oNow->tm_mon + 1;
		oDate.nDay        = oNow->tm_mday;
		oDate.nHour       = oNow->tm_hour;
		oDate.nMinutes    = oNow->tm_min;
		oDate.nSeconds    = oNow->tm_sec;
		oDate.nOffHour    = 0;
		oDate.nOffMinutes = 0;

		SetInfo(eType == InfoCreationDate ? eType : InfoModaDate, oDate);

		m_oDate = oDate;
	}
	TDate CInfoDict::GetDate()
	{
		return m_oDate;
	}
}