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

**

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

//#define USE_INTERNET_CONFIG

#ifndef USE_INTERNET_CONFIG

# include "qfile.h"

# include "qfileinfo.h"

# include "qtextstream.h"

# include "qdir.h"

# include <unistd.h>

# include <sys/types.h>

# include <sys/stat.h>

# include <sys/fcntl.h>

#endif

#include "qdebug.h"

#include "qpixmap.h"

#include "qimagewriter.h"

#include "qimagereader.h"

#include "qdatastream.h"

#include "qbuffer.h"

#include "qdatetime.h"

#include "qapplication_p.h"

#include "qtextcodec.h"

#include "qregexp.h"

#include "qurl.h"

#include "qmap.h"

#include <private/qt_mac_p.h>

#ifdef Q_WS_MAC32

#include <QuickTime/QuickTime.h>

#include <qlibrary.h>

#endif

QT_BEGIN_NAMESPACE

extern CGImageRef qt_mac_createCGImageFromQImage(const QImage &img, const QImage **imagePtr = 0); // qpaintengine_mac.cpp

typedef QList<QMacPasteboardMime*> MimeList;

Q_GLOBAL_STATIC(MimeList, globalMimeList)

static void cleanup_mimes()

{

    MimeList *mimes = globalMimeList();

    while (!mimes->isEmpty())

        delete mimes->takeFirst();

}

Q_GLOBAL_STATIC(QStringList, globalDraggedTypesList)

/*!

    \fn void qRegisterDraggedTypes(const QStringList &types)

    \relates QMacPasteboardMime

    Registers the given \a types as custom pasteboard types.

    This function should be called to enable the Drag and Drop events 

    for custom pasteboard types on Cocoa implementations. This is required 

    in addition to a QMacPasteboardMime subclass implementation. By default 

    drag and drop is enabled for all standard pasteboard types. 

   \sa QMacPasteboardMime

*/

Q_GUI_EXPORT void qRegisterDraggedTypes(const QStringList &types)

{

    (*globalDraggedTypesList()) += types;

}

const QStringList& qEnabledDraggedTypes()

{

    return (*globalDraggedTypesList());

}

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

  QDnD debug facilities

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

//#define DEBUG_MIME_MAPS

//functions

extern QString qt_mac_from_pascal_string(const Str255);  //qglobal.cpp

extern void qt_mac_from_pascal_string(QString, Str255, TextEncoding encoding=0, int len=-1);  //qglobal.cpp

ScrapFlavorType qt_mac_mime_type = 'CUTE';

CFStringRef qt_mac_mime_typeUTI = CFSTR("com.pasteboard.trolltech.marker");

/*!

  \class QMacPasteboardMime

  \brief The QMacPasteboardMime class converts between a MIME type and a

  \l{http://developer.apple.com/macosx/uniformtypeidentifiers.html}{Uniform

  Type Identifier (UTI)} format.

  \since 4.2

  \ingroup draganddrop

  Qt's drag and drop and clipboard facilities use the MIME

  standard. On X11, this maps trivially to the Xdnd protocol. On

  Mac, although some applications use MIME to describe clipboard

  contents, it is more common to use Apple's UTI format.

  QMacPasteboardMime's role is to bridge the gap between MIME and UTI;

  By subclasses this class, one can extend Qt's drag and drop

  and clipboard handling to convert to and from unsupported, or proprietary, UTI formats.

  A subclass of QMacPasteboardMime will automatically be registered, and active, upon instantiation.

  Qt has predefined support for the following UTIs:

  \list

    \i public.utf8-plain-text - converts to "text/plain"

    \i public.utf16-plain-text - converts to "text/plain"

    \i public.html - converts to "text/html"

    \i public.url - converts to "text/uri-list"

    \i public.file-url - converts to "text/uri-list"

    \i public.tiff - converts to "application/x-qt-image"

    \i com.apple.traditional-mac-plain-text - converts to "text/plain"

    \i com.apple.pict - converts to "application/x-qt-image"

  \endlist

  When working with MIME data, Qt will interate through all instances of QMacPasteboardMime to

  find an instance that can convert to, or from, a specific MIME type. It will do this by calling

  canConvert() on each instance, starting with (and choosing) the last created instance first.

  The actual conversions will be done by using convertToMime() and convertFromMime().

  \note The API uses the term "flavor" in some cases. This is for backwards

  compatibility reasons, and should now be understood as UTIs.

*/

/*! \enum QMacPasteboardMime::QMacPasteboardMimeType

    \internal

*/

