/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */

/*

 * This file is part of the LibreOffice project.

 *

 * This Source Code Form is subject to the terms of the Mozilla Public

 * License, v. 2.0. If a copy of the MPL was not distributed with this

 * file, You can obtain one at http://mozilla.org/MPL/2.0/.

 *

 * This file incorporates work covered by the following license notice:

 *

 *   Licensed to the Apache Software Foundation (ASF) under one or more

 *   contributor license agreements. See the NOTICE file distributed

 *   with this work for additional information regarding copyright

 *   ownership. The ASF licenses this file to you under the Apache

 *   License, Version 2.0 (the "License"); you may not use this file

 *   except in compliance with the License. You may obtain a copy of

 *   the License at http://www.apache.org/licenses/LICENSE-2.0 .

 */

#include <XPropertyTable.hxx>

#include <tools/mapunit.hxx>

#include <vcl/rendercontext/DrawModeFlags.hxx>

#include <vcl/svapp.hxx>

#include <vcl/virdev.hxx>

#include <vcl/settings.hxx>

#include <svx/strings.hrc>

#include <svx/dialmgr.hxx>

#include <drawinglayer/attribute/fillhatchattribute.hxx>

#include <drawinglayer/primitive2d/PolyPolygonHatchPrimitive2D.hxx>

#include <drawinglayer/primitive2d/PolygonHairlinePrimitive2D.hxx>

#include <drawinglayer/processor2d/baseprocessor2d.hxx>

#include <drawinglayer/processor2d/processor2dtools.hxx>

#include <basegfx/matrix/b2dhommatrix.hxx>

#include <basegfx/polygon/b2dpolygontools.hxx>

#include <osl/diagnose.h>

#include <rtl/ustrbuf.hxx>

#include <memory>

using namespace ::com::sun::star;

XHatchList::XHatchList(const OUString& rPath, const OUString& rReferer)

  : XPropertyList( XPropertyListType::Hatch, rPath, rReferer )

{

}

XHatchList::~XHatchList()

{

}

void XHatchList::Replace(std::unique_ptr<XHatchEntry> pEntry, tools::Long nIndex)

{

    XPropertyList::Replace(std::move(pEntry), nIndex);

}

XHatchEntry* XHatchList::GetHatch(tools::Long nIndex) const

{

    return static_cast<XHatchEntry*>( XPropertyList::Get(nIndex) );

}

uno::Reference< container::XNameContainer > XHatchList::createInstance()

{

    return SvxUnoXHatchTable_createInstance( *this );

}

bool XHatchList::Create()

{

    OUStringBuffer aStr(SvxResId(RID_SVXSTR_HATCH) + " 1");

    sal_Int32 nLen = aStr.getLength() - 1;

    Insert(std::make_unique<XHatchEntry>(XHatch(COL_BLACK,css::drawing::HatchStyle_SINGLE,100,  0_deg10),aStr.toString()));

    aStr[nLen] = '2';

    Insert(std::make_unique<XHatchEntry>(XHatch(COL_RED  ,css::drawing::HatchStyle_DOUBLE, 80,450_deg10),aStr.toString()));

    aStr[nLen] = '3';

    Insert(std::make_unique<XHatchEntry>(XHatch(COL_BLUE ,css::drawing::HatchStyle_TRIPLE,120,  0_deg10),aStr.toString()));

    return true;

}

Bitmap XHatchList::CreateBitmap( tools::Long nIndex, const Size& rSize) const

