/*************************************************************************
 *
 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
 * 
 * Copyright 2000, 2010 Oracle and/or its affiliates.
 *
 * OpenOffice.org - a multi-platform office productivity suite
 *
 * This file is part of OpenOffice.org.
 *
 * OpenOffice.org is free software: you can redistribute it and/or modify
 * it under the terms of the GNU Lesser General Public License version 3
 * only, as published by the Free Software Foundation.
 *
 * OpenOffice.org is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU Lesser General Public License version 3 for more details
 * (a copy is included in the LICENSE file that accompanied this code).
 *
 * You should have received a copy of the GNU Lesser General Public License
 * version 3 along with OpenOffice.org.  If not, see
 * <http://www.openoffice.org/license.html>
 * for a copy of the LGPLv3 License.
 *
 ************************************************************************/

// MARKER(update_precomp.py): autogen include statement, do not remove
#include "precompiled_drawinglayer.hxx"

#include <drawinglayer/primitive2d/gridprimitive2d.hxx>
#include <basegfx/tools/canvastools.hxx>
#include <drawinglayer/primitive2d/pointarrayprimitive2d.hxx>
#include <drawinglayer/primitive2d/markerarrayprimitive2d.hxx>
#include <drawinglayer/geometry/viewinformation2d.hxx>
#include <drawinglayer/primitive2d/drawinglayer_primitivetypes2d.hxx>
#include <basegfx/matrix/b2dhommatrixtools.hxx>

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

using namespace com::sun::star;

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

