/*
 * (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
 *
 */
#ifndef _BUILD_MEMORYSTREAM_H_
#define _BUILD_MEMORYSTREAM_H_

#include "../common/File.h"
#include "../graphics/IRenderer.h"

#ifdef _DEBUG
#define _LOGGING_NATIVE_
#else
// #define _LOGGING_NATIVE_
#endif

#ifdef _LINUX
#include <stdlib.h>
#endif

#ifndef _ARM_ALIGN_
#define _ARM_ALIGN_
#endif

static void LOGGING(const std::string& strFile, const std::wstring& strMessage)
{
#ifdef _LOGGING_NATIVE_
	FILE* f = fopen(strFile.c_str(), "a+");

	BYTE* pData = NULL;
	LONG lLen = 0;
	NSFile::CUtf8Converter::GetUtf8StringFromUnicode(strMessage.c_str(), (LONG)strMessage.length(), pData, lLen);
	pData[lLen] = 0;

	fprintf(f, (char*)pData);
	fprintf(f, "\n");
	fclose(f);

	RELEASEARRAYOBJECTS(pData);
#endif
}

namespace NSMemoryStream
{
	class CMemoryStream : public IGrObject
	{
	private:
		// сам метафайл
		BYTE* m_pBuffer;
		BYTE* m_pBufferMem;

		size_t m_lSize;

	public:
		CMemoryStream()
		{
			m_pBuffer = NULL;
			m_pBufferMem = NULL;

			m_lSize = 0;
		}
		virtual ~CMemoryStream()
		{
			RELEASEARRAYOBJECTS(m_pBuffer);
		}

		inline BYTE* GetData()
		{
			return m_pBuffer;
		}
		inline int GetSize()
		{
			return (int)(m_pBufferMem - m_pBuffer);
		}

		inline void Clear()
		{
			m_lSize = 0;

			m_pBuffer = NULL;
			m_pBufferMem = NULL;
		}

		inline void ClearNoAttack()
		{
			m_pBufferMem = m_pBuffer;
		}

		inline void Copy(const CMemoryStream* pData, const size_t& nPos, const size_t& nLen)
		{
			CheckBufferSize(nLen);
			memcpy(m_pBufferMem, pData->m_pBuffer + nPos, nLen);
			m_pBufferMem += nLen;
		};

		inline void CheckBufferSize(size_t lPlus)
		{
			if (NULL != m_pBuffer)
			{
				size_t nNewSize = (m_pBufferMem - m_pBuffer) + lPlus;
				if (nNewSize >= m_lSize)
				{
					while (nNewSize >= m_lSize)
					{
						m_lSize *= 2;
					}
					// TODO: realloc use
					BYTE* pNew = new BYTE[m_lSize];
					memcpy(pNew, m_pBuffer, m_pBufferMem - m_pBuffer);

					m_pBufferMem = pNew + (m_pBufferMem - m_pBuffer);

					RELEASEARRAYOBJECTS(m_pBuffer);
					m_pBuffer = pNew;
				}
			}
			else
			{
				m_lSize = 1000;
				m_pBuffer = new BYTE[m_lSize];
				m_pBufferMem = m_pBuffer;

				CheckBufferSize(lPlus);
			}
		}

