1 /*
2  * Copyright (c) 2018, Alliance for Open Media. All rights reserved
3  *
4  * This source code is subject to the terms of the BSD 2 Clause License and
5  * the Alliance for Open Media Patent License 1.0. If the BSD 2 Clause License
6  * was not distributed with this source code in the LICENSE file, you can
7  * obtain it at www.aomedia.org/license/software. If the Alliance for Open
8  * Media Patent License 1.0 was not distributed with this source code in the
9  * PATENTS file, you can obtain it at www.aomedia.org/license/patent.
10  */
11 
12 // Lightfield Tile List Decoder
13 // ============================
14 //
15 // This is a lightfield tile list decoder example. It takes an input file that
16 // contains the anchor frames that are references of the coded tiles, the camera
17 // frame header, and tile list OBUs that include the tile information and the
18 // compressed tile data. This input file is reconstructed from the encoded
19 // lightfield ivf file, and is decodable by AV1 decoder. num_references is
20 // the number of anchor frames coded at the beginning of the light field file.
21 // num_tile_lists is the number of tile lists need to be decoded. There is an
22 // optional parameter allowing to choose the output format, and the supported
23 // formats are YUV1D(default), YUV, and NV12.
24 // Run lightfield tile list decoder to decode an AV1 tile list file:
25 // examples/lightfield_tile_list_decoder vase_tile_list.ivf vase_tile_list.yuv
26 // 4 2 0(optional)
27 
28 #include <stdio.h>
29 #include <stdlib.h>
30 #include <string.h>
31 #include <assert.h>
32 
33 #include "aom/aom_decoder.h"
34 #include "aom/aomdx.h"
35 #include "aom_scale/yv12config.h"
36 #include "av1/common/enums.h"
37 #include "common/tools_common.h"
38 #include "common/video_reader.h"
39 
40 static const char *exec_name;
41 
usage_exit(void)42 void usage_exit(void) {
43   fprintf(stderr,
44           "Usage: %s <infile> <outfile> <num_references> <num_tile_lists> "
45           "<output format(optional)>\n",
46           exec_name);
47   exit(EXIT_FAILURE);
48 }
49 
write_tile_yuv1d(aom_codec_ctx_t * codec,const aom_image_t * img,FILE * file)50 static void write_tile_yuv1d(aom_codec_ctx_t *codec, const aom_image_t *img,
51                              FILE *file) {
52   // read out the tile size.
53   unsigned int tile_size = 0;
54   if (AOM_CODEC_CONTROL_TYPECHECKED(codec, AV1D_GET_TILE_SIZE, &tile_size))
55     die_codec(codec, "Failed to get the tile size");
56   const unsigned int tile_width = tile_size >> 16;
57   const unsigned int tile_height = tile_size & 65535;
58   const uint32_t output_frame_width_in_tiles = img->d_w / tile_width;
59 
60   unsigned int tile_count = 0;
61   if (AOM_CODEC_CONTROL_TYPECHECKED(codec, AV1D_GET_TILE_COUNT, &tile_count))
62     die_codec(codec, "Failed to get the tile size");
63 
64   // Write tile to file.
65   const int shift = (img->fmt & AOM_IMG_FMT_HIGHBITDEPTH) ? 1 : 0;
66   unsigned int tile_idx;
67 
68   for (tile_idx = 0; tile_idx < tile_count; ++tile_idx) {
69     const int row_offset =
70         (tile_idx / output_frame_width_in_tiles) * tile_height;
71     const int col_offset =
72         (tile_idx % output_frame_width_in_tiles) * tile_width;
73     int plane;
74 
75     for (plane = 0; plane < 3; ++plane) {
76       const unsigned char *buf = img->planes[plane];
77       const int stride = img->stride[plane];
78       const int roffset =
79           (plane > 0) ? row_offset >> img->y_chroma_shift : row_offset;
80       const int coffset =
81           (plane > 0) ? col_offset >> img->x_chroma_shift : col_offset;
82       const int w = (plane > 0) ? ((tile_width >> img->x_chroma_shift) << shift)
83                                 : (tile_width << shift);
84       const int h =
85           (plane > 0) ? (tile_height >> img->y_chroma_shift) : tile_height;
86       int y;
87 
88       // col offset needs to be adjusted for HBD.
89       buf += roffset * stride + (coffset << shift);
90 
91       for (y = 0; y < h; ++y) {
92         fwrite(buf, 1, w, file);
93         buf += stride;
94       }
95     }
96   }
97 }
98 
main(int argc,char ** argv)99 int main(int argc, char **argv) {
100   FILE *outfile = NULL;
101   aom_codec_ctx_t codec;
102   AvxVideoReader *reader = NULL;
103   const AvxInterface *decoder = NULL;
104   const AvxVideoInfo *info = NULL;
105   int num_references;
106   int num_tile_lists;
107   aom_image_t reference_images[MAX_EXTERNAL_REFERENCES];
108   size_t frame_size = 0;
109   const unsigned char *frame = NULL;
110   int output_format = YUV1D;
111   int i, j, n;
112 
113   exec_name = argv[0];
114 
115   if (argc < 5) die("Invalid number of arguments.");
116 
117   reader = aom_video_reader_open(argv[1]);
118   if (!reader) die("Failed to open %s for reading.", argv[1]);
119 
120   if (!(outfile = fopen(argv[2], "wb")))
121     die("Failed to open %s for writing.", argv[2]);
122 
123   num_references = (int)strtol(argv[3], NULL, 0);
124   num_tile_lists = (int)strtol(argv[4], NULL, 0);
125 
126   if (argc > 5) output_format = (int)strtol(argv[5], NULL, 0);
127   if (output_format < YUV1D || output_format > NV12)
128     die("Output format out of range [0, 2]");
129 
130   info = aom_video_reader_get_info(reader);
131 
132   decoder = get_aom_decoder_by_fourcc(info->codec_fourcc);
133   if (!decoder) die("Unknown input codec.");
134   printf("Using %s\n", aom_codec_iface_name(decoder->codec_interface()));
135 
136   if (aom_codec_dec_init(&codec, decoder->codec_interface(), NULL, 0))
137     die_codec(&codec, "Failed to initialize decoder.");
138 
139   if (AOM_CODEC_CONTROL_TYPECHECKED(&codec, AV1D_SET_IS_ANNEXB,
140                                     info->is_annexb)) {
141     die("Failed to set annex b status");
142   }
143 
144   // Decode anchor frames.
145   AOM_CODEC_CONTROL_TYPECHECKED(&codec, AV1_SET_TILE_MODE, 0);
146   for (i = 0; i < num_references; ++i) {
147     aom_video_reader_read_frame(reader);
148     frame = aom_video_reader_get_frame(reader, &frame_size);
149     if (aom_codec_decode(&codec, frame, frame_size, NULL))
150       die_codec(&codec, "Failed to decode frame.");
151 
152     if (i == 0) {
153       aom_img_fmt_t ref_fmt = 0;
154       if (AOM_CODEC_CONTROL_TYPECHECKED(&codec, AV1D_GET_IMG_FORMAT, &ref_fmt))
155         die_codec(&codec, "Failed to get the image format");
156 
157       int frame_res[2];
158       if (AOM_CODEC_CONTROL_TYPECHECKED(&codec, AV1D_GET_FRAME_SIZE, frame_res))
159         die_codec(&codec, "Failed to get the image frame size");
160 
161       // Allocate memory to store decoded references. Allocate memory with the
162       // border so that it can be used as a reference.
163       for (j = 0; j < num_references; j++) {
164         unsigned int border = AOM_DEC_BORDER_IN_PIXELS;
165         if (!aom_img_alloc_with_border(&reference_images[j], ref_fmt,
166                                        frame_res[0], frame_res[1], 32, 8,
167                                        border)) {
168           die("Failed to allocate references.");
169         }
170       }
171     }
172 
173     if (AOM_CODEC_CONTROL_TYPECHECKED(&codec, AV1_COPY_NEW_FRAME_IMAGE,
174                                       &reference_images[i]))
175       die_codec(&codec, "Failed to copy decoded reference frame");
176 
177     aom_codec_iter_t iter = NULL;
178     aom_image_t *img = NULL;
179     while ((img = aom_codec_get_frame(&codec, &iter)) != NULL) {
180       char name[1024];
181       snprintf(name, sizeof(name), "ref_%d.yuv", i);
182       printf("writing ref image to %s, %d, %d\n", name, img->d_w, img->d_h);
183       FILE *ref_file = fopen(name, "wb");
184       aom_img_write(img, ref_file);
185       fclose(ref_file);
186     }
187   }
188 
189   // Decode the lightfield.
190   AOM_CODEC_CONTROL_TYPECHECKED(&codec, AV1_SET_TILE_MODE, 1);
191 
192   // Set external references.
193   av1_ext_ref_frame_t set_ext_ref = { &reference_images[0], num_references };
194   AOM_CODEC_CONTROL_TYPECHECKED(&codec, AV1D_SET_EXT_REF_PTR, &set_ext_ref);
195   // Must decode the camera frame header first.
196   aom_video_reader_read_frame(reader);
197   frame = aom_video_reader_get_frame(reader, &frame_size);
198   if (aom_codec_decode(&codec, frame, frame_size, NULL))
199     die_codec(&codec, "Failed to decode the frame.");
200   // Decode tile lists one by one.
201   for (n = 0; n < num_tile_lists; n++) {
202     aom_video_reader_read_frame(reader);
203     frame = aom_video_reader_get_frame(reader, &frame_size);
204 
205     if (aom_codec_decode(&codec, frame, frame_size, NULL))
206       die_codec(&codec, "Failed to decode the tile list.");
207     aom_codec_iter_t iter = NULL;
208     aom_image_t *img = aom_codec_get_frame(&codec, &iter);
209     if (!img) die_codec(&codec, "Failed to get frame.");
210 
211     if (output_format == YUV1D)
212       // write the tile to the output file in 1D format.
213       write_tile_yuv1d(&codec, img, outfile);
214     else if (output_format == YUV)
215       aom_img_write(img, outfile);
216     else
217       // NV12 output format
218       aom_img_write_nv12(img, outfile);
219   }
220 
221   for (i = 0; i < num_references; i++) aom_img_free(&reference_images[i]);
222   if (aom_codec_destroy(&codec)) die_codec(&codec, "Failed to destroy codec");
223   aom_video_reader_close(reader);
224   fclose(outfile);
225 
226   return EXIT_SUCCESS;
227 }
228