/*
 * (c) Copyright Ascensio System SIA 2010-2016
 *
 * 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 Lubanas st. 125a-25, Riga, Latvia,
 * EU, LV-1021.
 *
 * 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 "MemoryUtils.h"
#include "JPXStream.h"
#include "File.h"

#include "../../DesktopEditor/common/File.h"
#include "../../DesktopEditor/raster/BgraFrame.h"
#include "../../DesktopEditor/raster/ImageFileFormatChecker.h"

#include "../../DesktopEditor/raster/Jp2/J2kFile.h"

namespace PdfReader
{
	JPXStream::JPXStream(Stream *pStream) :
		FilterStream(pStream)
	{
		m_lCurPos       = 0;
		m_lBufferSize   = 0;
		m_pSourceBuffer = NULL;
	}

	JPXStream::~JPXStream()
	{
		Close();
		delete m_pStream;
	}

	void JPXStream::Reset()
	{
		m_pStream->Reset();

		// Инизиализация
		m_lCurPos       = 0;
		m_lBufferSize   = 0;
		m_pSourceBuffer = NULL;

		// Создаем темповый файл, в который сбрасываем картинку
		FILE *pTempFile = NULL;

		std::wstring wsTempFile = L"";
		if (!NSFile::CFileBinary::OpenTempFile(&wsTempFile, &pTempFile, L"wb", NULL, NULL))
		{
			NSFile::CFileBinary::Remove(wsTempFile);
			return;
		}

		int nChar = 0;
		unsigned char *pBuffer = (unsigned char*)MemUtilsMalloc(32);
		if (pBuffer)
		{
			int nSize = 32, nLen = 0;
			while (EOF != (nChar = m_pStream->GetChar()))
			{
				if (nLen >= nSize)
				{
					nSize *= 2;
					pBuffer = (unsigned char*)MemUtilsRealloc(pBuffer, nSize);
				}

				pBuffer[nLen] = nChar;
				nLen++;
			}
			fwrite(pBuffer, 1, nLen, pTempFile);
			fclose(pTempFile);
			MemUtilsFree(pBuffer);
		}
		else
		{
			while (EOF != (nChar = m_pStream->GetChar()))
			{
				fputc(nChar, pTempFile);
			}
			fclose(pTempFile);
		}

		BYTE* pBufferPointer;
		int nHeight = 0;
		int nWidth  = 0;
		int nComponentsCount = 0;

		Jpeg2000::CJ2kFile oJ2;
		if (!oJ2.Open(&pBufferPointer, nComponentsCount, nWidth, nHeight, wsTempFile, std::wstring(L"")) || !pBufferPointer)
		{
			NSFile::CFileBinary::Remove(wsTempFile);
			return;
		}

		m_lBufferSize = nWidth * nHeight * nComponentsCount;
		m_pSourceBuffer = (unsigned char*)MemUtilsMalloc(m_lBufferSize);
		if (!m_pSourceBuffer)
		{
			delete[] pBufferPointer;
			NSFile::CFileBinary::Remove(wsTempFile);
			m_lBufferSize = 0;
			return;
		}

		int nStride = nWidth * nComponentsCount;
		unsigned char* pDst = m_pSourceBuffer;
		for (int nY = 0; nY < nHeight; nY++)
		{
			unsigned char* pSrc = pBufferPointer + nStride * (nHeight - 1 - nY);
			::memcpy(pDst, pSrc, nStride);
			pDst += nStride;
		}

		delete[] pBufferPointer;
		NSFile::CFileBinary::Remove(wsTempFile);
	}

	void JPXStream::Close()
	{
		MemUtilsFree(m_pSourceBuffer);
		m_pSourceBuffer = NULL;

		FilterStream::Close();
	}

	int JPXStream::GetChar()
	{
		int nChar = 0;

		if (m_lCurPos < m_lBufferSize)
		{
			nChar = m_pSourceBuffer[m_lCurPos];
			m_lCurPos++;
		}
		else
			return EOF;

		return nChar;
	}

	int JPXStream::LookChar()
	{
		if (m_lBufferSize > 0 && m_lCurPos < m_lBufferSize)
			return m_pSourceBuffer[m_lCurPos];

		return EOF;
	}
	StringExt *JPXStream::GetPSFilter(int nPSLevel, char *sIndent)
	{
		return NULL;
	}

	bool JPXStream::IsBinary(bool bLast)
	{
		return m_pStream->IsBinary(true);
	}

	void JPXStream::GetImageParams(int *pBitsPerComponent, StreamColorSpaceMode *peModeCS)
	{
		*pBitsPerComponent = 8;
		*peModeCS = streamCSDeviceRGB;
	}
}