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

#include "dlgctrl.hxx"

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

static vcl::Window* ImplGetLabelFor(vcl::Window* pFrameWindow, WindowType nMyType, const vcl::Window* pLabel, sal_Unicode nAccel)

{

    vcl::Window* pWindow = nullptr;

    if( nMyType == WindowType::FIXEDTEXT     ||

        nMyType == WindowType::FIXEDLINE     ||

        nMyType == WindowType::GROUPBOX )

    {

        // #i100833# MT 2010/02: Group box and fixed lines can also label a fixed text.

        // See tools/options/print for example.

        bool bThisIsAGroupControl = (nMyType == WindowType::GROUPBOX) || (nMyType == WindowType::FIXEDLINE);

        // get index, form start and form end

        sal_uInt16 nIndex=0, nFormStart=0, nFormEnd=0;

        ::ImplFindDlgCtrlWindow( pFrameWindow,

                                           pLabel,

                                           nIndex,

                                           nFormStart,

                                           nFormEnd );

        if( nAccel )

        {

            // find the accelerated window

            pWindow = ::ImplFindAccelWindow( pFrameWindow,

                                             nIndex,

                                             nAccel,

                                             nFormStart,

                                             nFormEnd,

                                             false );

        }

        else

        {

            // find the next control; if that is a fixed text

            // fixed line or group box, then return NULL

            while( nIndex < nFormEnd )

            {

                nIndex++;

                vcl::Window* pSWindow = ::ImplGetChildWindow( pFrameWindow,

                                                 nIndex,

                                                 nIndex,

                                                 false );

                if( pSWindow && isVisibleInLayout(pSWindow) && ! (pSWindow->GetStyle() & WB_NOLABEL) )

                {

                    WindowType eType = pSWindow->GetType();

                    if( eType != WindowType::FIXEDTEXT   &&

                        eType != WindowType::FIXEDLINE   &&

                        eType != WindowType::GROUPBOX )

                    {

                        pWindow = pSWindow;

                    }

                    else if( bThisIsAGroupControl && ( eType == WindowType::FIXEDTEXT ) )

                    {

                        pWindow = pSWindow;

                    }

                    break;

                }

            }

        }

    }

    return pWindow;

}

