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

**

** 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 "qclipboard.h"

#include "qapplication.h"

#include "qbitmap.h"

#include "qdatetime.h"

#include "qdebug.h"

#include "qapplication_p.h"

#include <private/qt_mac_p.h>

#include "qevent.h"

#include "qurl.h"

#include <stdlib.h>

#include <string.h>

#include "qt_cocoa_helpers_mac_p.h"

QT_BEGIN_NAMESPACE

QT_USE_NAMESPACE

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

  QClipboard debug facilities

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

//#define DEBUG_PASTEBOARD

#ifndef QT_NO_CLIPBOARD

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

  QClipboard member functions for mac.

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

static QMacPasteboard *qt_mac_pasteboards[2] = {0, 0};

static inline QMacPasteboard *qt_mac_pasteboard(QClipboard::Mode mode)

{

    Q_ASSERT(mode == QClipboard::Clipboard || mode == QClipboard::FindBuffer);

    if (mode == QClipboard::Clipboard)

        return qt_mac_pasteboards[0];

    else

        return qt_mac_pasteboards[1];

}

static void qt_mac_cleanupPasteboard() {

    delete qt_mac_pasteboards[0];

    delete qt_mac_pasteboards[1];

    qt_mac_pasteboards[0] = 0;

    qt_mac_pasteboards[1] = 0;

}

static bool qt_mac_updateScrap(QClipboard::Mode mode)

{

    if(!qt_mac_pasteboards[0]) {

        qt_mac_pasteboards[0] = new QMacPasteboard(kPasteboardClipboard, QMacPasteboardMime::MIME_CLIP);

        qt_mac_pasteboards[1] = new QMacPasteboard(kPasteboardFind, QMacPasteboardMime::MIME_CLIP);

        qAddPostRoutine(qt_mac_cleanupPasteboard);

        return true;

    }

    return qt_mac_pasteboard(mode)->sync();

}

void QClipboard::clear(Mode mode)

{

    if (!supportsMode(mode))

        return;

    qt_mac_updateScrap(mode);

    qt_mac_pasteboard(mode)->clear();

    setMimeData(0, mode);

}

void QClipboard::ownerDestroyed()

{

}

void QClipboard::connectNotify(const char *signal)

{

    Q_UNUSED(signal);

}

bool QClipboard::event(QEvent *e)

{

    if(e->type() != QEvent::Clipboard)

        return QObject::event(e);

    if (qt_mac_updateScrap(QClipboard::Clipboard)) {

        emitChanged(QClipboard::Clipboard);

    }

    if (qt_mac_updateScrap(QClipboard::FindBuffer)) {

        emitChanged(QClipboard::FindBuffer);

    }

    return QObject::event(e);

}

const QMimeData *QClipboard::mimeData(Mode mode) const

{

    if (!supportsMode(mode))

        return 0;

    qt_mac_updateScrap(mode);

    return qt_mac_pasteboard(mode)->mimeData();

}

void QClipboard::setMimeData(QMimeData *src, Mode mode)

{

    if (!supportsMode(mode))

        return;

    qt_mac_updateScrap(mode);

    qt_mac_pasteboard(mode)->setMimeData(src);

    emitChanged(mode);

}

bool QClipboard::supportsMode(Mode mode) const

{

    return (mode == Clipboard || mode == FindBuffer);

}

bool QClipboard::ownsMode(Mode mode) const

{

    Q_UNUSED(mode);

    return false;

}

#endif // QT_NO_CLIPBOARD

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

   QMacPasteboard code

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

QMacPasteboard::QMacPasteboard(PasteboardRef p, uchar mt)

{

    mac_mime_source = false;

    mime_type = mt ? mt : uchar(QMacPasteboardMime::MIME_ALL);

    paste = p;

    CFRetain(paste);

}

QMacPasteboard::QMacPasteboard(uchar mt)

{

    mac_mime_source = false;

    mime_type = mt ? mt : uchar(QMacPasteboardMime::MIME_ALL);

    paste = 0;

    OSStatus err = PasteboardCreate(0, &paste);

    if(err == noErr) {

        PasteboardSetPromiseKeeper(paste, promiseKeeper, this);

    } else {

        qDebug("PasteBoard: Error creating pasteboard: [%d]", (int)err);

    }

}