namespace drawinglayer
{
	namespace primitive2d
	{
		Primitive2DSequence GridPrimitive2D::create2DDecomposition(const geometry::ViewInformation2D& rViewInformation) const
		{
			Primitive2DSequence aRetval;

			if(!rViewInformation.getViewport().isEmpty() && getWidth() > 0.0 && getHeight() > 0.0)
			{
				// decompose grid matrix to get logic size
				basegfx::B2DVector aScale, aTranslate;
				double fRotate, fShearX;
				getTransform().decompose(aScale, aTranslate, fRotate, fShearX);

				// create grid matrix which transforms from scaled logic to view
				basegfx::B2DHomMatrix aRST(basegfx::tools::createShearXRotateTranslateB2DHomMatrix(
					fShearX, fRotate, aTranslate.getX(), aTranslate.getY()));
				aRST *= rViewInformation.getObjectToViewTransformation();

				// get step widths
				double fStepX(getWidth());
				double fStepY(getHeight());
				const double fMinimalStep(10.0);

				// guarantee a step width of 10.0
				if(basegfx::fTools::less(fStepX, fMinimalStep))
				{
					fStepX = fMinimalStep;
				}

				if(basegfx::fTools::less(fStepY, fMinimalStep))
				{
					fStepY = fMinimalStep;
				}

				// get relative distances in view coordinates
				double fViewStepX((rViewInformation.getObjectToViewTransformation() * basegfx::B2DVector(fStepX, 0.0)).getLength());
				double fViewStepY((rViewInformation.getObjectToViewTransformation() * basegfx::B2DVector(0.0, fStepY)).getLength());
				double fSmallStepX(1.0), fViewSmallStepX(1.0), fSmallStepY(1.0), fViewSmallStepY(1.0);
				sal_uInt32 nSmallStepsX(0L), nSmallStepsY(0L);

				// setup subdivisions
				if(getSubdivisionsX())
				{
					fSmallStepX = fStepX / getSubdivisionsX();
					fViewSmallStepX = fViewStepX / getSubdivisionsX();
				}

				if(getSubdivisionsY())
				{
					fSmallStepY = fStepY / getSubdivisionsY();
					fViewSmallStepY = fViewStepY / getSubdivisionsY();
				}

				// correct step width
				while(fViewStepX < getSmallestViewDistance())
				{
					fViewStepX *= 2.0;
					fStepX *= 2.0;
				}

				while(fViewStepY < getSmallestViewDistance())
				{
					fViewStepY *= 2.0;
					fStepY *= 2.0;
				}

				// correct small step width
				if(getSubdivisionsX())
				{
					while(fViewSmallStepX < getSmallestSubdivisionViewDistance())
					{
						fViewSmallStepX *= 2.0;
						fSmallStepX *= 2.0;
					}

					nSmallStepsX = (sal_uInt32)(fStepX / fSmallStepX);
				}

				if(getSubdivisionsY())
				{
					while(fViewSmallStepY < getSmallestSubdivisionViewDistance())
					{
						fViewSmallStepY *= 2.0;
						fSmallStepY *= 2.0;
					}

					nSmallStepsY = (sal_uInt32)(fStepY / fSmallStepY);
				}

				// prepare point vectors for point and cross markers
				std::vector< basegfx::B2DPoint > aPositionsPoint;
				std::vector< basegfx::B2DPoint > aPositionsCross;

				for(double fX(0.0); fX < aScale.getX(); fX += fStepX)
				{
					const bool bXZero(basegfx::fTools::equalZero(fX));

					for(double fY(0.0); fY < aScale.getY(); fY += fStepY)
					{
						const bool bYZero(basegfx::fTools::equalZero(fY));

                        if(!bXZero && !bYZero)
                        {
                            // get discrete position and test against 3x3 area surrounding it
                            // since it's a cross
                            const double fHalfCrossSize(3.0 * 0.5);
    						const basegfx::B2DPoint aViewPos(aRST * basegfx::B2DPoint(fX, fY));
                            const basegfx::B2DRange aDiscreteRangeCross(
                                aViewPos.getX() - fHalfCrossSize, aViewPos.getY() - fHalfCrossSize,
                                aViewPos.getX() + fHalfCrossSize, aViewPos.getY() + fHalfCrossSize);
    						
                            if(rViewInformation.getDiscreteViewport().overlaps(aDiscreteRangeCross))
                            {
							    const basegfx::B2DPoint aLogicPos(rViewInformation.getInverseObjectToViewTransformation() * aViewPos);
							    aPositionsCross.push_back(aLogicPos);
                            }
                        }

						if(getSubdivisionsX() && !bYZero)
						{
							double fF(fX + fSmallStepX);

							for(sal_uInt32 a(1L); a < nSmallStepsX && fF < aScale.getX(); a++, fF += fSmallStepX)
							{
								const basegfx::B2DPoint aViewPos(aRST * basegfx::B2DPoint(fF, fY));

								if(rViewInformation.getDiscreteViewport().isInside(aViewPos))
								{
									const basegfx::B2DPoint aLogicPos(rViewInformation.getInverseObjectToViewTransformation() * aViewPos);
									aPositionsPoint.push_back(aLogicPos);
								}
							}
						}

						if(getSubdivisionsY() && !bXZero)
						{
							double fF(fY + fSmallStepY);

							for(sal_uInt32 a(1L); a < nSmallStepsY && fF < aScale.getY(); a++, fF += fSmallStepY)
							{
								const basegfx::B2DPoint aViewPos(aRST * basegfx::B2DPoint(fX, fF));

								if(rViewInformation.getDiscreteViewport().isInside(aViewPos))
								{
									const basegfx::B2DPoint aLogicPos(rViewInformation.getInverseObjectToViewTransformation() * aViewPos);
									aPositionsPoint.push_back(aLogicPos);
								}
							}
						}
					}
				}

				// prepare return value
				const sal_uInt32 nCountPoint(aPositionsPoint.size());
				const sal_uInt32 nCountCross(aPositionsCross.size());
				const sal_uInt32 nRetvalCount((nCountPoint ? 1 : 0) + (nCountCross ? 1 : 0));
				sal_uInt32 nInsertCounter(0);
				
				aRetval.realloc(nRetvalCount);

				// add PointArrayPrimitive2D if point markers were added
				if(nCountPoint)
				{
					aRetval[nInsertCounter++] = Primitive2DReference(new PointArrayPrimitive2D(aPositionsPoint, getBColor()));
				}

				// add MarkerArrayPrimitive2D if cross markers were added
				if(nCountCross)
				{
    				if(!getSubdivisionsX() && !getSubdivisionsY())
                    {
                        // no subdivisions, so fall back to points at grid positions, no need to
                        // visualize a difference between divisions and sub-divisions
    					aRetval[nInsertCounter++] = Primitive2DReference(new PointArrayPrimitive2D(aPositionsCross, getBColor()));
                    }
                    else
                    {
    					aRetval[nInsertCounter++] = Primitive2DReference(new MarkerArrayPrimitive2D(aPositionsCross, getCrossMarker()));
                    }
				}
			}

			return aRetval;
		}

