Subversion Repositories Kolibri OS

/*

 * Small jpeg decoder library

 *

 * Copyright (c) 2006, Luc Saillard 

 * Copyright (c) 2012 Intel Corporation.

 * All rights reserved.

 * Redistribution and use in source and binary forms, with or without

 * modification, are permitted provided that the following conditions are met:

 *

 * - Redistributions of source code must retain the above copyright notice,

 *  this list of conditions and the following disclaimer.

 *

 * - Redistributions in binary form must reproduce the above copyright notice,

 *  this list of conditions and the following disclaimer in the documentation

 *  and/or other materials provided with the distribution.

 *

 * - Neither the name of the author nor the names of its contributors may be

 *  used to endorse or promote products derived from this software without

 *  specific prior written permission.

 *

 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"

 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE

 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE

 * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE

 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR

 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF

 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS

 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN

 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)

 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE

 * POSSIBILITY OF SUCH DAMAGE.

 *

 */

#include 

#include 

#include 

#include 

#include 

#include "tinyjpeg.h"

#include "tinyjpeg-internal.h"

// for libva

#include 

#include 

#include 

#include 

#include 

#include 

#include "va_display.h"

#define cY	0

#define cCb	1

#define cCr	2

#define BLACK_Y 0

#define BLACK_U 127

#define BLACK_V 127

#ifndef MIN

#define MIN(a, b) ((a) < (b) ? (a) : (b))

#endif

#ifndef MAX

#define MAX(a, b) ((a) > (b) ? (a) : (b))

#endif

#define ARRAY_ELEMS(a) (sizeof(a) / sizeof((a)[0]))

#if DEBUG

#define trace(fmt, args...) do { \

   fprintf(stderr, fmt, ## args); \

   fflush(stderr); \

} while(0)

#else

#define trace(fmt, args...) do { } while (0)

#endif

#define error(fmt, args...) do { \

   snprintf(error_string, sizeof(error_string), fmt, ## args); \

   return -1; \

} while(0)

/* Global variable to return the last error found while deconding */

static char error_string[256];