QMacPasteboard::QMacPasteboard(CFStringRef name, uchar mt)

{

    mac_mime_source = false;

    mime_type = mt ? mt : uchar(QMacPasteboardMime::MIME_ALL);

    paste = 0;

    OSStatus err = PasteboardCreate(name, &paste);

    if(err == noErr) {

        PasteboardSetPromiseKeeper(paste, promiseKeeper, this);

    } else {

        qDebug("PasteBoard: Error creating pasteboard: %s [%d]", QCFString::toQString(name).toLatin1().constData(), (int)err);

    }

}

QMacPasteboard::~QMacPasteboard()

{

    // commit all promises for paste after exit close

    for (int i = 0; i < promises.count(); ++i) {

        const Promise &promise = promises.at(i);

        QCFString flavor = QCFString(promise.convertor->flavorFor(promise.mime));

        promiseKeeper(paste, (PasteboardItemID)promise.itemId, flavor, this);

    }

    if(paste)

        CFRelease(paste);

}

PasteboardRef

QMacPasteboard::pasteBoard() const

{

    return paste;

}

OSStatus QMacPasteboard::promiseKeeper(PasteboardRef paste, PasteboardItemID id, CFStringRef flavor, void *_qpaste)

{

    QMacPasteboard *qpaste = (QMacPasteboard*)_qpaste;

    const long promise_id = (long)id;

    // Find the kept promise

    const QString flavorAsQString = QCFString::toQString(flavor);

    QMacPasteboard::Promise promise;

    for (int i = 0; i < qpaste->promises.size(); i++){

        QMacPasteboard::Promise tmp = qpaste->promises[i];

        if (tmp.itemId == promise_id && tmp.convertor->canConvert(tmp.mime, flavorAsQString)){

            promise = tmp;

            break;

        }

    }

    if (!promise.itemId && flavorAsQString == QLatin1String("com.trolltech.qt.MimeTypeName")) {

        // we have promised this data, but wont be able to convert, so return null data.

        // This helps in making the application/x-qt-mime-type-name hidden from normal use.

        QByteArray ba;

        QCFType<CFDataRef> data = CFDataCreate(0, (UInt8*)ba.constData(), ba.size());

        PasteboardPutItemFlavor(paste, id, flavor, data, kPasteboardFlavorNoFlags);

        return noErr;

    }

    if (!promise.itemId) {

        // There was no promise that could deliver data for the

        // given id and flavor. This should not happend.

        qDebug("Pasteboard: %d: Request for %ld, %s, but no promise found!", __LINE__, promise_id, qPrintable(flavorAsQString));

        return cantGetFlavorErr;

    }

#ifdef DEBUG_PASTEBOARD

    qDebug("PasteBoard: Calling in promise for %s[%ld] [%s] (%s) [%d]", qPrintable(promise.mime), promise_id,

           qPrintable(flavorAsQString), qPrintable(promise.convertor->convertorName()), promise.offset);

#endif

    QList<QByteArray> md = promise.convertor->convertFromMime(promise.mime, promise.data, flavorAsQString);

    if (md.size() <= promise.offset)

        return cantGetFlavorErr;

    const QByteArray &ba = md[promise.offset];

    QCFType<CFDataRef> data = CFDataCreate(0, (UInt8*)ba.constData(), ba.size());

    PasteboardPutItemFlavor(paste, id, flavor, data, kPasteboardFlavorNoFlags);

    return noErr;

}

bool

QMacPasteboard::hasOSType(int c_flavor) const

