/****************************************************************************

**

** Copyright (C) 2009 Nokia Corporation and/or its subsidiary(-ies).

** All rights reserved.

** Contact: Nokia Corporation (qt-info@nokia.com)

**

** This file is part of the Qt Designer of the Qt Toolkit.

**

** $QT_BEGIN_LICENSE:LGPL$

** No Commercial Usage

** This file contains pre-release code and may not be distributed.

** You may use this file in accordance with the terms and conditions

** contained in the Technology Preview License Agreement accompanying

** this package.

**

** GNU Lesser General Public License Usage

** Alternatively, this file may be used under the terms of the GNU Lesser

** General Public License version 2.1 as published by the Free Software

** Foundation and appearing in the file LICENSE.LGPL included in the

** packaging of this file.  Please review the following information to

** ensure the GNU Lesser General Public License version 2.1 requirements

** will be met: http://www.gnu.org/licenses/old-licenses/lgpl-2.1.html.

**

** In addition, as a special exception, Nokia gives you certain additional

** rights.  These rights are described in the Nokia Qt LGPL Exception

** version 1.1, included in the file LGPL_EXCEPTION.txt in this package.

**

** If you have questions regarding the use of this file, please contact

** Nokia at qt-info@nokia.com.

**

**

**

**

**

**

**

**

** $QT_END_LICENSE$

**

****************************************************************************/

#include "qaxwidgettaskmenu.h"

#include "qdesigneraxwidget.h"

#include "qaxwidgetpropertysheet.h"

#include <QtDesigner/QDesignerFormWindowInterface>

#include <QtDesigner/QDesignerFormWindowCursorInterface>

#include <QtDesigner/QDesignerFormEditorInterface>

#include <QtDesigner/QExtensionManager>

#include <QtGui/QUndoCommand>

#include <QtGui/QMessageBox>

#include <QtGui/QUndoStack>

#include <QtCore/QUuid>

#include <ActiveQt/qaxselect.h>

#include <olectl.h>

#include <qaxtypes.h>

QT_BEGIN_NAMESPACE

/* SetControlCommand: An undo commands that sets a control bypassing

   Designer's property system which cannot handle the changing

   of the 'control' property's index and other cached information

   when modifying it. */

class SetControlCommand : public QUndoCommand

{

public:

    SetControlCommand(QDesignerAxWidget *ax, QDesignerFormWindowInterface *core, const QString &newClsid = QString());

    virtual void redo() {  apply(m_newClsid); }

    virtual void undo() {  apply(m_oldClsid);  }

private:

    bool apply(const QString &clsid);

    QDesignerAxWidget *m_axWidget;

    QDesignerFormWindowInterface *m_formWindow;

    QString m_oldClsid;

    QString m_newClsid;

};

SetControlCommand::SetControlCommand(QDesignerAxWidget *ax, QDesignerFormWindowInterface *fw, const QString &newClsid) :

    m_axWidget(ax),

    m_formWindow(fw),

    m_oldClsid(ax->control()),

    m_newClsid(newClsid)

{

    if (m_newClsid.isEmpty())

        setText(QDesignerAxWidget::tr("Reset control"));

    else

        setText(QDesignerAxWidget::tr("Set control"));

}

bool SetControlCommand::apply(const QString &clsid)

{

    if (m_oldClsid == m_newClsid)

        return true;

    QObject *ext = m_formWindow->core()->extensionManager()->extension(m_axWidget, Q_TYPEID(QDesignerPropertySheetExtension));

    QAxWidgetPropertySheet *sheet = qobject_cast<QAxWidgetPropertySheet*>(ext);

    if (!sheet)

        return false;

    const bool hasClsid = !clsid.isEmpty();

    const int index = sheet->indexOf(QLatin1String(QAxWidgetPropertySheet::controlPropertyName));

    if (hasClsid)

        sheet->setProperty(index, clsid);

    else

        sheet->reset(index);

    return true;

}

// -------------------- QAxWidgetTaskMenu

QAxWidgetTaskMenu::QAxWidgetTaskMenu(QDesignerAxWidget *object, QObject *parent) :

    QObject(parent),

    m_axwidget(object),

    m_setAction(new QAction(tr("Set Control"), this)),

    m_resetAction(new QAction(tr("Reset Control"), this))

{

    connect(m_setAction, SIGNAL(triggered()), this, SLOT(setActiveXControl()));

    connect(m_resetAction, SIGNAL(triggered()), this, SLOT(resetActiveXControl()));

    m_taskActions.push_back(m_setAction);

    m_taskActions.push_back(m_resetAction);

}

QAxWidgetTaskMenu::~QAxWidgetTaskMenu()

{

}

QList<QAction*> QAxWidgetTaskMenu::taskActions() const

{

    const bool loaded = m_axwidget->loaded();

    m_setAction->setEnabled(!loaded);

    m_resetAction->setEnabled(loaded);

    return m_taskActions;

}

void QAxWidgetTaskMenu::resetActiveXControl()

{

    QDesignerFormWindowInterface *formWin = QDesignerFormWindowInterface::findFormWindow(m_axwidget);

    Q_ASSERT(formWin != 0);

    formWin->commandHistory()->push(new SetControlCommand(m_axwidget, formWin));

}

void QAxWidgetTaskMenu::setActiveXControl()

{

    QAxSelect *dialog = new QAxSelect(m_axwidget->topLevelWidget());

    if (dialog->exec())    {

        QUuid clsid = dialog->clsid();

        QString key;

        IClassFactory2 *cf2 = 0;

        CoGetClassObject(clsid, CLSCTX_SERVER, 0, IID_IClassFactory2, (void**)&cf2);

        if (cf2)  {

            BSTR bKey;

            HRESULT hres = cf2->RequestLicKey(0, &bKey);

            if (hres == CLASS_E_NOTLICENSED) {

                QMessageBox::warning(m_axwidget->topLevelWidget(), tr("Licensed Control"),

                                     tr("The control requires a design-time license"));

                clsid = QUuid();

            } else {

                key = QString::fromWCharArray(bKey);

            }

            cf2->Release();

        }

        if (!clsid.isNull())  {

            QDesignerFormWindowInterface *formWin = QDesignerFormWindowInterface::findFormWindow(m_axwidget);

            Q_ASSERT(formWin != 0);

            QString value = clsid.toString();

            if (!key.isEmpty()) {

                value += QLatin1Char(':');

                value += key;

            }

            formWin->commandHistory()->push(new SetControlCommand(m_axwidget, formWin, value));

        }

    }

    delete dialog;

}

QT_END_NAMESPACE