static VAHuffmanTableBufferJPEGBaseline default_huffman_table_param={

    huffman_table:

    {

        // lumiance component

        {

            num_dc_codes:{0,1,5,1,1,1,1,1,1,0,0,0}, // 12 bits is ok for baseline profile

            dc_values:{0x00,0x01,0x02,0x03,0x04,0x05,0x06,0x07,0x08,0x09,0x0a,0x0b},

            num_ac_codes:{0,2,1,3,3,2,4,3,5,5,4,4,0,0,1,125},

            ac_values:{

              0x01, 0x02, 0x03, 0x00, 0x04, 0x11, 0x05, 0x12,

              0x21, 0x31, 0x41, 0x06, 0x13, 0x51, 0x61, 0x07,

              0x22, 0x71, 0x14, 0x32, 0x81, 0x91, 0xa1, 0x08,

              0x23, 0x42, 0xb1, 0xc1, 0x15, 0x52, 0xd1, 0xf0,

              0x24, 0x33, 0x62, 0x72, 0x82, 0x09, 0x0a, 0x16,

              0x17, 0x18, 0x19, 0x1a, 0x25, 0x26, 0x27, 0x28,

              0x29, 0x2a, 0x34, 0x35, 0x36, 0x37, 0x38, 0x39,

              0x3a, 0x43, 0x44, 0x45, 0x46, 0x47, 0x48, 0x49,

              0x4a, 0x53, 0x54, 0x55, 0x56, 0x57, 0x58, 0x59,

              0x5a, 0x63, 0x64, 0x65, 0x66, 0x67, 0x68, 0x69,

              0x6a, 0x73, 0x74, 0x75, 0x76, 0x77, 0x78, 0x79,

              0x7a, 0x83, 0x84, 0x85, 0x86, 0x87, 0x88, 0x89,

              0x8a, 0x92, 0x93, 0x94, 0x95, 0x96, 0x97, 0x98,

              0x99, 0x9a, 0xa2, 0xa3, 0xa4, 0xa5, 0xa6, 0xa7,

              0xa8, 0xa9, 0xaa, 0xb2, 0xb3, 0xb4, 0xb5, 0xb6,

              0xb7, 0xb8, 0xb9, 0xba, 0xc2, 0xc3, 0xc4, 0xc5,

              0xc6, 0xc7, 0xc8, 0xc9, 0xca, 0xd2, 0xd3, 0xd4,

              0xd5, 0xd6, 0xd7, 0xd8, 0xd9, 0xda, 0xe1, 0xe2,

              0xe3, 0xe4, 0xe5, 0xe6, 0xe7, 0xe8, 0xe9, 0xea,

              0xf1, 0xf2, 0xf3, 0xf4, 0xf5, 0xf6, 0xf7, 0xf8,

              0xf9, 0xfa

           },/*,0xonly,0xthe,0xfirst,0x162,0xbytes,0xare,0xavailable,0x*/

        },

        // chrom component

        {

            num_dc_codes:{0,3,1,1,1,1,1,1,1,1,1,0}, // 12 bits is ok for baseline profile

            dc_values:{0,1,2,3,4,5,6,7,8,9,0xa,0xb},

            num_ac_codes:{0,2,1,2,4,4,3,4,7,5,4,4,0,1,2,119},

            ac_values:{

              0x00, 0x01, 0x02, 0x03, 0x11, 0x04, 0x05, 0x21,

              0x31, 0x06, 0x12, 0x41, 0x51, 0x07, 0x61, 0x71,

              0x13, 0x22, 0x32, 0x81, 0x08, 0x14, 0x42, 0x91,

              0xa1, 0xb1, 0xc1, 0x09, 0x23, 0x33, 0x52, 0xf0,

              0x15, 0x62, 0x72, 0xd1, 0x0a, 0x16, 0x24, 0x34,

              0xe1, 0x25, 0xf1, 0x17, 0x18, 0x19, 0x1a, 0x26,

              0x27, 0x28, 0x29, 0x2a, 0x35, 0x36, 0x37, 0x38,

              0x39, 0x3a, 0x43, 0x44, 0x45, 0x46, 0x47, 0x48,

              0x49, 0x4a, 0x53, 0x54, 0x55, 0x56, 0x57, 0x58,

              0x59, 0x5a, 0x63, 0x64, 0x65, 0x66, 0x67, 0x68,

              0x69, 0x6a, 0x73, 0x74, 0x75, 0x76, 0x77, 0x78,

              0x79, 0x7a, 0x82, 0x83, 0x84, 0x85, 0x86, 0x87,

              0x88, 0x89, 0x8a, 0x92, 0x93, 0x94, 0x95, 0x96,

              0x97, 0x98, 0x99, 0x9a, 0xa2, 0xa3, 0xa4, 0xa5,

              0xa6, 0xa7, 0xa8, 0xa9, 0xaa, 0xb2, 0xb3, 0xb4,

              0xb5, 0xb6, 0xb7, 0xb8, 0xb9, 0xba, 0xc2, 0xc3,

              0xc4, 0xc5, 0xc6, 0xc7, 0xc8, 0xc9, 0xca, 0xd2,

              0xd3, 0xd4, 0xd5, 0xd6, 0xd7, 0xd8, 0xd9, 0xda,

              0xe2, 0xe3, 0xe4, 0xe5, 0xe6, 0xe7, 0xe8, 0xe9,

              0xea, 0xf2, 0xf3, 0xf4, 0xf5, 0xf6, 0xf7, 0xf8,

              0xf9, 0xfa

            },/*,0xonly,0xthe,0xfirst,0x162,0xbytes,0xare,0xavailable,0x*/

        },

    }

};

#define be16_to_cpu(x) (((x)[0]<<8)|(x)[1])

static int build_default_huffman_tables(struct jdec_private *priv)

{

    int i = 0;

	if (priv->default_huffman_table_initialized)

		return 0;

    for (i = 0; i < 4; i++) {

        priv->HTDC_valid[i] = 1;

        memcpy(priv->HTDC[i].bits, default_huffman_table_param.huffman_table[i].num_dc_codes, 16);

        memcpy(priv->HTDC[i].values, default_huffman_table_param.huffman_table[i].dc_values, 16);

        priv->HTAC_valid[i] = 1;

        memcpy(priv->HTAC[i].bits, default_huffman_table_param.huffman_table[i].num_ac_codes, 16);

        memcpy(priv->HTAC[i].values, default_huffman_table_param.huffman_table[i].ac_values, 256);

    }

	priv->default_huffman_table_initialized = 1;

	return 0;

}

static void print_SOF(const unsigned char *stream)

