go-libwebp

Experimental translation from libwebp to Go source.
Log | Files | Refs | README | LICENSE

alpha_enc.c (16067B)


      1 // Copyright 2011 Google Inc. All Rights Reserved.
      2 //
      3 // Use of this source code is governed by a BSD-style license
      4 // that can be found in the COPYING file in the root of the source
      5 // tree. An additional intellectual property rights grant can be found
      6 // in the file PATENTS. All contributing project authors may
      7 // be found in the AUTHORS file in the root of the source tree.
      8 // -----------------------------------------------------------------------------
      9 //
     10 // Alpha-plane compression.
     11 //
     12 // Author: Skal (pascal.massimino@gmail.com)
     13 
     14 #include <assert.h>
     15 #include <stdlib.h>
     16 #include <string.h>
     17 
     18 #include "src/dsp/dsp.h"
     19 #include "src/webp/types.h"
     20 #include "src/enc/vp8i_enc.h"
     21 #include "src/utils/bit_writer_utils.h"
     22 #include "src/utils/filters_utils.h"
     23 #include "src/utils/quant_levels_utils.h"
     24 #include "src/utils/thread_utils.h"
     25 #include "src/utils/utils.h"
     26 #include "src/webp/encode.h"
     27 #include "src/webp/format_constants.h"
     28 
     29 // -----------------------------------------------------------------------------
     30 // Encodes the given alpha data via specified compression method 'method'.
     31 // The pre-processing (quantization) is performed if 'quality' is less than 100.
     32 // For such cases, the encoding is lossy. The valid range is [0, 100] for
     33 // 'quality' and [0, 1] for 'method':
     34 //   'method = 0' - No compression;
     35 //   'method = 1' - Use lossless coder on the alpha plane only
     36 // 'filter' values [0, 4] correspond to prediction modes none, horizontal,
     37 // vertical & gradient filters. The prediction mode 4 will try all the
     38 // prediction modes 0 to 3 and pick the best one.
     39 // 'effort_level': specifies how much effort must be spent to try and reduce
     40 //  the compressed output size. In range 0 (quick) to 6 (slow).
     41 //
     42 // 'output' corresponds to the buffer containing compressed alpha data.
     43 //          This buffer is allocated by this method and caller should call
     44 //          WebPSafeFree(*output) when done.
     45 // 'output_size' corresponds to size of this compressed alpha buffer.
     46 //
     47 // Returns 1 on successfully encoding the alpha and
     48 //         0 if either:
     49 //           invalid quality or method, or
     50 //           memory allocation for the compressed data fails.
     51 
     52 #include "src/enc/vp8li_enc.h"
     53 
     54 static int EncodeLossless(const uint8_t* const data, int width, int height,
     55                           int effort_level,  // in [0..6] range
     56                           int use_quality_100, VP8LBitWriter* const bw,
     57                           WebPAuxStats* const stats) {
     58   int ok = 0;
     59   WebPConfig config;
     60   WebPPicture picture;
     61 
     62   if (!WebPPictureInit(&picture)) return 0;
     63   picture.width = width;
     64   picture.height = height;
     65   picture.use_argb = 1;
     66   picture.stats = stats;
     67   if (!WebPPictureAlloc(&picture)) return 0;
     68 
     69   // Transfer the alpha values to the green channel.
     70   WebPDispatchAlphaToGreen(data, width, picture.width, picture.height,
     71                            picture.argb, picture.argb_stride);
     72 
     73   if (!WebPConfigInit(&config)) return 0;
     74   config.lossless = 1;
     75   // Enable exact, or it would alter RGB values of transparent alpha, which is
     76   // normally OK but not here since we are not encoding the input image but  an
     77   // internal encoding-related image containing necessary exact information in
     78   // RGB channels.
     79   config.exact = 1;
     80   config.method = effort_level;  // impact is very small
     81   // Set a low default quality for encoding alpha. Ensure that Alpha quality at
     82   // lower methods (3 and below) is less than the threshold for triggering
     83   // costly 'BackwardReferencesTraceBackwards'.
     84   // If the alpha quality is set to 100 and the method to 6, allow for a high
     85   // lossless quality to trigger the cruncher.
     86   config.quality =
     87       (use_quality_100 && effort_level == 6) ? 100 : 8.f * effort_level;
     88   assert(config.quality >= 0 && config.quality <= 100.f);
     89 
     90   ok = VP8LEncodeStream(&config, &picture, bw);
     91   WebPPictureFree(&picture);
     92   ok = ok && !bw->error;
     93   if (!ok) {
     94     VP8LBitWriterWipeOut(bw);
     95     return 0;
     96   }
     97   return 1;
     98 }
     99 
    100 // -----------------------------------------------------------------------------
    101 
    102 // Small struct to hold the result of a filter mode compression attempt.
    103 typedef struct {
    104   size_t score;
    105   VP8BitWriter bw;
    106   WebPAuxStats stats;
    107 } FilterTrial;
    108 
    109 // This function always returns an initialized 'bw' object, even upon error.
    110 static int EncodeAlphaInternal(const uint8_t* const data, int width, int height,
    111                                int method, int filter, int reduce_levels,
    112                                int effort_level,  // in [0..6] range
    113                                uint8_t* const tmp_alpha,
    114                                FilterTrial* result) {
    115   int ok = 0;
    116   const uint8_t* alpha_src;
    117   WebPFilterFunc filter_func;
    118   uint8_t header;
    119   const size_t data_size = width * height;
    120   const uint8_t* output = NULL;
    121   size_t output_size = 0;
    122   VP8LBitWriter tmp_bw;
    123 
    124   assert((uint64_t)data_size == (uint64_t)width * height);  // as per spec
    125   assert(filter >= 0 && filter < WEBP_FILTER_LAST);
    126   assert(method >= ALPHA_NO_COMPRESSION);
    127   assert(method <= ALPHA_LOSSLESS_COMPRESSION);
    128   assert(sizeof(header) == ALPHA_HEADER_LEN);
    129 
    130   filter_func = WebPFilters[filter];
    131   if (filter_func != NULL) {
    132     filter_func(data, width, height, width, tmp_alpha);
    133     alpha_src = tmp_alpha;
    134   }  else {
    135     alpha_src = data;
    136   }
    137 
    138   if (method != ALPHA_NO_COMPRESSION) {
    139     ok = VP8LBitWriterInit(&tmp_bw, data_size >> 3);
    140     ok = ok && EncodeLossless(alpha_src, width, height, effort_level,
    141                               !reduce_levels, &tmp_bw, &result->stats);
    142     if (ok) {
    143       output = VP8LBitWriterFinish(&tmp_bw);
    144       if (tmp_bw.error) {
    145         VP8LBitWriterWipeOut(&tmp_bw);
    146         memset(&result->bw, 0, sizeof(result->bw));
    147         return 0;
    148       }
    149       output_size = VP8LBitWriterNumBytes(&tmp_bw);
    150       if (output_size > data_size) {
    151         // compressed size is larger than source! Revert to uncompressed mode.
    152         method = ALPHA_NO_COMPRESSION;
    153         VP8LBitWriterWipeOut(&tmp_bw);
    154       }
    155     } else {
    156       VP8LBitWriterWipeOut(&tmp_bw);
    157       memset(&result->bw, 0, sizeof(result->bw));
    158       return 0;
    159     }
    160   }
    161 
    162   if (method == ALPHA_NO_COMPRESSION) {
    163     output = alpha_src;
    164     output_size = data_size;
    165     ok = 1;
    166   }
    167 
    168   // Emit final result.
    169   header = method | (filter << 2);
    170   if (reduce_levels) header |= ALPHA_PREPROCESSED_LEVELS << 4;
    171 
    172   if (!VP8BitWriterInit(&result->bw, ALPHA_HEADER_LEN + output_size)) ok = 0;
    173   ok = ok && VP8BitWriterAppend(&result->bw, &header, ALPHA_HEADER_LEN);
    174   ok = ok && VP8BitWriterAppend(&result->bw, output, output_size);
    175 
    176   if (method != ALPHA_NO_COMPRESSION) {
    177     VP8LBitWriterWipeOut(&tmp_bw);
    178   }
    179   ok = ok && !result->bw.error;
    180   result->score = VP8BitWriterSize(&result->bw);
    181   return ok;
    182 }
    183 
    184 // -----------------------------------------------------------------------------
    185 
    186 static int GetNumColors(const uint8_t* data, int width, int height,
    187                         int stride) {
    188   int j;
    189   int colors = 0;
    190   uint8_t color[256] = { 0 };
    191 
    192   for (j = 0; j < height; ++j) {
    193     int i;
    194     const uint8_t* const p = data + j * stride;
    195     for (i = 0; i < width; ++i) {
    196       color[p[i]] = 1;
    197     }
    198   }
    199   for (j = 0; j < 256; ++j) {
    200     if (color[j] > 0) ++colors;
    201   }
    202   return colors;
    203 }
    204 
    205 #define FILTER_TRY_NONE (1 << WEBP_FILTER_NONE)
    206 #define FILTER_TRY_ALL ((1 << WEBP_FILTER_LAST) - 1)
    207 
    208 // Given the input 'filter' option, return an OR'd bit-set of filters to try.
    209 static uint32_t GetFilterMap(const uint8_t* alpha, int width, int height,
    210                              int filter, int effort_level) {
    211   uint32_t bit_map = 0U;
    212   if (filter == WEBP_FILTER_FAST) {
    213     // Quick estimate of the best candidate.
    214     int try_filter_none = (effort_level > 3);
    215     const int kMinColorsForFilterNone = 16;
    216     const int kMaxColorsForFilterNone = 192;
    217     const int num_colors = GetNumColors(alpha, width, height, width);
    218     // For low number of colors, NONE yields better compression.
    219     filter = (num_colors <= kMinColorsForFilterNone)
    220         ? WEBP_FILTER_NONE
    221         : WebPEstimateBestFilter(alpha, width, height, width);
    222     bit_map |= 1 << filter;
    223     // For large number of colors, try FILTER_NONE in addition to the best
    224     // filter as well.
    225     if (try_filter_none || num_colors > kMaxColorsForFilterNone) {
    226       bit_map |= FILTER_TRY_NONE;
    227     }
    228   } else if (filter == WEBP_FILTER_NONE) {
    229     bit_map = FILTER_TRY_NONE;
    230   } else {  // WEBP_FILTER_BEST -> try all
    231     bit_map = FILTER_TRY_ALL;
    232   }
    233   return bit_map;
    234 }
    235 
    236 static void InitFilterTrial(FilterTrial* const score) {
    237   score->score = (size_t)~0U;
    238   VP8BitWriterInit(&score->bw, 0);
    239 }
    240 
    241 static int ApplyFiltersAndEncode(const uint8_t* alpha, int width, int height,
    242                                  size_t data_size, int method, int filter,
    243                                  int reduce_levels, int effort_level,
    244                                  uint8_t** const output,
    245                                  size_t* const output_size,
    246                                  WebPAuxStats* const stats) {
    247   int ok = 1;
    248   FilterTrial best;
    249   uint32_t try_map =
    250       GetFilterMap(alpha, width, height, filter, effort_level);
    251   InitFilterTrial(&best);
    252 
    253   if (try_map != FILTER_TRY_NONE) {
    254     uint8_t* filtered_alpha =  (uint8_t*)WebPSafeMalloc(1ULL, data_size);
    255     if (filtered_alpha == NULL) return 0;
    256 
    257     for (filter = WEBP_FILTER_NONE; ok && try_map; ++filter, try_map >>= 1) {
    258       if (try_map & 1) {
    259         FilterTrial trial;
    260         ok = EncodeAlphaInternal(alpha, width, height, method, filter,
    261                                  reduce_levels, effort_level, filtered_alpha,
    262                                  &trial);
    263         if (ok && trial.score < best.score) {
    264           VP8BitWriterWipeOut(&best.bw);
    265           best = trial;
    266         } else {
    267           VP8BitWriterWipeOut(&trial.bw);
    268         }
    269       }
    270     }
    271     WebPSafeFree(filtered_alpha);
    272   } else {
    273     ok = EncodeAlphaInternal(alpha, width, height, method, WEBP_FILTER_NONE,
    274                              reduce_levels, effort_level, NULL, &best);
    275   }
    276   if (ok) {
    277 #if !defined(WEBP_DISABLE_STATS)
    278     if (stats != NULL) {
    279       stats->lossless_features = best.stats.lossless_features;
    280       stats->histogram_bits = best.stats.histogram_bits;
    281       stats->transform_bits = best.stats.transform_bits;
    282       stats->cross_color_transform_bits = best.stats.cross_color_transform_bits;
    283       stats->cache_bits = best.stats.cache_bits;
    284       stats->palette_size = best.stats.palette_size;
    285       stats->lossless_size = best.stats.lossless_size;
    286       stats->lossless_hdr_size = best.stats.lossless_hdr_size;
    287       stats->lossless_data_size = best.stats.lossless_data_size;
    288     }
    289 #else
    290     (void)stats;
    291 #endif
    292     *output_size = VP8BitWriterSize(&best.bw);
    293     *output = VP8BitWriterBuf(&best.bw);
    294   } else {
    295     VP8BitWriterWipeOut(&best.bw);
    296   }
    297   return ok;
    298 }
    299 
    300 static int EncodeAlpha(VP8Encoder* const enc,
    301                        int quality, int method, int filter,
    302                        int effort_level,
    303                        uint8_t** const output, size_t* const output_size) {
    304   const WebPPicture* const pic = enc->pic;
    305   const int width = pic->width;
    306   const int height = pic->height;
    307 
    308   uint8_t* quant_alpha = NULL;
    309   const size_t data_size = width * height;
    310   uint64_t sse = 0;
    311   int ok = 1;
    312   const int reduce_levels = (quality < 100);
    313 
    314   // quick correctness checks
    315   assert((uint64_t)data_size == (uint64_t)width * height);  // as per spec
    316   assert(enc != NULL && pic != NULL && pic->a != NULL);
    317   assert(output != NULL && output_size != NULL);
    318   assert(width > 0 && height > 0);
    319   assert(pic->a_stride >= width);
    320   assert(filter >= WEBP_FILTER_NONE && filter <= WEBP_FILTER_FAST);
    321 
    322   if (quality < 0 || quality > 100) {
    323     return WebPEncodingSetError(pic, VP8_ENC_ERROR_INVALID_CONFIGURATION);
    324   }
    325 
    326   if (method < ALPHA_NO_COMPRESSION || method > ALPHA_LOSSLESS_COMPRESSION) {
    327     return WebPEncodingSetError(pic, VP8_ENC_ERROR_INVALID_CONFIGURATION);
    328   }
    329 
    330   if (method == ALPHA_NO_COMPRESSION) {
    331     // Don't filter, as filtering will make no impact on compressed size.
    332     filter = WEBP_FILTER_NONE;
    333   }
    334 
    335   quant_alpha = (uint8_t*)WebPSafeMalloc(1ULL, data_size);
    336   if (quant_alpha == NULL) {
    337     return WebPEncodingSetError(pic, VP8_ENC_ERROR_OUT_OF_MEMORY);
    338   }
    339 
    340   // Extract alpha data (width x height) from raw_data (stride x height).
    341   WebPCopyPlane(pic->a, pic->a_stride, quant_alpha, width, width, height);
    342 
    343   if (reduce_levels) {  // No Quantization required for 'quality = 100'.
    344     // 16 alpha levels gives quite a low MSE w.r.t original alpha plane hence
    345     // mapped to moderate quality 70. Hence Quality:[0, 70] -> Levels:[2, 16]
    346     // and Quality:]70, 100] -> Levels:]16, 256].
    347     const int alpha_levels = (quality <= 70) ? (2 + quality / 5)
    348                                              : (16 + (quality - 70) * 8);
    349     ok = QuantizeLevels(quant_alpha, width, height, alpha_levels, &sse);
    350   }
    351 
    352   if (ok) {
    353     VP8FiltersInit();
    354     ok = ApplyFiltersAndEncode(quant_alpha, width, height, data_size, method,
    355                                filter, reduce_levels, effort_level, output,
    356                                output_size, pic->stats);
    357     if (!ok) {
    358       WebPEncodingSetError(pic, VP8_ENC_ERROR_OUT_OF_MEMORY);  // imprecise
    359     }
    360 #if !defined(WEBP_DISABLE_STATS)
    361     if (pic->stats != NULL) {  // need stats?
    362       pic->stats->coded_size += (int)(*output_size);
    363       enc->sse[3] = sse;
    364     }
    365 #endif
    366   }
    367 
    368   WebPSafeFree(quant_alpha);
    369   return ok;
    370 }
    371 
    372 //------------------------------------------------------------------------------
    373 // Main calls
    374 
    375 static int CompressAlphaJob(void* arg1, void* unused) {
    376   VP8Encoder* const enc = (VP8Encoder*)arg1;
    377   const WebPConfig* config = enc->config;
    378   uint8_t* alpha_data = NULL;
    379   size_t alpha_size = 0;
    380   const int effort_level = config->method;  // maps to [0..6]
    381   const WEBP_FILTER_TYPE filter =
    382       (config->alpha_filtering == 0) ? WEBP_FILTER_NONE :
    383       (config->alpha_filtering == 1) ? WEBP_FILTER_FAST :
    384                                        WEBP_FILTER_BEST;
    385   if (!EncodeAlpha(enc, config->alpha_quality, config->alpha_compression,
    386                    filter, effort_level, &alpha_data, &alpha_size)) {
    387     return 0;
    388   }
    389   if (alpha_size != (uint32_t)alpha_size) {  // Soundness check.
    390     WebPSafeFree(alpha_data);
    391     return 0;
    392   }
    393   enc->alpha_data_size = (uint32_t)alpha_size;
    394   enc->alpha_data = alpha_data;
    395   (void)unused;
    396   return 1;
    397 }
    398 
    399 void VP8EncInitAlpha(VP8Encoder* const enc) {
    400   WebPInitAlphaProcessing();
    401   enc->has_alpha = WebPPictureHasTransparency(enc->pic);
    402   enc->alpha_data = NULL;
    403   enc->alpha_data_size = 0;
    404   if (enc->thread_level > 0) {
    405     WebPWorker* const worker = &enc->alpha_worker;
    406     WebPGetWorkerInterface()->Init(worker);
    407     worker->data1 = enc;
    408     worker->data2 = NULL;
    409     worker->hook = CompressAlphaJob;
    410   }
    411 }
    412 
    413 int VP8EncStartAlpha(VP8Encoder* const enc) {
    414   if (enc->has_alpha) {
    415     if (enc->thread_level > 0) {
    416       WebPWorker* const worker = &enc->alpha_worker;
    417       // Makes sure worker is good to go.
    418       if (!WebPGetWorkerInterface()->Reset(worker)) {
    419         return WebPEncodingSetError(enc->pic, VP8_ENC_ERROR_OUT_OF_MEMORY);
    420       }
    421       WebPGetWorkerInterface()->Launch(worker);
    422       return 1;
    423     } else {
    424       return CompressAlphaJob(enc, NULL);   // just do the job right away
    425     }
    426   }
    427   return 1;
    428 }
    429 
    430 int VP8EncFinishAlpha(VP8Encoder* const enc) {
    431   if (enc->has_alpha) {
    432     if (enc->thread_level > 0) {
    433       WebPWorker* const worker = &enc->alpha_worker;
    434       if (!WebPGetWorkerInterface()->Sync(worker)) return 0;  // error
    435     }
    436   }
    437   return WebPReportProgress(enc->pic, enc->percent + 20, &enc->percent);
    438 }
    439 
    440 int VP8EncDeleteAlpha(VP8Encoder* const enc) {
    441   int ok = 1;
    442   if (enc->thread_level > 0) {
    443     WebPWorker* const worker = &enc->alpha_worker;
    444     // finish anything left in flight
    445     ok = WebPGetWorkerInterface()->Sync(worker);
    446     // still need to end the worker, even if !ok
    447     WebPGetWorkerInterface()->End(worker);
    448   }
    449   WebPSafeFree(enc->alpha_data);
    450   enc->alpha_data = NULL;
    451   enc->alpha_data_size = 0;
    452   enc->has_alpha = 0;
    453   return ok;
    454 }