/*!

  Constructs a new conversion object of type \a t, adding it to the

  globally accessed list of available convertors.

*/

QMacPasteboardMime::QMacPasteboardMime(char t) : type(t)

{

    globalMimeList()->append(this);

}

/*!

  Destroys a conversion object, removing it from the global

  list of available convertors.

*/

QMacPasteboardMime::~QMacPasteboardMime()

{

    if(!QApplication::closingDown())

        globalMimeList()->removeAll(this);

}

class QMacPasteboardMimeAny : public QMacPasteboardMime {

private:

public:

    QMacPasteboardMimeAny() : QMacPasteboardMime(MIME_QT_CONVERTOR|MIME_ALL) {

    }

    ~QMacPasteboardMimeAny() {

    }

    QString convertorName();

    QString flavorFor(const QString &mime);

    QString mimeFor(QString flav);

    bool canConvert(const QString &mime, QString flav);

    QVariant convertToMime(const QString &mime, QList<QByteArray> data, QString flav);

    QList<QByteArray> convertFromMime(const QString &mime, QVariant data, QString flav);

};

QString QMacPasteboardMimeAny::convertorName()

{

    return QLatin1String("Any-Mime");

}

QString QMacPasteboardMimeAny::flavorFor(const QString &mime)

{   

    // do not handle the mime type name in the drag pasteboard

    if(mime == QLatin1String("application/x-qt-mime-type-name"))

        return QString();

    QString ret = QLatin1String("com.trolltech.anymime.") + mime;

    return ret.replace(QLatin1Char('/'), QLatin1String("--"));

}

QString QMacPasteboardMimeAny::mimeFor(QString flav)

{

    const QString any_prefix = QLatin1String("com.trolltech.anymime.");

    if(flav.size() > any_prefix.length() && flav.startsWith(any_prefix))

        return flav.mid(any_prefix.length()).replace(QLatin1String("--"), QLatin1String("/"));

    return QString();

}

bool QMacPasteboardMimeAny::canConvert(const QString &mime, QString flav)

{

    return mimeFor(flav) == mime;

}

QVariant QMacPasteboardMimeAny::convertToMime(const QString &mime, QList<QByteArray> data, QString)

{

    if(data.count() > 1)

        qWarning("QMacPasteboardMimeAny: Cannot handle multiple member data");

    QVariant ret;

    if (mime == QLatin1String("text/plain"))

        ret = QString::fromUtf8(data.first());

    else

        ret = data.first();

    return ret;

}

QList<QByteArray> QMacPasteboardMimeAny::convertFromMime(const QString &mime, QVariant data, QString)

{

    QList<QByteArray> ret;

    if (mime == QLatin1String("text/plain"))

        ret.append(data.toString().toUtf8());

    else

        ret.append(data.toByteArray());

    return ret;

}

class QMacPasteboardMimeTypeName : public QMacPasteboardMime {

private:

public:

    QMacPasteboardMimeTypeName() : QMacPasteboardMime(MIME_QT_CONVERTOR|MIME_ALL) {

    }

    ~QMacPasteboardMimeTypeName() {

    }

    QString convertorName();

    QString flavorFor(const QString &mime);

    QString mimeFor(QString flav);

    bool canConvert(const QString &mime, QString flav);

    QVariant convertToMime(const QString &mime, QList<QByteArray> data, QString flav);

    QList<QByteArray> convertFromMime(const QString &mime, QVariant data, QString flav);

};

QString QMacPasteboardMimeTypeName::convertorName()

{

    return QLatin1String("Qt-Mime-Type");

}

QString QMacPasteboardMimeTypeName::flavorFor(const QString &mime)

{

    if(mime == QLatin1String("application/x-qt-mime-type-name"))

        return QLatin1String("com.trolltech.qt.MimeTypeName");

    return QString();

}

QString QMacPasteboardMimeTypeName::mimeFor(QString)

{

    return QString();

}

bool QMacPasteboardMimeTypeName::canConvert(const QString &, QString)

{

    return false;

}

QVariant QMacPasteboardMimeTypeName::convertToMime(const QString &, QList<QByteArray>, QString)

{

    QVariant ret;

    return ret;

}

QList<QByteArray> QMacPasteboardMimeTypeName::convertFromMime(const QString &, QVariant, QString)

{

    QList<QByteArray> ret;

    ret.append(QString("x-qt-mime-type-name").toUtf8());

    return ret;

}

class QMacPasteboardMimePlainText : public QMacPasteboardMime {

public:

    QMacPasteboardMimePlainText() : QMacPasteboardMime(MIME_ALL) { }

    QString convertorName();

    QString flavorFor(const QString &mime);

    QString mimeFor(QString flav);

    bool canConvert(const QString &mime, QString flav);

    QVariant convertToMime(const QString &mime, QList<QByteArray> data, QString flav);

    QList<QByteArray> convertFromMime(const QString &mime, QVariant data, QString flav);

};

QString QMacPasteboardMimePlainText::convertorName()

{

    return QLatin1String("PlainText");

}

QString QMacPasteboardMimePlainText::flavorFor(const QString &mime)

{

    if (mime == QLatin1String("text/plain"))

        return QLatin1String("com.apple.traditional-mac-plain-text");

    return QString();

}

QString QMacPasteboardMimePlainText::mimeFor(QString flav)

{

    if (flav == QLatin1String("com.apple.traditional-mac-plain-text"))

        return QLatin1String("text/plain");

    return QString();

}

bool QMacPasteboardMimePlainText::canConvert(const QString &mime, QString flav)

{

    return flavorFor(mime) == flav;

}

QVariant QMacPasteboardMimePlainText::convertToMime(const QString &mimetype, QList<QByteArray> data, QString flavor)

{

    if(data.count() > 1)

        qWarning("QMacPasteboardMimePlainText: Cannot handle multiple member data");

    const QByteArray &firstData = data.first();

    QVariant ret;

    if(flavor == QCFString(QLatin1String("com.apple.traditional-mac-plain-text"))) {

        QCFString str(CFStringCreateWithBytes(kCFAllocatorDefault,

                                             reinterpret_cast<const UInt8 *>(firstData.constData()),

                                             firstData.size(), CFStringGetSystemEncoding(), false));

        ret = QString(str);

    } else {

        qWarning("QMime::convertToMime: unhandled mimetype: %s", qPrintable(mimetype));

    }

    return ret;

}

QList<QByteArray> QMacPasteboardMimePlainText::convertFromMime(const QString &, QVariant data, QString flavor)

{

    QList<QByteArray> ret;

    QString string = data.toString();

    if(flavor == QCFString(QLatin1String("com.apple.traditional-mac-plain-text")))

        ret.append(string.toLatin1());

    return ret;

}

class QMacPasteboardMimeUnicodeText : public QMacPasteboardMime {

public:

    QMacPasteboardMimeUnicodeText() : QMacPasteboardMime(MIME_ALL) { }

    QString convertorName();

    QString flavorFor(const QString &mime);

    QString mimeFor(QString flav);

    bool canConvert(const QString &mime, QString flav);

    QVariant convertToMime(const QString &mime, QList<QByteArray> data, QString flav);

    QList<QByteArray> convertFromMime(const QString &mime, QVariant data, QString flav);

};

QString QMacPasteboardMimeUnicodeText::convertorName()

{

    return QLatin1String("UnicodeText");

}

QString QMacPasteboardMimeUnicodeText::flavorFor(const QString &mime)

{

    if (mime == QLatin1String("text/plain"))

        return QLatin1String("public.utf16-plain-text");

    int i = mime.indexOf(QLatin1String("charset="));

    if (i >= 0) {

        QString cs(mime.mid(i+8).toLower());

        i = cs.indexOf(QLatin1Char(';'));

        if (i>=0)

            cs = cs.left(i);

        if (cs == QLatin1String("system"))

            return QLatin1String("public.utf8-plain-text");

        else if (cs == QLatin1String("iso-10646-ucs-2")

                 || cs == QLatin1String("utf16"))

            return QLatin1String("public.utf16-plain-text");

    }

    return QString();

}

QString QMacPasteboardMimeUnicodeText::mimeFor(QString flav)

{

    if (flav == QLatin1String("public.utf16-plain-text") || flav == QLatin1String("public.utf8-plain-text"))

        return QLatin1String("text/plain");

    return QString();

}

bool QMacPasteboardMimeUnicodeText::canConvert(const QString &mime, QString flav)

{

    return flavorFor(mime) == flav;

}

QVariant QMacPasteboardMimeUnicodeText::convertToMime(const QString &mimetype, QList<QByteArray> data, QString flavor)