{

  int width, height, nr_components, precision;

#if DEBUG

  const char *nr_components_to_string[] = {

     "????",

     "Grayscale",

     "????",

     "YCbCr",

     "CYMK"

  };

#endif

  precision = stream[2];

  height = be16_to_cpu(stream+3);

  width  = be16_to_cpu(stream+5);

  nr_components = stream[7];

  trace("> SOF marker\n");

  trace("Size:%dx%d nr_components:%d (%s)  precision:%d\n",

      width, height,

      nr_components, nr_components_to_string[nr_components],

      precision);

}

static int parse_DQT(struct jdec_private *priv, const unsigned char *stream)

{

  int qi;

  const unsigned char *dqt_block_end;

  trace("> DQT marker\n");

  dqt_block_end = stream + be16_to_cpu(stream);

  stream += 2;	/* Skip length */

  while (stream < dqt_block_end)

   {

     qi = *stream++;

#if SANITY_CHECK

     if (qi>>4)

       error("16 bits quantization table is not supported\n");

     if (qi>4)

       error("No more 4 quantization table is supported (got %d)\n", qi);

#endif

     memcpy(priv->Q_tables[qi&0x0F], stream, 64);

     priv->Q_tables_valid[qi & 0x0f] = 1;

     stream += 64;

   }

  trace("< DQT marker\n");

  return 0;

}

static int parse_SOF(struct jdec_private *priv, const unsigned char *stream)

{

  int i, width, height, nr_components, cid, sampling_factor;

  unsigned char Q_table;

  struct component *c;

  trace("> SOF marker\n");

  print_SOF(stream);

  height = be16_to_cpu(stream+3);

  width  = be16_to_cpu(stream+5);

  nr_components = stream[7];

  priv->nf_components = nr_components;

#if SANITY_CHECK

  if (stream[2] != 8)

    error("Precision other than 8 is not supported\n");

  if (width>JPEG_MAX_WIDTH || height>JPEG_MAX_HEIGHT)

    printf("WARNING:Width and Height (%dx%d) seems suspicious\n", width, height);

  if (nr_components != 3)

    printf("ERROR:We only support YUV images\n");

  if (height%16)

    printf("WARNING:Height need to be a multiple of 16 (current height is %d)\n", height);

  if (width%16)

    printf("WARNING:Width need to be a multiple of 16 (current Width is %d)\n", width);

#endif

  stream += 8;

  for (i=0; i

     cid = *stream++;

     sampling_factor = *stream++;

     Q_table = *stream++;

     c = &priv->component_infos[i];

     c->cid = cid;

     if (Q_table >= COMPONENTS)

       error("Bad Quantization table index (got %d, max allowed %d)\n", Q_table, COMPONENTS-1);

     c->Vfactor = sampling_factor&0xf;

     c->Hfactor = sampling_factor>>4;

     c->quant_table_index = Q_table;

     trace("Component:%d  factor:%dx%d  Quantization table:%d\n",

           cid, c->Hfactor, c->Vfactor, Q_table );

  }

  priv->width = width;

  priv->height = height;

  trace("< SOF marker\n");

  return 0;

}

static int parse_SOS(struct jdec_private *priv, const unsigned char *stream)

{

  unsigned int i, cid, table;

  unsigned int nr_components = stream[2];

  trace("> SOS marker\n");

  priv->cur_sos.nr_components= nr_components;

  stream += 3;

  for (i=0;i

     cid = *stream++;

     table = *stream++;

     priv->cur_sos.components[i].component_id = cid;

     priv->cur_sos.components[i].dc_selector = ((table>>4)&0x0F);

     priv->cur_sos.components[i].ac_selector = (table&0x0F);

#if SANITY_CHECK

     if ((table&0xf)>=4)

	error("We do not support more than 2 AC Huffman table\n");

     if ((table>>4)>=4)

	error("We do not support more than 2 DC Huffman table\n");

     if (cid != priv->component_infos[i].cid)

        error("SOS cid order (%d:%d) isn't compatible with the SOF marker (%d:%d)\n",

	      i, cid, i, priv->component_infos[i].cid);

     trace("ComponentId:%d  tableAC:%d tableDC:%d\n", cid, table&0xf, table>>4);

#endif

  }

  priv->stream = stream+3;

  trace("< SOS marker\n");

  return 0;

}

int tinyjpeg_parse_SOS(struct jdec_private *priv, const unsigned char *stream)

{

    return parse_SOS(priv, stream);

}

static int parse_DHT(struct jdec_private *priv, const unsigned char *stream)

