git.sesse.net Git - ffmpeg/blob - libavcodec/utvideodec.c

   1 /*
   2  * Ut Video decoder
   3  * Copyright (c) 2011 Konstantin Shishkov
   4  *
   5  * This file is part of FFmpeg.
   6  *
   7  * FFmpeg is free software; you can redistribute it and/or
   8  * modify it under the terms of the GNU Lesser General Public
   9  * License as published by the Free Software Foundation; either
  10  * version 2.1 of the License, or (at your option) any later version.
  11  *
  12  * FFmpeg is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  15  * Lesser General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU Lesser General Public
  18  * License along with FFmpeg; if not, write to the Free Software
  19  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
  20  */
  21
  22 /**
  23  * @file
  24  * Ut Video decoder
  25  */
  26
  27 #include <inttypes.h>
  28 #include <stdlib.h>
  29
  30 #define UNCHECKED_BITSTREAM_READER 1
  31
  32 #include "libavutil/intreadwrite.h"
  33 #include "avcodec.h"
  34 #include "bswapdsp.h"
  35 #include "bytestream.h"
  36 #include "get_bits.h"
  37 #include "internal.h"
  38 #include "thread.h"
  39 #include "utvideo.h"
  40
  41 static int build_huff10(const uint8_t *src, VLC *vlc, int *fsym)
  42 {
  43     int i;
  44     HuffEntry he[1024];
  45     int last;
  46     uint32_t codes[1024];
  47     uint8_t bits[1024];
  48     uint16_t syms[1024];
  49     uint32_t code;
  50
  51     *fsym = -1;
  52     for (i = 0; i < 1024; i++) {
  53         he[i].sym = i;
  54         he[i].len = *src++;
  55     }
  56     qsort(he, 1024, sizeof(*he), ff_ut10_huff_cmp_len);
  57
  58     if (!he[0].len) {
  59         *fsym = he[0].sym;
  60         return 0;
  61     }
  62
  63     last = 1023;
  64     while (he[last].len == 255 && last)
  65         last--;
  66
  67     if (he[last].len > 32) {
  68         return -1;
  69     }
  70
  71     code = 1;
  72     for (i = last; i >= 0; i--) {
  73         codes[i] = code >> (32 - he[i].len);
  74         bits[i]  = he[i].len;
  75         syms[i]  = he[i].sym;
  76         code += 0x80000000u >> (he[i].len - 1);
  77     }
  78 #define VLC_BITS 11
  79     return ff_init_vlc_sparse(vlc, VLC_BITS, last + 1,
  80                               bits,  sizeof(*bits),  sizeof(*bits),
  81                               codes, sizeof(*codes), sizeof(*codes),
  82                               syms,  sizeof(*syms),  sizeof(*syms), 0);
  83 }
  84
  85 static int build_huff(const uint8_t *src, VLC *vlc, int *fsym)
  86 {
  87     int i;
  88     HuffEntry he[256];
  89     int last;
  90     uint32_t codes[256];
  91     uint8_t bits[256];
  92     uint8_t syms[256];
  93     uint32_t code;
  94
  95     *fsym = -1;
  96     for (i = 0; i < 256; i++) {
  97         he[i].sym = i;
  98         he[i].len = *src++;
  99     }
 100     qsort(he, 256, sizeof(*he), ff_ut_huff_cmp_len);
 101
 102     if (!he[0].len) {
 103         *fsym = he[0].sym;
 104         return 0;
 105     }
 106
 107     last = 255;
 108     while (he[last].len == 255 && last)
 109         last--;
 110
 111     if (he[last].len > 32)
 112         return -1;
 113
 114     code = 1;
 115     for (i = last; i >= 0; i--) {
 116         codes[i] = code >> (32 - he[i].len);
 117         bits[i]  = he[i].len;
 118         syms[i]  = he[i].sym;
 119         code += 0x80000000u >> (he[i].len - 1);
 120     }
 121
 122     return ff_init_vlc_sparse(vlc, VLC_BITS, last + 1,
 123                               bits,  sizeof(*bits),  sizeof(*bits),
 124                               codes, sizeof(*codes), sizeof(*codes),
 125                               syms,  sizeof(*syms),  sizeof(*syms), 0);
 126 }
 127
 128 static int decode_plane10(UtvideoContext *c, int plane_no,
 129                           uint16_t *dst, ptrdiff_t stride,
 130                           int width, int height,
 131                           const uint8_t *src, const uint8_t *huff,
 132                           int use_pred)
 133 {
 134     int i, j, slice, pix, ret;
 135     int sstart, send;
 136     VLC vlc;
 137     GetBitContext gb;
 138     int prev, fsym;
 139
 140     if ((ret = build_huff10(huff, &vlc, &fsym)) < 0) {
 141         av_log(c->avctx, AV_LOG_ERROR, "Cannot build Huffman codes\n");
 142         return ret;
 143     }
 144     if (fsym >= 0) { // build_huff reported a symbol to fill slices with
 145         send = 0;
 146         for (slice = 0; slice < c->slices; slice++) {
 147             uint16_t *dest;
 148
 149             sstart = send;
 150             send   = (height * (slice + 1) / c->slices);
 151             dest   = dst + sstart * stride;
 152
 153             prev = 0x200;
 154             for (j = sstart; j < send; j++) {
 155                 for (i = 0; i < width; i++) {
 156                     pix = fsym;
 157                     if (use_pred) {
 158                         prev += pix;
 159                         prev &= 0x3FF;
 160                         pix   = prev;
 161                     }
 162                     dest[i] = pix;
 163                 }
 164                 dest += stride;
 165             }
 166         }
 167         return 0;
 168     }
 169
 170     send = 0;
 171     for (slice = 0; slice < c->slices; slice++) {
 172         uint16_t *dest;
 173         int slice_data_start, slice_data_end, slice_size;
 174
 175         sstart = send;
 176         send   = (height * (slice + 1) / c->slices);
 177         dest   = dst + sstart * stride;
 178
 179         // slice offset and size validation was done earlier
 180         slice_data_start = slice ? AV_RL32(src + slice * 4 - 4) : 0;
 181         slice_data_end   = AV_RL32(src + slice * 4);
 182         slice_size       = slice_data_end - slice_data_start;
 183
 184         if (!slice_size) {
 185             av_log(c->avctx, AV_LOG_ERROR, "Plane has more than one symbol "
 186                    "yet a slice has a length of zero.\n");
 187             goto fail;
 188         }
 189
 190         memset(c->slice_bits + slice_size, 0, AV_INPUT_BUFFER_PADDING_SIZE);
 191         c->bdsp.bswap_buf((uint32_t *) c->slice_bits,
 192                           (uint32_t *)(src + slice_data_start + c->slices * 4),
 193                           (slice_data_end - slice_data_start + 3) >> 2);
 194         init_get_bits(&gb, c->slice_bits, slice_size * 8);
 195
 196         prev = 0x200;
 197         for (j = sstart; j < send; j++) {
 198             for (i = 0; i < width; i++) {
 199                 pix = get_vlc2(&gb, vlc.table, VLC_BITS, 3);
 200                 if (pix < 0) {
 201                     av_log(c->avctx, AV_LOG_ERROR, "Decoding error\n");
 202                     goto fail;
 203                 }
 204                 if (use_pred) {
 205                     prev += pix;
 206                     prev &= 0x3FF;
 207                     pix   = prev;
 208                 }
 209                 dest[i] = pix;
 210             }
 211             dest += stride;
 212             if (get_bits_left(&gb) < 0) {
 213                 av_log(c->avctx, AV_LOG_ERROR,
 214                         "Slice decoding ran out of bits\n");
 215                 goto fail;
 216             }
 217         }
 218         if (get_bits_left(&gb) > 32)
 219             av_log(c->avctx, AV_LOG_WARNING,
 220                    "%d bits left after decoding slice\n", get_bits_left(&gb));
 221     }
 222
 223     ff_free_vlc(&vlc);
 224
 225     return 0;
 226 fail:
 227     ff_free_vlc(&vlc);
 228     return AVERROR_INVALIDDATA;
 229 }
 230
 231 static int compute_cmask(int plane_no, int interlaced, enum AVPixelFormat pix_fmt)
 232 {
 233     const int is_luma = (pix_fmt == AV_PIX_FMT_YUV420P) && !plane_no;
 234
 235     if (interlaced)
 236         return ~(1 + 2 * is_luma);
 237
 238     return ~is_luma;
 239 }
 240
 241 static int decode_plane(UtvideoContext *c, int plane_no,
 242                         uint8_t *dst, ptrdiff_t stride,
 243                         int width, int height,
 244                         const uint8_t *src, int use_pred)
 245 {
 246     int i, j, slice, pix;
 247     int sstart, send;
 248     VLC vlc;
 249     GetBitContext gb;
 250     int prev, fsym;
 251     const int cmask = compute_cmask(plane_no, c->interlaced, c->avctx->pix_fmt);
 252
 253     if (build_huff(src, &vlc, &fsym)) {
 254         av_log(c->avctx, AV_LOG_ERROR, "Cannot build Huffman codes\n");
 255         return AVERROR_INVALIDDATA;
 256     }
 257     if (fsym >= 0) { // build_huff reported a symbol to fill slices with
 258         send = 0;
 259         for (slice = 0; slice < c->slices; slice++) {
 260             uint8_t *dest;
 261
 262             sstart = send;
 263             send   = (height * (slice + 1) / c->slices) & cmask;
 264             dest   = dst + sstart * stride;
 265
 266             prev = 0x80;
 267             for (j = sstart; j < send; j++) {
 268                 for (i = 0; i < width; i++) {
 269                     pix = fsym;
 270                     if (use_pred) {
 271                         prev += pix;
 272                         pix   = prev;
 273                     }
 274                     dest[i] = pix;
 275                 }
 276                 dest += stride;
 277             }
 278         }
 279         return 0;
 280     }
 281
 282     src      += 256;
 283
 284     send = 0;
 285     for (slice = 0; slice < c->slices; slice++) {
 286         uint8_t *dest;
 287         int slice_data_start, slice_data_end, slice_size;
 288
 289         sstart = send;
 290         send   = (height * (slice + 1) / c->slices) & cmask;
 291         dest   = dst + sstart * stride;
 292
 293         // slice offset and size validation was done earlier
 294         slice_data_start = slice ? AV_RL32(src + slice * 4 - 4) : 0;
 295         slice_data_end   = AV_RL32(src + slice * 4);
 296         slice_size       = slice_data_end - slice_data_start;
 297
 298         if (!slice_size) {
 299             av_log(c->avctx, AV_LOG_ERROR, "Plane has more than one symbol "
 300                    "yet a slice has a length of zero.\n");
 301             goto fail;
 302         }
 303
 304         memset(c->slice_bits + slice_size, 0, AV_INPUT_BUFFER_PADDING_SIZE);
 305         c->bdsp.bswap_buf((uint32_t *) c->slice_bits,
 306                           (uint32_t *)(src + slice_data_start + c->slices * 4),
 307                           (slice_data_end - slice_data_start + 3) >> 2);
 308         init_get_bits(&gb, c->slice_bits, slice_size * 8);
 309
 310         prev = 0x80;
 311         for (j = sstart; j < send; j++) {
 312             for (i = 0; i < width; i++) {
 313                 pix = get_vlc2(&gb, vlc.table, VLC_BITS, 3);
 314                 if (pix < 0) {
 315                     av_log(c->avctx, AV_LOG_ERROR, "Decoding error\n");
 316                     goto fail;
 317                 }
 318                 if (use_pred) {
 319                     prev += pix;
 320                     pix   = prev;
 321                 }
 322                 dest[i] = pix;
 323             }
 324             if (get_bits_left(&gb) < 0) {
 325                 av_log(c->avctx, AV_LOG_ERROR,
 326                         "Slice decoding ran out of bits\n");
 327                 goto fail;
 328             }
 329             dest += stride;
 330         }
 331         if (get_bits_left(&gb) > 32)
 332             av_log(c->avctx, AV_LOG_WARNING,
 333                    "%d bits left after decoding slice\n", get_bits_left(&gb));
 334     }
 335
 336     ff_free_vlc(&vlc);
 337
 338     return 0;
 339 fail:
 340     ff_free_vlc(&vlc);
 341     return AVERROR_INVALIDDATA;
 342 }
 343
 344 #undef A
 345 #undef B
 346 #undef C
 347
 348 static void restore_median_planar(UtvideoContext *c, uint8_t *src, ptrdiff_t stride,
 349                                   int width, int height, int slices, int rmode)
 350 {
 351     int i, j, slice;
 352     int A, B, C;
 353     uint8_t *bsrc;
 354     int slice_start, slice_height;
 355     const int cmask = ~rmode;
 356
 357     for (slice = 0; slice < slices; slice++) {
 358         slice_start  = ((slice * height) / slices) & cmask;
 359         slice_height = ((((slice + 1) * height) / slices) & cmask) -
 360                        slice_start;
 361
 362         if (!slice_height)
 363             continue;
 364         bsrc = src + slice_start * stride;
 365
 366         // first line - left neighbour prediction
 367         bsrc[0] += 0x80;
 368         c->llviddsp.add_left_pred(bsrc, bsrc, width, 0);
 369         bsrc += stride;
 370         if (slice_height <= 1)
 371             continue;
 372         // second line - first element has top prediction, the rest uses median
 373         C        = bsrc[-stride];
 374         bsrc[0] += C;
 375         A        = bsrc[0];
 376         for (i = 1; i < FFMIN(width, 16); i++) { /* scalar loop (DSP need align 16) */
 377             B        = bsrc[i - stride];
 378             bsrc[i] += mid_pred(A, B, (uint8_t)(A + B - C));
 379             C        = B;
 380             A        = bsrc[i];
 381         }
 382         if (width > 16)
 383             c->llviddsp.add_median_pred(bsrc + 16, bsrc - stride + 16,
 384                                         bsrc + 16, width - 16, &A, &B);
 385
 386         bsrc += stride;
 387         // the rest of lines use continuous median prediction
 388         for (j = 2; j < slice_height; j++) {
 389             c->llviddsp.add_median_pred(bsrc, bsrc - stride,
 390                                             bsrc, width, &A, &B);
 391             bsrc += stride;
 392         }
 393     }
 394 }
 395
 396 /* UtVideo interlaced mode treats every two lines as a single one,
 397  * so restoring function should take care of possible padding between
 398  * two parts of the same "line".
 399  */
 400 static void restore_median_planar_il(UtvideoContext *c, uint8_t *src, ptrdiff_t stride,
 401                                      int width, int height, int slices, int rmode)
 402 {
 403     int i, j, slice;
 404     int A, B, C;
 405     uint8_t *bsrc;
 406     int slice_start, slice_height;
 407     const int cmask   = ~(rmode ? 3 : 1);
 408     const ptrdiff_t stride2 = stride << 1;
 409
 410     for (slice = 0; slice < slices; slice++) {
 411         slice_start    = ((slice * height) / slices) & cmask;
 412         slice_height   = ((((slice + 1) * height) / slices) & cmask) -
 413                          slice_start;
 414         slice_height >>= 1;
 415         if (!slice_height)
 416             continue;
 417
 418         bsrc = src + slice_start * stride;
 419
 420         // first line - left neighbour prediction
 421         bsrc[0] += 0x80;
 422         A = c->llviddsp.add_left_pred(bsrc, bsrc, width, 0);
 423         c->llviddsp.add_left_pred(bsrc + stride, bsrc + stride, width, A);
 424         bsrc += stride2;
 425         if (slice_height <= 1)
 426             continue;
 427         // second line - first element has top prediction, the rest uses median
 428         C        = bsrc[-stride2];
 429         bsrc[0] += C;
 430         A        = bsrc[0];
 431         for (i = 1; i < FFMIN(width, 16); i++) { /* scalar loop (DSP need align 16) */
 432             B        = bsrc[i - stride2];
 433             bsrc[i] += mid_pred(A, B, (uint8_t)(A + B - C));
 434             C        = B;
 435             A        = bsrc[i];
 436         }
 437         if (width > 16)
 438             c->llviddsp.add_median_pred(bsrc + 16, bsrc - stride2 + 16,
 439                                         bsrc + 16, width - 16, &A, &B);
 440
 441         c->llviddsp.add_median_pred(bsrc + stride, bsrc - stride,
 442                                         bsrc + stride, width, &A, &B);
 443         bsrc += stride2;
 444         // the rest of lines use continuous median prediction
 445         for (j = 2; j < slice_height; j++) {
 446             c->llviddsp.add_median_pred(bsrc, bsrc - stride2,
 447                                             bsrc, width, &A, &B);
 448             c->llviddsp.add_median_pred(bsrc + stride, bsrc - stride,
 449                                             bsrc + stride, width, &A, &B);
 450             bsrc += stride2;
 451         }
 452     }
 453 }
 454
 455 static void restore_gradient_planar(UtvideoContext *c, uint8_t *src, ptrdiff_t stride,
 456                                     int width, int height, int slices, int rmode)
 457 {
 458     int i, j, slice;
 459     int A, B, C;
 460     uint8_t *bsrc;
 461     int slice_start, slice_height;
 462     const int cmask = ~rmode;
 463     int min_width = FFMIN(width, 32);
 464
 465     for (slice = 0; slice < slices; slice++) {
 466         slice_start  = ((slice * height) / slices) & cmask;
 467         slice_height = ((((slice + 1) * height) / slices) & cmask) -
 468                        slice_start;
 469
 470         if (!slice_height)
 471             continue;
 472         bsrc = src + slice_start * stride;
 473
 474         // first line - left neighbour prediction
 475         bsrc[0] += 0x80;
 476         c->llviddsp.add_left_pred(bsrc, bsrc, width, 0);
 477         bsrc += stride;
 478         if (slice_height <= 1)
 479             continue;
 480         for (j = 1; j < slice_height; j++) {
 481             // second line - first element has top prediction, the rest uses gradient
 482             bsrc[0] = (bsrc[0] + bsrc[-stride]) & 0xFF;
 483             for (i = 1; i < min_width; i++) { /* dsp need align 32 */
 484                 A = bsrc[i - stride];
 485                 B = bsrc[i - (stride + 1)];
 486                 C = bsrc[i - 1];
 487                 bsrc[i] = (A - B + C + bsrc[i]) & 0xFF;
 488             }
 489             if (width > 32)
 490                 c->llviddsp.add_gradient_pred(bsrc + 32, stride, width - 32);
 491             bsrc += stride;
 492         }
 493     }
 494 }
 495
 496 static void restore_gradient_planar_il(UtvideoContext *c, uint8_t *src, ptrdiff_t stride,
 497                                       int width, int height, int slices, int rmode)
 498 {
 499     int i, j, slice;
 500     int A, B, C;
 501     uint8_t *bsrc;
 502     int slice_start, slice_height;
 503     const int cmask   = ~(rmode ? 3 : 1);
 504     const ptrdiff_t stride2 = stride << 1;
 505
 506     for (slice = 0; slice < slices; slice++) {
 507         slice_start    = ((slice * height) / slices) & cmask;
 508         slice_height   = ((((slice + 1) * height) / slices) & cmask) -
 509                          slice_start;
 510         slice_height >>= 1;
 511         if (!slice_height)
 512             continue;
 513
 514         bsrc = src + slice_start * stride;
 515
 516         // first line - left neighbour prediction
 517         bsrc[0] += 0x80;
 518         A = c->llviddsp.add_left_pred(bsrc, bsrc, width, 0);
 519         c->llviddsp.add_left_pred(bsrc + stride, bsrc + stride, width, A);
 520         bsrc += stride2;
 521         if (slice_height <= 1)
 522             continue;
 523         for (j = 1; j < slice_height; j++) {
 524             // second line - first element has top prediction, the rest uses gradient
 525             bsrc[0] = (bsrc[0] + bsrc[-stride2]) & 0xFF;
 526             for (i = 1; i < width; i++) {
 527                 A = bsrc[i - stride2];
 528                 B = bsrc[i - (stride2 + 1)];
 529                 C = bsrc[i - 1];
 530                 bsrc[i] = (A - B + C + bsrc[i]) & 0xFF;
 531             }
 532             A = bsrc[-stride];
 533             B = bsrc[-(1 + stride + stride - width)];
 534             C = bsrc[width - 1];
 535             bsrc[stride] = (A - B + C + bsrc[stride]) & 0xFF;
 536             for (i = 1; i < width; i++) {
 537                 A = bsrc[i - stride];
 538                 B = bsrc[i - (1 + stride)];
 539                 C = bsrc[i - 1 + stride];
 540                 bsrc[i + stride] = (A - B + C + bsrc[i + stride]) & 0xFF;
 541             }
 542             bsrc += stride2;
 543         }
 544     }
 545 }
 546
 547 static int decode_frame(AVCodecContext *avctx, void *data, int *got_frame,
 548                         AVPacket *avpkt)
 549 {
 550     const uint8_t *buf = avpkt->data;
 551     int buf_size = avpkt->size;
 552     UtvideoContext *c = avctx->priv_data;
 553     int i, j;
 554     const uint8_t *plane_start[5];
 555     int plane_size, max_slice_size = 0, slice_start, slice_end, slice_size;
 556     int ret;
 557     GetByteContext gb;
 558     ThreadFrame frame = { .f = data };
 559
 560     if ((ret = ff_thread_get_buffer(avctx, &frame, 0)) < 0)
 561         return ret;
 562
 563     /* parse plane structure to get frame flags and validate slice offsets */
 564     bytestream2_init(&gb, buf, buf_size);
 565     if (c->pro) {
 566         if (bytestream2_get_bytes_left(&gb) < c->frame_info_size) {
 567             av_log(avctx, AV_LOG_ERROR, "Not enough data for frame information\n");
 568             return AVERROR_INVALIDDATA;
 569         }
 570         c->frame_info = bytestream2_get_le32u(&gb);
 571         c->slices = ((c->frame_info >> 16) & 0xff) + 1;
 572         for (i = 0; i < c->planes; i++) {
 573             plane_start[i] = gb.buffer;
 574             if (bytestream2_get_bytes_left(&gb) < 1024 + 4 * c->slices) {
 575                 av_log(avctx, AV_LOG_ERROR, "Insufficient data for a plane\n");
 576                 return AVERROR_INVALIDDATA;
 577             }
 578             slice_start = 0;
 579             slice_end   = 0;
 580             for (j = 0; j < c->slices; j++) {
 581                 slice_end   = bytestream2_get_le32u(&gb);
 582                 if (slice_end < 0 || slice_end < slice_start ||
 583                     bytestream2_get_bytes_left(&gb) < slice_end) {
 584                     av_log(avctx, AV_LOG_ERROR, "Incorrect slice size\n");
 585                     return AVERROR_INVALIDDATA;
 586                 }
 587                 slice_size  = slice_end - slice_start;
 588                 slice_start = slice_end;
 589                 max_slice_size = FFMAX(max_slice_size, slice_size);
 590             }
 591             plane_size = slice_end;
 592             bytestream2_skipu(&gb, plane_size);
 593             bytestream2_skipu(&gb, 1024);
 594         }
 595         plane_start[c->planes] = gb.buffer;
 596     } else {
 597         for (i = 0; i < c->planes; i++) {
 598             plane_start[i] = gb.buffer;
 599             if (bytestream2_get_bytes_left(&gb) < 256 + 4 * c->slices) {
 600                 av_log(avctx, AV_LOG_ERROR, "Insufficient data for a plane\n");
 601                 return AVERROR_INVALIDDATA;
 602             }
 603             bytestream2_skipu(&gb, 256);
 604             slice_start = 0;
 605             slice_end   = 0;
 606             for (j = 0; j < c->slices; j++) {
 607                 slice_end   = bytestream2_get_le32u(&gb);
 608                 if (slice_end < 0 || slice_end < slice_start ||
 609                     bytestream2_get_bytes_left(&gb) < slice_end) {
 610                     av_log(avctx, AV_LOG_ERROR, "Incorrect slice size\n");
 611                     return AVERROR_INVALIDDATA;
 612                 }
 613                 slice_size  = slice_end - slice_start;
 614                 slice_start = slice_end;
 615                 max_slice_size = FFMAX(max_slice_size, slice_size);
 616             }
 617             plane_size = slice_end;
 618             bytestream2_skipu(&gb, plane_size);
 619         }
 620         plane_start[c->planes] = gb.buffer;
 621         if (bytestream2_get_bytes_left(&gb) < c->frame_info_size) {
 622             av_log(avctx, AV_LOG_ERROR, "Not enough data for frame information\n");
 623             return AVERROR_INVALIDDATA;
 624         }
 625         c->frame_info = bytestream2_get_le32u(&gb);
 626     }
 627     av_log(avctx, AV_LOG_DEBUG, "frame information flags %"PRIX32"\n",
 628            c->frame_info);
 629
 630     c->frame_pred = (c->frame_info >> 8) & 3;
 631
 632     max_slice_size += 4*avctx->width;
 633
 634     av_fast_malloc(&c->slice_bits, &c->slice_bits_size,
 635                    max_slice_size + AV_INPUT_BUFFER_PADDING_SIZE);
 636
 637     if (!c->slice_bits) {
 638         av_log(avctx, AV_LOG_ERROR, "Cannot allocate temporary buffer\n");
 639         return AVERROR(ENOMEM);
 640     }
 641
 642     switch (c->avctx->pix_fmt) {
 643     case AV_PIX_FMT_GBRP:
 644     case AV_PIX_FMT_GBRAP:
 645         for (i = 0; i < c->planes; i++) {
 646             ret = decode_plane(c, i, frame.f->data[i],
 647                                frame.f->linesize[i], avctx->width,
 648                                avctx->height, plane_start[i],
 649                                c->frame_pred == PRED_LEFT);
 650             if (ret)
 651                 return ret;
 652             if (c->frame_pred == PRED_MEDIAN) {
 653                 if (!c->interlaced) {
 654                     restore_median_planar(c, frame.f->data[i],
 655                                           frame.f->linesize[i], avctx->width,
 656                                           avctx->height, c->slices, 0);
 657                 } else {
 658                     restore_median_planar_il(c, frame.f->data[i],
 659                                              frame.f->linesize[i],
 660                                              avctx->width, avctx->height, c->slices,
 661                                              0);
 662                 }
 663             } else if (c->frame_pred == PRED_GRADIENT) {
 664                 if (!c->interlaced) {
 665                     restore_gradient_planar(c, frame.f->data[i],
 666                                             frame.f->linesize[i], avctx->width,
 667                                             avctx->height, c->slices, 0);
 668                 } else {
 669                     restore_gradient_planar_il(c, frame.f->data[i],
 670                                                frame.f->linesize[i],
 671                                                avctx->width, avctx->height, c->slices,
 672                                                0);
 673                 }
 674             }
 675         }
 676         c->utdsp.restore_rgb_planes(frame.f->data[2], frame.f->data[0], frame.f->data[1],
 677                                     frame.f->linesize[2], frame.f->linesize[0], frame.f->linesize[1],
 678                                     avctx->width, avctx->height);
 679         break;
 680     case AV_PIX_FMT_GBRAP10:
 681     case AV_PIX_FMT_GBRP10:
 682         for (i = 0; i < c->planes; i++) {
 683             ret = decode_plane10(c, i, (uint16_t *)frame.f->data[i],
 684                                  frame.f->linesize[i] / 2, avctx->width,
 685                                  avctx->height, plane_start[i],
 686                                  plane_start[i + 1] - 1024,
 687                                  c->frame_pred == PRED_LEFT);
 688             if (ret)
 689                 return ret;
 690         }
 691         c->utdsp.restore_rgb_planes10((uint16_t *)frame.f->data[2], (uint16_t *)frame.f->data[0], (uint16_t *)frame.f->data[1],
 692                                       frame.f->linesize[2] / 2, frame.f->linesize[0] / 2, frame.f->linesize[1] / 2,
 693                                       avctx->width, avctx->height);
 694         break;
 695     case AV_PIX_FMT_YUV420P:
 696         for (i = 0; i < 3; i++) {
 697             ret = decode_plane(c, i, frame.f->data[i], frame.f->linesize[i],
 698                                avctx->width >> !!i, avctx->height >> !!i,
 699                                plane_start[i], c->frame_pred == PRED_LEFT);
 700             if (ret)
 701                 return ret;
 702             if (c->frame_pred == PRED_MEDIAN) {
 703                 if (!c->interlaced) {
 704                     restore_median_planar(c, frame.f->data[i], frame.f->linesize[i],
 705                                           avctx->width >> !!i, avctx->height >> !!i,
 706                                           c->slices, !i);
 707                 } else {
 708                     restore_median_planar_il(c, frame.f->data[i], frame.f->linesize[i],
 709                                              avctx->width  >> !!i,
 710                                              avctx->height >> !!i,
 711                                              c->slices, !i);
 712                 }
 713             } else if (c->frame_pred == PRED_GRADIENT) {
 714                 if (!c->interlaced) {
 715                     restore_gradient_planar(c, frame.f->data[i], frame.f->linesize[i],
 716                                             avctx->width >> !!i, avctx->height >> !!i,
 717                                             c->slices, !i);
 718                 } else {
 719                     restore_gradient_planar_il(c, frame.f->data[i], frame.f->linesize[i],
 720                                                avctx->width  >> !!i,
 721                                                avctx->height >> !!i,
 722                                                c->slices, !i);
 723                 }
 724             }
 725         }
 726         break;
 727     case AV_PIX_FMT_YUV422P:
 728         for (i = 0; i < 3; i++) {
 729             ret = decode_plane(c, i, frame.f->data[i], frame.f->linesize[i],
 730                                avctx->width >> !!i, avctx->height,
 731                                plane_start[i], c->frame_pred == PRED_LEFT);
 732             if (ret)
 733                 return ret;
 734             if (c->frame_pred == PRED_MEDIAN) {
 735                 if (!c->interlaced) {
 736                     restore_median_planar(c, frame.f->data[i], frame.f->linesize[i],
 737                                           avctx->width >> !!i, avctx->height,
 738                                           c->slices, 0);
 739                 } else {
 740                     restore_median_planar_il(c, frame.f->data[i], frame.f->linesize[i],
 741                                              avctx->width >> !!i, avctx->height,
 742                                              c->slices, 0);
 743                 }
 744             } else if (c->frame_pred == PRED_GRADIENT) {
 745                 if (!c->interlaced) {
 746                     restore_gradient_planar(c, frame.f->data[i], frame.f->linesize[i],
 747                                             avctx->width >> !!i, avctx->height,
 748                                             c->slices, 0);
 749                 } else {
 750                     restore_gradient_planar_il(c, frame.f->data[i], frame.f->linesize[i],
 751                                                avctx->width  >> !!i, avctx->height,
 752                                                c->slices, 0);
 753                 }
 754             }
 755         }
 756         break;
 757     case AV_PIX_FMT_YUV444P:
 758         for (i = 0; i < 3; i++) {
 759             ret = decode_plane(c, i, frame.f->data[i], frame.f->linesize[i],
 760                                avctx->width, avctx->height,
 761                                plane_start[i], c->frame_pred == PRED_LEFT);
 762             if (ret)
 763                 return ret;
 764             if (c->frame_pred == PRED_MEDIAN) {
 765                 if (!c->interlaced) {
 766                     restore_median_planar(c, frame.f->data[i], frame.f->linesize[i],
 767                                           avctx->width, avctx->height,
 768                                           c->slices, 0);
 769                 } else {
 770                     restore_median_planar_il(c, frame.f->data[i], frame.f->linesize[i],
 771                                              avctx->width, avctx->height,
 772                                              c->slices, 0);
 773                 }
 774             } else if (c->frame_pred == PRED_GRADIENT) {
 775                 if (!c->interlaced) {
 776                     restore_gradient_planar(c, frame.f->data[i], frame.f->linesize[i],
 777                                             avctx->width, avctx->height,
 778                                             c->slices, 0);
 779                 } else {
 780                     restore_gradient_planar_il(c, frame.f->data[i], frame.f->linesize[i],
 781                                                avctx->width, avctx->height,
 782                                                c->slices, 0);
 783                 }
 784             }
 785         }
 786         break;
 787     case AV_PIX_FMT_YUV422P10:
 788         for (i = 0; i < 3; i++) {
 789             ret = decode_plane10(c, i, (uint16_t *)frame.f->data[i], frame.f->linesize[i] / 2,
 790                                  avctx->width >> !!i, avctx->height,
 791                                  plane_start[i], plane_start[i + 1] - 1024, c->frame_pred == PRED_LEFT);
 792             if (ret)
 793                 return ret;
 794         }
 795         break;
 796     }
 797
 798     frame.f->key_frame = 1;
 799     frame.f->pict_type = AV_PICTURE_TYPE_I;
 800     frame.f->interlaced_frame = !!c->interlaced;
 801
 802     *got_frame = 1;
 803
 804     /* always report that the buffer was completely consumed */
 805     return buf_size;
 806 }
 807
 808 static av_cold int decode_init(AVCodecContext *avctx)
 809 {
 810     UtvideoContext * const c = avctx->priv_data;
 811
 812     c->avctx = avctx;
 813
 814     ff_utvideodsp_init(&c->utdsp);
 815     ff_bswapdsp_init(&c->bdsp);
 816     ff_llviddsp_init(&c->llviddsp);
 817
 818     if (avctx->extradata_size >= 16) {
 819         av_log(avctx, AV_LOG_DEBUG, "Encoder version %d.%d.%d.%d\n",
 820                avctx->extradata[3], avctx->extradata[2],
 821                avctx->extradata[1], avctx->extradata[0]);
 822         av_log(avctx, AV_LOG_DEBUG, "Original format %"PRIX32"\n",
 823                AV_RB32(avctx->extradata + 4));
 824         c->frame_info_size = AV_RL32(avctx->extradata + 8);
 825         c->flags           = AV_RL32(avctx->extradata + 12);
 826
 827         if (c->frame_info_size != 4)
 828             avpriv_request_sample(avctx, "Frame info not 4 bytes");
 829         av_log(avctx, AV_LOG_DEBUG, "Encoding parameters %08"PRIX32"\n", c->flags);
 830         c->slices      = (c->flags >> 24) + 1;
 831         c->compression = c->flags & 1;
 832         c->interlaced  = c->flags & 0x800;
 833     } else if (avctx->extradata_size == 8) {
 834         av_log(avctx, AV_LOG_DEBUG, "Encoder version %d.%d.%d.%d\n",
 835                avctx->extradata[3], avctx->extradata[2],
 836                avctx->extradata[1], avctx->extradata[0]);
 837         av_log(avctx, AV_LOG_DEBUG, "Original format %"PRIX32"\n",
 838                AV_RB32(avctx->extradata + 4));
 839         c->interlaced  = 0;
 840         c->pro         = 1;
 841         c->frame_info_size = 4;
 842     } else {
 843         av_log(avctx, AV_LOG_ERROR,
 844                "Insufficient extradata size %d, should be at least 16\n",
 845                avctx->extradata_size);
 846         return AVERROR_INVALIDDATA;
 847     }
 848
 849     c->slice_bits_size = 0;
 850
 851     switch (avctx->codec_tag) {
 852     case MKTAG('U', 'L', 'R', 'G'):
 853         c->planes      = 3;
 854         avctx->pix_fmt = AV_PIX_FMT_GBRP;
 855         break;
 856     case MKTAG('U', 'L', 'R', 'A'):
 857         c->planes      = 4;
 858         avctx->pix_fmt = AV_PIX_FMT_GBRAP;
 859         break;
 860     case MKTAG('U', 'L', 'Y', '0'):
 861         c->planes      = 3;
 862         avctx->pix_fmt = AV_PIX_FMT_YUV420P;
 863         avctx->colorspace = AVCOL_SPC_BT470BG;
 864         break;
 865     case MKTAG('U', 'L', 'Y', '2'):
 866         c->planes      = 3;
 867         avctx->pix_fmt = AV_PIX_FMT_YUV422P;
 868         avctx->colorspace = AVCOL_SPC_BT470BG;
 869         break;
 870     case MKTAG('U', 'L', 'Y', '4'):
 871         c->planes      = 3;
 872         avctx->pix_fmt = AV_PIX_FMT_YUV444P;
 873         avctx->colorspace = AVCOL_SPC_BT470BG;
 874         break;
 875     case MKTAG('U', 'Q', 'Y', '2'):
 876         c->planes      = 3;
 877         avctx->pix_fmt = AV_PIX_FMT_YUV422P10;
 878         break;
 879     case MKTAG('U', 'Q', 'R', 'G'):
 880         c->planes      = 3;
 881         avctx->pix_fmt = AV_PIX_FMT_GBRP10;
 882         break;
 883     case MKTAG('U', 'Q', 'R', 'A'):
 884         c->planes      = 4;
 885         avctx->pix_fmt = AV_PIX_FMT_GBRAP10;
 886         break;
 887     case MKTAG('U', 'L', 'H', '0'):
 888         c->planes      = 3;
 889         avctx->pix_fmt = AV_PIX_FMT_YUV420P;
 890         avctx->colorspace = AVCOL_SPC_BT709;
 891         break;
 892     case MKTAG('U', 'L', 'H', '2'):
 893         c->planes      = 3;
 894         avctx->pix_fmt = AV_PIX_FMT_YUV422P;
 895         avctx->colorspace = AVCOL_SPC_BT709;
 896         break;
 897     case MKTAG('U', 'L', 'H', '4'):
 898         c->planes      = 3;
 899         avctx->pix_fmt = AV_PIX_FMT_YUV444P;
 900         avctx->colorspace = AVCOL_SPC_BT709;
 901         break;
 902     default:
 903         av_log(avctx, AV_LOG_ERROR, "Unknown Ut Video FOURCC provided (%08X)\n",
 904                avctx->codec_tag);
 905         return AVERROR_INVALIDDATA;
 906     }
 907
 908     return 0;
 909 }
 910
 911 static av_cold int decode_end(AVCodecContext *avctx)
 912 {
 913     UtvideoContext * const c = avctx->priv_data;
 914
 915     av_freep(&c->slice_bits);
 916
 917     return 0;
 918 }
 919
 920 AVCodec ff_utvideo_decoder = {
 921     .name           = "utvideo",
 922     .long_name      = NULL_IF_CONFIG_SMALL("Ut Video"),
 923     .type           = AVMEDIA_TYPE_VIDEO,
 924     .id             = AV_CODEC_ID_UTVIDEO,
 925     .priv_data_size = sizeof(UtvideoContext),
 926     .init           = decode_init,
 927     .close          = decode_end,
 928     .decode         = decode_frame,
 929     .capabilities   = AV_CODEC_CAP_DR1 | AV_CODEC_CAP_FRAME_THREADS,
 930     .caps_internal  = FF_CODEC_CAP_INIT_THREADSAFE,
 931 };