5094cf1508ed03657401dd9cd38f7137192053c8
[dcpomatic.git] / src / lib / openjpeg_encoder.cc
1 /*
2     Copyright (C) 2012-2015 Carl Hetherington <cth@carlh.net>
3     Adapted from code Copyright (C) 2010-2011 Terrence Meiczinger
4
5     This program is free software; you can redistribute it and/or modify
6     it under the terms of the GNU General Public License as published by
7     the Free Software Foundation; either version 2 of the License, or
8     (at your option) any later version.
9
10     This program is distributed in the hope that it will be useful,
11     but WITHOUT ANY WARRANTY; without even the implied warranty of
12     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13     GNU General Public License for more details.
14
15     You should have received a copy of the GNU General Public License
16     along with this program; if not, write to the Free Software
17     Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
18
19 */
20
21 #include "openjpeg_encoder.h"
22 #include "data.h"
23 #include "exceptions.h"
24 #include <dcp/openjpeg_image.h>
25
26 #include "i18n.h"
27
28 using std::string;
29 using boost::shared_ptr;
30
31 string
32 OpenJPEGEncoder::name () const
33 {
34         return _("OpenJPEG library");
35 }
36
37 Data
38 OpenJPEGEncoder::do_encode (shared_ptr<const dcp::OpenJPEGImage> input)
39 {
40         /* Set the max image and component sizes based on frame_rate */
41         int max_cs_len = ((float) _bandwidth.get()) / 8 / _frame_rate.get();
42         if (_threed.get()) {
43                 /* In 3D we have only half the normal bandwidth per eye */
44                 max_cs_len /= 2;
45         }
46         int const max_comp_size = max_cs_len / 1.25;
47
48         /* get a J2K compressor handle */
49         opj_cinfo_t* cinfo = opj_create_compress (CODEC_J2K);
50         if (cinfo == 0) {
51                 throw EncodeError (N_("could not create JPEG2000 encoder"));
52         }
53
54         /* Set encoding parameters to default values */
55         opj_cparameters_t parameters;
56         opj_set_default_encoder_parameters (&parameters);
57
58         /* Set default cinema parameters */
59         parameters.tile_size_on = false;
60         parameters.cp_tdx = 1;
61         parameters.cp_tdy = 1;
62
63         /* Tile part */
64         parameters.tp_flag = 'C';
65         parameters.tp_on = 1;
66
67         /* Tile and Image shall be at (0,0) */
68         parameters.cp_tx0 = 0;
69         parameters.cp_ty0 = 0;
70         parameters.image_offset_x0 = 0;
71         parameters.image_offset_y0 = 0;
72
73         /* Codeblock size = 32x32 */
74         parameters.cblockw_init = 32;
75         parameters.cblockh_init = 32;
76         parameters.csty |= 0x01;
77
78         /* The progression order shall be CPRL */
79         parameters.prog_order = CPRL;
80
81         /* No ROI */
82         parameters.roi_compno = -1;
83
84         parameters.subsampling_dx = 1;
85         parameters.subsampling_dy = 1;
86
87         /* 9-7 transform */
88         parameters.irreversible = 1;
89
90         parameters.tcp_rates[0] = 0;
91         parameters.tcp_numlayers++;
92         parameters.cp_disto_alloc = 1;
93         parameters.cp_rsiz = _resolution.get() == RESOLUTION_2K ? CINEMA2K : CINEMA4K;
94         if (_resolution.get() == RESOLUTION_4K) {
95                 parameters.numpocs = 2;
96                 parameters.POC[0].tile = 1;
97                 parameters.POC[0].resno0 = 0;
98                 parameters.POC[0].compno0 = 0;
99                 parameters.POC[0].layno1 = 1;
100                 parameters.POC[0].resno1 = parameters.numresolution - 1;
101                 parameters.POC[0].compno1 = 3;
102                 parameters.POC[0].prg1 = CPRL;
103                 parameters.POC[1].tile = 1;
104                 parameters.POC[1].resno0 = parameters.numresolution - 1;
105                 parameters.POC[1].compno0 = 0;
106                 parameters.POC[1].layno1 = 1;
107                 parameters.POC[1].resno1 = parameters.numresolution;
108                 parameters.POC[1].compno1 = 3;
109                 parameters.POC[1].prg1 = CPRL;
110         }
111
112         parameters.cp_comment = strdup (N_("DCP-o-matic"));
113         parameters.cp_cinema = _resolution.get() == RESOLUTION_2K ? CINEMA2K_24 : CINEMA4K_24;
114
115         /* 3 components, so use MCT */
116         parameters.tcp_mct = 1;
117
118         /* set max image */
119         parameters.max_comp_size = max_comp_size;
120         parameters.tcp_rates[0] = ((float) (3 * input->size().width * input->size().height * 12)) / (max_cs_len * 8);
121
122         /* Set event manager to null (openjpeg 1.3 bug) */
123         cinfo->event_mgr = 0;
124
125         /* Setup the encoder parameters using the current image and user parameters */
126         opj_setup_encoder (cinfo, &parameters, input->opj_image ());
127
128         opj_cio_t* cio = opj_cio_open ((opj_common_ptr) cinfo, 0, 0);
129         if (cio == 0) {
130                 opj_destroy_compress (cinfo);
131                 throw EncodeError (N_("could not open JPEG2000 stream"));
132         }
133
134         int const r = opj_encode (cinfo, cio, input->opj_image(), 0);
135         if (r == 0) {
136                 opj_cio_close (cio);
137                 opj_destroy_compress (cinfo);
138                 throw EncodeError (N_("JPEG2000 encoding failed"));
139         }
140
141         Data enc (cio->buffer, cio_tell (cio));
142
143         opj_cio_close (cio);
144         free (parameters.cp_comment);
145         opj_destroy_compress (cinfo);
146
147         return enc;
148 }
149