{

  unsigned int count, i;

  int length, index;

  unsigned char Tc, Th;

  length = be16_to_cpu(stream) - 2;

  stream += 2;	/* Skip length */

  trace("> DHT marker (length=%d)\n", length);

  while (length>0) {

     index = *stream++;

     Tc = index & 0xf0; // it is not important to <<4

     Th = index & 0x0f;

     if (Tc) {

        memcpy(priv->HTAC[index & 0xf].bits, stream, 16);

     }

     else {

         memcpy(priv->HTDC[index & 0xf].bits, stream, 16);

     }

     count = 0;

     for (i=0; i<16; i++) {

        count += *stream++;

     }

#if SANITY_CHECK

     if (count >= HUFFMAN_BITS_SIZE)

       error("No more than %d bytes is allowed to describe a huffman table", HUFFMAN_BITS_SIZE);

     if ( (index &0xf) >= HUFFMAN_TABLES)

       error("No more than %d Huffman tables is supported (got %d)\n", HUFFMAN_TABLES, index&0xf);

     trace("Huffman table %s[%d] length=%d\n", (index&0xf0)?"AC":"DC", index&0xf, count);

#endif

     if (Tc) {

        memcpy(priv->HTAC[index & 0xf].values, stream, count);

        priv->HTAC_valid[index & 0xf] = 1;

     }

     else {

        memcpy(priv->HTDC[index & 0xf].values, stream, count);

        priv->HTDC_valid[index & 0xf] = 1;

     }

     length -= 1;

     length -= 16;

     length -= count;

     stream += count;

  }

  trace("< DHT marker\n");

  return 0;

}

static int parse_DRI(struct jdec_private *priv, const unsigned char *stream)

{

  unsigned int length;

  trace("> DRI marker\n");

  length = be16_to_cpu(stream);

#if SANITY_CHECK

  if (length != 4)

    error("Length of DRI marker need to be 4\n");

#endif

  priv->restart_interval = be16_to_cpu(stream+2);

#if DEBUG

  trace("Restart interval = %d\n", priv->restart_interval);

#endif

  trace("< DRI marker\n");

  return 0;

}

static int parse_JFIF(struct jdec_private *priv, const unsigned char *stream)

{

  int chuck_len;

  int marker;

  int sos_marker_found = 0;

  int dht_marker_found = 0;

  int dqt_marker_found = 0;

  const unsigned char *next_chunck;

  /* Parse marker */

  while (!sos_marker_found)

   {

     if (*stream++ != 0xff)

       goto bogus_jpeg_format;

     /* Skip any padding ff byte (this is normal) */

     while (*stream == 0xff)

       stream++;

     marker = *stream++;

     chuck_len = be16_to_cpu(stream);

     next_chunck = stream + chuck_len;

     switch (marker)

      {

       case SOF:

	 if (parse_SOF(priv, stream) < 0)

	   return -1;

	 break;

       case DQT:

	 if (parse_DQT(priv, stream) < 0)

	   return -1;

	 dqt_marker_found = 1;

	 break;

       case SOS:

	 if (parse_SOS(priv, stream) < 0)

	   return -1;

	 sos_marker_found = 1;

	 break;

       case DHT:

	 if (parse_DHT(priv, stream) < 0)

	   return -1;

	 dht_marker_found = 1;

	 break;

       case DRI:

	 if (parse_DRI(priv, stream) < 0)

	   return -1;

	 break;

       default:

	 trace("> Unknown marker %2.2x\n", marker);

	 break;

      }

     stream = next_chunck;

   }

  if (!dht_marker_found) {

    trace("No Huffman table loaded, using the default one\n");

    build_default_huffman_tables(priv);

  }

  if (!dqt_marker_found) {

    error("ERROR:No Quantization table loaded, using the default one\n");

  }

#ifdef SANITY_CHECK

  if (   (priv->component_infos[cY].Hfactor < priv->component_infos[cCb].Hfactor)

      || (priv->component_infos[cY].Hfactor < priv->component_infos[cCr].Hfactor))

    error("Horizontal sampling factor for Y should be greater than horitontal sampling factor for Cb or Cr\n");

  if (   (priv->component_infos[cY].Vfactor < priv->component_infos[cCb].Vfactor)

      || (priv->component_infos[cY].Vfactor < priv->component_infos[cCr].Vfactor))

    error("Vertical sampling factor for Y should be greater than vertical sampling factor for Cb or Cr\n");

  if (   (priv->component_infos[cCb].Hfactor!=1)

      || (priv->component_infos[cCr].Hfactor!=1)

      || (priv->component_infos[cCb].Vfactor!=1)

      || (priv->component_infos[cCr].Vfactor!=1))

    printf("ERROR:Sampling other than 1x1 for Cr and Cb is not supported");

#endif

  return 0;

bogus_jpeg_format:

  trace("Bogus jpeg format\n");

  return -1;

}

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

 *

 * Functions exported of the library.

 *

 * Note: Some applications can access directly to internal pointer of the

 * structure. It's is not recommended, but if you have many images to

 * uncompress with the same parameters, some functions can be called to speedup

 * the decoding.

 *

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