		inline void WriteBYTE(const BYTE& lValue)
		{
			CheckBufferSize(sizeof(BYTE));
			*m_pBufferMem = lValue;
			m_pBufferMem += sizeof(BYTE);
		}
		inline void WriteBool(const bool& bValue)
		{
			CheckBufferSize(sizeof(BYTE));
			if (bValue)
				*m_pBufferMem = 1;
			else
				*m_pBufferMem = 0;
			m_pBufferMem += sizeof(BYTE);
		}
		inline void WriteLONG(const LONG& lValue)
		{
			CheckBufferSize(sizeof(INT));
#ifdef _ARM_ALIGN_
			INT v = lValue;
			memcpy(m_pBufferMem, &v, sizeof(INT));
#else
			*((INT*)(m_pBufferMem)) = (INT)lValue;
#endif
			m_pBufferMem += sizeof(INT);
		}
		inline void WriteUSHORT(const USHORT& lValue)
		{
			CheckBufferSize(sizeof(USHORT));
#ifdef _ARM_ALIGN_
			USHORT v = lValue;
			memcpy(m_pBufferMem, &v, sizeof(USHORT));
#else
			*((USHORT*)(m_pBufferMem)) = (USHORT)lValue;
#endif
			m_pBufferMem += sizeof(USHORT);
		}
		inline void WriteDouble(const double& dValue)
		{
			CheckBufferSize(sizeof(double));
#ifdef _ARM_ALIGN_
			double v = dValue;
			memcpy(m_pBufferMem, &v, sizeof(double));
#else
			*((double*)(m_pBufferMem)) = dValue;
#endif
			m_pBufferMem += sizeof(double);
		}
		inline void WriteStringA(const char* pData, int nLen)
		{
			CheckBufferSize(nLen + sizeof(USHORT));

#ifdef __ANDROID__
			memcpy(m_pBufferMem, &nLen, sizeof(USHORT));
#else
			*((USHORT*)(m_pBufferMem)) = (USHORT)nLen;
#endif
			m_pBufferMem += sizeof(USHORT);

			memcpy(m_pBufferMem, pData, nLen);
			m_pBufferMem += nLen;
		}
		inline void WriteStringA2(const char* pData, int nLen)
		{
			CheckBufferSize(nLen + sizeof(INT));

#ifdef __ANDROID__
			memcpy(m_pBufferMem, &nLen, sizeof(INT));
#else
			*((INT*)(m_pBufferMem)) = (INT)nLen;
#endif
			m_pBufferMem += sizeof(INT);

			memcpy(m_pBufferMem, pData, nLen);
			m_pBufferMem += nLen;
		}

		inline void WriteStringTruncate2(const wchar_t* pData, int nLenDouble)
		{
			if (sizeof(wchar_t) == 2)
			{
				memcpy(m_pBufferMem, pData, nLenDouble);
			}
			else
			{
				int len = nLenDouble >> 1;
				USHORT* mass = new USHORT[len];
				for (int i = 0; i < len; ++i)
					mass[i] = (USHORT)pData[i];
				memcpy(m_pBufferMem, mass, nLenDouble);
				RELEASEARRAYOBJECTS(mass);
			}
			m_pBufferMem += nLenDouble;
		}

		inline void WriteString(const wchar_t* pData, int nLen)
		{
			int nLen2 = nLen << 1;
			CheckBufferSize(nLen2 + sizeof(USHORT));
			WriteUSHORT((USHORT)(nLen));
			WriteStringTruncate2(pData, nLen2);
		}
		inline void WriteString2(const wchar_t* pData, int nLen)
		{
			int nLen2 = nLen << 1;
			CheckBufferSize(nLen2 + sizeof(INT));
			WriteLONG(nLen2);
			WriteStringTruncate2(pData, nLen2);
		}

		inline void __WriteBYTE(const BYTE& lValue)
		{
			*m_pBufferMem = lValue;
			m_pBufferMem += sizeof(BYTE);
		}
		inline void __WriteBool(const bool& bValue)
		{
			if (bValue)
				*m_pBufferMem = 1;
			else
				*m_pBufferMem = 0;
			m_pBufferMem += sizeof(BYTE);
		}
		inline void __WriteLONG(const LONG& lValue)
		{
#ifdef _ARM_ALIGN_
			INT v = (INT)lValue;
			memcpy(m_pBufferMem, &v, sizeof(INT));
#else
			*((INT*)(m_pBufferMem)) = (INT)lValue;
#endif
			m_pBufferMem += sizeof(INT);
		}
		inline void __WriteDouble(const double& dValue)
		{
#ifdef _ARM_ALIGN_
			double v = dValue;
			memcpy(m_pBufferMem, &v, sizeof(double));
#else
			*((double*)(m_pBufferMem)) = dValue;
#endif
			m_pBufferMem += sizeof(double);
		}
		inline void WriteBuffer(const BYTE* pData, const int& nLen)
		{
			size_t len = (size_t)nLen;
			CheckBufferSize(len);
			memcpy(m_pBufferMem, pData, len);
			m_pBufferMem += len;
		}
	};
} // namespace NSMemoryStream

#endif // _BUILD_MEMORYSTREAM_H_