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

**

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

#include <qimage.h>

#include <qvariant.h>

#include <qvector.h>

#include <stdio.h>      // jpeglib needs this to be pre-included

#include <setjmp.h>

#ifdef FAR

#undef FAR

#endif

// including jpeglib.h seems to be a little messy

extern "C" {

// mingw includes rpcndr.h but does not define boolean

#if defined(Q_OS_WIN) && defined(Q_CC_GNU)

#   if defined(__RPCNDR_H__) && !defined(boolean)

        typedef unsigned char boolean;

#       define HAVE_BOOLEAN

#   endif

#endif

#define XMD_H           // shut JPEGlib up

#if defined(Q_OS_UNIXWARE)

#  define HAVE_BOOLEAN  // libjpeg under Unixware seems to need this

#endif

#include <jpeglib.h>

#ifdef const

#  undef const          // remove crazy C hackery in jconfig.h

#endif

}

QT_BEGIN_NAMESPACE

struct my_error_mgr : public jpeg_error_mgr {

    jmp_buf setjmp_buffer;

};

#if defined(Q_C_CALLBACKS)

extern "C" {

#endif

static void my_error_exit (j_common_ptr cinfo)

{

    my_error_mgr* myerr = (my_error_mgr*) cinfo->err;

    char buffer[JMSG_LENGTH_MAX];

    (*cinfo->err->format_message)(cinfo, buffer);

    qWarning("%s", buffer);

    longjmp(myerr->setjmp_buffer, 1);

}

#if defined(Q_C_CALLBACKS)

}

#endif

static const int max_buf = 4096;

struct my_jpeg_source_mgr : public jpeg_source_mgr {

    // Nothing dynamic - cannot rely on destruction over longjump

    QIODevice *device;

    JOCTET buffer[max_buf];

public:

    my_jpeg_source_mgr(QIODevice *device);

};

#if defined(Q_C_CALLBACKS)

extern "C" {

#endif

static void qt_init_source(j_decompress_ptr)

{

}

static boolean qt_fill_input_buffer(j_decompress_ptr cinfo)

{

    my_jpeg_source_mgr* src = (my_jpeg_source_mgr*)cinfo->src;

    src->next_input_byte = src->buffer;

    if (num_read <= 0) {

        // Insert a fake EOI marker - as per jpeglib recommendation

        src->buffer[0] = (JOCTET) 0xFF;

        src->buffer[1] = (JOCTET) JPEG_EOI;

        src->bytes_in_buffer = 2;

    } else {

        src->bytes_in_buffer = num_read;

    }

#if defined(Q_OS_UNIXWARE)

    return B_TRUE;

#else

    return true;

#endif

}

static void qt_skip_input_data(j_decompress_ptr cinfo, long num_bytes)

{

    my_jpeg_source_mgr* src = (my_jpeg_source_mgr*)cinfo->src;

    // `dumb' implementation from jpeglib

    /* Just a dumb implementation for now.  Could use fseek() except

     * it doesn't work on pipes.  Not clear that being smart is worth

     * any trouble anyway --- large skips are infrequent.

     */

    if (num_bytes > 0) {

            num_bytes -= (long) src->bytes_in_buffer;

            (void) qt_fill_input_buffer(cinfo);

            /* note we assume that qt_fill_input_buffer will never return false,

            * so suspension need not be handled.

            */

        }

        src->next_input_byte += (size_t) num_bytes;

        src->bytes_in_buffer -= (size_t) num_bytes;

    }

}

static void qt_term_source(j_decompress_ptr cinfo)

{

    my_jpeg_source_mgr* src = (my_jpeg_source_mgr*)cinfo->src;

    if (!src->device->isSequential())

}

#if defined(Q_C_CALLBACKS)

}

#endif

inline my_jpeg_source_mgr::my_jpeg_source_mgr(QIODevice *device)

{

    jpeg_source_mgr::init_source = qt_init_source;

    jpeg_source_mgr::fill_input_buffer = qt_fill_input_buffer;

    jpeg_source_mgr::skip_input_data = qt_skip_input_data;

    jpeg_source_mgr::resync_to_restart = jpeg_resync_to_restart;

    jpeg_source_mgr::term_source = qt_term_source;

    this->device = device;

    bytes_in_buffer = 0;

    next_input_byte = buffer;

}

{

}

#define HIGH_QUALITY_THRESHOLD 50

{

    }

    return result;

}

static bool ensureValidImage(QImage *dest, struct jpeg_decompress_struct *info,

                             const QSize& size)