/**

 * Allocate a new tinyjpeg decoder object.

 *

 * Before calling any other functions, an object need to be called.

 */

struct jdec_private *tinyjpeg_init(void)

{

  struct jdec_private *priv;

  priv = (struct jdec_private *)calloc(1, sizeof(struct jdec_private));

  if (priv == NULL)

    return NULL;

  return priv;

}

/**

 * Free a tinyjpeg object.

 *

 * No others function can be called after this one.

 */

void tinyjpeg_free(struct jdec_private *priv)

{

  free(priv);

}

/**

 * Initialize the tinyjpeg object and prepare the decoding of the stream.

 *

 * Check if the jpeg can be decoded with this jpeg decoder.

 * Fill some table used for preprocessing.

 */

int tinyjpeg_parse_header(struct jdec_private *priv, const unsigned char *buf, unsigned int size)

{

  int ret;

  /* Identify the file */

  if ((buf[0] != 0xFF) || (buf[1] != SOI))

    error("Not a JPG file ?\n");

  priv->stream_begin = buf+2;

  priv->stream_length = size-2;

  priv->stream_end = priv->stream_begin + priv->stream_length;

  ret = parse_JFIF(priv, priv->stream_begin);

  return ret;

}

int tinyjpeg_decode(struct jdec_private *priv)

