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

**

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

** All rights reserved.

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

**

** This file is part of the QtGui module 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 <private/qcursor_p.h>

#include <private/qpixmap_mac_p.h>

#include <qapplication.h>

#include <qbitmap.h>

#include <qcursor.h>

#include <qevent.h>

#include <string.h>

#include <unistd.h>

#include <AppKit/NSCursor.h>

#include <qpainter.h>

#include <private/qt_cocoa_helpers_mac_p.h>

QT_BEGIN_NAMESPACE

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

  Externals

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

extern QCursorData *qt_cursorTable[Qt::LastCursor + 1];

extern OSWindowRef qt_mac_window_for(const QWidget *); //qwidget_mac.cpp

extern GrafPtr qt_mac_qd_context(const QPaintDevice *); //qpaintdevice_mac.cpp

extern bool qt_sendSpontaneousEvent(QObject *, QEvent *); //qapplication_mac.cpp

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

  Internal QCursorData class

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

class QMacAnimateCursor : public QObject

{

    int timerId, step;

    ThemeCursor curs;

public:

    QMacAnimateCursor() : QObject(), timerId(-1) { }

    void start(ThemeCursor c) {

        step = 1;

        if(timerId != -1)

            killTimer(timerId);

        timerId = startTimer(300);

        curs = c;

    }

    void stop() {

        if(timerId != -1) {

            killTimer(timerId);

            timerId = -1;

        }

    }

protected:

    void timerEvent(QTimerEvent *e) {

        if(e->timerId() == timerId) {

            /*

            if(SetAnimatedThemeCursor(curs, step++) == themeBadCursorIndexErr)

                stop();

            */

        }

    }

};

void *qt_mac_nsCursorForQCursor(const QCursor &c)

{

    c.d->update();

    return [[static_cast<NSCursor *>(c.d->curs.cp.nscursor) retain] autorelease];

}

static QCursorData *currentCursor = 0; //current cursor

void qt_mac_set_cursor(const QCursor *c, const QPoint &)

{

#ifdef QT_MAC_USE_COCOA

    Q_UNUSED(c);

    return;

#else

    if (!c) {

        currentCursor = 0;

        return;

    }

    c->handle(); //force the cursor to get loaded, if it's not

    if(1 || currentCursor != c->d) {

        if(currentCursor && currentCursor->type == QCursorData::TYPE_ThemeCursor

                && currentCursor->curs.tc.anim)

            currentCursor->curs.tc.anim->stop();

        QMacCocoaAutoReleasePool pool;

        if(c->d->type == QCursorData::TYPE_ImageCursor) {

            [static_cast<NSCursor *>(c->d->curs.cp.nscursor) set];

        } else if(c->d->type == QCursorData::TYPE_ThemeCursor) {

#ifdef QT_MAC_USE_COCOA

            if (c->d->curs.cp.nscursor == 0)

                [[NSCursor arrowCursor] set];

            [static_cast<NSCursor *>(c->d->curs.cp.nscursor) set];

#else

            if(SetAnimatedThemeCursor(c->d->curs.tc.curs, 0) == themeBadCursorIndexErr) {

                SetThemeCursor(c->d->curs.tc.curs);

            } else {

                if(!c->d->curs.tc.anim)

                    c->d->curs.tc.anim = new QMacAnimateCursor;

                c->d->curs.tc.anim->start(c->d->curs.tc.curs);

            }

#endif

        }

    }

    currentCursor = c->d;

#endif

}

void qt_mac_update_cursor_at_global_pos(const QPoint &globalPos)

{

#ifdef QT_MAC_USE_COCOA

    Q_UNUSED(globalPos);

    return;

#else

    QCursor cursor(Qt::ArrowCursor);

    if (QApplication::overrideCursor()) {

        cursor = *QApplication::overrideCursor();

    } else {

        for(QWidget *w = QApplication::widgetAt(globalPos); w; w = w->parentWidget()) {

            if(w->testAttribute(Qt::WA_SetCursor)) {

                cursor = w->cursor();

                break;

            }

        }

    }

    qt_mac_set_cursor(&cursor, globalPos);

#endif

}

void qt_mac_update_cursor()

{

    qt_mac_update_cursor_at_global_pos(QCursor::pos());

}

static int nextCursorId = Qt::BitmapCursor;