namespace vcl {

Window* Window::getLegacyNonLayoutAccessibleRelationLabelFor() const

{

    Window* pFrameWindow = ImplGetFrameWindow();

    WinBits nFrameStyle = pFrameWindow->GetStyle();

    if( ! ( nFrameStyle & WB_DIALOGCONTROL )

        || ( nFrameStyle & WB_NODIALOGCONTROL )

        )

        return nullptr;

    sal_Unicode nAccel = getAccel( GetText() );

    Window* pWindow = ImplGetLabelFor(pFrameWindow, GetType(), this, nAccel);

    if( ! pWindow && mpWindowImpl->mpRealParent )

        pWindow = ImplGetLabelFor(mpWindowImpl->mpRealParent, GetType(), this, nAccel);

    return pWindow;

}

static Window* ImplGetLabeledBy(Window* pFrameWindow, WindowType nMyType, const Window* pLabeled)

{

    Window* pWindow = nullptr;

    if (pFrameWindow && nMyType != WindowType::GROUPBOX && nMyType != WindowType::FIXEDLINE)

    {

        // search for a control that labels this window

        // a label is considered the last fixed text, fixed line or group box

        // that comes before this control; with the exception of push buttons

        // which are labeled only if the fixed text, fixed line or group box

        // is directly before the control

        // get form start and form end and index of this control

        sal_uInt16 nIndex, nFormStart, nFormEnd;

        Window* pSWindow = ::ImplFindDlgCtrlWindow( pFrameWindow,

                                                    pLabeled,

                                                    nIndex,

                                                    nFormStart,

                                                    nFormEnd );

        if( pSWindow && nIndex != nFormStart )

        {

            if( nMyType == WindowType::PUSHBUTTON        ||

                nMyType == WindowType::HELPBUTTON        ||

                nMyType == WindowType::OKBUTTON      ||

                nMyType == WindowType::CANCELBUTTON )

            {

                nFormStart = nIndex-1;

            }

            for( sal_uInt16 nSearchIndex = nIndex-1; nSearchIndex >= nFormStart; nSearchIndex-- )

            {

                sal_uInt16 nFoundIndex = 0;

                pSWindow = ::ImplGetChildWindow( pFrameWindow,

                                                 nSearchIndex,

                                                 nFoundIndex,

                                                 false );

                if( pSWindow && isVisibleInLayout(pSWindow) && !(pSWindow->GetStyle() & WB_NOLABEL) )

                {

                    WindowType eType = pSWindow->GetType();

                    if ( eType == WindowType::FIXEDTEXT ||

                         eType == WindowType::FIXEDLINE ||

                         eType == WindowType::GROUPBOX )

                    {

                        // a fixed text can't be labelled by a fixed text.

                        if ( ( nMyType != WindowType::FIXEDTEXT ) || ( eType != WindowType::FIXEDTEXT ) )

                            pWindow = pSWindow;

                        break;

                    }

                }

                if( nFoundIndex > nSearchIndex || nSearchIndex == 0 )

                    break;

            }

        }

    }

    return pWindow;

}

Window* Window::getLegacyNonLayoutAccessibleRelationLabeledBy() const

{

    Window* pFrameWindow = ImplGetFrameWindow();

    // #i62723#, #104191# checkboxes and radiobuttons are not supposed to have labels

    if( GetType() == WindowType::CHECKBOX || GetType() == WindowType::RADIOBUTTON )

        return nullptr;

//    if( ! ( GetType() == WindowType::FIXEDTEXT     ||

//            GetType() == WindowType::FIXEDLINE     ||

//            GetType() == WindowType::GROUPBOX ) )

    // #i100833# MT 2010/02: Group box and fixed lines can also label a fixed text.

    // See tools/options/print for example.

    Window* pWindow = ImplGetLabeledBy(pFrameWindow, GetType(), this);

    if( ! pWindow && mpWindowImpl->mpRealParent )

        pWindow = ImplGetLabeledBy(mpWindowImpl->mpRealParent, GetType(), this);

    return pWindow;

}

Window* Window::getLegacyNonLayoutAccessibleRelationMemberOf() const

{

    Window* pWindow = nullptr;

    Window* pFrameWindow = GetParent();

    if ( !pFrameWindow )

    {

        pFrameWindow = ImplGetFrameWindow();

    }

    // if( ! ( GetType() == WindowType::FIXEDTEXT        ||

    if( GetType() != WindowType::FIXEDLINE && GetType() != WindowType::GROUPBOX )

    {

        // search for a control that makes member of this window

        // it is considered the last fixed line or group box

        // that comes before this control; with the exception of push buttons

        // which are labeled only if the fixed line or group box

        // is directly before the control

        // get form start and form end and index of this control

        sal_uInt16 nIndex, nFormStart, nFormEnd;

        Window* pSWindow

            = ::ImplFindDlgCtrlWindow(pFrameWindow, this, nIndex, nFormStart, nFormEnd);

        if( pSWindow && nIndex != nFormStart )

        {

            if( GetType() == WindowType::PUSHBUTTON      ||

                GetType() == WindowType::HELPBUTTON      ||

                GetType() == WindowType::OKBUTTON        ||

                GetType() == WindowType::CANCELBUTTON )

            {

                nFormStart = nIndex-1;

            }

            for( sal_uInt16 nSearchIndex = nIndex-1; nSearchIndex >= nFormStart; nSearchIndex-- )

            {

                sal_uInt16 nFoundIndex = 0;

                pSWindow = ::ImplGetChildWindow( pFrameWindow,

                    nSearchIndex,

                    nFoundIndex,

                    false );

                if( pSWindow && pSWindow->IsVisible() &&

                    ( pSWindow->GetType() == WindowType::FIXEDLINE   ||

                    pSWindow->GetType() == WindowType::GROUPBOX ) )

                {

                    pWindow = pSWindow;

                    break;

                }

                if( nFoundIndex > nSearchIndex || nSearchIndex == 0 )

                    break;

            }

        }

    }

    return pWindow;

}

} /* namespace vcl */

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