{

    Bitmap aRetval;

    OSL_ENSURE(nIndex < Count(), "OOps, access out of range (!)");

    if(nIndex < Count())

    {

        const StyleSettings& rStyleSettings = Application::GetSettings().GetStyleSettings();

        // prepare polygon geometry for rectangle

        basegfx::B2DPolygon aRectangle(

            basegfx::utils::createPolygonFromRect(

                basegfx::B2DRange(0.0, 0.0, rSize.Width(), rSize.Height())));

        const XHatch& rHatch = GetHatch(nIndex)->GetHatch();

        drawinglayer::attribute::HatchStyle aHatchStyle(drawinglayer::attribute::HatchStyle::Triple);

        switch(rHatch.GetHatchStyle())

        {

            case css::drawing::HatchStyle_SINGLE :

            {

                aHatchStyle = drawinglayer::attribute::HatchStyle::Single;

                break;

            }

            case css::drawing::HatchStyle_DOUBLE :

            {

                aHatchStyle = drawinglayer::attribute::HatchStyle::Double;

                break;

            }

            default :

            {

                aHatchStyle = drawinglayer::attribute::HatchStyle::Triple; // css::drawing::HatchStyle_TRIPLE

                break;

            }

        }

        const basegfx::B2DHomMatrix aScaleMatrix(OutputDevice::LogicToLogic(MapMode(MapUnit::Map100thMM), MapMode(MapUnit::MapPixel)));

        const basegfx::B2DVector aScaleVector(aScaleMatrix * basegfx::B2DVector(1.0, 0.0));

        const double fScaleValue(aScaleVector.getLength());

        drawinglayer::attribute::FillHatchAttribute aFillHatch(

            aHatchStyle,

            static_cast<double>(rHatch.GetDistance()) * fScaleValue,

            toRadians(rHatch.GetAngle()),

            rHatch.GetColor().getBColor(),

            3, // same default as VCL, a minimum of three discrete units (pixels) offset

            false);

        const basegfx::BColor aBlack(0.0, 0.0, 0.0);

        const drawinglayer::primitive2d::Primitive2DReference aHatchPrimitive(

            new drawinglayer::primitive2d::PolyPolygonHatchPrimitive2D(

                basegfx::B2DPolyPolygon(aRectangle),

                aBlack,

                std::move(aFillHatch)));

        const drawinglayer::primitive2d::Primitive2DReference aBlackRectanglePrimitive(

            new drawinglayer::primitive2d::PolygonHairlinePrimitive2D(

                std::move(aRectangle),

                aBlack));

        // prepare VirtualDevice

        ScopedVclPtrInstance< VirtualDevice > pVirtualDevice;

        const drawinglayer::geometry::ViewInformation2D aNewViewInformation2D;

        pVirtualDevice->SetOutputSizePixel(rSize);

        pVirtualDevice->SetDrawMode(rStyleSettings.GetHighContrastMode()

            ? DrawModeFlags::SettingsLine | DrawModeFlags::SettingsFill | DrawModeFlags::SettingsText | DrawModeFlags::SettingsGradient

            : DrawModeFlags::Default);

        if(rStyleSettings.GetPreviewUsesCheckeredBackground())

        {

            const Point aNull(0, 0);

            static const sal_uInt32 nLen(8);

            static const Color aW(COL_WHITE);

            static const Color aG(0xef, 0xef, 0xef);

            pVirtualDevice->DrawCheckered(aNull, rSize, nLen, aW, aG);

        }

        else

        {

            pVirtualDevice->SetBackground(rStyleSettings.GetFieldColor());

            pVirtualDevice->Erase();

        }

        // create processor and draw primitives

        std::unique_ptr<drawinglayer::processor2d::BaseProcessor2D> pProcessor2D(drawinglayer::processor2d::createPixelProcessor2DFromOutputDevice(

            *pVirtualDevice,

            aNewViewInformation2D));

        drawinglayer::primitive2d::Primitive2DContainer aSequence {

            aHatchPrimitive, aBlackRectanglePrimitive };

        pProcessor2D->process(aSequence);

        pProcessor2D.reset();

        // get result bitmap and scale

        aRetval = pVirtualDevice->GetBitmap(Point(0, 0), pVirtualDevice->GetOutputSizePixel());

    }

    return aRetval;

}

Bitmap XHatchList::CreateBitmapForUI(tools::Long nIndex)

{

    const StyleSettings& rStyleSettings = Application::GetSettings().GetStyleSettings();

    const Size& rSize = rStyleSettings.GetListBoxPreviewDefaultPixelSize();

    Bitmap aRetVal = CreateBitmap(nIndex, rSize);

    return aRetVal;

}

/* vim:set shiftwidth=4 softtabstop=4 expandtab: */