]> git.sesse.net Git - casparcg/blob - protocol/amcp/AMCPCommandsImpl.cpp
#269
[casparcg] / protocol / amcp / AMCPCommandsImpl.cpp
1 /*\r
2 * Copyright 2013 Sveriges Television AB http://casparcg.com/\r
3 *\r
4 * This file is part of CasparCG (www.casparcg.com).\r
5 *\r
6 * CasparCG is free software: you can redistribute it and/or modify\r
7 * it under the terms of the GNU General Public License as published by\r
8 * the Free Software Foundation, either version 3 of the License, or\r
9 * (at your option) any later version.\r
10 *\r
11 * CasparCG is distributed in the hope that it will be useful,\r
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of\r
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the\r
14 * GNU General Public License for more details.\r
15 *\r
16 * You should have received a copy of the GNU General Public License\r
17 * along with CasparCG. If not, see <http://www.gnu.org/licenses/>.\r
18 *\r
19 * Author: Nicklas P Andersson\r
20 */\r
21 \r
22 #include "../StdAfx.h"\r
23 \r
24 #if defined(_MSC_VER)\r
25 #pragma warning (push, 1) // TODO: Legacy code, just disable warnings\r
26 #endif\r
27 \r
28 #include "AMCPCommandsImpl.h"\r
29 #include "AMCPProtocolStrategy.h"\r
30 \r
31 #include <common/env.h>\r
32 \r
33 #include <common/log/log.h>\r
34 #include <common/diagnostics/graph.h>\r
35 #include <common/os/windows/current_version.h>\r
36 #include <common/os/windows/system_info.h>\r
37 #include <common/utility/string.h>\r
38 #include <common/utility/utf8conv.h>\r
39 #include <common/utility/base64.h>\r
40 \r
41 #include <core/producer/frame_producer.h>\r
42 #include <core/video_format.h>\r
43 #include <core/producer/transition/transition_producer.h>\r
44 #include <core/producer/channel/channel_producer.h>\r
45 #include <core/producer/layer/layer_producer.h>\r
46 #include <core/producer/frame/frame_transform.h>\r
47 #include <core/producer/stage.h>\r
48 #include <core/producer/layer.h>\r
49 #include <core/producer/media_info/media_info.h>\r
50 #include <core/producer/media_info/media_info_repository.h>\r
51 #include <core/mixer/mixer.h>\r
52 #include <core/mixer/gpu/ogl_device.h>\r
53 #include <core/consumer/output.h>\r
54 \r
55 #include <modules/bluefish/bluefish.h>\r
56 #include <modules/decklink/decklink.h>\r
57 #include <modules/ffmpeg/ffmpeg.h>\r
58 #include <modules/flash/flash.h>\r
59 #include <modules/html/producer/html_producer.h>\r
60 #include <modules/flash/util/swf.h>\r
61 #include <modules/flash/producer/flash_producer.h>\r
62 #include <modules/flash/producer/cg_producer.h>\r
63 #include <modules/ffmpeg/producer/util/util.h>\r
64 #include <modules/image/image.h>\r
65 #include <modules/ogl/ogl.h>\r
66 \r
67 #include <algorithm>\r
68 #include <locale>\r
69 #include <fstream>\r
70 #include <memory>\r
71 #include <cctype>\r
72 #include <io.h>\r
73 \r
74 #include <boost/date_time/posix_time/posix_time.hpp>\r
75 #include <boost/lexical_cast.hpp>\r
76 #include <boost/algorithm/string.hpp>\r
77 #include <boost/filesystem.hpp>\r
78 #include <boost/filesystem/fstream.hpp>\r
79 #include <boost/regex.hpp>\r
80 #include <boost/property_tree/xml_parser.hpp>\r
81 #include <boost/locale.hpp>\r
82 #include <boost/range/adaptor/transformed.hpp>\r
83 #include <boost/range/algorithm/copy.hpp>\r
84 #include <boost/archive/iterators/base64_from_binary.hpp>\r
85 #include <boost/archive/iterators/insert_linebreaks.hpp>\r
86 #include <boost/archive/iterators/transform_width.hpp>\r
87 #include <boost/format.hpp>\r
88 \r
89 #include <tbb/concurrent_unordered_map.h>\r
90 \r
91 /* Return codes\r
92 \r
93 100 [action]                    Information om att något har hänt  \r
94 101 [action]                    Information om att något har hänt, en rad data skickas  \r
95 \r
96 202 [kommando] OK               Kommandot har utförts  \r
97 201 [kommando] OK               Kommandot har utförts, och en rad data skickas tillbaka  \r
98 200 [kommando] OK               Kommandot har utförts, och flera rader data skickas tillbaka. Avslutas med tomrad  \r
99 \r
100 400 ERROR                               Kommandot kunde inte förstås  \r
101 401 [kommando] ERROR    Ogiltig kanal  \r
102 402 [kommando] ERROR    Parameter saknas  \r
103 403 [kommando] ERROR    Ogiltig parameter  \r
104 404 [kommando] ERROR    Mediafilen hittades inte  \r
105 \r
106 500 FAILED                              Internt configurationfel  \r
107 501 [kommando] FAILED   Internt configurationfel  \r
108 502 [kommando] FAILED   Oläslig mediafil  \r
109 \r
110 600 [kommando] FAILED   funktion ej implementerad\r
111 */\r
112 \r
113 namespace caspar { namespace protocol {\r
114 \r
115 using namespace core;\r
116 \r
117 std::wstring read_file_base64(const boost::filesystem::wpath& file)\r
118 {\r
119         using namespace boost::archive::iterators;\r
120 \r
121         boost::filesystem::ifstream filestream(file, std::ios::binary);\r
122 \r
123         if (!filestream)\r
124                 return L"";\r
125 \r
126         auto length = boost::filesystem::file_size(file);\r
127         std::vector<char> bytes;\r
128         bytes.resize(length);\r
129         filestream.read(bytes.data(), length);\r
130 \r
131         return widen(to_base64(bytes.data(), length));\r
132 }\r
133 \r
134 std::wstring read_utf8_file(const boost::filesystem::wpath& file)\r
135 {\r
136         std::wstringstream result;\r
137         boost::filesystem::wifstream filestream(file);\r
138 \r
139         if (filestream) \r
140         {\r
141                 // Consume BOM first\r
142                 filestream.get();\r
143                 // read all data\r
144                 result << filestream.rdbuf();\r
145         }\r
146 \r
147         return result.str();\r
148 }\r
149 \r
150 std::wstring read_latin1_file(const boost::filesystem::wpath& file)\r
151 {\r
152         boost::locale::generator gen;\r
153         gen.locale_cache_enabled(true);\r
154         gen.categories(boost::locale::codepage_facet);\r
155 \r
156         std::stringstream result_stream;\r
157         boost::filesystem::ifstream filestream(file);\r
158         filestream.imbue(gen("en_US.ISO8859-1"));\r
159 \r
160         if (filestream)\r
161         {\r
162                 // read all data\r
163                 result_stream << filestream.rdbuf();\r
164         }\r
165 \r
166         std::string result = result_stream.str();\r
167         std::wstring widened_result;\r
168 \r
169         // The first 255 codepoints in unicode is the same as in latin1\r
170         auto from_signed_to_signed = std::function<unsigned char(char)>(\r
171                 [] (char c) { return static_cast<unsigned char>(c); }\r
172         );\r
173         boost::copy(\r
174                 result | boost::adaptors::transformed(from_signed_to_signed),\r
175                 std::back_inserter(widened_result));\r
176 \r
177         return widened_result;\r
178 }\r
179 \r
180 std::wstring read_file(const boost::filesystem::wpath& file)\r
181 {\r
182         static const uint8_t BOM[] = {0xef, 0xbb, 0xbf};\r
183 \r
184         if (!boost::filesystem::exists(file))\r
185         {\r
186                 return L"";\r
187         }\r
188 \r
189         if (boost::filesystem::file_size(file) >= 3)\r
190         {\r
191                 boost::filesystem::ifstream bom_stream(file);\r
192 \r
193                 char header[3];\r
194                 bom_stream.read(header, 3);\r
195                 bom_stream.close();\r
196 \r
197                 if (std::memcmp(BOM, header, 3) == 0)\r
198                         return read_utf8_file(file);\r
199         }\r
200 \r
201         return read_latin1_file(file);\r
202 }\r
203 \r
204 std::wstring MediaInfo(const boost::filesystem::wpath& path, const std::shared_ptr<core::media_info_repository>& media_info_repo)\r
205 {\r
206         if(boost::filesystem::is_regular_file(path))\r
207         {\r
208                 std::wstring clipttype = TEXT(" N/A ");\r
209                 std::wstring extension = boost::to_upper_copy(path.extension());\r
210                 if(extension == TEXT(".TGA") || extension == TEXT(".COL") || extension == L".PNG" || extension == L".JPEG" || extension == L".JPG" ||\r
211                         extension == L".GIF" || extension == L".BMP")\r
212                 {\r
213                         clipttype = TEXT(" STILL ");                    \r
214                 }\r
215                 else if(extension == TEXT(".WAV") || extension == TEXT(".MP3"))\r
216                 {\r
217                         clipttype = TEXT(" AUDIO ");\r
218                 }\r
219                 else if(extension == TEXT(".SWF") || extension == TEXT(".CT") ||\r
220                                 extension == TEXT(".DV") || extension == TEXT(".MOV") || \r
221                                 extension == TEXT(".MPG") || extension == TEXT(".AVI") || \r
222                                 extension == TEXT(".MP4") || extension == TEXT(".FLV") || \r
223                                 caspar::ffmpeg::is_valid_file(path.file_string()))\r
224                 {\r
225                         clipttype = TEXT(" MOVIE ");\r
226                 }\r
227 \r
228                 if(clipttype != TEXT(" N/A "))\r
229                 {               \r
230                         auto is_not_digit = [](char c){ return std::isdigit(c) == 0; };\r
231 \r
232                         auto relativePath = boost::filesystem::wpath(path.file_string().substr(env::media_folder().size()-1, path.file_string().size()));\r
233 \r
234                         auto writeTimeStr = boost::posix_time::to_iso_string(boost::posix_time::from_time_t(boost::filesystem::last_write_time(path)));\r
235                         writeTimeStr.erase(std::remove_if(writeTimeStr.begin(), writeTimeStr.end(), is_not_digit), writeTimeStr.end());\r
236                         auto writeTimeWStr = std::wstring(writeTimeStr.begin(), writeTimeStr.end());\r
237 \r
238                         auto sizeStr = boost::lexical_cast<std::wstring>(boost::filesystem::file_size(path));\r
239                         sizeStr.erase(std::remove_if(sizeStr.begin(), sizeStr.end(), is_not_digit), sizeStr.end());\r
240                         auto sizeWStr = std::wstring(sizeStr.begin(), sizeStr.end());\r
241                                 \r
242                         auto str = relativePath.replace_extension(TEXT("")).external_file_string();\r
243                         if(str[0] == '\\' || str[0] == '/')\r
244                                 str = std::wstring(str.begin() + 1, str.end());\r
245                         auto media_info = media_info_repo->get(path.file_string());\r
246                         \r
247                         return std::wstring() \r
248                                         + L"\""         + str +\r
249                                         + L"\" "        + clipttype +\r
250                                         + L" "          + sizeStr +\r
251                                         + L" "          + writeTimeWStr +\r
252                                         + L" "          + boost::lexical_cast<std::wstring>(media_info.duration) +\r
253                                         + L" "          + boost::lexical_cast<std::wstring>(media_info.time_base.numerator()) + L"/" + boost::lexical_cast<std::wstring>(media_info.time_base.denominator())\r
254                                         + L"\r\n";      \r
255                 }       \r
256         }\r
257         return L"";\r
258 }\r
259 \r
260 std::wstring ListMedia(const std::shared_ptr<core::media_info_repository>& media_info_repo)\r
261 {               \r
262         std::wstringstream replyString;\r
263         for (boost::filesystem::wrecursive_directory_iterator itr(env::media_folder()), end; itr != end; ++itr) \r
264                 replyString << MediaInfo(itr->path(), media_info_repo);\r
265         \r
266         return boost::to_upper_copy(replyString.str());\r
267 }\r
268 \r
269 std::wstring ListTemplates() \r
270 {\r
271         std::wstringstream replyString;\r
272 \r
273         for (boost::filesystem::wrecursive_directory_iterator itr(env::template_folder()), end; itr != end; ++itr)\r
274         {               \r
275                 if(boost::filesystem::is_regular_file(itr->path()) && (itr->path().extension() == L".ft" || itr->path().extension() == L".ct" || itr->path().extension() == L".html"))\r
276                 {\r
277                         auto relativePath = boost::filesystem::wpath(itr->path().file_string().substr(env::template_folder().size()-1, itr->path().file_string().size()));\r
278 \r
279                         auto writeTimeStr = boost::posix_time::to_iso_string(boost::posix_time::from_time_t(boost::filesystem::last_write_time(itr->path())));\r
280                         writeTimeStr.erase(std::remove_if(writeTimeStr.begin(), writeTimeStr.end(), [](char c){ return std::isdigit(c) == 0;}), writeTimeStr.end());\r
281                         auto writeTimeWStr = std::wstring(writeTimeStr.begin(), writeTimeStr.end());\r
282 \r
283                         auto sizeStr = boost::lexical_cast<std::string>(boost::filesystem::file_size(itr->path()));\r
284                         sizeStr.erase(std::remove_if(sizeStr.begin(), sizeStr.end(), [](char c){ return std::isdigit(c) == 0;}), sizeStr.end());\r
285 \r
286                         auto sizeWStr = std::wstring(sizeStr.begin(), sizeStr.end());\r
287 \r
288                         std::wstring dir = relativePath.parent_path().external_directory_string();\r
289                         std::wstring file = boost::to_upper_copy(relativePath.filename());\r
290                         relativePath = boost::filesystem::wpath(dir + L"/" + file);\r
291                                                 \r
292                         auto str = relativePath.replace_extension(TEXT("")).external_file_string();\r
293                         boost::trim_if(str, boost::is_any_of("\\/"));\r
294 \r
295                         replyString << TEXT("\"") << str\r
296                                                 << TEXT("\" ") << sizeWStr\r
297                                                 << TEXT(" ") << writeTimeWStr\r
298                                                 << TEXT("\r\n");                \r
299                 }\r
300         }\r
301         return replyString.str();\r
302 }\r
303 \r
304 namespace amcp {\r
305         \r
306 AMCPCommand::AMCPCommand() : channelIndex_(0), scheduling_(Default), layerIndex_(-1)\r
307 {}\r
308 \r
309 void AMCPCommand::SendReply()\r
310 {\r
311         if(!pClientInfo_) \r
312                 return;\r
313 \r
314         if(replyString_.empty())\r
315                 return;\r
316         pClientInfo_->Send(replyString_);\r
317 }\r
318 \r
319 void AMCPCommand::Clear() \r
320 {\r
321         pChannel_->stage()->clear();\r
322         pClientInfo_.reset();\r
323         channelIndex_ = 0;\r
324         _parameters.clear();\r
325 }\r
326 \r
327 bool DiagnosticsCommand::DoExecute()\r
328 {       \r
329         try\r
330         {\r
331                 diagnostics::show_graphs(true);\r
332 \r
333                 SetReplyString(TEXT("202 DIAG OK\r\n"));\r
334 \r
335                 return true;\r
336         }\r
337         catch(...)\r
338         {\r
339                 CASPAR_LOG_CURRENT_EXCEPTION();\r
340                 SetReplyString(TEXT("502 DIAG FAILED\r\n"));\r
341                 return false;\r
342         }\r
343 }\r
344 \r
345 bool ChannelGridCommand::DoExecute()\r
346 {\r
347         int index = 1;\r
348         auto self = GetChannels().back();\r
349         \r
350         core::parameters params;\r
351         params.push_back(L"SCREEN");\r
352         params.push_back(L"NAME");\r
353         params.push_back(L"Channel Grid Window");\r
354         auto screen = create_consumer(params);\r
355 \r
356         self->output()->add(screen);\r
357 \r
358         BOOST_FOREACH(auto channel, GetChannels())\r
359         {\r
360                 if(channel != self)\r
361                 {\r
362                         auto producer = create_channel_producer(self->mixer(), channel);                \r
363                         self->stage()->load(index, producer, false);\r
364                         self->stage()->play(index);\r
365                         index++;\r
366                 }\r
367         }\r
368 \r
369         int n = GetChannels().size()-1;\r
370         double delta = 1.0/static_cast<double>(n);\r
371         for(int x = 0; x < n; ++x)\r
372         {\r
373                 for(int y = 0; y < n; ++y)\r
374                 {\r
375                         int index = x+y*n+1;\r
376                         auto transform = [=](frame_transform transform) -> frame_transform\r
377                         {               \r
378                                 transform.fill_translation[0]   = x*delta;\r
379                                 transform.fill_translation[1]   = y*delta;\r
380                                 transform.fill_scale[0]                 = delta;\r
381                                 transform.fill_scale[1]                 = delta;\r
382                                 transform.clip_translation[0]   = x*delta;\r
383                                 transform.clip_translation[1]   = y*delta;\r
384                                 transform.clip_scale[0]                 = delta;\r
385                                 transform.clip_scale[1]                 = delta;                        \r
386                                 return transform;\r
387                         };\r
388                         self->stage()->apply_transform(index, transform);\r
389                 }\r
390         }\r
391 \r
392         return true;\r
393 }\r
394 \r
395 bool CallCommand::DoExecute()\r
396 {       \r
397         //Perform loading of the clip\r
398         try\r
399         {\r
400                 auto what = _parameters.at(0);\r
401                                 \r
402                 boost::unique_future<std::wstring> result;\r
403                 auto& params_orig = _parameters.get_original();\r
404                 if(what == L"B" || what == L"F")\r
405                 {\r
406                         std::wstring param;\r
407                         for(auto it = std::begin(params_orig)+1; it != std::end(params_orig); ++it, param += L" ")\r
408                                 param += *it;\r
409                         result = GetChannel()->stage()->call(GetLayerIndex(), what == L"F", boost::trim_copy(param));\r
410                 }\r
411                 else\r
412                 {\r
413                         std::wstring param;\r
414                         for(auto it = std::begin(params_orig); it != std::end(params_orig); ++it, param += L" ")\r
415                                 param += *it;\r
416                         result = GetChannel()->stage()->call(GetLayerIndex(), true, boost::trim_copy(param));\r
417                 }\r
418 \r
419                 if(!result.timed_wait(boost::posix_time::seconds(2)))\r
420                         BOOST_THROW_EXCEPTION(timed_out());\r
421                                 \r
422                 std::wstringstream replyString;\r
423                 if(result.get().empty())\r
424                         replyString << TEXT("202 CALL OK\r\n");\r
425                 else\r
426                         replyString << TEXT("201 CALL OK\r\n") << result.get() << L"\r\n";\r
427                 \r
428                 SetReplyString(replyString.str());\r
429 \r
430                 return true;\r
431         }\r
432         catch(...)\r
433         {\r
434                 CASPAR_LOG_CURRENT_EXCEPTION();\r
435                 SetReplyString(TEXT("502 CALL FAILED\r\n"));\r
436                 return false;\r
437         }\r
438 }\r
439 \r
440 // UGLY HACK\r
441 tbb::concurrent_unordered_map<int, std::vector<stage::transform_tuple_t>> deferred_transforms;\r
442 \r
443 core::frame_transform MixerCommand::get_current_transform()\r
444 {\r
445         return GetChannel()->stage()->get_current_transform(GetLayerIndex());\r
446 }\r
447 \r
448 bool MixerCommand::DoExecute()\r
449 {\r
450         using boost::lexical_cast;\r
451         //Perform loading of the clip\r
452         try\r
453         {       \r
454                 bool defer = _parameters.back() == L"DEFER";\r
455                 if(defer)\r
456                         _parameters.pop_back();\r
457 \r
458                 std::vector<stage::transform_tuple_t> transforms;\r
459 \r
460                 if(_parameters[0] == L"KEYER" || _parameters[0] == L"IS_KEY")\r
461                 {\r
462                         if (_parameters.size() == 1)\r
463                                 return reply_value([](const frame_transform& t) { return t.is_key ? 1 : 0; });\r
464 \r
465                         bool value = boost::lexical_cast<int>(_parameters.at(1));\r
466                         transforms.push_back(stage::transform_tuple_t(GetLayerIndex(), [=](frame_transform transform) -> frame_transform\r
467                         {\r
468                                 transform.is_key = value;\r
469                                 return transform;                                       \r
470                         }, 0, L"linear"));\r
471                 }\r
472                 else if(_parameters[0] == L"OPACITY")\r
473                 {\r
474                         if (_parameters.size() == 1)\r
475                                 return reply_value([](const frame_transform& t) { return t.opacity; });\r
476 \r
477                         int duration = _parameters.size() > 2 ? boost::lexical_cast<int>(_parameters[2]) : 0;\r
478                         std::wstring tween = _parameters.size() > 3 ? _parameters[3] : L"linear";\r
479 \r
480                         double value = boost::lexical_cast<double>(_parameters.at(1));\r
481                         \r
482                         transforms.push_back(stage::transform_tuple_t(GetLayerIndex(), [=](frame_transform transform) -> frame_transform\r
483                         {\r
484                                 transform.opacity = value;\r
485                                 return transform;                                       \r
486                         }, duration, tween));\r
487                 }\r
488                 else if(_parameters[0] == L"FILL" || _parameters[0] == L"FILL_RECT")\r
489                 {\r
490                         if (_parameters.size() == 1)\r
491                         {\r
492                                 auto transform = get_current_transform();\r
493                                 auto translation = transform.fill_translation;\r
494                                 auto scale = transform.fill_scale;\r
495                                 SetReplyString(\r
496                                                 L"201 MIXER OK\r\n" \r
497                                                 + lexical_cast<std::wstring>(translation[0]) + L" "\r
498                                                 + lexical_cast<std::wstring>(translation[1]) + L" "\r
499                                                 + lexical_cast<std::wstring>(scale[0]) + L" "\r
500                                                 + lexical_cast<std::wstring>(scale[1]) + L"\r\n");\r
501                                 return true;\r
502                         }\r
503 \r
504                         int duration = _parameters.size() > 5 ? boost::lexical_cast<int>(_parameters[5]) : 0;\r
505                         std::wstring tween = _parameters.size() > 6 ? _parameters[6] : L"linear";\r
506                         double x        = boost::lexical_cast<double>(_parameters.at(1));\r
507                         double y        = boost::lexical_cast<double>(_parameters.at(2));\r
508                         double x_s      = boost::lexical_cast<double>(_parameters.at(3));\r
509                         double y_s      = boost::lexical_cast<double>(_parameters.at(4));\r
510 \r
511                         transforms.push_back(stage::transform_tuple_t(GetLayerIndex(), [=](frame_transform transform) mutable -> frame_transform\r
512                         {\r
513                                 transform.fill_translation[0]   = x;\r
514                                 transform.fill_translation[1]   = y;\r
515                                 transform.fill_scale[0]                 = x_s;\r
516                                 transform.fill_scale[1]                 = y_s;\r
517                                 return transform;\r
518                         }, duration, tween));\r
519                 }\r
520                 else if(_parameters[0] == L"CLIP" || _parameters[0] == L"CLIP_RECT")\r
521                 {\r
522                         if (_parameters.size() == 1)\r
523                         {\r
524                                 auto transform = get_current_transform();\r
525                                 auto translation = transform.clip_translation;\r
526                                 auto scale = transform.clip_scale;\r
527                                 SetReplyString(\r
528                                                 L"201 MIXER OK\r\n" \r
529                                                 + lexical_cast<std::wstring>(translation[0]) + L" "\r
530                                                 + lexical_cast<std::wstring>(translation[1]) + L" "\r
531                                                 + lexical_cast<std::wstring>(scale[0]) + L" "\r
532                                                 + lexical_cast<std::wstring>(scale[1]) + L"\r\n");\r
533                                 return true;\r
534                         }\r
535 \r
536                         int duration = _parameters.size() > 5 ? boost::lexical_cast<int>(_parameters[5]) : 0;\r
537                         std::wstring tween = _parameters.size() > 6 ? _parameters[6] : L"linear";\r
538                         double x        = boost::lexical_cast<double>(_parameters.at(1));\r
539                         double y        = boost::lexical_cast<double>(_parameters.at(2));\r
540                         double x_s      = boost::lexical_cast<double>(_parameters.at(3));\r
541                         double y_s      = boost::lexical_cast<double>(_parameters.at(4));\r
542                         if(x_s < 0 || y_s < 0)\r
543                         {\r
544                                 SetReplyString(L"403 MIXER ERROR\r\n");\r
545                                 return false;\r
546                         }\r
547 \r
548                         transforms.push_back(stage::transform_tuple_t(GetLayerIndex(), [=](frame_transform transform) -> frame_transform\r
549                         {\r
550                                 transform.clip_translation[0]   = x;\r
551                                 transform.clip_translation[1]   = y;\r
552                                 transform.clip_scale[0]                 = x_s;\r
553                                 transform.clip_scale[1]                 = y_s;\r
554                                 return transform;\r
555                         }, duration, tween));\r
556                 }\r
557                 else if(_parameters[0] == L"GRID")\r
558                 {\r
559                         int duration = _parameters.size() > 2 ? boost::lexical_cast<int>(_parameters[2]) : 0;\r
560                         std::wstring tween = _parameters.size() > 3 ? _parameters[3] : L"linear";\r
561                         int n = boost::lexical_cast<int>(_parameters.at(1));\r
562                         double delta = 1.0/static_cast<double>(n);\r
563                         for(int x = 0; x < n; ++x)\r
564                         {\r
565                                 for(int y = 0; y < n; ++y)\r
566                                 {\r
567                                         int index = x+y*n+1;\r
568                                         transforms.push_back(stage::transform_tuple_t(index, [=](frame_transform transform) -> frame_transform\r
569                                         {               \r
570                                                 transform.fill_translation[0]   = x*delta;\r
571                                                 transform.fill_translation[1]   = y*delta;\r
572                                                 transform.fill_scale[0]                 = delta;\r
573                                                 transform.fill_scale[1]                 = delta;\r
574                                                 transform.clip_translation[0]   = x*delta;\r
575                                                 transform.clip_translation[1]   = y*delta;\r
576                                                 transform.clip_scale[0]                 = delta;\r
577                                                 transform.clip_scale[1]                 = delta;                        \r
578                                                 return transform;\r
579                                         }, duration, tween));\r
580                                 }\r
581                         }\r
582                 }\r
583                 else if(_parameters[0] == L"BLEND")\r
584                 {\r
585                         if (_parameters.size() == 1)\r
586                         {\r
587                                 auto blend_mode = GetChannel()->mixer()->get_blend_mode(GetLayerIndex());\r
588                                 SetReplyString(L"201 MIXER OK\r\n" \r
589                                         + lexical_cast<std::wstring>(get_blend_mode(blend_mode)) \r
590                                         + L"\r\n");\r
591                                 return true;\r
592                         }\r
593 \r
594                         auto blend_str = _parameters.at(1);                                                             \r
595                         int layer = GetLayerIndex();\r
596                         blend_mode::type blend = get_blend_mode(blend_str);\r
597                         GetChannel()->mixer()->set_blend_mode(GetLayerIndex(), blend);  \r
598                 }\r
599         else if(_parameters[0] == L"CHROMA")\r
600         {\r
601                         if (_parameters.size() == 1)\r
602                         {\r
603                                 auto chroma = GetChannel()->mixer()->get_chroma(GetLayerIndex());\r
604                                 SetReplyString(L"201 MIXER OK\r\n" \r
605                                         + get_chroma_mode(chroma.key)\r
606                                         + (chroma.key == chroma::none\r
607                                                 ? L""\r
608                                                 : L" "\r
609                                                 + lexical_cast<std::wstring>(chroma.threshold) + L" "\r
610                                                 + lexical_cast<std::wstring>(chroma.softness))\r
611                                         + L"\r\n");\r
612                                         // Add the rest when they are actually used and documented\r
613                                 return true;\r
614                         }\r
615 \r
616                         int layer = GetLayerIndex();\r
617             chroma chroma;\r
618             chroma.key = get_chroma_mode(_parameters[1]);\r
619 \r
620                         if (chroma.key != chroma::none)\r
621                         {\r
622                                 chroma.threshold    = boost::lexical_cast<double>(_parameters[2]);\r
623                                 chroma.softness     = boost::lexical_cast<double>(_parameters[3]);\r
624                                 chroma.spill        = _parameters.size() > 4 ? boost::lexical_cast<double>(_parameters[4]) : 0.0f;\r
625                                 chroma.blur         = _parameters.size() > 5 ? boost::lexical_cast<double>(_parameters[5]) : 0.0f;\r
626                                 chroma.show_mask    = _parameters.size() > 6 ? bool(boost::lexical_cast<int>(_parameters[6])) : false;\r
627                         }\r
628 \r
629             GetChannel()->mixer()->set_chroma(GetLayerIndex(), chroma);\r
630         }\r
631                 else if(_parameters[0] == L"MASTERVOLUME")\r
632                 {\r
633                         if (_parameters.size() == 1)\r
634                         {\r
635                                 auto volume = GetChannel()->mixer()->get_master_volume();\r
636                                 SetReplyString(L"201 MIXER OK\r\n" \r
637                                         + lexical_cast<std::wstring>(volume) + L"\r\n");\r
638                                 return true;\r
639                         }\r
640 \r
641                         float master_volume = boost::lexical_cast<float>(_parameters.at(1));\r
642                         GetChannel()->mixer()->set_master_volume(master_volume);\r
643                 }\r
644                 else if(_parameters[0] == L"BRIGHTNESS")\r
645                 {\r
646                         if (_parameters.size() == 1)\r
647                                 return reply_value([](const frame_transform& t) { return t.brightness; });\r
648 \r
649                         auto value = boost::lexical_cast<double>(_parameters.at(1));\r
650                         int duration = _parameters.size() > 2 ? boost::lexical_cast<int>(_parameters[2]) : 0;\r
651                         std::wstring tween = _parameters.size() > 3 ? _parameters[3] : L"linear";\r
652                         transforms.push_back(stage::transform_tuple_t(GetLayerIndex(), [=](frame_transform transform) -> frame_transform\r
653                         {\r
654                                 transform.brightness = value;\r
655                                 return transform;\r
656                         }, duration, tween));\r
657                 }\r
658                 else if(_parameters[0] == L"SATURATION")\r
659                 {\r
660                         if (_parameters.size() == 1)\r
661                                 return reply_value([](const frame_transform& t) { return t.saturation; });\r
662 \r
663                         auto value = boost::lexical_cast<double>(_parameters.at(1));\r
664                         int duration = _parameters.size() > 2 ? boost::lexical_cast<int>(_parameters[2]) : 0;\r
665                         std::wstring tween = _parameters.size() > 3 ? _parameters[3] : L"linear";\r
666                         transforms.push_back(stage::transform_tuple_t(GetLayerIndex(), [=](frame_transform transform) -> frame_transform\r
667                         {\r
668                                 transform.saturation = value;\r
669                                 return transform;\r
670                         }, duration, tween));   \r
671                 }\r
672                 else if(_parameters[0] == L"CONTRAST")\r
673                 {\r
674                         if (_parameters.size() == 1)\r
675                                 return reply_value([](const frame_transform& t) { return t.contrast; });\r
676 \r
677                         auto value = boost::lexical_cast<double>(_parameters.at(1));\r
678                         int duration = _parameters.size() > 2 ? boost::lexical_cast<int>(_parameters[2]) : 0;\r
679                         std::wstring tween = _parameters.size() > 3 ? _parameters[3] : L"linear";\r
680                         transforms.push_back(stage::transform_tuple_t(GetLayerIndex(), [=](frame_transform transform) -> frame_transform\r
681                         {\r
682                                 transform.contrast = value;\r
683                                 return transform;\r
684                         }, duration, tween));   \r
685                 }\r
686                 else if(_parameters[0] == L"LEVELS")\r
687                 {\r
688                         if (_parameters.size() == 1)\r
689                         {\r
690                                 auto levels = get_current_transform().levels;\r
691                                 SetReplyString(L"201 MIXER OK\r\n"\r
692                                         + lexical_cast<std::wstring>(levels.min_input) + L" "\r
693                                         + lexical_cast<std::wstring>(levels.max_input) + L" "\r
694                                         + lexical_cast<std::wstring>(levels.gamma) + L" "\r
695                                         + lexical_cast<std::wstring>(levels.min_output) + L" "\r
696                                         + lexical_cast<std::wstring>(levels.max_output) + L"\r\n");\r
697                                 return true;\r
698                         }\r
699 \r
700                         levels value;\r
701                         value.min_input  = boost::lexical_cast<double>(_parameters.at(1));\r
702                         value.max_input  = boost::lexical_cast<double>(_parameters.at(2));\r
703                         value.gamma              = boost::lexical_cast<double>(_parameters.at(3));\r
704                         value.min_output = boost::lexical_cast<double>(_parameters.at(4));\r
705                         value.max_output = boost::lexical_cast<double>(_parameters.at(5));\r
706                         int duration = _parameters.size() > 6 ? boost::lexical_cast<int>(_parameters[6]) : 0;\r
707                         std::wstring tween = _parameters.size() > 7 ? _parameters[7] : L"linear";\r
708 \r
709                         transforms.push_back(stage::transform_tuple_t(GetLayerIndex(), [=](frame_transform transform) -> frame_transform\r
710                         {\r
711                                 transform.levels = value;\r
712                                 return transform;\r
713                         }, duration, tween));\r
714                 }\r
715                 else if(_parameters[0] == L"STRAIGHT_ALPHA_OUTPUT")\r
716                 {\r
717                         if (_parameters.size() == 1)\r
718                         {\r
719                                 SetReplyString(L"201 MIXER OK\r\n"\r
720                                         + lexical_cast<std::wstring>(\r
721                                                         GetChannel()->mixer()->get_straight_alpha_output())\r
722                                         + L"\r\n");\r
723                                 return true;\r
724                         }\r
725 \r
726                         bool value = boost::lexical_cast<bool>(_parameters[1]);\r
727                         GetChannel()->mixer()->set_straight_alpha_output(value);\r
728                 }\r
729                 else if(_parameters[0] == L"VOLUME")\r
730                 {\r
731                         if (_parameters.size() == 1)\r
732                                 return reply_value([](const frame_transform& t) { return t.volume; });\r
733 \r
734                         int duration = _parameters.size() > 2 ? boost::lexical_cast<int>(_parameters[2]) : 0;\r
735                         std::wstring tween = _parameters.size() > 3 ? _parameters[3] : L"linear";\r
736                         double value = boost::lexical_cast<double>(_parameters[1]);\r
737 \r
738                         transforms.push_back(stage::transform_tuple_t(GetLayerIndex(), [=](frame_transform transform) -> frame_transform\r
739                         {\r
740                                 transform.volume = value;\r
741                                 return transform;\r
742                         }, duration, tween));\r
743                 }\r
744                 else if(_parameters[0] == L"CLEAR")\r
745                 {\r
746                         int layer = GetLayerIndex(std::numeric_limits<int>::max());\r
747                         if (layer == std::numeric_limits<int>::max())\r
748                         {\r
749                                 GetChannel()->stage()->clear_transforms();\r
750                                 GetChannel()->mixer()->clear_blend_modes();\r
751                         }\r
752                         else\r
753                         {\r
754                                 GetChannel()->stage()->clear_transforms(layer);\r
755                                 GetChannel()->mixer()->clear_blend_mode(layer);\r
756                         }\r
757                 }\r
758                 else if(_parameters[0] == L"COMMIT")\r
759                 {\r
760                         transforms = std::move(deferred_transforms[GetChannelIndex()]);\r
761                 }\r
762                 else\r
763                 {\r
764                         SetReplyString(TEXT("404 MIXER ERROR\r\n"));\r
765                         return false;\r
766                 }\r
767 \r
768                 if(defer)\r
769                 {\r
770                         auto& defer_tranforms = deferred_transforms[GetChannelIndex()];\r
771                         defer_tranforms.insert(defer_tranforms.end(), transforms.begin(), transforms.end());\r
772                 }\r
773                 else\r
774                         GetChannel()->stage()->apply_transforms(transforms);\r
775         \r
776                 SetReplyString(TEXT("202 MIXER OK\r\n"));\r
777 \r
778                 return true;\r
779         }\r
780         catch(file_not_found&)\r
781         {\r
782                 CASPAR_LOG_CURRENT_EXCEPTION();\r
783                 SetReplyString(TEXT("404 MIXER ERROR\r\n"));\r
784                 return false;\r
785         }\r
786         catch(...)\r
787         {\r
788                 CASPAR_LOG_CURRENT_EXCEPTION();\r
789                 SetReplyString(TEXT("502 MIXER FAILED\r\n"));\r
790                 return false;\r
791         }\r
792 }\r
793 \r
794 bool SwapCommand::DoExecute()\r
795 {       \r
796         //Perform loading of the clip\r
797         try\r
798         {\r
799                 if(GetLayerIndex(-1) != -1)\r
800                 {\r
801                         std::vector<std::string> strs;\r
802                         boost::split(strs, _parameters[0], boost::is_any_of("-"));\r
803                         \r
804                         auto ch1 = GetChannel();\r
805                         auto ch2 = GetChannels().at(boost::lexical_cast<int>(strs.at(0))-1);\r
806 \r
807                         int l1 = GetLayerIndex();\r
808                         int l2 = boost::lexical_cast<int>(strs.at(1));\r
809 \r
810                         ch1->stage()->swap_layer(l1, l2, ch2->stage());\r
811                 }\r
812                 else\r
813                 {\r
814                         auto ch1 = GetChannel();\r
815                         auto ch2 = GetChannels().at(boost::lexical_cast<int>(_parameters[0])-1);\r
816                         ch1->stage()->swap_layers(ch2->stage());\r
817                 }\r
818                 \r
819                 SetReplyString(TEXT("202 SWAP OK\r\n"));\r
820 \r
821                 return true;\r
822         }\r
823         catch(file_not_found&)\r
824         {\r
825                 CASPAR_LOG_CURRENT_EXCEPTION();\r
826                 SetReplyString(TEXT("404 SWAP ERROR\r\n"));\r
827                 return false;\r
828         }\r
829         catch(...)\r
830         {\r
831                 CASPAR_LOG_CURRENT_EXCEPTION();\r
832                 SetReplyString(TEXT("502 SWAP FAILED\r\n"));\r
833                 return false;\r
834         }\r
835 }\r
836 \r
837 bool AddCommand::DoExecute()\r
838 {       \r
839         //Perform loading of the clip\r
840         try\r
841         {\r
842                 _parameters.replace_placeholders(\r
843                                 L"<CLIENT_IP_ADDRESS>",\r
844                                 this->GetClientInfo()->print());\r
845 \r
846                 auto consumer = create_consumer(_parameters);\r
847                 GetChannel()->output()->add(GetLayerIndex(consumer->index()), consumer);\r
848         \r
849                 SetReplyString(TEXT("202 ADD OK\r\n"));\r
850 \r
851                 return true;\r
852         }\r
853         catch(file_not_found&)\r
854         {\r
855                 CASPAR_LOG_CURRENT_EXCEPTION();\r
856                 SetReplyString(TEXT("404 ADD ERROR\r\n"));\r
857                 return false;\r
858         }\r
859         catch(...)\r
860         {\r
861                 CASPAR_LOG_CURRENT_EXCEPTION();\r
862                 SetReplyString(TEXT("502 ADD FAILED\r\n"));\r
863                 return false;\r
864         }\r
865 }\r
866 \r
867 bool RemoveCommand::DoExecute()\r
868 {       \r
869         //Perform loading of the clip\r
870         try\r
871         {\r
872                 auto index = GetLayerIndex(std::numeric_limits<int>::min());\r
873 \r
874                 if (index == std::numeric_limits<int>::min())\r
875                 {\r
876                         _parameters.replace_placeholders(\r
877                                         L"<CLIENT_IP_ADDRESS>",\r
878                                         this->GetClientInfo()->print());\r
879 \r
880                         index = create_consumer(_parameters)->index();\r
881                 }\r
882 \r
883                 GetChannel()->output()->remove(index);\r
884 \r
885                 SetReplyString(TEXT("202 REMOVE OK\r\n"));\r
886 \r
887                 return true;\r
888         }\r
889         catch(file_not_found&)\r
890         {\r
891                 CASPAR_LOG_CURRENT_EXCEPTION();\r
892                 SetReplyString(TEXT("404 REMOVE ERROR\r\n"));\r
893                 return false;\r
894         }\r
895         catch(...)\r
896         {\r
897                 CASPAR_LOG_CURRENT_EXCEPTION();\r
898                 SetReplyString(TEXT("502 REMOVE FAILED\r\n"));\r
899                 return false;\r
900         }\r
901 }\r
902 \r
903 safe_ptr<core::frame_producer> RouteCommand::TryCreateProducer(AMCPCommand& command, std::wstring const& uri)\r
904 {\r
905         safe_ptr<core::frame_producer> pFP(frame_producer::empty());\r
906 \r
907         auto tokens = core::parameters::protocol_split(uri);\r
908         auto src_channel_layer_token = tokens[0] == L"route" ? tokens[1] : uri;\r
909         std::vector<std::wstring> src_channel_layer;\r
910         boost::split(src_channel_layer, src_channel_layer_token, boost::is_any_of("-"));\r
911         bool is_channel_layer_spec = src_channel_layer.size() == 2;\r
912         bool is_channel_spec = src_channel_layer.size() == 1;\r
913         int src_channel_index;\r
914 \r
915         if (is_channel_layer_spec || is_channel_spec)\r
916         {\r
917                 try\r
918                 {\r
919                         src_channel_index = boost::lexical_cast<int>(src_channel_layer[0]);\r
920                 }\r
921                 catch(const boost::bad_lexical_cast&)\r
922                 {\r
923                         is_channel_layer_spec = false;\r
924                         is_channel_spec = false;\r
925                 }\r
926         }\r
927 \r
928         int src_layer_index = -1;\r
929 \r
930         if (is_channel_layer_spec)\r
931         {\r
932                 if (!src_channel_layer[1].empty())\r
933                 {\r
934                         try\r
935                         {\r
936                                 src_layer_index = boost::lexical_cast<int>(src_channel_layer[1]);\r
937                         }\r
938                         catch(const boost::bad_lexical_cast&)\r
939                         {\r
940                                 is_channel_layer_spec = false;\r
941                         }\r
942                 }\r
943                 else\r
944                         is_channel_layer_spec = false;\r
945         }\r
946 \r
947         if (tokens[0] == L"route" || is_channel_layer_spec || is_channel_spec) // It looks like a route\r
948         {\r
949                 // Find the source channel\r
950                 auto channels = command.GetChannels();\r
951                 auto src_channel = std::find_if(\r
952                         channels.begin(), \r
953                         channels.end(), \r
954                         [src_channel_index](const safe_ptr<core::video_channel>& item) { return item->index() == src_channel_index; }\r
955                 );\r
956                 if (src_channel == channels.end())\r
957                         BOOST_THROW_EXCEPTION(null_argument() << msg_info("src channel not found"));\r
958 \r
959                 // Find the source layer (if one is given)\r
960                 if (is_channel_layer_spec)\r
961                         pFP = create_layer_producer(command.GetChannel()->mixer(), (*src_channel)->stage(), src_layer_index);\r
962                 else \r
963                         pFP = create_channel_producer(command.GetChannel()->mixer(), *src_channel);\r
964         }\r
965         return pFP;\r
966 }\r
967 \r
968 bool RouteCommand::DoExecute()\r
969 {       \r
970         try\r
971         {\r
972                 auto pFP = RouteCommand::TryCreateProducer(\r
973                                 *this, _parameters.at_original(0));\r
974 \r
975                 if (pFP != frame_producer::empty())\r
976                 {\r
977                         GetChannel()->stage()->load(GetLayerIndex(), pFP, true);\r
978                         GetChannel()->stage()->play(GetLayerIndex());\r
979 \r
980                         SetReplyString(TEXT("202 ROUTE OK\r\n"));\r
981                 \r
982                         return true;\r
983                 }\r
984                 SetReplyString(TEXT("404 ROUTE ERROR\r\n"));\r
985                 return false;\r
986         }\r
987         catch(file_not_found&)\r
988         {\r
989                 CASPAR_LOG_CURRENT_EXCEPTION();\r
990                 SetReplyString(TEXT("404 ROUTE ERROR\r\n"));\r
991                 return false;\r
992         }\r
993         catch(...)\r
994         {\r
995                 CASPAR_LOG_CURRENT_EXCEPTION();\r
996                 SetReplyString(TEXT("502 ROUTE FAILED\r\n"));\r
997                 return false;\r
998         }\r
999 }\r
1000 \r
1001 bool LoadCommand::DoExecute()\r
1002 {       \r
1003         //Perform loading of the clip\r
1004         try\r
1005         {\r
1006                 auto uri_tokens = parameters::protocol_split(_parameters.at_original(0));\r
1007                 auto pFP = frame_producer::empty();\r
1008                 if (uri_tokens[0] == L"route")\r
1009                 {\r
1010                         pFP = RouteCommand::TryCreateProducer(*this, _parameters.at_original(0));\r
1011                 }\r
1012                 if (pFP == frame_producer::empty())\r
1013                 {\r
1014                         pFP = create_producer(GetChannel()->mixer(), _parameters);\r
1015                 }\r
1016                 GetChannel()->stage()->load(GetLayerIndex(), pFP, true);\r
1017         \r
1018                 SetReplyString(TEXT("202 LOAD OK\r\n"));\r
1019 \r
1020                 return true;\r
1021         }\r
1022         catch(file_not_found&)\r
1023         {\r
1024                 CASPAR_LOG_CURRENT_EXCEPTION();\r
1025                 SetReplyString(TEXT("404 LOAD ERROR\r\n"));\r
1026                 return false;\r
1027         }\r
1028         catch(...)\r
1029         {\r
1030                 CASPAR_LOG_CURRENT_EXCEPTION();\r
1031                 SetReplyString(TEXT("502 LOAD FAILED\r\n"));\r
1032                 return false;\r
1033         }\r
1034 }\r
1035 \r
1036 \r
1037 \r
1038 //std::function<std::wstring()> channel_cg_add_command::parse(const std::wstring& message, const std::vector<renderer::render_device_ptr>& channels)\r
1039 //{\r
1040 //      static boost::wregex expr(L"^CG\\s(?<video_channel>\\d+)-?(?<LAYER>\\d+)?\\sADD\\s(?<FLASH_LAYER>\\d+)\\s(?<TEMPLATE>\\S+)\\s?(?<START_LABEL>\\S\\S+)?\\s?(?<PLAY_ON_LOAD>\\d)?\\s?(?<DATA>.*)?");\r
1041 //\r
1042 //      boost::wsmatch what;\r
1043 //      if(!boost::regex_match(message, what, expr))\r
1044 //              return nullptr;\r
1045 //\r
1046 //      auto info = channel_info::parse(what, channels);\r
1047 //\r
1048 //      int flash_layer_index = boost::lexical_cast<int>(what["FLASH_LAYER"].str());\r
1049 //\r
1050 //      std::wstring templatename = what["TEMPLATE"].str();\r
1051 //      bool play_on_load = what["PLAY_ON_LOAD"].matched ? what["PLAY_ON_LOAD"].str() != L"0" : 0;\r
1052 //      std::wstring start_label = what["START_LABEL"].str();   \r
1053 //      std::wstring data = get_data(what["DATA"].str());\r
1054 //      \r
1055 //      boost::replace_all(templatename, "\"", "");\r
1056 //\r
1057 //      return [=]() -> std::wstring\r
1058 //      {       \r
1059 //              std::wstring fullFilename = flash::flash_producer::find_template(server::template_folder() + templatename);\r
1060 //              if(fullFilename.empty())\r
1061 //                      BOOST_THROW_EXCEPTION(file_not_found());\r
1062 //      \r
1063 //              std::wstring extension = boost::filesystem::wpath(fullFilename).extension();\r
1064 //              std::wstring filename = templatename;\r
1065 //              filename.append(extension);\r
1066 //\r
1067 //              flash::flash::get_default_cg_producer(info.video_channel, std::max<int>(DEFAULT_CHANNEL_LAYER+1, info.layer_index))\r
1068 //                      ->add(flash_layer_index, filename, play_on_load, start_label, data);\r
1069 //\r
1070 //              CASPAR_LOG(info) << L"Executed [amcp_channel_cg_add]";\r
1071 //              return L"";\r
1072 //      };\r
1073 \r
1074 bool LoadbgCommand::DoExecute()\r
1075 {\r
1076         transition_info transitionInfo;\r
1077         \r
1078         bool bLoop = false;\r
1079 \r
1080         // TRANSITION\r
1081 \r
1082         std::wstring message;\r
1083         for(size_t n = 0; n < _parameters.size(); ++n)\r
1084                 message += _parameters[n] + L" ";\r
1085                 \r
1086         static const boost::wregex expr(L".*(?<TRANSITION>CUT|PUSH|SLIDE|WIPE|MIX)\\s*(?<DURATION>\\d+)\\s*(?<TWEEN>(LINEAR)|(EASE[^\\s]*))?\\s*(?<DIRECTION>FROMLEFT|FROMRIGHT|LEFT|RIGHT)?.*");\r
1087         boost::wsmatch what;\r
1088         if(boost::regex_match(message, what, expr))\r
1089         {\r
1090                 auto transition = what["TRANSITION"].str();\r
1091                 transitionInfo.duration = lexical_cast_or_default<size_t>(what["DURATION"].str());\r
1092                 auto direction = what["DIRECTION"].matched ? what["DIRECTION"].str() : L"";\r
1093                 auto tween = what["TWEEN"].matched ? what["TWEEN"].str() : L"";\r
1094                 transitionInfo.tweener = get_tweener(tween);            \r
1095 \r
1096                 if(transition == TEXT("CUT"))\r
1097                         transitionInfo.type = transition::cut;\r
1098                 else if(transition == TEXT("MIX"))\r
1099                         transitionInfo.type = transition::mix;\r
1100                 else if(transition == TEXT("PUSH"))\r
1101                         transitionInfo.type = transition::push;\r
1102                 else if(transition == TEXT("SLIDE"))\r
1103                         transitionInfo.type = transition::slide;\r
1104                 else if(transition == TEXT("WIPE"))\r
1105                         transitionInfo.type = transition::wipe;\r
1106                 \r
1107                 if(direction == TEXT("FROMLEFT"))\r
1108                         transitionInfo.direction = transition_direction::from_left;\r
1109                 else if(direction == TEXT("FROMRIGHT"))\r
1110                         transitionInfo.direction = transition_direction::from_right;\r
1111                 else if(direction == TEXT("LEFT"))\r
1112                         transitionInfo.direction = transition_direction::from_right;\r
1113                 else if(direction == TEXT("RIGHT"))\r
1114                         transitionInfo.direction = transition_direction::from_left;\r
1115         }\r
1116         \r
1117         //Perform loading of the clip\r
1118         try\r
1119         {\r
1120                 auto uri_tokens = core::parameters::protocol_split(_parameters.at_original(0));\r
1121                 auto pFP = frame_producer::empty();\r
1122                 if (uri_tokens[0] == L"route")\r
1123                 {\r
1124                         pFP = RouteCommand::TryCreateProducer(*this, _parameters.at_original(0));\r
1125                 }\r
1126                 if (pFP == frame_producer::empty())\r
1127                 {\r
1128                         pFP = create_producer(GetChannel()->mixer(), _parameters);\r
1129                 }\r
1130                 if(pFP == frame_producer::empty())\r
1131                         BOOST_THROW_EXCEPTION(file_not_found() << msg_info(_parameters.size() > 0 ? narrow(_parameters[0]) : ""));\r
1132 \r
1133                 bool auto_play = std::find(_parameters.begin(), _parameters.end(), L"AUTO") != _parameters.end();\r
1134 \r
1135                 auto pFP2 = create_transition_producer(GetChannel()->get_video_format_desc().field_mode, pFP, transitionInfo);\r
1136                 GetChannel()->stage()->load(GetLayerIndex(), pFP2, false, auto_play ? transitionInfo.duration : -1); // TODO: LOOP\r
1137         \r
1138                 SetReplyString(TEXT("202 LOADBG OK\r\n"));\r
1139 \r
1140                 return true;\r
1141         }\r
1142         catch(file_not_found&)\r
1143         {               \r
1144                 CASPAR_LOG(error) << L"File not found. No match found for parameters. Check syntax:" << _parameters.get_original_string();\r
1145                 SetReplyString(TEXT("404 LOADBG ERROR\r\n"));\r
1146                 return false;\r
1147         }\r
1148         catch(...)\r
1149         {\r
1150                 CASPAR_LOG_CURRENT_EXCEPTION();\r
1151                 SetReplyString(TEXT("502 LOADBG FAILED\r\n"));\r
1152                 return false;\r
1153         }\r
1154 }\r
1155 \r
1156 bool PauseCommand::DoExecute()\r
1157 {\r
1158         try\r
1159         {\r
1160                 GetChannel()->stage()->pause(GetLayerIndex());\r
1161                 SetReplyString(TEXT("202 PAUSE OK\r\n"));\r
1162                 return true;\r
1163         }\r
1164         catch(...)\r
1165         {\r
1166                 SetReplyString(TEXT("501 PAUSE FAILED\r\n"));\r
1167         }\r
1168 \r
1169         return false;\r
1170 }\r
1171 \r
1172 bool PlayCommand::DoExecute()\r
1173 {\r
1174         try\r
1175         {\r
1176                 if(!_parameters.empty())\r
1177                 {\r
1178                         LoadbgCommand lbg;\r
1179                         lbg.SetChannels(GetChannels());\r
1180                         lbg.SetChannel(GetChannel());\r
1181                         lbg.SetChannelIndex(GetChannelIndex());\r
1182                         lbg.SetLayerIntex(GetLayerIndex());\r
1183                         lbg.SetClientInfo(GetClientInfo());\r
1184                         lbg.SetParameters(_parameters);\r
1185                         if(!lbg.Execute())\r
1186                                 throw std::exception();\r
1187                 }\r
1188 \r
1189                 GetChannel()->stage()->play(GetLayerIndex());\r
1190                 \r
1191                 SetReplyString(TEXT("202 PLAY OK\r\n"));\r
1192                 return true;\r
1193         }\r
1194         catch(...)\r
1195         {\r
1196                 SetReplyString(TEXT("501 PLAY FAILED\r\n"));\r
1197         }\r
1198 \r
1199         return false;\r
1200 }\r
1201 \r
1202 bool StopCommand::DoExecute()\r
1203 {\r
1204         try\r
1205         {\r
1206                 GetChannel()->stage()->stop(GetLayerIndex());\r
1207                 SetReplyString(TEXT("202 STOP OK\r\n"));\r
1208                 return true;\r
1209         }\r
1210         catch(...)\r
1211         {\r
1212                 SetReplyString(TEXT("501 STOP FAILED\r\n"));\r
1213         }\r
1214 \r
1215         return false;\r
1216 }\r
1217 \r
1218 bool ClearCommand::DoExecute()\r
1219 {\r
1220         int index = GetLayerIndex(std::numeric_limits<int>::min());\r
1221         if(index != std::numeric_limits<int>::min())\r
1222                 GetChannel()->stage()->clear(index);\r
1223         else\r
1224                 GetChannel()->stage()->clear();\r
1225                 \r
1226         SetReplyString(TEXT("202 CLEAR OK\r\n"));\r
1227 \r
1228         return true;\r
1229 }\r
1230 \r
1231 bool PrintCommand::DoExecute()\r
1232 {\r
1233         parameters params;\r
1234         params.push_back(L"IMAGE");\r
1235         GetChannel()->output()->add(create_consumer(params));\r
1236                 \r
1237         SetReplyString(TEXT("202 PRINT OK\r\n"));\r
1238 \r
1239         return true;\r
1240 }\r
1241 \r
1242 bool LogCommand::DoExecute()\r
1243 {\r
1244         if(_parameters.at(0) == L"LEVEL")\r
1245                 log::set_log_level(_parameters.at(1));\r
1246 \r
1247         SetReplyString(TEXT("202 LOG OK\r\n"));\r
1248 \r
1249         return true;\r
1250 }\r
1251 \r
1252 bool CGCommand::DoExecute()\r
1253 {\r
1254         try\r
1255         {\r
1256                 std::wstring command = _parameters[0];\r
1257                 if(command == TEXT("ADD"))\r
1258                         return DoExecuteAdd();\r
1259                 else if(command == TEXT("PLAY"))\r
1260                         return DoExecutePlay();\r
1261                 else if(command == TEXT("STOP"))\r
1262                         return DoExecuteStop();\r
1263                 else if(command == TEXT("NEXT"))\r
1264                         return DoExecuteNext();\r
1265                 else if(command == TEXT("REMOVE"))\r
1266                         return DoExecuteRemove();\r
1267                 else if(command == TEXT("CLEAR"))\r
1268                         return DoExecuteClear();\r
1269                 else if(command == TEXT("UPDATE"))\r
1270                         return DoExecuteUpdate();\r
1271                 else if(command == TEXT("INVOKE"))\r
1272                         return DoExecuteInvoke();\r
1273                 else if(command == TEXT("INFO"))\r
1274                         return DoExecuteInfo();\r
1275         }\r
1276         catch(...)\r
1277         {\r
1278                 CASPAR_LOG_CURRENT_EXCEPTION();\r
1279         }\r
1280 \r
1281         SetReplyString(TEXT("403 CG ERROR\r\n"));\r
1282         return false;\r
1283 }\r
1284 \r
1285 bool CGCommand::ValidateLayer(const std::wstring& layerstring) {\r
1286         int length = layerstring.length();\r
1287         for(int i = 0; i < length; ++i) {\r
1288                 if(!_istdigit(layerstring[i])) {\r
1289                         return false;\r
1290                 }\r
1291         }\r
1292 \r
1293         return true;\r
1294 }\r
1295 \r
1296 bool CGCommand::DoExecuteAdd() {\r
1297         //CG 1 ADD 0 "template_folder/templatename" [STARTLABEL] 0/1 [DATA]\r
1298 \r
1299         int layer = 0;                          //_parameters[1]\r
1300 //      std::wstring templateName;      //_parameters[2]\r
1301         std::wstring label;             //_parameters[3]\r
1302         bool bDoStart = false;          //_parameters[3] alt. _parameters[4]\r
1303 //      std::wstring data;                      //_parameters[4] alt. _parameters[5]\r
1304 \r
1305         if(_parameters.size() < 4) \r
1306         {\r
1307                 SetReplyString(TEXT("402 CG ERROR\r\n"));\r
1308                 return false;\r
1309         }\r
1310         unsigned int dataIndex = 4;\r
1311 \r
1312         if(!ValidateLayer(_parameters[1])) \r
1313         {\r
1314                 SetReplyString(TEXT("403 CG ERROR\r\n"));\r
1315                 return false;\r
1316         }\r
1317 \r
1318         layer = _ttoi(_parameters[1].c_str());\r
1319 \r
1320         if(_parameters[3].length() > 1) \r
1321         {       //read label\r
1322                 label = _parameters.at_original(3);\r
1323                 ++dataIndex;\r
1324 \r
1325                 if(_parameters.size() > 4 && _parameters[4].length() > 0)       //read play-on-load-flag\r
1326                         bDoStart = (_parameters[4][0]==TEXT('1')) ? true : false;\r
1327                 else \r
1328                 {\r
1329                         SetReplyString(TEXT("402 CG ERROR\r\n"));\r
1330                         return false;\r
1331                 }\r
1332         }\r
1333         else if(_parameters[3].length() > 0) {  //read play-on-load-flag\r
1334                 bDoStart = (_parameters[3][0]==TEXT('1')) ? true : false;\r
1335         }\r
1336         else \r
1337         {\r
1338                 SetReplyString(TEXT("403 CG ERROR\r\n"));\r
1339                 return false;\r
1340         }\r
1341 \r
1342         const TCHAR* pDataString = 0;\r
1343         std::wstringstream data;\r
1344         std::wstring dataFromFile;\r
1345         if(_parameters.size() > dataIndex) \r
1346         {       //read data\r
1347                 const std::wstring& dataString = _parameters.at_original(dataIndex);\r
1348 \r
1349                 if(dataString[0] == TEXT('<')) //the data is an XML-string\r
1350                         pDataString = dataString.c_str();\r
1351                 else \r
1352                 {\r
1353                         //The data is not an XML-string, it must be a filename\r
1354                         std::wstring filename = env::data_folder();\r
1355                         filename.append(dataString);\r
1356                         filename.append(TEXT(".ftd"));\r
1357 \r
1358                         dataFromFile = read_file(boost::filesystem::wpath(filename));\r
1359                         pDataString = dataFromFile.c_str();\r
1360                 }\r
1361         }\r
1362         \r
1363         std::wstring fullFilename = flash::find_template(env::template_folder() + _parameters[2]);\r
1364         std::wstring extension = boost::filesystem::wpath(fullFilename).extension();\r
1365         std::wstring filename = _parameters[2];\r
1366 \r
1367         if(!fullFilename.empty())\r
1368         {\r
1369                 auto call = (boost::wformat(L"ADD %1% %2% %3% %4% %5%") % layer % filename % bDoStart % label % (std::wstring() + (pDataString ? pDataString : L""))).str();\r
1370                 auto producer = GetChannel()->stage()->foreground(GetLayerIndex(9999)).get();\r
1371 \r
1372                 if(producer->print().find(L"flash") == std::string::npos)\r
1373                 { \r
1374                         producer = flash::create_producer(GetChannel()->mixer(), boost::assign::list_of<std::wstring>());\r
1375 \r
1376                         if (producer != core::frame_producer::empty())\r
1377                         {\r
1378                                 producer = make_safe<flash::cg_producer>(producer);\r
1379                                 producer->call(call).wait();\r
1380                                 GetChannel()->stage()->load(GetLayerIndex(9999), producer);\r
1381                                 GetChannel()->stage()->play(GetLayerIndex(9999));\r
1382                         }\r
1383                 }\r
1384                 else\r
1385                 {\r
1386                         GetChannel()->stage()->call(GetLayerIndex(9999), true, call).wait();\r
1387                 }\r
1388                 \r
1389                 SetReplyString(TEXT("202 CG OK\r\n"));\r
1390 \r
1391                 return true;\r
1392         }\r
1393         else\r
1394         {                       \r
1395                 filename.append(extension);\r
1396                 std::vector<std::wstring> parameters = boost::assign::list_of<std::wstring>(filename);\r
1397                 auto producer = html::create_producer(GetChannel()->mixer(), core::parameters(parameters));     \r
1398                                 \r
1399                 if (producer != core::frame_producer::empty())\r
1400                 {\r
1401                         if (pDataString)\r
1402                         {\r
1403                                 producer->call((boost::wformat(L"UPDATE %1% \"%2%\"") % layer % pDataString).str()).wait();\r
1404                         }\r
1405 \r
1406                         if (bDoStart)\r
1407                         {\r
1408                                 producer->call((boost::wformat(L"PLAY %1%") % layer).str()).wait();\r
1409                         }\r
1410                         \r
1411                         GetChannel()->stage()->load(GetLayerIndex(9999), producer);\r
1412                         GetChannel()->stage()->play(GetLayerIndex(9999));\r
1413 \r
1414                         SetReplyString(TEXT("202 CG OK\r\n"));\r
1415 \r
1416                         return true;\r
1417                 };\r
1418         }\r
1419 \r
1420         CASPAR_LOG(warning) << "Could not find template " << _parameters[2];\r
1421         SetReplyString(TEXT("404 CG ERROR\r\n"));\r
1422         \r
1423         return true;\r
1424 }\r
1425 \r
1426 bool CGCommand::DoExecutePlay()\r
1427 {\r
1428         if(_parameters.size() > 1)\r
1429         {\r
1430                 if(!ValidateLayer(_parameters[1])) \r
1431                 {\r
1432                         SetReplyString(TEXT("403 CG ERROR\r\n"));\r
1433                         return false;\r
1434                 }\r
1435                 int layer = _ttoi(_parameters[1].c_str());\r
1436                 \r
1437                 try\r
1438                 {\r
1439                         GetChannel()->stage()->call(GetLayerIndex(9999), true, (boost::wformat(L"PLAY %1%") % layer).str()).wait();\r
1440                 }\r
1441                 catch (const caspar::not_supported&)\r
1442                 {\r
1443                         SetReplyString(TEXT("404 CG ERROR\r\n"));\r
1444                         return true;\r
1445                 }\r
1446         }\r
1447         else\r
1448         {\r
1449                 SetReplyString(TEXT("402 CG ERROR\r\n"));\r
1450                 return true;\r
1451         }\r
1452 \r
1453         SetReplyString(TEXT("202 CG OK\r\n"));\r
1454         return true;\r
1455 }\r
1456 \r
1457 bool CGCommand::DoExecuteStop() \r
1458 {\r
1459         if(_parameters.size() > 1)\r
1460         {\r
1461                 if(!ValidateLayer(_parameters[1])) \r
1462                 {\r
1463                         SetReplyString(TEXT("403 CG ERROR\r\n"));\r
1464                         return false;\r
1465                 }\r
1466                 int layer = _ttoi(_parameters[1].c_str());\r
1467                 \r
1468                 try\r
1469                 {\r
1470                         GetChannel()->stage()->call(GetLayerIndex(9999), true, (boost::wformat(L"STOP %1%") % layer).str()).wait();\r
1471                 }\r
1472                 catch (const caspar::not_supported&)\r
1473                 {\r
1474                         SetReplyString(TEXT("404 CG ERROR\r\n"));\r
1475                         return true;\r
1476                 }\r
1477         }\r
1478         else \r
1479         {\r
1480                 SetReplyString(TEXT("402 CG ERROR\r\n"));\r
1481                 return true;\r
1482         }\r
1483 \r
1484         SetReplyString(TEXT("202 CG OK\r\n"));\r
1485         return true;\r
1486 }\r
1487 \r
1488 bool CGCommand::DoExecuteNext()\r
1489 {\r
1490         if(_parameters.size() > 1) \r
1491         {\r
1492                 if(!ValidateLayer(_parameters[1])) \r
1493                 {\r
1494                         SetReplyString(TEXT("403 CG ERROR\r\n"));\r
1495                         return false;\r
1496                 }\r
1497 \r
1498                 int layer = _ttoi(_parameters[1].c_str());\r
1499 \r
1500                 try\r
1501                 {\r
1502                         GetChannel()->stage()->call(GetLayerIndex(9999), true, (boost::wformat(L"NEXT %1%") % layer).str()).wait();\r
1503                 }\r
1504                 catch (const caspar::not_supported&)\r
1505                 {\r
1506                         SetReplyString(TEXT("404 CG ERROR\r\n"));\r
1507                         return true;\r
1508                 }\r
1509         }\r
1510         else \r
1511         {\r
1512                 SetReplyString(TEXT("402 CG ERROR\r\n"));\r
1513                 return true;\r
1514         }\r
1515 \r
1516         SetReplyString(TEXT("202 CG OK\r\n"));\r
1517         return true;\r
1518 }\r
1519 \r
1520 bool CGCommand::DoExecuteRemove() \r
1521 {\r
1522         if(_parameters.size() > 1) \r
1523         {\r
1524                 if(!ValidateLayer(_parameters[1])) \r
1525                 {\r
1526                         SetReplyString(TEXT("403 CG ERROR\r\n"));\r
1527                         return false;\r
1528                 }\r
1529 \r
1530                 int layer = _ttoi(_parameters[1].c_str());\r
1531 \r
1532                 try\r
1533                 {\r
1534                         GetChannel()->stage()->call(GetLayerIndex(9999), true, (boost::wformat(L"REMOVE %1%") % layer).str()).wait();\r
1535                 }\r
1536                 catch (const caspar::not_supported&)\r
1537                 {\r
1538                         SetReplyString(TEXT("404 CG ERROR\r\n"));\r
1539                         return true;\r
1540                 }\r
1541         }\r
1542         else \r
1543         {\r
1544                 SetReplyString(TEXT("402 CG ERROR\r\n"));\r
1545                 return true;\r
1546         }\r
1547 \r
1548         SetReplyString(TEXT("202 CG OK\r\n"));\r
1549         return true;\r
1550 }\r
1551 \r
1552 bool CGCommand::DoExecuteClear() \r
1553 {\r
1554         GetChannel()->stage()->clear(GetLayerIndex(9999));\r
1555         SetReplyString(TEXT("202 CG OK\r\n"));\r
1556         return true;\r
1557 }\r
1558 \r
1559 bool CGCommand::DoExecuteUpdate() \r
1560 {\r
1561         try\r
1562         {\r
1563                 if(!ValidateLayer(_parameters.at(1)))\r
1564                 {\r
1565                         SetReplyString(TEXT("403 CG ERROR\r\n"));\r
1566                         return false;\r
1567                 }\r
1568                                                 \r
1569                 std::wstring dataString = _parameters.at_original(2);\r
1570                 if(dataString.at(0) != TEXT('<'))\r
1571                 {\r
1572                         //The data is not an XML-string, it must be a filename\r
1573                         std::wstring filename = env::data_folder();\r
1574                         filename.append(dataString);\r
1575                         filename.append(TEXT(".ftd"));\r
1576 \r
1577                         dataString = read_file(boost::filesystem::wpath(filename));\r
1578                 }               \r
1579 \r
1580                 int layer = _ttoi(_parameters.at(1).c_str());\r
1581                 \r
1582                 try\r
1583                 {\r
1584                         GetChannel()->stage()->call(GetLayerIndex(9999), true, (boost::wformat(L"UPDATE %1% %2%") % layer % dataString).str()).wait();\r
1585                 }\r
1586                 catch (const caspar::not_supported&)\r
1587                 {\r
1588                         SetReplyString(TEXT("404 CG ERROR\r\n"));\r
1589                         return true;\r
1590                 }\r
1591         }\r
1592         catch(...)\r
1593         {\r
1594                 SetReplyString(TEXT("402 CG ERROR\r\n"));\r
1595                 return true;\r
1596         }\r
1597 \r
1598         SetReplyString(TEXT("202 CG OK\r\n"));\r
1599         return true;\r
1600 }\r
1601 \r
1602 bool CGCommand::DoExecuteInvoke() \r
1603 {\r
1604         std::wstringstream replyString;\r
1605         replyString << TEXT("201 CG OK\r\n");\r
1606 \r
1607         if(_parameters.size() > 2)\r
1608         {\r
1609                 if(!ValidateLayer(_parameters[1]))\r
1610                 {\r
1611                         SetReplyString(TEXT("403 CG ERROR\r\n"));\r
1612                         return false;\r
1613                 }\r
1614 \r
1615                 int layer = _ttoi(_parameters[1].c_str());\r
1616 \r
1617                 try\r
1618                 {\r
1619                         auto result = GetChannel()->stage()->call(GetLayerIndex(9999), true, (boost::wformat(L"INVOKE %1% \"%2%\"") % layer % _parameters.at_original(2)).str()).get();\r
1620                         replyString << result << TEXT("\r\n"); \r
1621                 }\r
1622                 catch (const caspar::not_supported&)\r
1623                 {\r
1624                         SetReplyString(TEXT("404 CG ERROR\r\n"));\r
1625                         return true;\r
1626                 }\r
1627         }\r
1628         else \r
1629         {\r
1630                 SetReplyString(TEXT("402 CG ERROR\r\n"));\r
1631                 return true;\r
1632         }\r
1633         \r
1634         SetReplyString(replyString.str());\r
1635         return true;\r
1636 }\r
1637 \r
1638 bool CGCommand::DoExecuteInfo() \r
1639 {\r
1640         std::wstringstream replyString;\r
1641         replyString << TEXT("201 CG OK\r\n");\r
1642 \r
1643         if(_parameters.size() > 1)\r
1644         {\r
1645                 if(!ValidateLayer(_parameters[1]))\r
1646                 {\r
1647                         SetReplyString(TEXT("403 CG ERROR\r\n"));\r
1648                         return false;\r
1649                 }\r
1650 \r
1651                 int layer = _ttoi(_parameters[1].c_str());\r
1652 \r
1653                 try\r
1654                 {\r
1655                         auto desc = GetChannel()->stage()->call(GetLayerIndex(9999), true, (boost::wformat(L"INFO %1%") % layer).str()).get();\r
1656                                 \r
1657                         replyString << desc << TEXT("\r\n"); \r
1658                 }\r
1659                 catch (const caspar::not_supported&)\r
1660                 {\r
1661                         SetReplyString(TEXT("404 CG ERROR\r\n"));\r
1662                         return true;\r
1663                 }\r
1664         }\r
1665         else \r
1666         {\r
1667                 try\r
1668                 {\r
1669                         auto info = GetChannel()->stage()->call(GetLayerIndex(9999), true, (boost::wformat(L"INFO")).str()).get();\r
1670                         replyString << info << TEXT("\r\n"); \r
1671                 }\r
1672                 catch (const caspar::not_supported&)\r
1673                 {\r
1674                         SetReplyString(TEXT("404 CG ERROR\r\n"));\r
1675                         return true;\r
1676                 }\r
1677         }       \r
1678 \r
1679         SetReplyString(replyString.str());\r
1680         return true;\r
1681 }\r
1682 \r
1683 bool DataCommand::DoExecute()\r
1684 {\r
1685         std::wstring command = _parameters[0];\r
1686         if(command == TEXT("STORE"))\r
1687                 return DoExecuteStore();\r
1688         else if(command == TEXT("RETRIEVE"))\r
1689                 return DoExecuteRetrieve();\r
1690         else if(command == TEXT("REMOVE"))\r
1691                 return DoExecuteRemove();\r
1692         else if(command == TEXT("LIST"))\r
1693                 return DoExecuteList();\r
1694 \r
1695         SetReplyString(TEXT("403 DATA ERROR\r\n"));\r
1696         return false;\r
1697 }\r
1698 \r
1699 bool DataCommand::DoExecuteStore() \r
1700 {\r
1701         if(_parameters.size() < 3) \r
1702         {\r
1703                 SetReplyString(TEXT("402 DATA STORE ERROR\r\n"));\r
1704                 return false;\r
1705         }\r
1706 \r
1707         std::wstring filename = env::data_folder();\r
1708         filename.append(_parameters[1]);\r
1709         filename.append(TEXT(".ftd"));\r
1710 \r
1711         auto data_path = boost::filesystem::wpath(\r
1712                         boost::filesystem::wpath(filename).parent_path());\r
1713         \r
1714         if(!boost::filesystem::exists(data_path))\r
1715                 boost::filesystem::create_directories(data_path);\r
1716 \r
1717         std::wofstream datafile(filename.c_str());\r
1718 \r
1719         if(!datafile) \r
1720         {\r
1721                 SetReplyString(TEXT("501 DATA STORE FAILED\r\n"));\r
1722                 return false;\r
1723         }\r
1724 \r
1725         datafile << static_cast<wchar_t>(65279); // UTF-8 BOM character\r
1726         datafile << _parameters.at_original(2) << std::flush;\r
1727         datafile.close();\r
1728 \r
1729         std::wstring replyString = TEXT("202 DATA STORE OK\r\n");\r
1730         SetReplyString(replyString);\r
1731         return true;\r
1732 }\r
1733 \r
1734 bool DataCommand::DoExecuteRetrieve() \r
1735 {\r
1736         if(_parameters.size() < 2) \r
1737         {\r
1738                 SetReplyString(TEXT("402 DATA RETRIEVE ERROR\r\n"));\r
1739                 return false;\r
1740         }\r
1741 \r
1742         std::wstring filename = env::data_folder();\r
1743         filename.append(_parameters[1]);\r
1744         filename.append(TEXT(".ftd"));\r
1745 \r
1746         std::wstring file_contents = read_file(boost::filesystem::wpath(filename));\r
1747 \r
1748         if (file_contents.empty()) \r
1749         {\r
1750                 SetReplyString(TEXT("404 DATA RETRIEVE ERROR\r\n"));\r
1751                 return false;\r
1752         }\r
1753 \r
1754         std::wstringstream reply;\r
1755         reply << TEXT("201 DATA RETRIEVE OK\r\n");\r
1756 \r
1757         std::wstringstream file_contents_stream(file_contents);\r
1758         std::wstring line;\r
1759         bool bFirstLine = true;\r
1760         \r
1761         while(std::getline(file_contents_stream, line))\r
1762         {\r
1763                 if(!bFirstLine)\r
1764                         reply << "\n";\r
1765                 else\r
1766                         bFirstLine = false;\r
1767 \r
1768                 reply << line;\r
1769         }\r
1770 \r
1771         reply << "\r\n";\r
1772         SetReplyString(reply.str());\r
1773         return true;\r
1774 }\r
1775 \r
1776 bool DataCommand::DoExecuteRemove() \r
1777\r
1778         if (_parameters.size() < 2) \r
1779         {\r
1780                 SetReplyString(TEXT("402 DATA REMOVE ERROR\r\n"));\r
1781                 return false;\r
1782         }\r
1783 \r
1784         std::wstring filename = env::data_folder();\r
1785         filename.append(_parameters[1]);\r
1786         filename.append(TEXT(".ftd"));\r
1787 \r
1788         if (!boost::filesystem::exists(filename)) \r
1789         {\r
1790                 SetReplyString(TEXT("404 DATA REMOVE ERROR\r\n"));\r
1791                 return false;\r
1792         }\r
1793 \r
1794         if (!boost::filesystem::remove(filename))\r
1795         {\r
1796                 SetReplyString(TEXT("403 DATA REMOVE ERROR\r\n"));\r
1797                 return false;\r
1798         }\r
1799 \r
1800         SetReplyString(TEXT("201 DATA REMOVE OK\r\n"));\r
1801 \r
1802         return true;\r
1803 }\r
1804 \r
1805 bool DataCommand::DoExecuteList() \r
1806 {\r
1807         std::wstringstream replyString;\r
1808         replyString << TEXT("200 DATA LIST OK\r\n");\r
1809 \r
1810         for (boost::filesystem::wrecursive_directory_iterator itr(env::data_folder()), end; itr != end; ++itr)\r
1811         {                       \r
1812                 if(boost::filesystem::is_regular_file(itr->path()))\r
1813                 {\r
1814                         if(!boost::iequals(itr->path().extension(), L".ftd"))\r
1815                                 continue;\r
1816                         \r
1817                         auto relativePath = boost::filesystem::wpath(itr->path().file_string().substr(env::data_folder().size()-1, itr->path().file_string().size()));\r
1818                         \r
1819                         auto str = relativePath.replace_extension(TEXT("")).external_file_string();\r
1820                         if(str[0] == '\\' || str[0] == '/')\r
1821                                 str = std::wstring(str.begin() + 1, str.end());\r
1822 \r
1823                         replyString << str << TEXT("\r\n");     \r
1824                 }\r
1825         }\r
1826         \r
1827         replyString << TEXT("\r\n");\r
1828 \r
1829         SetReplyString(boost::to_upper_copy(replyString.str()));\r
1830         return true;\r
1831 }\r
1832 \r
1833 bool ThumbnailCommand::DoExecute()\r
1834 {\r
1835         std::wstring command = _parameters[0];\r
1836 \r
1837         if (command == TEXT("RETRIEVE"))\r
1838                 return DoExecuteRetrieve();\r
1839         else if (command == TEXT("LIST"))\r
1840                 return DoExecuteList();\r
1841         else if (command == TEXT("GENERATE"))\r
1842                 return DoExecuteGenerate();\r
1843         else if (command == TEXT("GENERATE_ALL"))\r
1844                 return DoExecuteGenerateAll();\r
1845 \r
1846         SetReplyString(TEXT("403 THUMBNAIL ERROR\r\n"));\r
1847         return false;\r
1848 }\r
1849 \r
1850 bool ThumbnailCommand::DoExecuteRetrieve() \r
1851 {\r
1852         if(_parameters.size() < 2) \r
1853         {\r
1854                 SetReplyString(TEXT("402 THUMBNAIL RETRIEVE ERROR\r\n"));\r
1855                 return false;\r
1856         }\r
1857 \r
1858         std::wstring filename = env::thumbnails_folder();\r
1859         filename.append(_parameters[1]);\r
1860         filename.append(TEXT(".png"));\r
1861 \r
1862         std::wstring file_contents = read_file_base64(boost::filesystem::wpath(filename));\r
1863 \r
1864         if (file_contents.empty())\r
1865         {\r
1866                 SetReplyString(TEXT("404 THUMBNAIL RETRIEVE ERROR\r\n"));\r
1867                 return false;\r
1868         }\r
1869 \r
1870         std::wstringstream reply;\r
1871 \r
1872         reply << L"201 THUMBNAIL RETRIEVE OK\r\n";\r
1873         reply << file_contents;\r
1874         reply << L"\r\n";\r
1875         SetReplyString(reply.str());\r
1876         return true;\r
1877 }\r
1878 \r
1879 bool ThumbnailCommand::DoExecuteList()\r
1880 {\r
1881         std::wstringstream replyString;\r
1882         replyString << TEXT("200 THUMBNAIL LIST OK\r\n");\r
1883 \r
1884         for (boost::filesystem::wrecursive_directory_iterator itr(env::thumbnails_folder()), end; itr != end; ++itr)\r
1885         {                       \r
1886                 if(boost::filesystem::is_regular_file(itr->path()))\r
1887                 {\r
1888                         if(!boost::iequals(itr->path().extension(), L".png"))\r
1889                                 continue;\r
1890                         \r
1891                         auto relativePath = boost::filesystem::wpath(itr->path().file_string().substr(env::thumbnails_folder().size()-1, itr->path().file_string().size()));\r
1892                         \r
1893                         auto str = relativePath.replace_extension(L"").external_file_string();\r
1894                         if(str[0] == '\\' || str[0] == '/')\r
1895                                 str = std::wstring(str.begin() + 1, str.end());\r
1896 \r
1897                         auto mtime = boost::filesystem::last_write_time(itr->path());\r
1898                         auto mtime_readable = boost::posix_time::to_iso_string(boost::posix_time::from_time_t(mtime));\r
1899                         auto file_size = boost::filesystem::file_size(itr->path());\r
1900 \r
1901                         replyString << L"\"" << str << L"\" " << widen(mtime_readable) << L" " << file_size << L"\r\n";\r
1902                 }\r
1903         }\r
1904         \r
1905         replyString << TEXT("\r\n");\r
1906 \r
1907         SetReplyString(boost::to_upper_copy(replyString.str()));\r
1908         return true;\r
1909 }\r
1910 \r
1911 bool ThumbnailCommand::DoExecuteGenerate()\r
1912 {\r
1913         if (_parameters.size() < 2) \r
1914         {\r
1915                 SetReplyString(L"402 THUMBNAIL GENERATE ERROR\r\n");\r
1916                 return false;\r
1917         }\r
1918 \r
1919         auto thumb_gen = GetThumbGenerator();\r
1920 \r
1921         if (thumb_gen)\r
1922         {\r
1923                 thumb_gen->generate(_parameters[1]);\r
1924                 SetReplyString(L"200 THUMBNAIL GENERATE OK\r\n");\r
1925                 return true;\r
1926         }\r
1927         else\r
1928         {\r
1929                 SetReplyString(L"501 THUMBNAIL GENERATE ERROR\r\n");\r
1930                 return false;\r
1931         }\r
1932 }\r
1933 \r
1934 bool ThumbnailCommand::DoExecuteGenerateAll()\r
1935 {\r
1936         auto thumb_gen = GetThumbGenerator();\r
1937 \r
1938         if (thumb_gen)\r
1939         {\r
1940                 thumb_gen->generate_all();\r
1941                 SetReplyString(L"200 THUMBNAIL GENERATE_ALL OK\r\n");\r
1942                 return true;\r
1943         }\r
1944         else\r
1945         {\r
1946                 SetReplyString(L"501 THUMBNAIL GENERATE_ALL ERROR\r\n");\r
1947                 return false;\r
1948         }\r
1949 }\r
1950 \r
1951 bool CinfCommand::DoExecute()\r
1952 {\r
1953         std::wstringstream replyString;\r
1954         \r
1955         try\r
1956         {\r
1957                 std::wstring info;\r
1958                 for (boost::filesystem::wrecursive_directory_iterator itr(env::media_folder()), end; itr != end; ++itr)\r
1959                 {\r
1960                         auto path = itr->path();\r
1961                         auto file = path.replace_extension(L"").filename();\r
1962                         if(boost::iequals(file, _parameters.at(0)))\r
1963                                 info += MediaInfo(itr->path(), GetMediaInfoRepo());\r
1964                 }\r
1965 \r
1966                 if(info.empty())\r
1967                 {\r
1968                         SetReplyString(TEXT("404 CINF ERROR\r\n"));\r
1969                         return false;\r
1970                 }\r
1971                 replyString << TEXT("200 CINF OK\r\n");\r
1972                 replyString << info << "\r\n";\r
1973         }\r
1974         catch(...)\r
1975         {\r
1976                 SetReplyString(TEXT("404 CINF ERROR\r\n"));\r
1977                 return false;\r
1978         }\r
1979         \r
1980         SetReplyString(replyString.str());\r
1981         return true;\r
1982 }\r
1983 \r
1984 void GenerateChannelInfo(int index, const safe_ptr<core::video_channel>& pChannel, std::wstringstream& replyString)\r
1985 {\r
1986         replyString << index+1 << TEXT(" ") << pChannel->get_video_format_desc().name << TEXT(" PLAYING") << TEXT("\r\n");\r
1987 }\r
1988 \r
1989 bool InfoCommand::DoExecute()\r
1990 {\r
1991         std::wstringstream replyString;\r
1992         \r
1993         boost::property_tree::xml_writer_settings<wchar_t> w(' ', 3);\r
1994 \r
1995         try\r
1996         {\r
1997                 if(_parameters.size() >= 1 && _parameters[0] == L"TEMPLATE")\r
1998                 {               \r
1999                         replyString << L"201 INFO TEMPLATE OK\r\n";\r
2000 \r
2001                         // Needs to be extended for any file, not just flash.\r
2002 \r
2003                         auto filename = flash::find_template(env::template_folder() + _parameters.at(1));\r
2004                                                 \r
2005                         std::wstringstream str;\r
2006                         str << widen(flash::read_template_meta_info(filename));\r
2007                         boost::property_tree::wptree info;\r
2008                         boost::property_tree::xml_parser::read_xml(str, info, boost::property_tree::xml_parser::trim_whitespace | boost::property_tree::xml_parser::no_comments);\r
2009 \r
2010                         boost::property_tree::xml_parser::write_xml(replyString, info, w);\r
2011                 }\r
2012                 else if(_parameters.size() >= 1 && _parameters[0] == L"CONFIG")\r
2013                 {               \r
2014                         replyString << L"201 INFO CONFIG OK\r\n";\r
2015 \r
2016                         boost::property_tree::write_xml(replyString, caspar::env::properties(), w);\r
2017                 }\r
2018                 else if(_parameters.size() >= 1 && _parameters[0] == L"PATHS")\r
2019                 {\r
2020                         replyString << L"201 INFO PATHS OK\r\n";\r
2021 \r
2022                         boost::property_tree::wptree info;\r
2023                         info.add_child(L"paths", caspar::env::properties().get_child(L"configuration.paths"));\r
2024                         info.add(L"paths.initial-path", boost::filesystem2::initial_path<boost::filesystem2::wpath>().directory_string() + L"\\");\r
2025 \r
2026                         boost::property_tree::write_xml(replyString, info, w);\r
2027                 }\r
2028                 else if(_parameters.size() >= 1 && _parameters[0] == L"SYSTEM")\r
2029                 {\r
2030                         replyString << L"201 INFO SYSTEM OK\r\n";\r
2031                         \r
2032                         boost::property_tree::wptree info;\r
2033                         \r
2034                         info.add(L"system.name",                                        caspar::get_system_product_name());\r
2035                         info.add(L"system.windows.name",                        caspar::get_win_product_name());\r
2036                         info.add(L"system.windows.service-pack",        caspar::get_win_sp_version());\r
2037                         info.add(L"system.cpu",                                         caspar::get_cpu_info());\r
2038         \r
2039                         BOOST_FOREACH(auto device, caspar::decklink::get_device_list())\r
2040                                 info.add(L"system.caspar.decklink.device", device);\r
2041 \r
2042                         BOOST_FOREACH(auto device, caspar::bluefish::get_device_list())\r
2043                                 info.add(L"system.caspar.bluefish.device", device);\r
2044                                 \r
2045                         info.add(L"system.caspar.flash",                                        caspar::flash::get_version());\r
2046                         info.add(L"system.caspar.template-host",                        caspar::flash::get_cg_version());\r
2047                         info.add(L"system.caspar.free-image",                           caspar::image::get_version());\r
2048                         info.add(L"system.caspar.ffmpeg.avcodec",                       caspar::ffmpeg::get_avcodec_version());\r
2049                         info.add(L"system.caspar.ffmpeg.avformat",                      caspar::ffmpeg::get_avformat_version());\r
2050                         info.add(L"system.caspar.ffmpeg.avfilter",                      caspar::ffmpeg::get_avfilter_version());\r
2051                         info.add(L"system.caspar.ffmpeg.avutil",                        caspar::ffmpeg::get_avutil_version());\r
2052                         info.add(L"system.caspar.ffmpeg.swscale",                       caspar::ffmpeg::get_swscale_version());\r
2053                                                                         \r
2054                         boost::property_tree::write_xml(replyString, info, w);\r
2055                 }\r
2056                 else if(_parameters.size() >= 1 && _parameters[0] == L"SERVER")\r
2057                 {\r
2058                         replyString << L"201 INFO SERVER OK\r\n";\r
2059                         \r
2060                         boost::property_tree::wptree info;\r
2061 \r
2062                         int index = 0;\r
2063                         BOOST_FOREACH(auto channel, channels_)\r
2064                                 info.add_child(L"channels.channel", channel->info())\r
2065                                         .add(L"index", ++index);\r
2066                         \r
2067                         boost::property_tree::write_xml(replyString, info, w);\r
2068                 }\r
2069                 else if(_parameters.size() >= 2 && _parameters[1] == L"DELAY")\r
2070                 {\r
2071                         replyString << L"201 INFO DELAY OK\r\n";\r
2072                         boost::property_tree::wptree info;\r
2073 \r
2074                         std::vector<std::wstring> split;\r
2075                         boost::split(split, _parameters[0], boost::is_any_of("-"));\r
2076                                         \r
2077                         int layer = std::numeric_limits<int>::min();\r
2078                         int channel = boost::lexical_cast<int>(split[0]) - 1;\r
2079 \r
2080                         if(split.size() > 1)\r
2081                                 layer = boost::lexical_cast<int>(split[1]);\r
2082                                 \r
2083                         if(layer == std::numeric_limits<int>::min())\r
2084                         {       \r
2085                                 info.add_child(L"channel-delay", channels_.at(channel)->delay_info());\r
2086                         }\r
2087                         else\r
2088                         {\r
2089                                 info.add_child(L"layer-delay", channels_.at(channel)->stage()->delay_info(layer).get())\r
2090                                         .add(L"index", layer);\r
2091                         }\r
2092                         boost::property_tree::xml_parser::write_xml(replyString, info, w);\r
2093                 }\r
2094                 else // channel\r
2095                 {                       \r
2096                         if(_parameters.size() >= 1)\r
2097                         {\r
2098                                 replyString << TEXT("201 INFO OK\r\n");\r
2099                                 boost::property_tree::wptree info;\r
2100 \r
2101                                 std::vector<std::wstring> split;\r
2102                                 boost::split(split, _parameters[0], boost::is_any_of("-"));\r
2103                                         \r
2104                                 int layer = std::numeric_limits<int>::min();\r
2105                                 int channel = boost::lexical_cast<int>(split[0]) - 1;\r
2106 \r
2107                                 if(split.size() > 1)\r
2108                                         layer = boost::lexical_cast<int>(split[1]);\r
2109                                 \r
2110                                 if(layer == std::numeric_limits<int>::min())\r
2111                                 {       \r
2112                                         info.add_child(L"channel", channels_.at(channel)->info())\r
2113                                                         .add(L"index", channel);\r
2114                                 }\r
2115                                 else\r
2116                                 {\r
2117                                         if(_parameters.size() >= 2)\r
2118                                         {\r
2119                                                 if(_parameters[1] == L"B")\r
2120                                                         info.add_child(L"producer", channels_.at(channel)->stage()->background(layer).get()->info());\r
2121                                                 else\r
2122                                                         info.add_child(L"producer", channels_.at(channel)->stage()->foreground(layer).get()->info());\r
2123                                         }\r
2124                                         else\r
2125                                         {\r
2126                                                 info.add_child(L"layer", channels_.at(channel)->stage()->info(layer).get())\r
2127                                                         .add(L"index", layer);\r
2128                                         }\r
2129                                 }\r
2130                                 boost::property_tree::xml_parser::write_xml(replyString, info, w);\r
2131                         }\r
2132                         else\r
2133                         {\r
2134                                 // This is needed for backwards compatibility with old clients\r
2135                                 replyString << TEXT("200 INFO OK\r\n");\r
2136                                 for(size_t n = 0; n < channels_.size(); ++n)\r
2137                                         GenerateChannelInfo(n, channels_[n], replyString);\r
2138                         }\r
2139 \r
2140                 }\r
2141         }\r
2142         catch(...)\r
2143         {\r
2144                 SetReplyString(TEXT("403 INFO ERROR\r\n"));\r
2145                 return false;\r
2146         }\r
2147 \r
2148         replyString << TEXT("\r\n");\r
2149         SetReplyString(replyString.str());\r
2150         return true;\r
2151 }\r
2152 \r
2153 bool ClsCommand::DoExecute()\r
2154 {\r
2155 /*\r
2156                 wav = audio\r
2157                 mp3 = audio\r
2158                 swf     = movie\r
2159                 dv  = movie\r
2160                 tga = still\r
2161                 col = still\r
2162         */\r
2163         std::wstringstream replyString;\r
2164         replyString << TEXT("200 CLS OK\r\n");\r
2165         replyString << ListMedia(GetMediaInfoRepo());\r
2166         replyString << TEXT("\r\n");\r
2167         SetReplyString(boost::to_upper_copy(replyString.str()));\r
2168         return true;\r
2169 }\r
2170 \r
2171 bool TlsCommand::DoExecute()\r
2172 {\r
2173         std::wstringstream replyString;\r
2174         replyString << TEXT("200 TLS OK\r\n");\r
2175 \r
2176         replyString << ListTemplates();\r
2177         replyString << TEXT("\r\n");\r
2178 \r
2179         SetReplyString(replyString.str());\r
2180         return true;\r
2181 }\r
2182 \r
2183 bool VersionCommand::DoExecute()\r
2184 {\r
2185         std::wstring replyString = TEXT("201 VERSION OK\r\n") + env::version() + TEXT("\r\n");\r
2186 \r
2187         if(_parameters.size() > 0)\r
2188         {\r
2189                 if(_parameters[0] == L"FLASH")\r
2190                         replyString = TEXT("201 VERSION OK\r\n") + flash::get_version() + TEXT("\r\n");\r
2191                 else if(_parameters[0] == L"TEMPLATEHOST")\r
2192                         replyString = TEXT("201 VERSION OK\r\n") + flash::get_cg_version() + TEXT("\r\n");\r
2193                 else if(_parameters[0] != L"SERVER")\r
2194                         replyString = TEXT("403 VERSION ERROR\r\n");\r
2195         }\r
2196 \r
2197         SetReplyString(replyString);\r
2198         return true;\r
2199 }\r
2200 \r
2201 bool ByeCommand::DoExecute()\r
2202 {\r
2203         GetClientInfo()->Disconnect();\r
2204         return true;\r
2205 }\r
2206 \r
2207 bool SetCommand::DoExecute()\r
2208 {\r
2209         std::wstring name = _parameters[0];\r
2210         std::transform(name.begin(), name.end(), name.begin(), toupper);\r
2211 \r
2212         std::wstring value = _parameters[1];\r
2213         std::transform(value.begin(), value.end(), value.begin(), toupper);\r
2214 \r
2215         if(name == TEXT("MODE"))\r
2216         {\r
2217                 auto format_desc = core::video_format_desc::get(value);\r
2218                 if(format_desc.format != core::video_format::invalid)\r
2219                 {\r
2220                         GetChannel()->set_video_format_desc(format_desc);\r
2221                         SetReplyString(TEXT("202 SET MODE OK\r\n"));\r
2222                 }\r
2223                 else\r
2224                         SetReplyString(TEXT("501 SET MODE FAILED\r\n"));\r
2225         }\r
2226         else\r
2227         {\r
2228                 this->SetReplyString(TEXT("403 SET ERROR\r\n"));\r
2229         }\r
2230 \r
2231         return true;\r
2232 }\r
2233 \r
2234 bool KillCommand::DoExecute()\r
2235 {\r
2236         GetShutdownServerNow().set_value(false); // False for not attempting to restart.\r
2237         return true;\r
2238 }\r
2239 \r
2240 bool RestartCommand::DoExecute()\r
2241 {\r
2242         GetShutdownServerNow().set_value(true); // True for attempting to restart\r
2243         return true;\r
2244 }\r
2245 \r
2246 }       //namespace amcp\r
2247 }}      //namespace caspar\r