#pragma once

#ifndef TCOLUMNSET_INCLUDED
#define TCOLUMNSET_INCLUDED

#include "tsmartpointer.h"

#undef DVAPI
#undef DVVAR
#ifdef TXSHEET_EXPORTS
#define DVAPI DV_EXPORT_API
#define DVVAR DV_EXPORT_VAR
#else
#define DVAPI DV_IMPORT_API
#define DVVAR DV_IMPORT_VAR
#endif

//=============================================================================

class DVAPI TColumnHeader : public TSmartObject
{
	DECLARE_CLASS_CODE

	int m_index; //!< The header's index in a columns set
	int m_pos;   //!< The header's screen X pos in a columns viewer
	int m_width; //!< The header's width in a columns viewer

	bool m_inColumnsSet; //!< (TO BE REMOVED ASAP) Whether the header
						 //!< belongs to a columns set. Should be
						 //!< redirected to a negative m_index.
public:
	TColumnHeader();
	virtual ~TColumnHeader() {}

	int getIndex() const { return m_index; }
	int getPos() const { return m_pos; }
	int getX0() const { return m_pos; }
	int getX1() const { return m_pos + m_width - 1; }

	void getCoords(int &x0, int &x1) const
	{
		x0 = m_pos;
		x1 = m_pos + m_width - 1;
	}

	int getWidth() const { return m_width; }

	bool inColumnsSet() const { return m_inColumnsSet; }

private:
	template <class T>
	friend class TColumnSetT;
};

//---------------------------------------------------------

#ifdef _WIN32
template class DVAPI TSmartPointerT<TColumnHeader>;
#endif

typedef TSmartPointerT<TColumnHeader> TColumnHeaderP;

//=============================================================================

template <class T>
class TColumnSetT
{
	typedef TSmartPointerT<T> ColumnP;

	std::vector<ColumnP> m_columns;
	int m_defaultWidth;

	static bool compareColumnPos(const int pos, const ColumnP &ch2)
	{
		return pos <= ch2->getX1();
	}

public:
	TColumnSetT(int defaultWidth = 100) : m_defaultWidth(defaultWidth) {}
	~TColumnSetT() {}

	int getColumnCount() const { return m_columns.size(); }

	void clear() { m_columns.clear(); }

	//---------------------------------------------------------

	void col2pos(int index, int &x0, int &x1) const
	{
		assert(index >= 0);
		int columnCount = (int)m_columns.size();
		if (index < columnCount)
			m_columns[index]->getCoords(x0, x1);
		else {
			x0 = (columnCount > 0 ? m_columns.back()->getX1() + 1 : 0) + (index - columnCount) * m_defaultWidth;
			x1 = x0 + m_defaultWidth - 1;
		}
	}

	//---------------------------------------------------------
	//versione con upper_bound

	int pos2col(int pos) const
	{
		// n.b. endPos e' la coordinata del primo pixel non occupato da colonne
		int endPos = m_columns.empty() ? 0 : m_columns.back()->getX1() + 1;
		if (pos >= endPos)
			return m_columns.size() + (pos - endPos) / m_defaultWidth;

		typename std::vector<ColumnP>::const_iterator loc;
		loc = std::upper_bound(m_columns.begin(), m_columns.end(), pos, compareColumnPos);
		return std::distance(m_columns.begin(), loc);
	}

	//---------------------------------------------------------

	const ColumnP &getColumn(int index) const
	{
		static const ColumnP empty;

		if (index >= 0 && index < (int)m_columns.size())
			return m_columns[index];

		return empty;
	}

	//---------------------------------------------------------

	const ColumnP &touchColumn(int index, int type = 0)
	{
		assert(index >= 0);

		const int count = m_columns.size();
		if (index < count)
			return m_columns[index];

		for (int i = count; i <= index; ++i) {
			int cType = (i != index) ? 0 : type;
			ColumnP col = T::createEmpty(cType);

			m_columns.push_back(col);
		}

		update(count);

		assert(index == (int)m_columns.size() - 1);
		return m_columns[index];
	}

	//---------------------------------------------------------

	const ColumnP &insertColumn(int index, const ColumnP &column)
	{
		//assert(column && column->m_index < 0);
		assert(column && !column->m_inColumnsSet);

		if (index > 0)
			touchColumn(index - 1);

		m_columns.insert(m_columns.begin() + index, column);
		update(index);

		return column;
	}

	//---------------------------------------------------------

	const ColumnP removeColumn(int index)
	{
		assert(index >= 0);

		int columnCount = m_columns.size();
		if (index >= columnCount) // Shouldn't be asserted instead ?
			return ColumnP();

		ColumnP column = m_columns[index];
		//column->m_index = -1;                           // We should enforce this. Unfortunately, must be tested extensively.
		column->m_inColumnsSet = false;

		m_columns.erase(m_columns.begin() + index);
		update(index);

		return column;
	}

	//---------------------------------------------------------

	void rollLeft(int index, int count)
	{
		assert(index >= 0);
		assert(count > 1);

		int columnCount = m_columns.size();
		if (index + count > columnCount)
			count = columnCount - index;

		if (count < 2)
			return;

		assert(0 <= index && index + count - 1 < columnCount);
		assert(count > 0);

		int i = index, j = index + count - 1;
		ColumnP tmp = m_columns[i];

		for (int k = i; k < j; ++k)
			m_columns[k] = m_columns[k + 1];
		m_columns[j] = tmp;

		update(0);
	}

	//---------------------------------------------------------

	void rollRight(int index, int count)
	{
		assert(index >= 0);
		assert(count > 1);

		int columnCount = m_columns.size();
		if (index + count > columnCount)
			count = columnCount - index;

		if (count < 2)
			return;

		assert(0 <= index && index + count - 1 < columnCount);
		assert(count > 0);

		int i = index, j = index + count - 1;
		ColumnP tmp = m_columns[j];

		for (int k = j; k > i; --k)
			m_columns[k] = m_columns[k - 1];
		m_columns[i] = tmp;

		update(0);
	}

	//---------------------------------------------------------

	void update(int fromIdx)
	{
		int pos = 0, index = 0;
		if (fromIdx > 0) {
			assert(fromIdx <= (int)m_columns.size());

			const ColumnP &left = m_columns[fromIdx - 1];

			pos = left->getX1() + 1;
			index = left->m_index + 1;
		}

		int c, cCount = m_columns.size();
		for (c = fromIdx; c != cCount; ++c) {
			const ColumnP &col = m_columns[c];

			col->m_pos = pos;
			col->m_index = index++;
			pos += col->m_width;

			col->m_inColumnsSet = true;
		}
	}

private:
	// Not copyable
	TColumnSetT(const TColumnSetT &);
	TColumnSetT &operator=(const TColumnSetT &);
};

#endif // TCOLUMNSET_INCLUDED