/* -*- 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 <sal/config.h>

#include <sal/log.hxx>

#include <cstring>

#include <headless/svpbmp.hxx>

#include <o3tl/safeint.hxx>

#include <tools/helpers.hxx>

#include <vcl/bitmap.hxx>

#include <vcl/CairoFormats.hxx>

using namespace basegfx;

SvpSalBitmap::SvpSalBitmap()

{

}

SvpSalBitmap::~SvpSalBitmap()

{

    Destroy();

}

static std::optional<BitmapBuffer> ImplCreateDIB(

    const Size& rSize,

    vcl::PixelFormat ePixelFormat,

    const BitmapPalette& rPal,

    bool bClear,

    bool bWithoutAlpha)

{

    if (!rSize.Width() || !rSize.Height())

        return std::nullopt;

    std::optional<BitmapBuffer> pDIB(std::in_place);

    switch (ePixelFormat)

    {

        case vcl::PixelFormat::N8_BPP:

            pDIB->meFormat = ScanlineFormat::N8BitPal;

            break;

        case vcl::PixelFormat::N24_BPP:

            pDIB->meFormat = SVP_24BIT_FORMAT;

            break;

        case vcl::PixelFormat::N32_BPP:

#if ENABLE_CAIRO_RGBA

            pDIB->meFormat = bWithoutAlpha ? ScanlineFormat::N32BitTcRgbx : SVP_CAIRO_FORMAT;

#elif defined OSL_BIGENDIAN

            pDIB->meFormat = bWithoutAlpha ? ScanlineFormat::N32BitTcXrgb : SVP_CAIRO_FORMAT;

#else

            pDIB->meFormat = bWithoutAlpha ? ScanlineFormat::N32BitTcBgrx : SVP_CAIRO_FORMAT;

#endif

            break;

        case vcl::PixelFormat::INVALID:

            assert(false);

            pDIB->meFormat = SVP_CAIRO_FORMAT;

            break;

    }

    sal_uInt16 nColors = 0;

    if (ePixelFormat <= vcl::PixelFormat::N8_BPP)

        nColors = vcl::numberOfColors(ePixelFormat);

    pDIB->meDirection = ScanlineDirection::TopDown;

    pDIB->mnWidth = rSize.Width();

    pDIB->mnHeight = rSize.Height();

    tools::Long nScanlineBase;

    bool bFail = o3tl::checked_multiply<tools::Long>(pDIB->mnWidth, vcl::pixelFormatBitCount(ePixelFormat), nScanlineBase);

    if (bFail)

    {

        SAL_WARN("vcl.gdi", "checked multiply failed");

        return std::nullopt;

    }

    pDIB->mnScanlineSize = AlignedWidth4Bytes(nScanlineBase);

    if (pDIB->mnScanlineSize < nScanlineBase/8)

    {

        SAL_WARN("vcl.gdi", "scanline calculation wraparound");

        return std::nullopt;

    }

    pDIB->mnBitCount = vcl::pixelFormatBitCount(ePixelFormat);

    if (nColors)

    {

        pDIB->maPalette = rPal;

        pDIB->maPalette.SetEntryCount( nColors );

    }

    size_t size;

    bFail = o3tl::checked_multiply<size_t>(pDIB->mnHeight, pDIB->mnScanlineSize, size);

    SAL_WARN_IF(bFail, "vcl.gdi", "checked multiply failed");

    if (bFail || size > SAL_MAX_INT32/2)

    {

        return std::nullopt;

    }

    try

    {

        pDIB->mpBits = new sal_uInt8[size];

#ifdef __SANITIZE_ADDRESS__

        if (!pDIB->mpBits)

        {   // can only happen with ASAN allocator_may_return_null=1

            pDIB.reset();

        }

        else

#endif

        if (bClear)

        {

            std::memset(pDIB->mpBits, 0, size);

        }

    }

    catch (const std::bad_alloc&)

    {

        pDIB.reset();

    }

    return pDIB;

}

void SvpSalBitmap::Create(const std::optional<BitmapBuffer>& pBuf)

{

    Destroy();

    moDIB = pBuf;

}

bool SvpSalBitmap::ImplCreate(const Size& rSize, vcl::PixelFormat ePixelFormat,

                              const BitmapPalette& rPal, bool bClear, bool bWithoutAlpha)

{

    Destroy();

    moDIB = ImplCreateDIB(rSize, ePixelFormat, rPal, bClear, bWithoutAlpha);

    return moDIB.has_value();

}

bool SvpSalBitmap::Create(const Size& rSize, vcl::PixelFormat ePixelFormat, const BitmapPalette& rPal)

{

    return ImplCreate(rSize, ePixelFormat, rPal, true);

}

bool SvpSalBitmap::Create(const SalBitmap& rBmp)

{

    Destroy();

    const SvpSalBitmap& rSalBmp = static_cast<const SvpSalBitmap&>(rBmp);

    if (rSalBmp.moDIB)

    {

        // TODO: reference counting...

        moDIB.emplace( *rSalBmp.moDIB );

        const size_t size = moDIB->mnScanlineSize * moDIB->mnHeight;

        if (size > SAL_MAX_INT32/2)

        {

            moDIB.reset();

            return false;

        }

        // TODO: get rid of this when BitmapBuffer gets copy constructor

        try

        {

            moDIB->mpBits = new sal_uInt8[size];

            std::memcpy(moDIB->mpBits, rSalBmp.moDIB->mpBits, size);

        }

        catch (const std::bad_alloc&)

        {

            moDIB.reset();

        }

    }

    return !rSalBmp.moDIB.has_value() || moDIB.has_value();

}

bool SvpSalBitmap::Create( const SalBitmap& /*rSalBmp*/,

                           SalGraphics& /*rGraphics*/ )

{

    return false;

}

bool SvpSalBitmap::Create( const css::uno::Reference< css::rendering::XBitmapCanvas >& /*xBitmapCanvas*/, Size& /*rSize*/ )

{

    return false;

}

void SvpSalBitmap::Destroy()

{

    if (moDIB.has_value())

    {

        delete[] moDIB->mpBits;

        moDIB.reset();

    }

}

Size SvpSalBitmap::GetSize() const

{

    Size aSize;

    if (moDIB.has_value())

    {

        aSize.setWidth( moDIB->mnWidth );

        aSize.setHeight( moDIB->mnHeight );

    }

    return aSize;

}

ScanlineFormat SvpSalBitmap::GetScanlineFormat() const

{

    if (!moDIB.has_value())

        return ScanlineFormat::NONE;

    return moDIB->meFormat;

}

BitmapBuffer* SvpSalBitmap::AcquireBuffer(BitmapAccessMode)

{

    return moDIB ? &*moDIB : nullptr;

}

void SvpSalBitmap::ReleaseBuffer(BitmapBuffer*, BitmapAccessMode nMode)

{

    if( nMode == BitmapAccessMode::Write )

        InvalidateChecksum();

}

bool SvpSalBitmap::GetSystemData( BitmapSystemData& )

{

    return false;

}

bool SvpSalBitmap::ScalingSupported() const

{

    return false;

}

bool SvpSalBitmap::Scale( const double& /*rScaleX*/, const double& /*rScaleY*/, BmpScaleFlag /*nScaleFlag*/ )

{

    return false;

}

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