{

    if(data.count() > 1)

        qWarning("QMacPasteboardMimeUnicodeText: Cannot handle multiple member data");

    const QByteArray &firstData = data.first();

    // I can only handle two types (system and unicode) so deal with them that way

    QVariant ret;

    if(flavor == QLatin1String("public.utf8-plain-text")) {

        QCFString str(CFStringCreateWithBytes(kCFAllocatorDefault,

                                             reinterpret_cast<const UInt8 *>(firstData.constData()),

                                             firstData.size(), CFStringGetSystemEncoding(), false));

        ret = QString(str);

    } else if (flavor == QLatin1String("public.utf16-plain-text")) {

        ret = QString::fromUtf16(reinterpret_cast<const ushort *>(firstData.constData()),

                                 firstData.size() / sizeof(ushort));

    } else {

        qWarning("QMime::convertToMime: unhandled mimetype: %s", qPrintable(mimetype));

    }

    return ret;

}

QList<QByteArray> QMacPasteboardMimeUnicodeText::convertFromMime(const QString &, QVariant data, QString flavor)

{

    QList<QByteArray> ret;

    QString string = data.toString();

    if(flavor == QLatin1String("public.utf8-plain-text"))

        ret.append(string.toUtf8());

    else if (flavor == QLatin1String("public.utf16-plain-text"))

        ret.append(QByteArray((char*)string.utf16(), string.length()*2));

    return ret;

}

class QMacPasteboardMimeHTMLText : public QMacPasteboardMime {

public:

    QMacPasteboardMimeHTMLText() : QMacPasteboardMime(MIME_ALL) { }

    QString convertorName();

    QString flavorFor(const QString &mime);

    QString mimeFor(QString flav);

    bool canConvert(const QString &mime, QString flav);

    QVariant convertToMime(const QString &mime, QList<QByteArray> data, QString flav);

    QList<QByteArray> convertFromMime(const QString &mime, QVariant data, QString flav);

};

QString QMacPasteboardMimeHTMLText::convertorName()

{

    return QLatin1String("HTML");

}

QString QMacPasteboardMimeHTMLText::flavorFor(const QString &mime)

{

    if (mime == QLatin1String("text/html"))

        return QLatin1String("public.html");

    return QString();

}

QString QMacPasteboardMimeHTMLText::mimeFor(QString flav)

{

    if (flav == QLatin1String("public.html"))

        return QLatin1String("text/html");

    return QString();

}

bool QMacPasteboardMimeHTMLText::canConvert(const QString &mime, QString flav)

{

    return flavorFor(mime) == flav;

}

QVariant QMacPasteboardMimeHTMLText::convertToMime(const QString &mimeType, QList<QByteArray> data, QString flavor)

{

    if (!canConvert(mimeType, flavor))

        return QVariant();

    if (data.count() > 1)

        qWarning("QMacPasteboardMimeHTMLText: Cannot handle multiple member data");

    return data.first();

}

QList<QByteArray> QMacPasteboardMimeHTMLText::convertFromMime(const QString &mime, QVariant data, QString flavor)

{

    QList<QByteArray> ret;

    if (!canConvert(mime, flavor))

        return ret;

    ret.append(data.toByteArray());

    return ret;

}

#ifdef Q_WS_MAC32

// This can be removed once 10.6 is the minimum (or we have to require 64-bit) whichever comes first.

typedef ComponentResult (*PtrGraphicsImportSetDataHandle)(GraphicsImportComponent, Handle);

typedef ComponentResult (*PtrGraphicsImportCreateCGImage)(GraphicsImportComponent, CGImageRef*, UInt32);

typedef ComponentResult (*PtrGraphicsExportSetInputCGImage)(GraphicsExportComponent, CGImageRef);

typedef ComponentResult (*PtrGraphicsExportSetOutputHandle)(GraphicsExportComponent, Handle);

typedef ComponentResult (*PtrGraphicsExportDoExport)(GraphicsExportComponent, unsigned long *);

static PtrGraphicsImportSetDataHandle ptrGraphicsImportSetDataHandle = 0;

static PtrGraphicsImportCreateCGImage ptrGraphicsImportCreateCGImage = 0;

static PtrGraphicsExportSetInputCGImage ptrGraphicsExportSetInputCGImage = 0;

static PtrGraphicsExportSetOutputHandle ptrGraphicsExportSetOutputHandle = 0;

static PtrGraphicsExportDoExport ptrGraphicsExportDoExport = 0;

static bool resolveMimeQuickTimeSymbols()

{

    if (ptrGraphicsImportSetDataHandle == 0) {

        QLibrary library(QLatin1String("/System/Library/Frameworks/QuickTime.framework/QuickTime"));

        ptrGraphicsImportSetDataHandle = reinterpret_cast<PtrGraphicsImportSetDataHandle>(library.resolve("GraphicsImportSetDataHandle"));