{

    QImage::Format format;

    switch (info->output_components) {

    case 1:

        format = QImage::Format_Indexed8;

        break;

    case 3:

    case 4:

        format = QImage::Format_RGB32;

        break;

    default:

        return false; // unsupported format

    }

    if (dest->size() != size || dest->format() != format) {

        *dest = QImage(size, format);

        if (format == QImage::Format_Indexed8) {

            dest->setColorCount(256);

            for (int i = 0; i < 256; i++)

                dest->setColor(i, qRgb(i,i,i));

        }

    }

    return !dest->isNull();

}

                            QSize scaledSize, QRect scaledClipRect,

{

        // -1 means default quality.

        int quality = inQuality;

        if (quality < 0)

            quality = 75;

        // If possible, merge the scaledClipRect into either scaledSize

        // or clipRect to avoid doing a separate scaled clipping pass.

        // Best results are achieved by clipping before scaling, not after.

        if (!scaledClipRect.isEmpty()) {

            if (scaledSize.isEmpty() && clipRect.isEmpty()) {

                // No clipping or scaling before final clip.

                clipRect = scaledClipRect;

                scaledClipRect = QRect();

            } else if (scaledSize.isEmpty()) {

                // Clipping, but no scaling: combine the clip regions.

                scaledClipRect.translate(clipRect.topLeft());

                clipRect = scaledClipRect.intersected(clipRect);

                scaledClipRect = QRect();

            } else if (clipRect.isEmpty()) {

                // No clipping, but scaling: if we can map back to an

                // integer pixel boundary, then clip before scaling.

                            scaledSize.width();

                            scaledSize.height();

                    int width = (scaledClipRect.right() + 1) *

                    int height = (scaledClipRect.bottom() + 1) *

                    clipRect = QRect(x, y, width, height);

                    scaledSize = scaledClipRect.size();

                    scaledClipRect = QRect();

                }

            } else {

                // Clipping and scaling: too difficult to figure out,

                // and not a likely use case, so do it the long way.

            }

        }

        // Determine the scale factor to pass to libjpeg for quick downscaling.

        if (!scaledSize.isEmpty()) {

            if (clipRect.isEmpty()) {

            } else {

                    qMin(clipRect.width() / scaledSize.width(),

                         clipRect.height() / scaledSize.height());

            }

            } else {

            }

            if (!clipRect.isEmpty()) {

                // Correct the scale factor so that we clip accurately.

                // It is recommended that the clip rectangle be aligned

                // on an 8-pixel boundary for best performance.

                }

            }

        }

        // If high quality not required, use fast decompression

        if( quality < HIGH_QUALITY_THRESHOLD ) {

        }

        // Determine the clip region to extract.

        QRect clip;

        if (clipRect.isEmpty()) {

            clip = imageRect;

            clip = clipRect.intersected(imageRect);

        } else {

            // The scale factor was corrected above to ensure that

            // we don't miss pixels when we scale the clip rectangle.

            clip = clip.intersected(imageRect);

        }

                    }

                }

            }

        }

}

struct my_jpeg_destination_mgr : public jpeg_destination_mgr {

    // Nothing dynamic - cannot rely on destruction over longjump

    QIODevice *device;

    JOCTET buffer[max_buf];

public:

    my_jpeg_destination_mgr(QIODevice *);

};

#if defined(Q_C_CALLBACKS)

extern "C" {

#endif

static void qt_init_destination(j_compress_ptr)

{

}

static boolean qt_empty_output_buffer(j_compress_ptr cinfo)

{

    my_jpeg_destination_mgr* dest = (my_jpeg_destination_mgr*)cinfo->dest;

    int written = dest->device->write((char*)dest->buffer, max_buf);

    if (written == -1)

        (*cinfo->err->error_exit)((j_common_ptr)cinfo);

    dest->next_output_byte = dest->buffer;

    dest->free_in_buffer = max_buf;

#if defined(Q_OS_UNIXWARE)

    return B_TRUE;

#else

    return true;

#endif

}

static void qt_term_destination(j_compress_ptr cinfo)

{

    my_jpeg_destination_mgr* dest = (my_jpeg_destination_mgr*)cinfo->dest;

    qint64 n = max_buf - dest->free_in_buffer;

    qint64 written = dest->device->write((char*)dest->buffer, n);

    if (written == -1)

        (*cinfo->err->error_exit)((j_common_ptr)cinfo);

}

#if defined(Q_C_CALLBACKS)

}

#endif

inline my_jpeg_destination_mgr::my_jpeg_destination_mgr(QIODevice *device)

{

    jpeg_destination_mgr::init_destination = qt_init_destination;

    jpeg_destination_mgr::empty_output_buffer = qt_empty_output_buffer;

    jpeg_destination_mgr::term_destination = qt_term_destination;

    this->device = device;

    next_output_byte = buffer;

    free_in_buffer = max_buf;