{

#define CHECK_VASTATUS(va_status,func)                                  \

    if (va_status != VA_STATUS_SUCCESS) {                                   \

        fprintf(stderr,"%s:%s (%d) failed,exit\n", __func__, func, __LINE__); \

        exit(1);                                                            \

    }

    VAEntrypoint entrypoints[5];

    int num_entrypoints,vld_entrypoint;

    VAConfigAttrib attrib;

    VAConfigID config_id;

    VASurfaceID surface_id;

    VAContextID context_id;

    VABufferID pic_param_buf,iqmatrix_buf,huffmantable_buf,slice_param_buf,slice_data_buf;

    int major_ver, minor_ver;

    VADisplay	va_dpy;

    VAStatus va_status;

    int max_h_factor, max_v_factor;

    int putsurface=1;

    unsigned int i, j;

    va_dpy = va_open_display();

    va_status = vaInitialize(va_dpy, &major_ver, &minor_ver);

    assert(va_status == VA_STATUS_SUCCESS);

    va_status = vaQueryConfigEntrypoints(va_dpy, VAProfileJPEGBaseline, entrypoints,

                             &num_entrypoints);

    CHECK_VASTATUS(va_status, "vaQueryConfigEntrypoints");

    for	(vld_entrypoint = 0; vld_entrypoint < num_entrypoints; vld_entrypoint++) {

        if (entrypoints[vld_entrypoint] == VAEntrypointVLD)

            break;

    }

    if (vld_entrypoint == num_entrypoints) {

        /* not find VLD entry point */

        assert(0);

    }

    /* Assuming finding VLD, find out the format for the render target */

    attrib.type = VAConfigAttribRTFormat;

    vaGetConfigAttributes(va_dpy, VAProfileJPEGBaseline, VAEntrypointVLD,

                          &attrib, 1);

    if ((attrib.value & VA_RT_FORMAT_YUV420) == 0) {

        /* not find desired YUV420 RT format */

        assert(0);

    }

    va_status = vaCreateConfig(va_dpy, VAProfileJPEGBaseline, VAEntrypointVLD,

                              &attrib, 1,&config_id);

    CHECK_VASTATUS(va_status, "vaQueryConfigEntrypoints");

    va_status = vaCreateSurfaces(va_dpy,VA_RT_FORMAT_YUV420,

                                 priv->width,priv->height, //alignment?

                                 &surface_id, 1, NULL, 0);

    CHECK_VASTATUS(va_status, "vaCreateSurfaces");

    /* Create a context for this decode pipe */

    va_status = vaCreateContext(va_dpy, config_id,

                               priv->width, priv->height, // alignment?

                               VA_PROGRESSIVE,

                               &surface_id,

                               1,

                               &context_id);

    CHECK_VASTATUS(va_status, "vaCreateContext");

    VAPictureParameterBufferJPEGBaseline pic_param;

    memset(&pic_param, 0, sizeof(pic_param));

    pic_param.picture_width = priv->width;

    pic_param.picture_height = priv->height;

    pic_param.num_components = priv->nf_components;

    for (i=0; i

        pic_param.components[i].component_id = priv->component_infos[i].cid;

        pic_param.components[i].h_sampling_factor = priv->component_infos[i].Hfactor;

        pic_param.components[i].v_sampling_factor = priv->component_infos[i].Vfactor;

        pic_param.components[i].quantiser_table_selector = priv->component_infos[i].quant_table_index;

    }

    va_status = vaCreateBuffer(va_dpy, context_id,

                              VAPictureParameterBufferType, // VAPictureParameterBufferJPEGBaseline?

                              sizeof(VAPictureParameterBufferJPEGBaseline),

                              1, &pic_param,

                              &pic_param_buf);

    CHECK_VASTATUS(va_status, "vaCreateBuffer");

    VAIQMatrixBufferJPEGBaseline iq_matrix;

    const unsigned int num_quant_tables =

        MIN(COMPONENTS, ARRAY_ELEMS(iq_matrix.load_quantiser_table));

    // todo, only mask it if non-default quant matrix is used. do we need build default quant matrix?

    memset(&iq_matrix, 0, sizeof(VAIQMatrixBufferJPEGBaseline));

    for (i = 0; i < num_quant_tables; i++) {

        if (!priv->Q_tables_valid[i])

            continue;

        iq_matrix.load_quantiser_table[i] = 1;

        for (j = 0; j < 64; j++)

            iq_matrix.quantiser_table[i][j] = priv->Q_tables[i][j];

    }

    va_status = vaCreateBuffer(va_dpy, context_id,

                              VAIQMatrixBufferType, // VAIQMatrixBufferJPEGBaseline?

                              sizeof(VAIQMatrixBufferJPEGBaseline),

                              1, &iq_matrix,

                              &iqmatrix_buf );

    CHECK_VASTATUS(va_status, "vaCreateBuffer");

    VAHuffmanTableBufferJPEGBaseline huffman_table;

    const unsigned int num_huffman_tables =

        MIN(COMPONENTS, ARRAY_ELEMS(huffman_table.load_huffman_table));

    memset(&huffman_table, 0, sizeof(VAHuffmanTableBufferJPEGBaseline));

    assert(sizeof(huffman_table.huffman_table[0].num_dc_codes) ==

           sizeof(priv->HTDC[0].bits));

    assert(sizeof(huffman_table.huffman_table[0].dc_values[0]) ==

           sizeof(priv->HTDC[0].values[0]));

    for (i = 0; i < num_huffman_tables; i++) {

        if (!priv->HTDC_valid[i] || !priv->HTAC_valid[i])

            continue;

        huffman_table.load_huffman_table[i] = 1;

        memcpy(huffman_table.huffman_table[i].num_dc_codes, priv->HTDC[i].bits,

               sizeof(huffman_table.huffman_table[i].num_dc_codes));

        memcpy(huffman_table.huffman_table[i].dc_values, priv->HTDC[i].values,

               sizeof(huffman_table.huffman_table[i].dc_values));

        memcpy(huffman_table.huffman_table[i].num_ac_codes, priv->HTAC[i].bits,

               sizeof(huffman_table.huffman_table[i].num_ac_codes));

        memcpy(huffman_table.huffman_table[i].ac_values, priv->HTAC[i].values,

               sizeof(huffman_table.huffman_table[i].ac_values));

        memset(huffman_table.huffman_table[i].pad, 0,

               sizeof(huffman_table.huffman_table[i].pad));

    }

    va_status = vaCreateBuffer(va_dpy, context_id,

                              VAHuffmanTableBufferType, // VAHuffmanTableBufferJPEGBaseline?

                              sizeof(VAHuffmanTableBufferJPEGBaseline),

                              1, &huffman_table,

                              &huffmantable_buf );

    CHECK_VASTATUS(va_status, "vaCreateBuffer");

    // one slice for whole image?

    max_h_factor = priv->component_infos[0].Hfactor;

    max_v_factor = priv->component_infos[0].Vfactor;

    static VASliceParameterBufferJPEGBaseline slice_param;

    slice_param.slice_data_size = priv->stream_end - priv->stream;

    slice_param.slice_data_offset = 0;

    slice_param.slice_data_flag = VA_SLICE_DATA_FLAG_ALL;

    slice_param.slice_horizontal_position = 0;

    slice_param.slice_vertical_position = 0;

    slice_param.num_components = priv->cur_sos.nr_components;

    for (i = 0; i < slice_param.num_components; i++) {

        slice_param.components[i].component_selector = priv->cur_sos.components[i].component_id; /* FIXME: set to values specified in SOS  */

        slice_param.components[i].dc_table_selector = priv->cur_sos.components[i].dc_selector;  /* FIXME: set to values specified in SOS  */

        slice_param.components[i].ac_table_selector = priv->cur_sos.components[i].ac_selector;  /* FIXME: set to values specified in SOS  */

    }

    slice_param.restart_interval = priv->restart_interval;

    slice_param.num_mcus = ((priv->width+max_h_factor*8-1)/(max_h_factor*8))*

                          ((priv->height+max_v_factor*8-1)/(max_v_factor*8)); // ?? 720/16?

    va_status = vaCreateBuffer(va_dpy, context_id,

                              VASliceParameterBufferType, // VASliceParameterBufferJPEGBaseline?

                              sizeof(VASliceParameterBufferJPEGBaseline),

                              1,

                              &slice_param, &slice_param_buf);

    CHECK_VASTATUS(va_status, "vaCreateBuffer");

    va_status = vaCreateBuffer(va_dpy, context_id,

                              VASliceDataBufferType,

                              priv->stream_end - priv->stream,

                              1,

                              (void*)priv->stream, // jpeg_clip,

                              &slice_data_buf);

    CHECK_VASTATUS(va_status, "vaCreateBuffer");

    va_status = vaBeginPicture(va_dpy, context_id, surface_id);

    CHECK_VASTATUS(va_status, "vaBeginPicture");

    va_status = vaRenderPicture(va_dpy,context_id, &pic_param_buf, 1);

    CHECK_VASTATUS(va_status, "vaRenderPicture");

    va_status = vaRenderPicture(va_dpy,context_id, &iqmatrix_buf, 1);

    CHECK_VASTATUS(va_status, "vaRenderPicture");

    va_status = vaRenderPicture(va_dpy,context_id, &huffmantable_buf, 1);

    CHECK_VASTATUS(va_status, "vaRenderPicture");

    va_status = vaRenderPicture(va_dpy,context_id, &slice_param_buf, 1);

    CHECK_VASTATUS(va_status, "vaRenderPicture");

    va_status = vaRenderPicture(va_dpy,context_id, &slice_data_buf, 1);

    CHECK_VASTATUS(va_status, "vaRenderPicture");

    va_status = vaEndPicture(va_dpy,context_id);

    CHECK_VASTATUS(va_status, "vaEndPicture");

    va_status = vaSyncSurface(va_dpy, surface_id);

    CHECK_VASTATUS(va_status, "vaSyncSurface");

    if (putsurface) {

        VARectangle src_rect, dst_rect;

        src_rect.x      = 0;

        src_rect.y      = 0;

        src_rect.width  = priv->width;

        src_rect.height = priv->height;

        dst_rect        = src_rect;

        va_status = va_put_surface(va_dpy, surface_id, &src_rect, &dst_rect);

        CHECK_VASTATUS(va_status, "vaPutSurface");

    }

    printf("press any key to exit\n");

    getchar();

    vaDestroySurfaces(va_dpy,&surface_id,1);

    vaDestroyConfig(va_dpy,config_id);

    vaDestroyContext(va_dpy,context_id);

    vaTerminate(va_dpy);

    va_close_display(va_dpy);

    return 0;

}

const char *tinyjpeg_get_errorstring(struct jdec_private *priv)

{

  /* FIXME: the error string must be store in the context */

  priv = priv;

  return error_string;

}

void tinyjpeg_get_size(struct jdec_private *priv, unsigned int *width, unsigned int *height)

{

  *width = priv->width;

  *height = priv->height;

}