QCursorData::QCursorData(Qt::CursorShape s)

    : cshape(s), bm(0), bmm(0), hx(-1), hy(-1), mId(s), type(TYPE_None)

{

    ref = 1;

    memset(&curs, '\0', sizeof(curs));

}

QCursorData::~QCursorData()

{

    if (type == TYPE_ImageCursor) {

        if (curs.cp.my_cursor) {

            QMacCocoaAutoReleasePool pool;

            [static_cast<NSCursor *>(curs.cp.nscursor) release];

        }

    } else if(type == TYPE_ThemeCursor) {

        delete curs.tc.anim;

    }

    type = TYPE_None;

    delete bm;

    delete bmm;

    if(currentCursor == this)

        currentCursor = 0;

}

QCursorData *QCursorData::setBitmap(const QBitmap &bitmap, const QBitmap &mask, int hotX, int hotY)

{

    if (!QCursorData::initialized)

        QCursorData::initialize();

    if (bitmap.depth() != 1 || mask.depth() != 1 || bitmap.size() != mask.size()) {

        qWarning("Qt: QCursor: Cannot create bitmap cursor; invalid bitmap(s)");

        QCursorData *c = qt_cursorTable[0];

        c->ref.ref();

        return c;

    }

    // This is silly, but this is apparently called outside the constructor, so we have

    // to be ready for that case.

    QCursorData *x = new QCursorData;

    x->ref = 1;

    x->mId = ++nextCursorId;

    x->bm  = new QBitmap(bitmap);

    x->bmm = new QBitmap(mask);

    x->cshape = Qt::BitmapCursor;

    x->hx = hotX >= 0 ? hotX : bitmap.width() / 2;

    x->hy = hotY >= 0 ? hotY : bitmap.height() / 2;

    return x;

}

Qt::HANDLE QCursor::handle() const

{

    if(!QCursorData::initialized)

        QCursorData::initialize();

    if(d->type == QCursorData::TYPE_None)

        d->update();

    return (Qt::HANDLE)d->mId;

}

QPoint QCursor::pos()

{

    return flipPoint([NSEvent mouseLocation]).toPoint();

}

void QCursor::setPos(int x, int y)

{

    CGWarpMouseCursorPosition(CGPointMake(x, y));

    /* I'm not too keen on doing this, but this makes it a lot easier, so I just

       send the event back through the event system and let it get propagated correctly

       ideally this would not really need to be faked --Sam

    */

    QWidget *widget = 0;

    if(QWidget *grb = QWidget::mouseGrabber())

        widget = grb;

    else

        widget = QApplication::widgetAt(QPoint(x, y));

    if(widget) {

        QMouseEvent me(QMouseEvent::MouseMove, widget->mapFromGlobal(QPoint(x, y)), Qt::NoButton,

                       QApplication::mouseButtons(), QApplication::keyboardModifiers());

        qt_sendSpontaneousEvent(widget, &me);

    }

}

void QCursorData::initCursorFromBitmap()

{

    NSImage *nsimage;

    QImage finalCursor(bm->size(), QImage::Format_ARGB32);

    QImage bmi = bm->toImage().convertToFormat(QImage::Format_RGB32);

    QImage bmmi = bmm->toImage().convertToFormat(QImage::Format_RGB32);

    for (int row = 0; row < finalCursor.height(); ++row) {

        QRgb *bmData = reinterpret_cast<QRgb *>(bmi.scanLine(row));

        QRgb *bmmData = reinterpret_cast<QRgb *>(bmmi.scanLine(row));

        QRgb *finalData = reinterpret_cast<QRgb *>(finalCursor.scanLine(row));

        for (int col = 0; col < finalCursor.width(); ++col) {

            if (bmmData[col] == 0xff000000 && bmData[col] == 0xffffffff) {

                finalData[col] = 0xffffffff;

            } else if (bmmData[col] == 0xff000000 && bmData[col] == 0xffffffff) {

                finalData[col] = 0x7f000000;

            } else if (bmmData[col] == 0xffffffff && bmData[col] == 0xffffffff) {

                finalData[col] = 0x00000000;

            } else {

                finalData[col] = 0xff000000;

            }

        }

    }

    type = QCursorData::TYPE_ImageCursor;

    curs.cp.my_cursor = true;

    QPixmap bmCopy = QPixmap::fromImage(finalCursor);

    NSPoint hotSpot = { hx, hy };

    nsimage = static_cast<NSImage*>(qt_mac_create_nsimage(bmCopy));

    curs.cp.nscursor = [[NSCursor alloc] initWithImage:nsimage hotSpot: hotSpot];

    [nsimage release];

}

