swaroop: basics of encrypted MP4 playback.
[dcpomatic.git] / src / tools / dcpomatic_ecinema.cc
1 /*
2     Copyright (C) 2018-2019 Carl Hetherington <cth@carlh.net>
3
4     This file is part of DCP-o-matic.
5
6     DCP-o-matic is free software; you can redistribute it and/or modify
7     it under the terms of the GNU General Public License as published by
8     the Free Software Foundation; either version 2 of the License, or
9     (at your option) any later version.
10
11     DCP-o-matic is distributed in the hope that it will be useful,
12     but WITHOUT ANY WARRANTY; without even the implied warranty of
13     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14     GNU General Public License for more details.
15
16     You should have received a copy of the GNU General Public License
17     along with DCP-o-matic.  If not, see <http://www.gnu.org/licenses/>.
18
19 */
20
21 #include "lib/version.h"
22 #include "lib/decrypted_ecinema_kdm.h"
23 #include "lib/config.h"
24 #include "lib/util.h"
25 #include <dcp/key.h>
26 extern "C" {
27 #include <libavformat/avformat.h>
28 #include <libavutil/aes_ctr.h>
29 }
30 #include <boost/filesystem.hpp>
31 #include <boost/optional.hpp>
32 #include <openssl/rand.h>
33 #include <getopt.h>
34 #include <sys/stat.h>
35 #include <sys/types.h>
36 #include <string>
37 #include <iostream>
38
39 using std::string;
40 using std::cerr;
41 using std::cout;
42 using boost::optional;
43
44 static void
45 help (string n)
46 {
47         cerr << "Syntax: " << n << " [OPTION] <FILE>\n"
48              << "  -v, --version        show DCP-o-matic version\n"
49              << "  -h, --help           show this help\n"
50              << "  -o, --output         output directory\n"
51              << "\n"
52              << "<FILE> is the unencrypted .mp4 file.\n";
53 }
54
55 int
56 main (int argc, char* argv[])
57 {
58         optional<boost::filesystem::path> output;
59
60         int option_index = 0;
61         while (true) {
62                 static struct option long_options[] = {
63                         { "version", no_argument, 0, 'v'},
64                         { "help", no_argument, 0, 'h'},
65                         { "output", required_argument, 0, 'o'},
66                 };
67
68                 int c = getopt_long (argc, argv, "vho:", long_options, &option_index);
69
70                 if (c == -1) {
71                         break;
72                 }
73
74                 switch (c) {
75                 case 'v':
76                         cout << "dcpomatic version " << dcpomatic_version << " " << dcpomatic_git_commit << "\n";
77                         exit (EXIT_SUCCESS);
78                 case 'h':
79                         help (argv[0]);
80                         exit (EXIT_SUCCESS);
81                 case 'o':
82                         output = optarg;
83                         break;
84                 }
85         }
86
87         if (optind >= argc) {
88                 help (argv[0]);
89                 exit (EXIT_FAILURE);
90         }
91
92         if (!output) {
93                 cerr << "You must specify --output-media or -o\n";
94                 exit (EXIT_FAILURE);
95         }
96
97         boost::filesystem::path input = argv[optind];
98         boost::filesystem::path output_mp4 = *output / (input.filename().string() + ".ecinema");
99
100         if (!boost::filesystem::is_directory(*output)) {
101                 boost::filesystem::create_directory (*output);
102         }
103
104         av_register_all ();
105
106         AVFormatContext* input_fc = avformat_alloc_context ();
107         if (avformat_open_input(&input_fc, input.string().c_str(), 0, 0) < 0) {
108                 cerr << "Could not open input file\n";
109                 exit (EXIT_FAILURE);
110         }
111
112         if (avformat_find_stream_info (input_fc, 0) < 0) {
113                 cerr << "Could not read stream information\n";
114                 exit (EXIT_FAILURE);
115         }
116
117         AVFormatContext* output_fc;
118         avformat_alloc_output_context2 (&output_fc, av_guess_format("mp4", 0, 0), 0, 0);
119
120         for (uint32_t i = 0; i < input_fc->nb_streams; ++i) {
121                 AVStream* is = input_fc->streams[i];
122                 AVStream* os = avformat_new_stream (output_fc, is->codec->codec);
123                 if (avcodec_copy_context (os->codec, is->codec) < 0) {
124                         cerr << "Could not set up output stream.\n";
125                         exit (EXIT_FAILURE);
126                 }
127
128                 switch (os->codec->codec_type) {
129                 case AVMEDIA_TYPE_VIDEO:
130                         os->time_base = is->time_base;
131                         os->avg_frame_rate = is->avg_frame_rate;
132                         os->r_frame_rate = is->r_frame_rate;
133                         os->sample_aspect_ratio = is->sample_aspect_ratio;
134                         os->codec->time_base = is->codec->time_base;
135                         os->codec->framerate = is->codec->framerate;
136                         os->codec->pix_fmt = is->codec->pix_fmt;
137                         break;
138                 case AVMEDIA_TYPE_AUDIO:
139                         os->codec->sample_fmt = is->codec->sample_fmt;
140                         os->codec->bits_per_raw_sample = is->codec->bits_per_raw_sample;
141                         os->codec->sample_rate = is->codec->sample_rate;
142                         os->codec->channel_layout = is->codec->channel_layout;
143                         os->codec->channels = is->codec->channels;
144                         break;
145                 default:
146                         /* XXX */
147                         break;
148                 }
149         }
150
151         if (avio_open2 (&output_fc->pb, output_mp4.string().c_str(), AVIO_FLAG_WRITE, 0, 0) < 0) {
152                 cerr << "Could not open output file `" << output_mp4.string() << "'\n";
153                 exit (EXIT_FAILURE);
154         }
155
156         dcp::Key key (AES_CTR_KEY_SIZE);
157         AVDictionary* options = 0;
158         av_dict_set (&options, "encryption_key", key.hex().c_str(), 0);
159         /* XXX: is this OK? */
160         av_dict_set (&options, "encryption_kid", "00000000000000000000000000000000", 0);
161         av_dict_set (&options, "encryption_scheme", "cenc-aes-ctr", 0);
162
163         string id = dcp::make_uuid ();
164         if (av_dict_set(&output_fc->metadata, SWAROOP_ID_TAG, id.c_str(), 0) < 0) {
165                 cerr << "Could not write ID to output.\n";
166                 exit (EXIT_FAILURE);
167         }
168
169         if (avformat_write_header (output_fc, &options) < 0) {
170                 cerr << "Could not write header to output.\n";
171                 exit (EXIT_FAILURE);
172         }
173
174         AVPacket packet;
175         while (av_read_frame(input_fc, &packet) >= 0) {
176                 AVStream* is = input_fc->streams[packet.stream_index];
177                 AVStream* os = output_fc->streams[packet.stream_index];
178                 packet.pts = av_rescale_q_rnd(packet.pts, is->time_base, os->time_base, (AVRounding) (AV_ROUND_NEAR_INF | AV_ROUND_PASS_MINMAX));
179                 packet.dts = av_rescale_q_rnd(packet.dts, is->time_base, os->time_base, (AVRounding) (AV_ROUND_NEAR_INF | AV_ROUND_PASS_MINMAX));
180                 packet.duration = av_rescale_q(packet.duration, is->time_base, os->time_base);
181                 packet.pos = -1;
182                 if (av_interleaved_write_frame (output_fc, &packet) < 0) {
183                         cerr << "Could not write frame to output.\n";
184                         exit (EXIT_FAILURE);
185                 }
186         }
187
188         av_write_trailer (output_fc);
189
190         avformat_free_context (input_fc);
191         avformat_free_context (output_fc);
192
193         DecryptedECinemaKDM decrypted_kdm (id, key);
194         EncryptedECinemaKDM encrypted_kdm = decrypted_kdm.encrypt (Config::instance()->decryption_chain()->leaf());
195         cout << encrypted_kdm.as_xml() << "\n";
196 }