2 Copyright (C) 2012 Carl Hetherington <cth@carlh.net>
4 This program is free software; you can redistribute it and/or modify
5 it under the terms of the GNU General Public License as published by
6 the Free Software Foundation; either version 2 of the License, or
7 (at your option) any later version.
9 This program 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
12 GNU General Public License for more details.
14 You should have received a copy of the GNU General Public License
15 along with this program; if not, write to the Free Software
16 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
21 #include <boost/lexical_cast.hpp>
22 #include <boost/algorithm/string.hpp>
23 #include <libxml++/nodes/element.h>
24 #include "subtitle_asset.h"
32 using std::stringstream;
33 using boost::shared_ptr;
34 using boost::lexical_cast;
35 using boost::optional;
36 using namespace libdcp;
38 SubtitleAsset::SubtitleAsset (string directory, string xml_file)
39 : Asset (directory, xml_file)
42 read_xml (path().string());
45 SubtitleAsset::SubtitleAsset (string directory, string movie_title, string language)
47 , _movie_title (movie_title)
49 , _language (language)
56 SubtitleAsset::read_xml (string xml_file)
58 shared_ptr<cxml::File> xml (new cxml::File (xml_file, "DCSubtitle"));
60 _uuid = xml->string_child ("SubtitleID");
61 _movie_title = xml->string_child ("MovieTitle");
62 _reel_number = xml->string_child ("ReelNumber");
63 _language = xml->string_child ("Language");
65 xml->ignore_child ("LoadFont");
67 list<shared_ptr<libdcp::parse::Font> > font_nodes = type_children<libdcp::parse::Font> (xml, "Font");
68 _load_font_nodes = type_children<libdcp::parse::LoadFont> (xml, "LoadFont");
70 /* Now make Subtitle objects to represent the raw XML nodes
74 ParseState parse_state;
75 examine_font_nodes (xml, font_nodes, parse_state);
79 SubtitleAsset::examine_font_nodes (
80 shared_ptr<const cxml::Node> xml,
81 list<shared_ptr<libdcp::parse::Font> > const & font_nodes,
82 ParseState& parse_state
85 for (list<shared_ptr<libdcp::parse::Font> >::const_iterator i = font_nodes.begin(); i != font_nodes.end(); ++i) {
87 parse_state.font_nodes.push_back (*i);
88 maybe_add_subtitle ((*i)->text, parse_state);
90 for (list<shared_ptr<libdcp::parse::Subtitle> >::iterator j = (*i)->subtitle_nodes.begin(); j != (*i)->subtitle_nodes.end(); ++j) {
91 parse_state.subtitle_nodes.push_back (*j);
92 examine_text_nodes (xml, (*j)->text_nodes, parse_state);
93 examine_font_nodes (xml, (*j)->font_nodes, parse_state);
94 parse_state.subtitle_nodes.pop_back ();
97 examine_font_nodes (xml, (*i)->font_nodes, parse_state);
98 examine_text_nodes (xml, (*i)->text_nodes, parse_state);
100 parse_state.font_nodes.pop_back ();
105 SubtitleAsset::examine_text_nodes (
106 shared_ptr<const cxml::Node> xml,
107 list<shared_ptr<libdcp::parse::Text> > const & text_nodes,
108 ParseState& parse_state
111 for (list<shared_ptr<libdcp::parse::Text> >::const_iterator i = text_nodes.begin(); i != text_nodes.end(); ++i) {
112 parse_state.text_nodes.push_back (*i);
113 maybe_add_subtitle ((*i)->text, parse_state);
114 examine_font_nodes (xml, (*i)->font_nodes, parse_state);
115 parse_state.text_nodes.pop_back ();
120 SubtitleAsset::maybe_add_subtitle (string text, ParseState const & parse_state)
122 if (empty_or_white_space (text)) {
126 if (parse_state.text_nodes.empty() || parse_state.subtitle_nodes.empty ()) {
130 assert (!parse_state.text_nodes.empty ());
131 assert (!parse_state.subtitle_nodes.empty ());
133 libdcp::parse::Font effective_font (parse_state.font_nodes);
134 libdcp::parse::Text effective_text (*parse_state.text_nodes.back ());
135 libdcp::parse::Subtitle effective_subtitle (*parse_state.subtitle_nodes.back ());
137 _subtitles.push_back (
138 shared_ptr<Subtitle> (
140 font_id_to_name (effective_font.id),
141 effective_font.italic.get(),
142 effective_font.color.get(),
144 effective_subtitle.in,
145 effective_subtitle.out,
146 effective_text.v_position,
147 effective_text.v_align,
149 effective_font.effect ? effective_font.effect.get() : NONE,
150 effective_font.effect_color.get(),
151 effective_subtitle.fade_up_time,
152 effective_subtitle.fade_down_time
158 list<shared_ptr<Subtitle> >
159 SubtitleAsset::subtitles_at (Time t) const
161 list<shared_ptr<Subtitle> > s;
162 for (list<shared_ptr<Subtitle> >::const_iterator i = _subtitles.begin(); i != _subtitles.end(); ++i) {
163 if ((*i)->in() <= t && t <= (*i)->out ()) {
172 SubtitleAsset::font_id_to_name (string id) const
174 list<shared_ptr<libdcp::parse::LoadFont> >::const_iterator i = _load_font_nodes.begin();
175 while (i != _load_font_nodes.end() && (*i)->id != id) {
179 if (i == _load_font_nodes.end ()) {
183 if ((*i)->uri == "arial.ttf") {
211 , _v_position (v_position)
215 , _effect_color (effect_color)
216 , _fade_up_time (fade_up_time)
217 , _fade_down_time (fade_down_time)
223 Subtitle::size_in_pixels (int screen_height) const
225 /* Size in the subtitle file is given in points as if the screen
226 height is 11 inches, so a 72pt font would be 1/11th of the screen
230 return _size * screen_height / (11 * 72);
234 libdcp::operator== (Subtitle const & a, Subtitle const & b)
237 a.font() == b.font() &&
238 a.italic() == b.italic() &&
239 a.color() == b.color() &&
240 a.size() == b.size() &&
242 a.out() == b.out() &&
243 a.v_position() == b.v_position() &&
244 a.v_align() == b.v_align() &&
245 a.text() == b.text() &&
246 a.effect() == b.effect() &&
247 a.effect_color() == b.effect_color() &&
248 a.fade_up_time() == b.fade_up_time() &&
249 a.fade_down_time() == b.fade_down_time()
254 libdcp::operator<< (ostream& s, Subtitle const & sub)
256 s << "\n`" << sub.text() << "' from " << sub.in() << " to " << sub.out() << ";\n"
257 << "fade up " << sub.fade_up_time() << ", fade down " << sub.fade_down_time() << ";\n"
258 << "font " << sub.font() << ", ";
266 s << ", size " << sub.size() << ", color " << sub.color() << ", vpos " << sub.v_position() << ", valign " << ((int) sub.v_align()) << ";\n"
267 << "effect " << ((int) sub.effect()) << ", effect color " << sub.effect_color();
273 SubtitleAsset::add (shared_ptr<Subtitle> s)
275 _subtitles.push_back (s);
280 SubtitleAsset::write_to_cpl (xmlpp::Node* node) const
282 /* XXX: should EditRate, Duration and IntrinsicDuration be in here? */
284 xmlpp::Node* ms = node->add_child ("MainSubtitle");
285 ms->add_child("Id")->add_child_text("urn:uuid:" + _uuid);
286 ms->add_child("AnnotationText")->add_child_text (_file_name);
288 ms->add_child("EntryPoint")->add_child_text ("0");
291 struct SubtitleSorter {
292 bool operator() (shared_ptr<Subtitle> a, shared_ptr<Subtitle> b) {
293 if (a->in() != b->in()) {
294 return a->in() < b->in();
296 return a->v_position() < b->v_position();
301 SubtitleAsset::write_xml () const
303 ofstream s (path().string().c_str());
308 SubtitleAsset::write_xml (ostream& s) const
311 xmlpp::Element* root = doc.create_root_node ("DCSubtitle");
312 root->set_attribute ("Version", "1.0");
314 root->add_child("SubtitleID")->add_child_text (_uuid);
315 root->add_child("MovieTitle")->add_child_text (_movie_title);
316 root->add_child("ReelNumber")->add_child_text (lexical_cast<string> (_reel_number));
317 root->add_child("Language")->add_child_text (_language);
319 if (_load_font_nodes.size() > 1) {
320 boost::throw_exception (MiscError ("multiple LoadFont nodes not supported"));
323 if (!_load_font_nodes.empty ()) {
324 xmlpp::Element* load_font = root->add_child("LoadFont");
325 load_font->set_attribute("Id", _load_font_nodes.front()->id);
326 load_font->set_attribute("URI", _load_font_nodes.front()->uri);
329 list<shared_ptr<Subtitle> > sorted = _subtitles;
331 sorted.sort (SubtitleSorter ());
334 /* XXX: multiple fonts not supported */
335 /* XXX: script, underlined, weight not supported */
340 Effect effect = NONE;
345 Time last_fade_up_time;
346 Time last_fade_down_time;
348 xmlpp::Element* font = 0;
349 xmlpp::Element* subtitle = 0;
351 for (list<shared_ptr<Subtitle> >::iterator i = sorted.begin(); i != sorted.end(); ++i) {
353 /* We will start a new <Font>...</Font> whenever some font property changes.
354 I suppose we should really make an optimal hierarchy of <Font> tags, but
358 bool const font_changed =
359 italic != (*i)->italic() ||
360 color != (*i)->color() ||
361 size != (*i)->size() ||
362 effect != (*i)->effect() ||
363 effect_color != (*i)->effect_color();
366 italic = (*i)->italic ();
367 color = (*i)->color ();
368 size = (*i)->size ();
369 effect = (*i)->effect ();
370 effect_color = (*i)->effect_color ();
373 if (!font || font_changed) {
374 font = root->add_child ("Font");
375 string id = "theFontId";
376 if (!_load_font_nodes.empty()) {
377 id = _load_font_nodes.front()->id;
379 font->set_attribute ("Id", id);
380 font->set_attribute ("Italic", italic ? "yes" : "no");
381 font->set_attribute ("Color", color.to_argb_string());
382 font->set_attribute ("Size", lexical_cast<string> (size));
383 font->set_attribute ("Effect", effect_to_string (effect));
384 font->set_attribute ("EffectColor", effect_color.to_argb_string());
385 font->set_attribute ("Script", "normal");
386 font->set_attribute ("Underlined", "no");
387 font->set_attribute ("Weight", "normal");
390 if (!subtitle || font_changed ||
391 (last_in != (*i)->in() ||
392 last_out != (*i)->out() ||
393 last_fade_up_time != (*i)->fade_up_time() ||
394 last_fade_down_time != (*i)->fade_down_time()
397 subtitle = font->add_child ("Subtitle");
398 subtitle->set_attribute ("SpotNumber", lexical_cast<string> (spot_number++));
399 subtitle->set_attribute ("TimeIn", (*i)->in().to_string());
400 subtitle->set_attribute ("TimeOut", (*i)->out().to_string());
401 subtitle->set_attribute ("FadeUpTime", lexical_cast<string> ((*i)->fade_up_time().to_ticks()));
402 subtitle->set_attribute ("FadeDownTime", lexical_cast<string> ((*i)->fade_down_time().to_ticks()));
404 last_in = (*i)->in ();
405 last_out = (*i)->out ();
406 last_fade_up_time = (*i)->fade_up_time ();
407 last_fade_down_time = (*i)->fade_down_time ();
410 xmlpp::Element* text = subtitle->add_child ("Text");
411 text->set_attribute ("VAlign", valign_to_string ((*i)->v_align()));
412 text->set_attribute ("VPosition", lexical_cast<string> ((*i)->v_position()));
413 text->add_child_text ((*i)->text());
416 doc.write_to_stream_formatted (s, "UTF-8");