void QCursorData::initCursorFromPixmap()

{

    type = QCursorData::TYPE_ImageCursor;

    curs.cp.my_cursor = true;

    NSPoint hotSpot = { hx, hy };

    NSImage *nsimage;

    nsimage = static_cast<NSImage *>(qt_mac_create_nsimage(pixmap));

    curs.cp.nscursor = [[NSCursor alloc] initWithImage:nsimage hotSpot: hotSpot];

    [nsimage release];

}

void QCursorData::update()

{

    if(!QCursorData::initialized)

        QCursorData::initialize();

    if(type != QCursorData::TYPE_None)

        return;

    /* Note to self... ***

     * mask x data

     * 0xFF x 0x00 == fully opaque white

     * 0x00 x 0xFF == xor'd black

     * 0xFF x 0xFF == fully opaque black

     * 0x00 x 0x00 == fully transparent

     */

    if (hx < 0)

        hx = 0;

    if (hy < 0)

        hy = 0;

#define QT_USE_APPROXIMATE_CURSORS

#ifdef QT_USE_APPROXIMATE_CURSORS

    static const uchar cur_ver_bits[] = {

        0x00, 0x00, 0x00, 0x00, 0x01, 0x80, 0x03, 0xc0, 0x07, 0xe0, 0x0f, 0xf0,

        0x01, 0x80, 0x01, 0x80, 0x01, 0x80, 0x01, 0x80, 0x01, 0x80, 0x0f, 0xf0,

        0x07, 0xe0, 0x03, 0xc0, 0x01, 0x80, 0x00, 0x00 };

    static const uchar mcur_ver_bits[] = {

        0x00, 0x00, 0x03, 0x80, 0x07, 0xc0, 0x0f, 0xe0, 0x1f, 0xf0, 0x3f, 0xf8,

        0x7f, 0xfc, 0x07, 0xc0, 0x07, 0xc0, 0x07, 0xc0, 0x7f, 0xfc, 0x3f, 0xf8,

        0x1f, 0xf0, 0x0f, 0xe0, 0x07, 0xc0, 0x03, 0x80 };

    static const uchar cur_hor_bits[] = {

        0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x08, 0x20, 0x18, 0x30,

        0x38, 0x38, 0x7f, 0xfc, 0x7f, 0xfc, 0x38, 0x38, 0x18, 0x30, 0x08, 0x20,

        0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00 };

    static const uchar mcur_hor_bits[] = {

        0x00, 0x00, 0x00, 0x00, 0x04, 0x40, 0x0c, 0x60, 0x1c, 0x70, 0x3c, 0x78,

        0x7f, 0xfc, 0xff, 0xfe, 0xff, 0xfe, 0xff, 0xfe, 0x7f, 0xfc, 0x3c, 0x78,

        0x1c, 0x70, 0x0c, 0x60, 0x04, 0x40, 0x00, 0x00 };

    static const uchar cur_fdiag_bits[] = {

        0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x01, 0xf8, 0x00, 0xf8, 0x00, 0x78,

        0x00, 0xf8, 0x01, 0xd8, 0x23, 0x88, 0x37, 0x00, 0x3e, 0x00, 0x3c, 0x00,

        0x3e, 0x00, 0x3f, 0x00, 0x00, 0x00, 0x00, 0x00 };

    static const uchar mcur_fdiag_bits[] = {

        0x00, 0x00, 0x00, 0x00, 0x07, 0xfc, 0x03, 0xfc, 0x01, 0xfc, 0x00, 0xfc,

        0x41, 0xfc, 0x63, 0xfc, 0x77, 0xdc, 0x7f, 0x8c, 0x7f, 0x04, 0x7e, 0x00,

        0x7f, 0x00, 0x7f, 0x80, 0x7f, 0xc0, 0x00, 0x00 };

    static const uchar cur_bdiag_bits[] = {

        0x00, 0x00, 0x00, 0x00, 0x3f, 0x00, 0x3e, 0x00, 0x3c, 0x00, 0x3e, 0x00,

        0x37, 0x00, 0x23, 0x88, 0x01, 0xd8, 0x00, 0xf8, 0x00, 0x78, 0x00, 0xf8,

        0x01, 0xf8, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00 };

    static const uchar mcur_bdiag_bits[] = {

        0x00, 0x00, 0x7f, 0xc0, 0x7f, 0x80, 0x7f, 0x00, 0x7e, 0x00, 0x7f, 0x04,

        0x7f, 0x8c, 0x77, 0xdc, 0x63, 0xfc, 0x41, 0xfc, 0x00, 0xfc, 0x01, 0xfc,

        0x03, 0xfc, 0x07, 0xfc, 0x00, 0x00, 0x00, 0x00 };

    static const unsigned char cur_up_arrow_bits[] = {

        0x00, 0x80, 0x01, 0x40, 0x01, 0x40, 0x02, 0x20, 0x02, 0x20, 0x04, 0x10,

        0x04, 0x10, 0x08, 0x08, 0x0f, 0x78, 0x01, 0x40, 0x01, 0x40, 0x01, 0x40,

        0x01, 0x40, 0x01, 0x40, 0x01, 0x40, 0x01, 0xc0 };

    static const unsigned char mcur_up_arrow_bits[] = {

        0x00, 0x80, 0x01, 0xc0, 0x01, 0xc0, 0x03, 0xe0, 0x03, 0xe0, 0x07, 0xf0,

        0x07, 0xf0, 0x0f, 0xf8, 0x0f, 0xf8, 0x01, 0xc0, 0x01, 0xc0, 0x01, 0xc0,

        0x01, 0xc0, 0x01, 0xc0, 0x01, 0xc0, 0x01, 0xc0 };

#endif

    const uchar *cursorData = 0;

    const uchar *cursorMaskData = 0;

#ifdef QT_MAC_USE_COCOA

    switch (cshape) {                        // map Q cursor to MAC cursor

    case Qt::BitmapCursor: {

        if (pixmap.isNull())

            initCursorFromBitmap();

        else

            initCursorFromPixmap();

        break; }

    case Qt::BlankCursor: {

        pixmap = QPixmap(16, 16);

        pixmap.fill(Qt::transparent);

        initCursorFromPixmap();

        break; }

    case Qt::ArrowCursor: {

        type = QCursorData::TYPE_ThemeCursor;

        curs.cp.nscursor = [NSCursor arrowCursor];

        break; }

    case Qt::CrossCursor: {

        type = QCursorData::TYPE_ThemeCursor;

        curs.cp.nscursor = [NSCursor crosshairCursor];

        break; }

    case Qt::WaitCursor: {

        pixmap = QPixmap(QLatin1String(":/trolltech/mac/cursors/images/spincursor.png"));

        initCursorFromPixmap();

        break; }

    case Qt::IBeamCursor: {

        type = QCursorData::TYPE_ThemeCursor;

        curs.cp.nscursor = [NSCursor IBeamCursor];

        break; }

    case Qt::SizeAllCursor: {

        pixmap = QPixmap(QLatin1String(":/trolltech/mac/cursors/images/pluscursor.png"));

        initCursorFromPixmap();

        break; }

    case Qt::WhatsThisCursor: { //for now just use the pointing hand

    case Qt::PointingHandCursor:

        type = QCursorData::TYPE_ThemeCursor;

        curs.cp.nscursor = [NSCursor pointingHandCursor];

        break; }

    case Qt::BusyCursor: {

        pixmap = QPixmap(QLatin1String(":/trolltech/mac/cursors/images/waitcursor.png"));

        initCursorFromPixmap();

        break; }

    case Qt::SplitVCursor: {

        type = QCursorData::TYPE_ThemeCursor;

        curs.cp.nscursor = [NSCursor resizeUpDownCursor];

        break; }

    case Qt::SplitHCursor: {

        type = QCursorData::TYPE_ThemeCursor;

        curs.cp.nscursor = [NSCursor resizeLeftRightCursor];

        break; }

    case Qt::ForbiddenCursor: {

        pixmap = QPixmap(QLatin1String(":/trolltech/mac/cursors/images/forbiddencursor.png"));

        initCursorFromPixmap();

        break; }

    case Qt::OpenHandCursor:

        type = QCursorData::TYPE_ThemeCursor;

        curs.cp.nscursor = [NSCursor openHandCursor];

        break;

    case Qt::ClosedHandCursor:

        type = QCursorData::TYPE_ThemeCursor;

        curs.cp.nscursor = [NSCursor closedHandCursor];

        break;

#define QT_USE_APPROXIMATE_CURSORS

#ifdef QT_USE_APPROXIMATE_CURSORS

    case Qt::SizeVerCursor:

        cursorData = cur_ver_bits;

        cursorMaskData = mcur_ver_bits;

        hx = hy = 8;

        break;

    case Qt::SizeHorCursor:

        cursorData = cur_hor_bits;

        cursorMaskData = mcur_hor_bits;

        hx = hy = 8;

        break;

    case Qt::SizeBDiagCursor:

        cursorData = cur_fdiag_bits;

        cursorMaskData = mcur_fdiag_bits;

        hx = hy = 8;

        break;

    case Qt::SizeFDiagCursor:

        cursorData = cur_bdiag_bits;

        cursorMaskData = mcur_bdiag_bits;

        hx = hy = 8;

        break;

    case Qt::UpArrowCursor:

        cursorData = cur_up_arrow_bits;

        cursorMaskData = mcur_up_arrow_bits;

        hx = 8;

        break;

#endif

    default:

        qWarning("Qt: QCursor::update: Invalid cursor shape %d", cshape);

        return;

    }

#else

    // Carbon

    switch (cshape) {                        // map Q cursor to MAC cursor

    case Qt::BitmapCursor: {

        if (pixmap.isNull())

            initCursorFromBitmap();

        else

            initCursorFromPixmap();

        break; }

    case Qt::BlankCursor: {

        pixmap = QPixmap(16, 16);

        pixmap.fill(Qt::transparent);

        initCursorFromPixmap();

        break; }

    case Qt::ArrowCursor: {

        type = QCursorData::TYPE_ThemeCursor;

        curs.tc.curs = kThemeArrowCursor;

        break; }

    case Qt::CrossCursor: {

        type = QCursorData::TYPE_ThemeCursor;

        curs.tc.curs = kThemeCrossCursor;

        break; }

    case Qt::WaitCursor: {

        type = QCursorData::TYPE_ThemeCursor;

        curs.tc.curs = kThemeWatchCursor;

        break; }

    case Qt::IBeamCursor: {

        type = QCursorData::TYPE_ThemeCursor;

        curs.tc.curs = kThemeIBeamCursor;

        break; }

    case Qt::SizeAllCursor: {

        type = QCursorData::TYPE_ThemeCursor;

        curs.tc.curs = kThemePlusCursor;

        break; }

    case Qt::WhatsThisCursor: { //for now just use the pointing hand

    case Qt::PointingHandCursor:

        type = QCursorData::TYPE_ThemeCursor;

        curs.tc.curs = kThemePointingHandCursor;

        break; }

    case Qt::BusyCursor: {

        type = QCursorData::TYPE_ThemeCursor;

        curs.tc.curs = kThemeSpinningCursor;

        break; }

    case Qt::SplitVCursor: {

        type = QCursorData::TYPE_ThemeCursor;

        curs.tc.curs = kThemeResizeUpDownCursor;

        break; }

    case Qt::SplitHCursor: {

        type = QCursorData::TYPE_ThemeCursor;

        curs.tc.curs = kThemeResizeLeftRightCursor;

        break; }

    case Qt::ForbiddenCursor: {

        type = QCursorData::TYPE_ThemeCursor;

        curs.tc.curs = kThemeNotAllowedCursor;

        break; }

    case Qt::OpenHandCursor:

        type = QCursorData::TYPE_ThemeCursor;

        curs.tc.curs = kThemeOpenHandCursor;

        break;

    case Qt::ClosedHandCursor:

        type = QCursorData::TYPE_ThemeCursor;

        curs.tc.curs = kThemeClosedHandCursor;

        break;

#define QT_USE_APPROXIMATE_CURSORS

#ifdef QT_USE_APPROXIMATE_CURSORS

    case Qt::SizeVerCursor:

        cursorData = cur_ver_bits;

        cursorMaskData = mcur_ver_bits;

        hx = hy = 8;

        break;