{

    if (!paste)

        return false;

    sync();

    ItemCount cnt = 0;

    if(PasteboardGetItemCount(paste, &cnt) || !cnt)

        return false;

#ifdef DEBUG_PASTEBOARD

    qDebug("PasteBoard: hasOSType [%c%c%c%c]", (c_flavor>>24)&0xFF, (c_flavor>>16)&0xFF,

           (c_flavor>>8)&0xFF, (c_flavor>>0)&0xFF);

#endif

    for(uint index = 1; index <= cnt; ++index) {

        PasteboardItemID id;

        if(PasteboardGetItemIdentifier(paste, index, &id) != noErr)

            return false;

        QCFType<CFArrayRef> types;

        if(PasteboardCopyItemFlavors(paste, id, &types ) != noErr)

            return false;

        const int type_count = CFArrayGetCount(types);

        for(int i = 0; i < type_count; ++i) {

            CFStringRef flavor = (CFStringRef)CFArrayGetValueAtIndex(types, i);

            const int os_flavor = UTGetOSTypeFromString(UTTypeCopyPreferredTagWithClass(flavor, kUTTagClassOSType));

            if(os_flavor == c_flavor) {

#ifdef DEBUG_PASTEBOARD

                qDebug("  - Found!");

#endif

                return true;

            }

        }

    }

#ifdef DEBUG_PASTEBOARD

    qDebug("  - NotFound!");

#endif

    return false;

}

bool

QMacPasteboard::hasFlavor(QString c_flavor) const

{

    if (!paste)

        return false;

    sync();

    ItemCount cnt = 0;

    if(PasteboardGetItemCount(paste, &cnt) || !cnt)

        return false;

#ifdef DEBUG_PASTEBOARD

    qDebug("PasteBoard: hasFlavor [%s]", qPrintable(c_flavor));

#endif

    for(uint index = 1; index <= cnt; ++index) {

        PasteboardItemID id;

        if(PasteboardGetItemIdentifier(paste, index, &id) != noErr)

            return false;

        PasteboardFlavorFlags flags;

        if(PasteboardGetItemFlavorFlags(paste, id, QCFString(c_flavor), &flags) == noErr) {

#ifdef DEBUG_PASTEBOARD

            qDebug("  - Found!");

#endif

            return true;

        }

    }

#ifdef DEBUG_PASTEBOARD

    qDebug("  - NotFound!");

#endif

    return false;

}

class QMacPasteboardMimeSource : public QMimeData {

    const QMacPasteboard *paste;

public:

    QMacPasteboardMimeSource(const QMacPasteboard *p) : QMimeData(), paste(p) { }

    ~QMacPasteboardMimeSource() { }

    virtual QStringList formats() const { return paste->formats(); }

    virtual QVariant retrieveData(const QString &format, QVariant::Type type) const { return paste->retrieveData(format, type); }

};

QMimeData

*QMacPasteboard::mimeData() const

{

    if(!mime) {

        mac_mime_source = true;

        mime = new QMacPasteboardMimeSource(this);

    }

    return mime;

}

class QMacMimeData : public QMimeData

{

public:

    QVariant variantData(const QString &mime) { return retrieveData(mime, QVariant::Invalid); }

private:

    QMacMimeData();

};

void

QMacPasteboard::setMimeData(QMimeData *mime_src)

{

    if (!paste)

        return;

    if (mime == mime_src || (!mime_src && mime && mac_mime_source))

        return;

    mac_mime_source = false;

    delete mime;

    mime = mime_src;

    QList<QMacPasteboardMime*> availableConverters = QMacPasteboardMime::all(mime_type);

    if (mime != 0) {

        clear_helper();

        QStringList formats = mime_src->formats();

        for(int f = 0; f < formats.size(); ++f) {

            QString mimeType = formats.at(f);

            for (QList<QMacPasteboardMime *>::Iterator it = availableConverters.begin(); it != availableConverters.end(); ++it) {

                QMacPasteboardMime *c = (*it);

                QString flavor(c->flavorFor(mimeType));

                if(!flavor.isEmpty()) {

                    QVariant mimeData = static_cast<QMacMimeData*>(mime_src)->variantData(mimeType);

#if 0

                    //### Grrr, why didn't I put in a virtual int QMacPasteboardMime::count()? --Sam

                    const int numItems = c->convertFromMime(mimeType, mimeData, flavor).size();

#else

                    int numItems = 1; //this is a hack but it is much faster than allowing conversion above

                    if(c->convertorName() == QLatin1String("FileURL"))

                        numItems = mime_src->urls().count();

#endif

                    for(int item = 0; item < numItems; ++item) {

                        const int itemID = item+1; //id starts at 1

                        promises.append(QMacPasteboard::Promise(itemID, c, mimeType, mimeData, item));

                        PasteboardPutItemFlavor(paste, (PasteboardItemID)itemID, QCFString(flavor), 0, kPasteboardFlavorNoFlags);

#ifdef DEBUG_PASTEBOARD

                        qDebug(" -  adding %d %s [%s] <%s> [%d]",

                               itemID, qPrintable(mimeType), qPrintable(flavor), qPrintable(c->convertorName()), item);

#endif

                    }

                }

            }

        }

    }

}

