Replace FFmpeg with Libav in licence headers
[ffmpeg.git] / libavutil / imgutils.c
1 /*
2  * This file is part of Libav.
3  *
4  * Libav is free software; you can redistribute it and/or
5  * modify it under the terms of the GNU Lesser General Public
6  * License as published by the Free Software Foundation; either
7  * version 2.1 of the License, or (at your option) any later version.
8  *
9  * Libav is distributed in the hope that it will be useful,
10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
12  * Lesser General Public License for more details.
13  *
14  * You should have received a copy of the GNU Lesser General Public
15  * License along with Libav; if not, write to the Free Software
16  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
17  */
18
19 /**
20  * @file
21  * misc image utilities
22  */
23
24 #include "imgutils.h"
25 #include "internal.h"
26 #include "libavutil/pixdesc.h"
27
28 void av_image_fill_max_pixsteps(int max_pixsteps[4], int max_pixstep_comps[4],
29                                 const AVPixFmtDescriptor *pixdesc)
30 {
31     int i;
32     memset(max_pixsteps, 0, 4*sizeof(max_pixsteps[0]));
33     if (max_pixstep_comps)
34         memset(max_pixstep_comps, 0, 4*sizeof(max_pixstep_comps[0]));
35
36     for (i = 0; i < 4; i++) {
37         const AVComponentDescriptor *comp = &(pixdesc->comp[i]);
38         if ((comp->step_minus1+1) > max_pixsteps[comp->plane]) {
39             max_pixsteps[comp->plane] = comp->step_minus1+1;
40             if (max_pixstep_comps)
41                 max_pixstep_comps[comp->plane] = i;
42         }
43     }
44 }
45
46 int av_image_get_linesize(enum PixelFormat pix_fmt, int width, int plane)
47 {
48     const AVPixFmtDescriptor *desc = &av_pix_fmt_descriptors[pix_fmt];
49     int max_step     [4];       /* max pixel step for each plane */
50     int max_step_comp[4];       /* the component for each plane which has the max pixel step */
51     int s;
52
53     if (desc->flags & PIX_FMT_BITSTREAM)
54         return (width * (desc->comp[0].step_minus1+1) + 7) >> 3;
55
56     av_image_fill_max_pixsteps(max_step, max_step_comp, desc);
57     s = (max_step_comp[plane] == 1 || max_step_comp[plane] == 2) ? desc->log2_chroma_w : 0;
58     return max_step[plane] * (((width + (1 << s) - 1)) >> s);
59 }
60
61 int av_image_fill_linesizes(int linesizes[4], enum PixelFormat pix_fmt, int width)
62 {
63     int i;
64     const AVPixFmtDescriptor *desc = &av_pix_fmt_descriptors[pix_fmt];
65     int max_step     [4];       /* max pixel step for each plane */
66     int max_step_comp[4];       /* the component for each plane which has the max pixel step */
67
68     memset(linesizes, 0, 4*sizeof(linesizes[0]));
69
70     if ((unsigned)pix_fmt >= PIX_FMT_NB || desc->flags & PIX_FMT_HWACCEL)
71         return AVERROR(EINVAL);
72
73     if (desc->flags & PIX_FMT_BITSTREAM) {
74         if (width > (INT_MAX -7) / (desc->comp[0].step_minus1+1))
75             return AVERROR(EINVAL);
76         linesizes[0] = (width * (desc->comp[0].step_minus1+1) + 7) >> 3;
77         return 0;
78     }
79
80     av_image_fill_max_pixsteps(max_step, max_step_comp, desc);
81     for (i = 0; i < 4; i++) {
82         int s = (max_step_comp[i] == 1 || max_step_comp[i] == 2) ? desc->log2_chroma_w : 0;
83         int shifted_w = ((width + (1 << s) - 1)) >> s;
84         if (max_step[i] > INT_MAX / shifted_w)
85             return AVERROR(EINVAL);
86         linesizes[i] = max_step[i] * shifted_w;
87     }
88
89     return 0;
90 }
91
92 int av_image_fill_pointers(uint8_t *data[4], enum PixelFormat pix_fmt, int height,
93                            uint8_t *ptr, const int linesizes[4])
94 {
95     int i, total_size, size[4], has_plane[4];
96
97     const AVPixFmtDescriptor *desc = &av_pix_fmt_descriptors[pix_fmt];
98     memset(data     , 0, sizeof(data[0])*4);
99     memset(size     , 0, sizeof(size));
100     memset(has_plane, 0, sizeof(has_plane));
101
102     if ((unsigned)pix_fmt >= PIX_FMT_NB || desc->flags & PIX_FMT_HWACCEL)
103         return AVERROR(EINVAL);
104
105     data[0] = ptr;
106     if (linesizes[0] > (INT_MAX - 1024) / height)
107         return AVERROR(EINVAL);
108     size[0] = linesizes[0] * height;
109
110     if (desc->flags & PIX_FMT_PAL) {
111         size[0] = (size[0] + 3) & ~3;
112         data[1] = ptr + size[0]; /* palette is stored here as 256 32 bits words */
113         return size[0] + 256 * 4;
114     }
115
116     for (i = 0; i < 4; i++)
117         has_plane[desc->comp[i].plane] = 1;
118
119     total_size = size[0];
120     for (i = 1; has_plane[i] && i < 4; i++) {
121         int h, s = (i == 1 || i == 2) ? desc->log2_chroma_h : 0;
122         data[i] = data[i-1] + size[i-1];
123         h = (height + (1 << s) - 1) >> s;
124         if (linesizes[i] > INT_MAX / h)
125             return AVERROR(EINVAL);
126         size[i] = h * linesizes[i];
127         if (total_size > INT_MAX - size[i])
128             return AVERROR(EINVAL);
129         total_size += size[i];
130     }
131
132     return total_size;
133 }
134
135 int ff_set_systematic_pal2(uint32_t pal[256], enum PixelFormat pix_fmt)
136 {
137     int i;
138
139     for (i = 0; i < 256; i++) {
140         int r, g, b;
141
142         switch (pix_fmt) {
143         case PIX_FMT_RGB8:
144             r = (i>>5    )*36;
145             g = ((i>>2)&7)*36;
146             b = (i&3     )*85;
147             break;
148         case PIX_FMT_BGR8:
149             b = (i>>6    )*85;
150             g = ((i>>3)&7)*36;
151             r = (i&7     )*36;
152             break;
153         case PIX_FMT_RGB4_BYTE:
154             r = (i>>3    )*255;
155             g = ((i>>1)&3)*85;
156             b = (i&1     )*255;
157             break;
158         case PIX_FMT_BGR4_BYTE:
159             b = (i>>3    )*255;
160             g = ((i>>1)&3)*85;
161             r = (i&1     )*255;
162             break;
163         case PIX_FMT_GRAY8:
164             r = b = g = i;
165             break;
166         default:
167             return AVERROR(EINVAL);
168         }
169         pal[i] = b + (g<<8) + (r<<16);
170     }
171
172     return 0;
173 }
174
175 int av_image_alloc(uint8_t *pointers[4], int linesizes[4],
176                    int w, int h, enum PixelFormat pix_fmt, int align)
177 {
178     int i, ret;
179     uint8_t *buf;
180
181     if ((ret = av_image_check_size(w, h, 0, NULL)) < 0)
182         return ret;
183     if ((ret = av_image_fill_linesizes(linesizes, pix_fmt, w)) < 0)
184         return ret;
185
186     for (i = 0; i < 4; i++)
187         linesizes[i] = FFALIGN(linesizes[i], align);
188
189     if ((ret = av_image_fill_pointers(pointers, pix_fmt, h, NULL, linesizes)) < 0)
190         return ret;
191     buf = av_malloc(ret + align);
192     if (!buf)
193         return AVERROR(ENOMEM);
194     if ((ret = av_image_fill_pointers(pointers, pix_fmt, h, buf, linesizes)) < 0) {
195         av_free(buf);
196         return ret;
197     }
198     if (av_pix_fmt_descriptors[pix_fmt].flags & PIX_FMT_PAL)
199         ff_set_systematic_pal2((uint32_t*)pointers[1], pix_fmt);
200
201     return ret;
202 }
203
204 typedef struct ImgUtils {
205     const AVClass *class;
206     int   log_offset;
207     void *log_ctx;
208 } ImgUtils;
209
210 static const AVClass imgutils_class = { "IMGUTILS", av_default_item_name, NULL, LIBAVUTIL_VERSION_INT, offsetof(ImgUtils, log_offset), offsetof(ImgUtils, log_ctx) };
211
212 int av_image_check_size(unsigned int w, unsigned int h, int log_offset, void *log_ctx)
213 {
214     ImgUtils imgutils = { &imgutils_class, log_offset, log_ctx };
215
216     if ((int)w>0 && (int)h>0 && (w+128)*(uint64_t)(h+128) < INT_MAX/8)
217         return 0;
218
219     av_log(&imgutils, AV_LOG_ERROR, "Picture size %ux%u is invalid\n", w, h);
220     return AVERROR(EINVAL);
221 }
222
223 void av_image_copy_plane(uint8_t       *dst, int dst_linesize,
224                          const uint8_t *src, int src_linesize,
225                          int bytewidth, int height)
226 {
227     if (!dst || !src)
228         return;
229     for (;height > 0; height--) {
230         memcpy(dst, src, bytewidth);
231         dst += dst_linesize;
232         src += src_linesize;
233     }
234 }
235
236 void av_image_copy(uint8_t *dst_data[4], int dst_linesizes[4],
237                    const uint8_t *src_data[4], const int src_linesizes[4],
238                    enum PixelFormat pix_fmt, int width, int height)
239 {
240     const AVPixFmtDescriptor *desc = &av_pix_fmt_descriptors[pix_fmt];
241
242     if (desc->flags & PIX_FMT_HWACCEL)
243         return;
244
245     if (desc->flags & PIX_FMT_PAL) {
246         av_image_copy_plane(dst_data[0], dst_linesizes[0],
247                             src_data[0], src_linesizes[0],
248                             width, height);
249         /* copy the palette */
250         memcpy(dst_data[1], src_data[1], 4*256);
251     } else {
252         int i, planes_nb = 0;
253
254         for (i = 0; i < desc->nb_components; i++)
255             planes_nb = FFMAX(planes_nb, desc->comp[i].plane + 1);
256
257         for (i = 0; i < planes_nb; i++) {
258             int h = height;
259             int bwidth = av_image_get_linesize(pix_fmt, width, i);
260             if (i == 1 || i == 2) {
261                 h= -((-height)>>desc->log2_chroma_h);
262             }
263             av_image_copy_plane(dst_data[i], dst_linesizes[i],
264                                 src_data[i], src_linesizes[i],
265                                 bwidth, h);
266         }
267     }
268 }
269
270 #if FF_API_OLD_IMAGE_NAMES
271 void av_fill_image_max_pixsteps(int max_pixsteps[4], int max_pixstep_comps[4],
272                                 const AVPixFmtDescriptor *pixdesc)
273 {
274     av_image_fill_max_pixsteps(max_pixsteps, max_pixstep_comps, pixdesc);
275 }
276
277 int av_get_image_linesize(enum PixelFormat pix_fmt, int width, int plane)
278 {
279     return av_image_get_linesize(pix_fmt, width, plane);
280 }
281
282 int av_fill_image_linesizes(int linesizes[4], enum PixelFormat pix_fmt, int width)
283 {
284     return av_image_fill_linesizes(linesizes, pix_fmt, width);
285 }
286
287 int av_fill_image_pointers(uint8_t *data[4], enum PixelFormat pix_fmt, int height,
288                            uint8_t *ptr, const int linesizes[4])
289 {
290     return av_image_fill_pointers(data, pix_fmt, height, ptr, linesizes);
291 }
292
293 int av_check_image_size(unsigned int w, unsigned int h, int log_offset, void *log_ctx)
294 {
295     return av_image_check_size(w, h, log_offset, log_ctx);
296 }
297 #endif