		GridPrimitive2D::GridPrimitive2D(
			const basegfx::B2DHomMatrix& rTransform, 
			double fWidth,
			double fHeight,
			double fSmallestViewDistance,
			double fSmallestSubdivisionViewDistance,
			sal_uInt32 nSubdivisionsX,
			sal_uInt32 nSubdivisionsY,
			const basegfx::BColor& rBColor,
			const BitmapEx& rCrossMarker)
		:	BufferedDecompositionPrimitive2D(),
			maTransform(rTransform),
			mfWidth(fWidth),
			mfHeight(fHeight),
			mfSmallestViewDistance(fSmallestViewDistance),
			mfSmallestSubdivisionViewDistance(fSmallestSubdivisionViewDistance),
			mnSubdivisionsX(nSubdivisionsX),
			mnSubdivisionsY(nSubdivisionsY),
			maBColor(rBColor),
			maCrossMarker(rCrossMarker),
			maLastObjectToViewTransformation(),
			maLastViewport()
		{
		}

		bool GridPrimitive2D::operator==(const BasePrimitive2D& rPrimitive) const
		{
			if(BufferedDecompositionPrimitive2D::operator==(rPrimitive))
			{
				const GridPrimitive2D& rCompare = (GridPrimitive2D&)rPrimitive;
				
				return (getTransform() == rCompare.getTransform()
					&& getWidth() == rCompare.getWidth()
					&& getHeight() == rCompare.getHeight()
					&& getSmallestViewDistance() == rCompare.getSmallestViewDistance()
					&& getSmallestSubdivisionViewDistance() == rCompare.getSmallestSubdivisionViewDistance()
					&& getSubdivisionsX() == rCompare.getSubdivisionsX()
					&& getSubdivisionsY() == rCompare.getSubdivisionsY()
					&& getBColor() == rCompare.getBColor()
					&& getCrossMarker() == rCompare.getCrossMarker());
			}

			return false;
		}

		basegfx::B2DRange GridPrimitive2D::getB2DRange(const geometry::ViewInformation2D& rViewInformation) const
		{
			// get object's range
			basegfx::B2DRange aUnitRange(0.0, 0.0, 1.0, 1.0);
			aUnitRange.transform(getTransform());

			// intersect with visible part
			aUnitRange.intersect(rViewInformation.getViewport());

			return aUnitRange;
		}

		Primitive2DSequence GridPrimitive2D::get2DDecomposition(const geometry::ViewInformation2D& rViewInformation) const
		{ 
			::osl::MutexGuard aGuard( m_aMutex );

			if(getBuffered2DDecomposition().hasElements())
			{
				if(maLastViewport != rViewInformation.getViewport() || maLastObjectToViewTransformation != rViewInformation.getObjectToViewTransformation())
				{
					// conditions of last local decomposition have changed, delete
					const_cast< GridPrimitive2D* >(this)->setBuffered2DDecomposition(Primitive2DSequence());
				}
			}

			if(!getBuffered2DDecomposition().hasElements())
			{
				// remember ViewRange and ViewTransformation
				const_cast< GridPrimitive2D* >(this)->maLastObjectToViewTransformation = rViewInformation.getObjectToViewTransformation();
				const_cast< GridPrimitive2D* >(this)->maLastViewport = rViewInformation.getViewport();
			}

			// use parent implementation
			return BufferedDecompositionPrimitive2D::get2DDecomposition(rViewInformation);
		}

		// provide unique ID
		ImplPrimitrive2DIDBlock(GridPrimitive2D, PRIMITIVE2D_ID_GRIDPRIMITIVE2D)

	} // end of namespace primitive2d
} // end of namespace drawinglayer

//////////////////////////////////////////////////////////////////////////////
// eof