QStringList

QMacPasteboard::formats() const

{

    if (!paste)

        return QStringList();

    sync();

    QStringList ret;

    ItemCount cnt = 0;

    if(PasteboardGetItemCount(paste, &cnt) || !cnt)

        return ret;

#ifdef DEBUG_PASTEBOARD

    qDebug("PasteBoard: Formats [%d]", (int)cnt);

#endif

    for(uint index = 1; index <= cnt; ++index) {

        PasteboardItemID id;

        if(PasteboardGetItemIdentifier(paste, index, &id) != noErr)

            continue;

        QCFType<CFArrayRef> types;

        if(PasteboardCopyItemFlavors(paste, id, &types ) != noErr)

            continue;

        const int type_count = CFArrayGetCount(types);

        for(int i = 0; i < type_count; ++i) {

            const QString flavor = QCFString::toQString((CFStringRef)CFArrayGetValueAtIndex(types, i));

#ifdef DEBUG_PASTEBOARD

            qDebug(" -%s", qPrintable(QString(flavor)));

#endif

            QString mimeType = QMacPasteboardMime::flavorToMime(mime_type, flavor);

            if(!mimeType.isEmpty() && !ret.contains(mimeType)) {

#ifdef DEBUG_PASTEBOARD

                qDebug("   -<%d> %s [%s]", ret.size(), qPrintable(mimeType), qPrintable(QString(flavor)));

#endif

                ret << mimeType;

            }

        }

    }

    return ret;

}

bool

QMacPasteboard::hasFormat(const QString &format) const

{

    if (!paste)

        return false;

    sync();

    ItemCount cnt = 0;

    if(PasteboardGetItemCount(paste, &cnt) || !cnt)

        return false;

#ifdef DEBUG_PASTEBOARD

    qDebug("PasteBoard: hasFormat [%s]", qPrintable(format));

#endif

    for(uint index = 1; index <= cnt; ++index) {

        PasteboardItemID id;

        if(PasteboardGetItemIdentifier(paste, index, &id) != noErr)

            continue;

        QCFType<CFArrayRef> types;

        if(PasteboardCopyItemFlavors(paste, id, &types ) != noErr)

            continue;

        const int type_count = CFArrayGetCount(types);

        for(int i = 0; i < type_count; ++i) {

            const QString flavor = QCFString::toQString((CFStringRef)CFArrayGetValueAtIndex(types, i));

#ifdef DEBUG_PASTEBOARD

            qDebug(" -%s [0x%x]", qPrintable(QString(flavor)), mime_type);

#endif

            QString mimeType = QMacPasteboardMime::flavorToMime(mime_type, flavor);

#ifdef DEBUG_PASTEBOARD

            if(!mimeType.isEmpty())

                qDebug("   - %s", qPrintable(mimeType));

#endif

            if(mimeType == format)

                return true;

        }

    }

    return false;

}

QVariant

QMacPasteboard::retrieveData(const QString &format, QVariant::Type) const

{

    if (!paste)

        return QVariant();

    sync();

    ItemCount cnt = 0;

    if(PasteboardGetItemCount(paste, &cnt) || !cnt)

        return QByteArray();

#ifdef DEBUG_PASTEBOARD

    qDebug("Pasteboard: retrieveData [%s]", qPrintable(format));

#endif

    const QList<QMacPasteboardMime *> mimes = QMacPasteboardMime::all(mime_type);

    for(int mime = 0; mime < mimes.size(); ++mime) {

        QMacPasteboardMime *c = mimes.at(mime);

        QString c_flavor = c->flavorFor(format);

        if(!c_flavor.isEmpty()) {

            // Handle text/plain a little differently. Try handling Unicode first.