]> git.sesse.net Git - casparcg/blob - protocol/amcp/AMCPCommandsImpl.cpp
Fixed broken CG UPDATE
[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                 auto consumer = create_consumer(_parameters);\r
843                 GetChannel()->output()->add(GetLayerIndex(consumer->index()), consumer);\r
844         \r
845                 SetReplyString(TEXT("202 ADD OK\r\n"));\r
846 \r
847                 return true;\r
848         }\r
849         catch(file_not_found&)\r
850         {\r
851                 CASPAR_LOG_CURRENT_EXCEPTION();\r
852                 SetReplyString(TEXT("404 ADD ERROR\r\n"));\r
853                 return false;\r
854         }\r
855         catch(...)\r
856         {\r
857                 CASPAR_LOG_CURRENT_EXCEPTION();\r
858                 SetReplyString(TEXT("502 ADD FAILED\r\n"));\r
859                 return false;\r
860         }\r
861 }\r
862 \r
863 bool RemoveCommand::DoExecute()\r
864 {       \r
865         //Perform loading of the clip\r
866         try\r
867         {\r
868                 auto index = GetLayerIndex(std::numeric_limits<int>::min());\r
869                 if(index == std::numeric_limits<int>::min())\r
870                         index = create_consumer(_parameters)->index();\r
871 \r
872                 GetChannel()->output()->remove(index);\r
873 \r
874                 SetReplyString(TEXT("202 REMOVE OK\r\n"));\r
875 \r
876                 return true;\r
877         }\r
878         catch(file_not_found&)\r
879         {\r
880                 CASPAR_LOG_CURRENT_EXCEPTION();\r
881                 SetReplyString(TEXT("404 REMOVE ERROR\r\n"));\r
882                 return false;\r
883         }\r
884         catch(...)\r
885         {\r
886                 CASPAR_LOG_CURRENT_EXCEPTION();\r
887                 SetReplyString(TEXT("502 REMOVE FAILED\r\n"));\r
888                 return false;\r
889         }\r
890 }\r
891 \r
892 safe_ptr<core::frame_producer> RouteCommand::TryCreateProducer(AMCPCommand& command, std::wstring const& uri)\r
893 {\r
894         safe_ptr<core::frame_producer> pFP(frame_producer::empty());\r
895 \r
896         auto tokens = core::parameters::protocol_split(uri);\r
897         auto src_channel_layer_token = tokens[0] == L"route" ? tokens[1] : uri;\r
898         std::vector<std::wstring> src_channel_layer;\r
899         boost::split(src_channel_layer, src_channel_layer_token, boost::is_any_of("-"));\r
900         bool is_channel_layer_spec = src_channel_layer.size() == 2;\r
901         bool is_channel_spec = src_channel_layer.size() == 1;\r
902         int src_channel_index;\r
903 \r
904         if (is_channel_layer_spec || is_channel_spec)\r
905         {\r
906                 try\r
907                 {\r
908                         src_channel_index = boost::lexical_cast<int>(src_channel_layer[0]);\r
909                 }\r
910                 catch(const boost::bad_lexical_cast&)\r
911                 {\r
912                         is_channel_layer_spec = false;\r
913                         is_channel_spec = false;\r
914                 }\r
915         }\r
916 \r
917         int src_layer_index = -1;\r
918 \r
919         if (is_channel_layer_spec)\r
920         {\r
921                 if (!src_channel_layer[1].empty())\r
922                 {\r
923                         try\r
924                         {\r
925                                 src_layer_index = boost::lexical_cast<int>(src_channel_layer[1]);\r
926                         }\r
927                         catch(const boost::bad_lexical_cast&)\r
928                         {\r
929                                 is_channel_layer_spec = false;\r
930                         }\r
931                 }\r
932                 else\r
933                         is_channel_layer_spec = false;\r
934         }\r
935 \r
936         if (tokens[0] == L"route" || is_channel_layer_spec || is_channel_spec) // It looks like a route\r
937         {\r
938                 // Find the source channel\r
939                 auto channels = command.GetChannels();\r
940                 auto src_channel = std::find_if(\r
941                         channels.begin(), \r
942                         channels.end(), \r
943                         [src_channel_index](const safe_ptr<core::video_channel>& item) { return item->index() == src_channel_index; }\r
944                 );\r
945                 if (src_channel == channels.end())\r
946                         BOOST_THROW_EXCEPTION(null_argument() << msg_info("src channel not found"));\r
947 \r
948                 // Find the source layer (if one is given)\r
949                 if (is_channel_layer_spec)\r
950                         pFP = create_layer_producer(command.GetChannel()->mixer(), (*src_channel)->stage(), src_layer_index);\r
951                 else \r
952                         pFP = create_channel_producer(command.GetChannel()->mixer(), *src_channel);\r
953         }\r
954         return pFP;\r
955 }\r
956 \r
957 bool RouteCommand::DoExecute()\r
958 {       \r
959         try\r
960         {\r
961                 auto pFP = RouteCommand::TryCreateProducer(\r
962                                 *this, _parameters.at_original(0));\r
963 \r
964                 if (pFP != frame_producer::empty())\r
965                 {\r
966                         GetChannel()->stage()->load(GetLayerIndex(), pFP, true);\r
967                         GetChannel()->stage()->play(GetLayerIndex());\r
968 \r
969                         SetReplyString(TEXT("202 ROUTE OK\r\n"));\r
970                 \r
971                         return true;\r
972                 }\r
973                 SetReplyString(TEXT("404 ROUTE ERROR\r\n"));\r
974                 return false;\r
975         }\r
976         catch(file_not_found&)\r
977         {\r
978                 CASPAR_LOG_CURRENT_EXCEPTION();\r
979                 SetReplyString(TEXT("404 ROUTE ERROR\r\n"));\r
980                 return false;\r
981         }\r
982         catch(...)\r
983         {\r
984                 CASPAR_LOG_CURRENT_EXCEPTION();\r
985                 SetReplyString(TEXT("502 ROUTE FAILED\r\n"));\r
986                 return false;\r
987         }\r
988 }\r
989 \r
990 bool LoadCommand::DoExecute()\r
991 {       \r
992         //Perform loading of the clip\r
993         try\r
994         {\r
995                 auto uri_tokens = parameters::protocol_split(_parameters.at_original(0));\r
996                 auto pFP = frame_producer::empty();\r
997                 if (uri_tokens[0] == L"route")\r
998                 {\r
999                         pFP = RouteCommand::TryCreateProducer(*this, _parameters.at_original(0));\r
1000                 }\r
1001                 if (pFP == frame_producer::empty())\r
1002                 {\r
1003                         pFP = create_producer(GetChannel()->mixer(), _parameters);\r
1004                 }\r
1005                 GetChannel()->stage()->load(GetLayerIndex(), pFP, true);\r
1006         \r
1007                 SetReplyString(TEXT("202 LOAD OK\r\n"));\r
1008 \r
1009                 return true;\r
1010         }\r
1011         catch(file_not_found&)\r
1012         {\r
1013                 CASPAR_LOG_CURRENT_EXCEPTION();\r
1014                 SetReplyString(TEXT("404 LOAD ERROR\r\n"));\r
1015                 return false;\r
1016         }\r
1017         catch(...)\r
1018         {\r
1019                 CASPAR_LOG_CURRENT_EXCEPTION();\r
1020                 SetReplyString(TEXT("502 LOAD FAILED\r\n"));\r
1021                 return false;\r
1022         }\r
1023 }\r
1024 \r
1025 \r
1026 \r
1027 //std::function<std::wstring()> channel_cg_add_command::parse(const std::wstring& message, const std::vector<renderer::render_device_ptr>& channels)\r
1028 //{\r
1029 //      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
1030 //\r
1031 //      boost::wsmatch what;\r
1032 //      if(!boost::regex_match(message, what, expr))\r
1033 //              return nullptr;\r
1034 //\r
1035 //      auto info = channel_info::parse(what, channels);\r
1036 //\r
1037 //      int flash_layer_index = boost::lexical_cast<int>(what["FLASH_LAYER"].str());\r
1038 //\r
1039 //      std::wstring templatename = what["TEMPLATE"].str();\r
1040 //      bool play_on_load = what["PLAY_ON_LOAD"].matched ? what["PLAY_ON_LOAD"].str() != L"0" : 0;\r
1041 //      std::wstring start_label = what["START_LABEL"].str();   \r
1042 //      std::wstring data = get_data(what["DATA"].str());\r
1043 //      \r
1044 //      boost::replace_all(templatename, "\"", "");\r
1045 //\r
1046 //      return [=]() -> std::wstring\r
1047 //      {       \r
1048 //              std::wstring fullFilename = flash::flash_producer::find_template(server::template_folder() + templatename);\r
1049 //              if(fullFilename.empty())\r
1050 //                      BOOST_THROW_EXCEPTION(file_not_found());\r
1051 //      \r
1052 //              std::wstring extension = boost::filesystem::wpath(fullFilename).extension();\r
1053 //              std::wstring filename = templatename;\r
1054 //              filename.append(extension);\r
1055 //\r
1056 //              flash::flash::get_default_cg_producer(info.video_channel, std::max<int>(DEFAULT_CHANNEL_LAYER+1, info.layer_index))\r
1057 //                      ->add(flash_layer_index, filename, play_on_load, start_label, data);\r
1058 //\r
1059 //              CASPAR_LOG(info) << L"Executed [amcp_channel_cg_add]";\r
1060 //              return L"";\r
1061 //      };\r
1062 \r
1063 bool LoadbgCommand::DoExecute()\r
1064 {\r
1065         transition_info transitionInfo;\r
1066         \r
1067         bool bLoop = false;\r
1068 \r
1069         // TRANSITION\r
1070 \r
1071         std::wstring message;\r
1072         for(size_t n = 0; n < _parameters.size(); ++n)\r
1073                 message += _parameters[n] + L" ";\r
1074                 \r
1075         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
1076         boost::wsmatch what;\r
1077         if(boost::regex_match(message, what, expr))\r
1078         {\r
1079                 auto transition = what["TRANSITION"].str();\r
1080                 transitionInfo.duration = lexical_cast_or_default<size_t>(what["DURATION"].str());\r
1081                 auto direction = what["DIRECTION"].matched ? what["DIRECTION"].str() : L"";\r
1082                 auto tween = what["TWEEN"].matched ? what["TWEEN"].str() : L"";\r
1083                 transitionInfo.tweener = get_tweener(tween);            \r
1084 \r
1085                 if(transition == TEXT("CUT"))\r
1086                         transitionInfo.type = transition::cut;\r
1087                 else if(transition == TEXT("MIX"))\r
1088                         transitionInfo.type = transition::mix;\r
1089                 else if(transition == TEXT("PUSH"))\r
1090                         transitionInfo.type = transition::push;\r
1091                 else if(transition == TEXT("SLIDE"))\r
1092                         transitionInfo.type = transition::slide;\r
1093                 else if(transition == TEXT("WIPE"))\r
1094                         transitionInfo.type = transition::wipe;\r
1095                 \r
1096                 if(direction == TEXT("FROMLEFT"))\r
1097                         transitionInfo.direction = transition_direction::from_left;\r
1098                 else if(direction == TEXT("FROMRIGHT"))\r
1099                         transitionInfo.direction = transition_direction::from_right;\r
1100                 else if(direction == TEXT("LEFT"))\r
1101                         transitionInfo.direction = transition_direction::from_right;\r
1102                 else if(direction == TEXT("RIGHT"))\r
1103                         transitionInfo.direction = transition_direction::from_left;\r
1104         }\r
1105         \r
1106         //Perform loading of the clip\r
1107         try\r
1108         {\r
1109                 auto uri_tokens = core::parameters::protocol_split(_parameters.at_original(0));\r
1110                 auto pFP = frame_producer::empty();\r
1111                 if (uri_tokens[0] == L"route")\r
1112                 {\r
1113                         pFP = RouteCommand::TryCreateProducer(*this, _parameters.at_original(0));\r
1114                 }\r
1115                 if (pFP == frame_producer::empty())\r
1116                 {\r
1117                         pFP = create_producer(GetChannel()->mixer(), _parameters);\r
1118                 }\r
1119                 if(pFP == frame_producer::empty())\r
1120                         BOOST_THROW_EXCEPTION(file_not_found() << msg_info(_parameters.size() > 0 ? narrow(_parameters[0]) : ""));\r
1121 \r
1122                 bool auto_play = std::find(_parameters.begin(), _parameters.end(), L"AUTO") != _parameters.end();\r
1123 \r
1124                 auto pFP2 = create_transition_producer(GetChannel()->get_video_format_desc().field_mode, pFP, transitionInfo);\r
1125                 GetChannel()->stage()->load(GetLayerIndex(), pFP2, false, auto_play ? transitionInfo.duration : -1); // TODO: LOOP\r
1126         \r
1127                 SetReplyString(TEXT("202 LOADBG OK\r\n"));\r
1128 \r
1129                 return true;\r
1130         }\r
1131         catch(file_not_found&)\r
1132         {               \r
1133                 CASPAR_LOG(error) << L"File not found. No match found for parameters. Check syntax:" << _parameters.get_original_string();\r
1134                 SetReplyString(TEXT("404 LOADBG ERROR\r\n"));\r
1135                 return false;\r
1136         }\r
1137         catch(...)\r
1138         {\r
1139                 CASPAR_LOG_CURRENT_EXCEPTION();\r
1140                 SetReplyString(TEXT("502 LOADBG FAILED\r\n"));\r
1141                 return false;\r
1142         }\r
1143 }\r
1144 \r
1145 bool PauseCommand::DoExecute()\r
1146 {\r
1147         try\r
1148         {\r
1149                 GetChannel()->stage()->pause(GetLayerIndex());\r
1150                 SetReplyString(TEXT("202 PAUSE OK\r\n"));\r
1151                 return true;\r
1152         }\r
1153         catch(...)\r
1154         {\r
1155                 SetReplyString(TEXT("501 PAUSE FAILED\r\n"));\r
1156         }\r
1157 \r
1158         return false;\r
1159 }\r
1160 \r
1161 bool PlayCommand::DoExecute()\r
1162 {\r
1163         try\r
1164         {\r
1165                 if(!_parameters.empty())\r
1166                 {\r
1167                         LoadbgCommand lbg;\r
1168                         lbg.SetChannels(GetChannels());\r
1169                         lbg.SetChannel(GetChannel());\r
1170                         lbg.SetChannelIndex(GetChannelIndex());\r
1171                         lbg.SetLayerIntex(GetLayerIndex());\r
1172                         lbg.SetClientInfo(GetClientInfo());\r
1173                         lbg.SetParameters(_parameters);\r
1174                         if(!lbg.Execute())\r
1175                                 throw std::exception();\r
1176                 }\r
1177 \r
1178                 GetChannel()->stage()->play(GetLayerIndex());\r
1179                 \r
1180                 SetReplyString(TEXT("202 PLAY OK\r\n"));\r
1181                 return true;\r
1182         }\r
1183         catch(...)\r
1184         {\r
1185                 SetReplyString(TEXT("501 PLAY FAILED\r\n"));\r
1186         }\r
1187 \r
1188         return false;\r
1189 }\r
1190 \r
1191 bool StopCommand::DoExecute()\r
1192 {\r
1193         try\r
1194         {\r
1195                 GetChannel()->stage()->stop(GetLayerIndex());\r
1196                 SetReplyString(TEXT("202 STOP OK\r\n"));\r
1197                 return true;\r
1198         }\r
1199         catch(...)\r
1200         {\r
1201                 SetReplyString(TEXT("501 STOP FAILED\r\n"));\r
1202         }\r
1203 \r
1204         return false;\r
1205 }\r
1206 \r
1207 bool ClearCommand::DoExecute()\r
1208 {\r
1209         int index = GetLayerIndex(std::numeric_limits<int>::min());\r
1210         if(index != std::numeric_limits<int>::min())\r
1211                 GetChannel()->stage()->clear(index);\r
1212         else\r
1213                 GetChannel()->stage()->clear();\r
1214                 \r
1215         SetReplyString(TEXT("202 CLEAR OK\r\n"));\r
1216 \r
1217         return true;\r
1218 }\r
1219 \r
1220 bool PrintCommand::DoExecute()\r
1221 {\r
1222         parameters params;\r
1223         params.push_back(L"IMAGE");\r
1224         GetChannel()->output()->add(create_consumer(params));\r
1225                 \r
1226         SetReplyString(TEXT("202 PRINT OK\r\n"));\r
1227 \r
1228         return true;\r
1229 }\r
1230 \r
1231 bool LogCommand::DoExecute()\r
1232 {\r
1233         if(_parameters.at(0) == L"LEVEL")\r
1234                 log::set_log_level(_parameters.at(1));\r
1235 \r
1236         SetReplyString(TEXT("202 LOG OK\r\n"));\r
1237 \r
1238         return true;\r
1239 }\r
1240 \r
1241 bool CGCommand::DoExecute()\r
1242 {\r
1243         try\r
1244         {\r
1245                 std::wstring command = _parameters[0];\r
1246                 if(command == TEXT("ADD"))\r
1247                         return DoExecuteAdd();\r
1248                 else if(command == TEXT("PLAY"))\r
1249                         return DoExecutePlay();\r
1250                 else if(command == TEXT("STOP"))\r
1251                         return DoExecuteStop();\r
1252                 else if(command == TEXT("NEXT"))\r
1253                         return DoExecuteNext();\r
1254                 else if(command == TEXT("REMOVE"))\r
1255                         return DoExecuteRemove();\r
1256                 else if(command == TEXT("CLEAR"))\r
1257                         return DoExecuteClear();\r
1258                 else if(command == TEXT("UPDATE"))\r
1259                         return DoExecuteUpdate();\r
1260                 else if(command == TEXT("INVOKE"))\r
1261                         return DoExecuteInvoke();\r
1262                 else if(command == TEXT("INFO"))\r
1263                         return DoExecuteInfo();\r
1264         }\r
1265         catch(...)\r
1266         {\r
1267                 CASPAR_LOG_CURRENT_EXCEPTION();\r
1268         }\r
1269 \r
1270         SetReplyString(TEXT("403 CG ERROR\r\n"));\r
1271         return false;\r
1272 }\r
1273 \r
1274 bool CGCommand::ValidateLayer(const std::wstring& layerstring) {\r
1275         int length = layerstring.length();\r
1276         for(int i = 0; i < length; ++i) {\r
1277                 if(!_istdigit(layerstring[i])) {\r
1278                         return false;\r
1279                 }\r
1280         }\r
1281 \r
1282         return true;\r
1283 }\r
1284 \r
1285 bool CGCommand::DoExecuteAdd() {\r
1286         //CG 1 ADD 0 "template_folder/templatename" [STARTLABEL] 0/1 [DATA]\r
1287 \r
1288         int layer = 0;                          //_parameters[1]\r
1289 //      std::wstring templateName;      //_parameters[2]\r
1290         std::wstring label;             //_parameters[3]\r
1291         bool bDoStart = false;          //_parameters[3] alt. _parameters[4]\r
1292 //      std::wstring data;                      //_parameters[4] alt. _parameters[5]\r
1293 \r
1294         if(_parameters.size() < 4) \r
1295         {\r
1296                 SetReplyString(TEXT("402 CG ERROR\r\n"));\r
1297                 return false;\r
1298         }\r
1299         unsigned int dataIndex = 4;\r
1300 \r
1301         if(!ValidateLayer(_parameters[1])) \r
1302         {\r
1303                 SetReplyString(TEXT("403 CG ERROR\r\n"));\r
1304                 return false;\r
1305         }\r
1306 \r
1307         layer = _ttoi(_parameters[1].c_str());\r
1308 \r
1309         if(_parameters[3].length() > 1) \r
1310         {       //read label\r
1311                 label = _parameters.at_original(3);\r
1312                 ++dataIndex;\r
1313 \r
1314                 if(_parameters.size() > 4 && _parameters[4].length() > 0)       //read play-on-load-flag\r
1315                         bDoStart = (_parameters[4][0]==TEXT('1')) ? true : false;\r
1316                 else \r
1317                 {\r
1318                         SetReplyString(TEXT("402 CG ERROR\r\n"));\r
1319                         return false;\r
1320                 }\r
1321         }\r
1322         else if(_parameters[3].length() > 0) {  //read play-on-load-flag\r
1323                 bDoStart = (_parameters[3][0]==TEXT('1')) ? true : false;\r
1324         }\r
1325         else \r
1326         {\r
1327                 SetReplyString(TEXT("403 CG ERROR\r\n"));\r
1328                 return false;\r
1329         }\r
1330 \r
1331         const TCHAR* pDataString = 0;\r
1332         std::wstringstream data;\r
1333         std::wstring dataFromFile;\r
1334         if(_parameters.size() > dataIndex) \r
1335         {       //read data\r
1336                 const std::wstring& dataString = _parameters.at_original(dataIndex);\r
1337 \r
1338                 if(dataString[0] == TEXT('<')) //the data is an XML-string\r
1339                         pDataString = dataString.c_str();\r
1340                 else \r
1341                 {\r
1342                         //The data is not an XML-string, it must be a filename\r
1343                         std::wstring filename = env::data_folder();\r
1344                         filename.append(dataString);\r
1345                         filename.append(TEXT(".ftd"));\r
1346 \r
1347                         dataFromFile = read_file(boost::filesystem::wpath(filename));\r
1348                         pDataString = dataFromFile.c_str();\r
1349                 }\r
1350         }\r
1351         \r
1352         std::wstring fullFilename = flash::find_template(env::template_folder() + _parameters[2]);\r
1353         std::wstring extension = boost::filesystem::wpath(fullFilename).extension();\r
1354         std::wstring filename = _parameters[2];\r
1355 \r
1356         if(!fullFilename.empty())\r
1357         {\r
1358                 auto call = (boost::wformat(L"ADD %1% %2% %3% %4% %5%") % layer % filename % bDoStart % label % (std::wstring() + (pDataString ? pDataString : L""))).str();\r
1359                 auto producer = GetChannel()->stage()->foreground(GetLayerIndex(9999)).get();\r
1360 \r
1361                 if(producer->print().find(L"flash") == std::string::npos)\r
1362                 { \r
1363                         producer = flash::create_producer(GetChannel()->mixer(), boost::assign::list_of<std::wstring>());\r
1364 \r
1365                         if (producer != core::frame_producer::empty())\r
1366                         {\r
1367                                 producer = make_safe<flash::cg_producer>(producer);\r
1368                                 producer->call(call).wait();\r
1369                                 GetChannel()->stage()->load(GetLayerIndex(9999), producer);\r
1370                                 GetChannel()->stage()->play(GetLayerIndex(9999));\r
1371                         }\r
1372                 }\r
1373                 else\r
1374                 {\r
1375                         GetChannel()->stage()->call(GetLayerIndex(9999), true, call).wait();\r
1376                 }\r
1377                 \r
1378                 SetReplyString(TEXT("202 CG OK\r\n"));\r
1379 \r
1380                 return true;\r
1381         }\r
1382         else\r
1383         {                       \r
1384                 filename.append(extension);\r
1385                 std::vector<std::wstring> parameters = boost::assign::list_of<std::wstring>(filename);\r
1386                 auto producer = html::create_producer(GetChannel()->mixer(), core::parameters(parameters));     \r
1387                                 \r
1388                 if (producer != core::frame_producer::empty())\r
1389                 {\r
1390                         if (pDataString)\r
1391                         {\r
1392                                 producer->call((boost::wformat(L"UPDATE %1% \"%2%\"") % layer % pDataString).str()).wait();\r
1393                         }\r
1394 \r
1395                         if (bDoStart)\r
1396                         {\r
1397                                 producer->call((boost::wformat(L"PLAY %1%") % layer).str()).wait();\r
1398                         }\r
1399                         \r
1400                         GetChannel()->stage()->load(GetLayerIndex(9999), producer);\r
1401                         GetChannel()->stage()->play(GetLayerIndex(9999));\r
1402 \r
1403                         SetReplyString(TEXT("202 CG OK\r\n"));\r
1404 \r
1405                         return true;\r
1406                 };\r
1407         }\r
1408 \r
1409         CASPAR_LOG(warning) << "Could not find template " << _parameters[2];\r
1410         SetReplyString(TEXT("404 CG ERROR\r\n"));\r
1411         \r
1412         return true;\r
1413 }\r
1414 \r
1415 bool CGCommand::DoExecutePlay()\r
1416 {\r
1417         if(_parameters.size() > 1)\r
1418         {\r
1419                 if(!ValidateLayer(_parameters[1])) \r
1420                 {\r
1421                         SetReplyString(TEXT("403 CG ERROR\r\n"));\r
1422                         return false;\r
1423                 }\r
1424                 int layer = _ttoi(_parameters[1].c_str());\r
1425                 \r
1426                 try\r
1427                 {\r
1428                         GetChannel()->stage()->call(GetLayerIndex(9999), true, (boost::wformat(L"PLAY %1%") % layer).str()).wait();\r
1429                 }\r
1430                 catch (const caspar::not_supported&)\r
1431                 {\r
1432                         SetReplyString(TEXT("404 CG ERROR\r\n"));\r
1433                         return true;\r
1434                 }\r
1435         }\r
1436         else\r
1437         {\r
1438                 SetReplyString(TEXT("402 CG ERROR\r\n"));\r
1439                 return true;\r
1440         }\r
1441 \r
1442         SetReplyString(TEXT("202 CG OK\r\n"));\r
1443         return true;\r
1444 }\r
1445 \r
1446 bool CGCommand::DoExecuteStop() \r
1447 {\r
1448         if(_parameters.size() > 1)\r
1449         {\r
1450                 if(!ValidateLayer(_parameters[1])) \r
1451                 {\r
1452                         SetReplyString(TEXT("403 CG ERROR\r\n"));\r
1453                         return false;\r
1454                 }\r
1455                 int layer = _ttoi(_parameters[1].c_str());\r
1456                 \r
1457                 try\r
1458                 {\r
1459                         GetChannel()->stage()->call(GetLayerIndex(9999), true, (boost::wformat(L"STOP %1%") % layer).str()).wait();\r
1460                 }\r
1461                 catch (const caspar::not_supported&)\r
1462                 {\r
1463                         SetReplyString(TEXT("404 CG ERROR\r\n"));\r
1464                         return true;\r
1465                 }\r
1466         }\r
1467         else \r
1468         {\r
1469                 SetReplyString(TEXT("402 CG ERROR\r\n"));\r
1470                 return true;\r
1471         }\r
1472 \r
1473         SetReplyString(TEXT("202 CG OK\r\n"));\r
1474         return true;\r
1475 }\r
1476 \r
1477 bool CGCommand::DoExecuteNext()\r
1478 {\r
1479         if(_parameters.size() > 1) \r
1480         {\r
1481                 if(!ValidateLayer(_parameters[1])) \r
1482                 {\r
1483                         SetReplyString(TEXT("403 CG ERROR\r\n"));\r
1484                         return false;\r
1485                 }\r
1486 \r
1487                 int layer = _ttoi(_parameters[1].c_str());\r
1488 \r
1489                 try\r
1490                 {\r
1491                         GetChannel()->stage()->call(GetLayerIndex(9999), true, (boost::wformat(L"NEXT %1%") % layer).str()).wait();\r
1492                 }\r
1493                 catch (const caspar::not_supported&)\r
1494                 {\r
1495                         SetReplyString(TEXT("404 CG ERROR\r\n"));\r
1496                         return true;\r
1497                 }\r
1498         }\r
1499         else \r
1500         {\r
1501                 SetReplyString(TEXT("402 CG ERROR\r\n"));\r
1502                 return true;\r
1503         }\r
1504 \r
1505         SetReplyString(TEXT("202 CG OK\r\n"));\r
1506         return true;\r
1507 }\r
1508 \r
1509 bool CGCommand::DoExecuteRemove() \r
1510 {\r
1511         if(_parameters.size() > 1) \r
1512         {\r
1513                 if(!ValidateLayer(_parameters[1])) \r
1514                 {\r
1515                         SetReplyString(TEXT("403 CG ERROR\r\n"));\r
1516                         return false;\r
1517                 }\r
1518 \r
1519                 int layer = _ttoi(_parameters[1].c_str());\r
1520 \r
1521                 try\r
1522                 {\r
1523                         GetChannel()->stage()->call(GetLayerIndex(9999), true, (boost::wformat(L"REMOVE %1%") % layer).str()).wait();\r
1524                 }\r
1525                 catch (const caspar::not_supported&)\r
1526                 {\r
1527                         SetReplyString(TEXT("404 CG ERROR\r\n"));\r
1528                         return true;\r
1529                 }\r
1530         }\r
1531         else \r
1532         {\r
1533                 SetReplyString(TEXT("402 CG ERROR\r\n"));\r
1534                 return true;\r
1535         }\r
1536 \r
1537         SetReplyString(TEXT("202 CG OK\r\n"));\r
1538         return true;\r
1539 }\r
1540 \r
1541 bool CGCommand::DoExecuteClear() \r
1542 {\r
1543         GetChannel()->stage()->clear(GetLayerIndex(9999));\r
1544         SetReplyString(TEXT("202 CG OK\r\n"));\r
1545         return true;\r
1546 }\r
1547 \r
1548 bool CGCommand::DoExecuteUpdate() \r
1549 {\r
1550         try\r
1551         {\r
1552                 if(!ValidateLayer(_parameters.at(1)))\r
1553                 {\r
1554                         SetReplyString(TEXT("403 CG ERROR\r\n"));\r
1555                         return false;\r
1556                 }\r
1557                                                 \r
1558                 std::wstring dataString = _parameters.at_original(2);\r
1559                 if(dataString.at(0) != TEXT('<'))\r
1560                 {\r
1561                         //The data is not an XML-string, it must be a filename\r
1562                         std::wstring filename = env::data_folder();\r
1563                         filename.append(dataString);\r
1564                         filename.append(TEXT(".ftd"));\r
1565 \r
1566                         dataString = read_file(boost::filesystem::wpath(filename));\r
1567                 }               \r
1568 \r
1569                 int layer = _ttoi(_parameters.at(1).c_str());\r
1570                 \r
1571                 try\r
1572                 {\r
1573                         GetChannel()->stage()->call(GetLayerIndex(9999), true, (boost::wformat(L"UPDATE %1% %2%") % layer % dataString).str()).wait();\r
1574                 }\r
1575                 catch (const caspar::not_supported&)\r
1576                 {\r
1577                         SetReplyString(TEXT("404 CG ERROR\r\n"));\r
1578                         return true;\r
1579                 }\r
1580         }\r
1581         catch(...)\r
1582         {\r
1583                 SetReplyString(TEXT("402 CG ERROR\r\n"));\r
1584                 return true;\r
1585         }\r
1586 \r
1587         SetReplyString(TEXT("202 CG OK\r\n"));\r
1588         return true;\r
1589 }\r
1590 \r
1591 bool CGCommand::DoExecuteInvoke() \r
1592 {\r
1593         std::wstringstream replyString;\r
1594         replyString << TEXT("201 CG OK\r\n");\r
1595 \r
1596         if(_parameters.size() > 2)\r
1597         {\r
1598                 if(!ValidateLayer(_parameters[1]))\r
1599                 {\r
1600                         SetReplyString(TEXT("403 CG ERROR\r\n"));\r
1601                         return false;\r
1602                 }\r
1603 \r
1604                 int layer = _ttoi(_parameters[1].c_str());\r
1605 \r
1606                 try\r
1607                 {\r
1608                         auto result = GetChannel()->stage()->call(GetLayerIndex(9999), true, (boost::wformat(L"INVOKE %1% \"%2%\"") % layer % _parameters.at_original(2)).str()).get();\r
1609                         replyString << result << TEXT("\r\n"); \r
1610                 }\r
1611                 catch (const caspar::not_supported&)\r
1612                 {\r
1613                         SetReplyString(TEXT("404 CG ERROR\r\n"));\r
1614                         return true;\r
1615                 }\r
1616         }\r
1617         else \r
1618         {\r
1619                 SetReplyString(TEXT("402 CG ERROR\r\n"));\r
1620                 return true;\r
1621         }\r
1622         \r
1623         SetReplyString(replyString.str());\r
1624         return true;\r
1625 }\r
1626 \r
1627 bool CGCommand::DoExecuteInfo() \r
1628 {\r
1629         std::wstringstream replyString;\r
1630         replyString << TEXT("201 CG OK\r\n");\r
1631 \r
1632         if(_parameters.size() > 1)\r
1633         {\r
1634                 if(!ValidateLayer(_parameters[1]))\r
1635                 {\r
1636                         SetReplyString(TEXT("403 CG ERROR\r\n"));\r
1637                         return false;\r
1638                 }\r
1639 \r
1640                 int layer = _ttoi(_parameters[1].c_str());\r
1641 \r
1642                 try\r
1643                 {\r
1644                         auto desc = GetChannel()->stage()->call(GetLayerIndex(9999), true, (boost::wformat(L"INFO %1%") % layer).str()).get();\r
1645                                 \r
1646                         replyString << desc << TEXT("\r\n"); \r
1647                 }\r
1648                 catch (const caspar::not_supported&)\r
1649                 {\r
1650                         SetReplyString(TEXT("404 CG ERROR\r\n"));\r
1651                         return true;\r
1652                 }\r
1653         }\r
1654         else \r
1655         {\r
1656                 try\r
1657                 {\r
1658                         auto info = GetChannel()->stage()->call(GetLayerIndex(9999), true, (boost::wformat(L"INFO")).str()).get();\r
1659                         replyString << info << TEXT("\r\n"); \r
1660                 }\r
1661                 catch (const caspar::not_supported&)\r
1662                 {\r
1663                         SetReplyString(TEXT("404 CG ERROR\r\n"));\r
1664                         return true;\r
1665                 }\r
1666         }       \r
1667 \r
1668         SetReplyString(replyString.str());\r
1669         return true;\r
1670 }\r
1671 \r
1672 bool DataCommand::DoExecute()\r
1673 {\r
1674         std::wstring command = _parameters[0];\r
1675         if(command == TEXT("STORE"))\r
1676                 return DoExecuteStore();\r
1677         else if(command == TEXT("RETRIEVE"))\r
1678                 return DoExecuteRetrieve();\r
1679         else if(command == TEXT("REMOVE"))\r
1680                 return DoExecuteRemove();\r
1681         else if(command == TEXT("LIST"))\r
1682                 return DoExecuteList();\r
1683 \r
1684         SetReplyString(TEXT("403 DATA ERROR\r\n"));\r
1685         return false;\r
1686 }\r
1687 \r
1688 bool DataCommand::DoExecuteStore() \r
1689 {\r
1690         if(_parameters.size() < 3) \r
1691         {\r
1692                 SetReplyString(TEXT("402 DATA STORE ERROR\r\n"));\r
1693                 return false;\r
1694         }\r
1695 \r
1696         std::wstring filename = env::data_folder();\r
1697         filename.append(_parameters[1]);\r
1698         filename.append(TEXT(".ftd"));\r
1699 \r
1700         auto data_path = boost::filesystem::wpath(\r
1701                         boost::filesystem::wpath(filename).parent_path());\r
1702         \r
1703         if(!boost::filesystem::exists(data_path))\r
1704                 boost::filesystem::create_directories(data_path);\r
1705 \r
1706         std::wofstream datafile(filename.c_str());\r
1707 \r
1708         if(!datafile) \r
1709         {\r
1710                 SetReplyString(TEXT("501 DATA STORE FAILED\r\n"));\r
1711                 return false;\r
1712         }\r
1713 \r
1714         datafile << static_cast<wchar_t>(65279); // UTF-8 BOM character\r
1715         datafile << _parameters.at_original(2) << std::flush;\r
1716         datafile.close();\r
1717 \r
1718         std::wstring replyString = TEXT("202 DATA STORE OK\r\n");\r
1719         SetReplyString(replyString);\r
1720         return true;\r
1721 }\r
1722 \r
1723 bool DataCommand::DoExecuteRetrieve() \r
1724 {\r
1725         if(_parameters.size() < 2) \r
1726         {\r
1727                 SetReplyString(TEXT("402 DATA RETRIEVE ERROR\r\n"));\r
1728                 return false;\r
1729         }\r
1730 \r
1731         std::wstring filename = env::data_folder();\r
1732         filename.append(_parameters[1]);\r
1733         filename.append(TEXT(".ftd"));\r
1734 \r
1735         std::wstring file_contents = read_file(boost::filesystem::wpath(filename));\r
1736 \r
1737         if (file_contents.empty()) \r
1738         {\r
1739                 SetReplyString(TEXT("404 DATA RETRIEVE ERROR\r\n"));\r
1740                 return false;\r
1741         }\r
1742 \r
1743         std::wstringstream reply;\r
1744         reply << TEXT("201 DATA RETRIEVE OK\r\n");\r
1745 \r
1746         std::wstringstream file_contents_stream(file_contents);\r
1747         std::wstring line;\r
1748         bool bFirstLine = true;\r
1749         \r
1750         while(std::getline(file_contents_stream, line))\r
1751         {\r
1752                 if(!bFirstLine)\r
1753                         reply << "\n";\r
1754                 else\r
1755                         bFirstLine = false;\r
1756 \r
1757                 reply << line;\r
1758         }\r
1759 \r
1760         reply << "\r\n";\r
1761         SetReplyString(reply.str());\r
1762         return true;\r
1763 }\r
1764 \r
1765 bool DataCommand::DoExecuteRemove() \r
1766\r
1767         if (_parameters.size() < 2) \r
1768         {\r
1769                 SetReplyString(TEXT("402 DATA REMOVE ERROR\r\n"));\r
1770                 return false;\r
1771         }\r
1772 \r
1773         std::wstring filename = env::data_folder();\r
1774         filename.append(_parameters[1]);\r
1775         filename.append(TEXT(".ftd"));\r
1776 \r
1777         if (!boost::filesystem::exists(filename)) \r
1778         {\r
1779                 SetReplyString(TEXT("404 DATA REMOVE ERROR\r\n"));\r
1780                 return false;\r
1781         }\r
1782 \r
1783         if (!boost::filesystem::remove(filename))\r
1784         {\r
1785                 SetReplyString(TEXT("403 DATA REMOVE ERROR\r\n"));\r
1786                 return false;\r
1787         }\r
1788 \r
1789         SetReplyString(TEXT("201 DATA REMOVE OK\r\n"));\r
1790 \r
1791         return true;\r
1792 }\r
1793 \r
1794 bool DataCommand::DoExecuteList() \r
1795 {\r
1796         std::wstringstream replyString;\r
1797         replyString << TEXT("200 DATA LIST OK\r\n");\r
1798 \r
1799         for (boost::filesystem::wrecursive_directory_iterator itr(env::data_folder()), end; itr != end; ++itr)\r
1800         {                       \r
1801                 if(boost::filesystem::is_regular_file(itr->path()))\r
1802                 {\r
1803                         if(!boost::iequals(itr->path().extension(), L".ftd"))\r
1804                                 continue;\r
1805                         \r
1806                         auto relativePath = boost::filesystem::wpath(itr->path().file_string().substr(env::data_folder().size()-1, itr->path().file_string().size()));\r
1807                         \r
1808                         auto str = relativePath.replace_extension(TEXT("")).external_file_string();\r
1809                         if(str[0] == '\\' || str[0] == '/')\r
1810                                 str = std::wstring(str.begin() + 1, str.end());\r
1811 \r
1812                         replyString << str << TEXT("\r\n");     \r
1813                 }\r
1814         }\r
1815         \r
1816         replyString << TEXT("\r\n");\r
1817 \r
1818         SetReplyString(boost::to_upper_copy(replyString.str()));\r
1819         return true;\r
1820 }\r
1821 \r
1822 bool ThumbnailCommand::DoExecute()\r
1823 {\r
1824         std::wstring command = _parameters[0];\r
1825 \r
1826         if (command == TEXT("RETRIEVE"))\r
1827                 return DoExecuteRetrieve();\r
1828         else if (command == TEXT("LIST"))\r
1829                 return DoExecuteList();\r
1830         else if (command == TEXT("GENERATE"))\r
1831                 return DoExecuteGenerate();\r
1832         else if (command == TEXT("GENERATE_ALL"))\r
1833                 return DoExecuteGenerateAll();\r
1834 \r
1835         SetReplyString(TEXT("403 THUMBNAIL ERROR\r\n"));\r
1836         return false;\r
1837 }\r
1838 \r
1839 bool ThumbnailCommand::DoExecuteRetrieve() \r
1840 {\r
1841         if(_parameters.size() < 2) \r
1842         {\r
1843                 SetReplyString(TEXT("402 THUMBNAIL RETRIEVE ERROR\r\n"));\r
1844                 return false;\r
1845         }\r
1846 \r
1847         std::wstring filename = env::thumbnails_folder();\r
1848         filename.append(_parameters[1]);\r
1849         filename.append(TEXT(".png"));\r
1850 \r
1851         std::wstring file_contents = read_file_base64(boost::filesystem::wpath(filename));\r
1852 \r
1853         if (file_contents.empty())\r
1854         {\r
1855                 SetReplyString(TEXT("404 THUMBNAIL RETRIEVE ERROR\r\n"));\r
1856                 return false;\r
1857         }\r
1858 \r
1859         std::wstringstream reply;\r
1860 \r
1861         reply << L"201 THUMBNAIL RETRIEVE OK\r\n";\r
1862         reply << file_contents;\r
1863         reply << L"\r\n";\r
1864         SetReplyString(reply.str());\r
1865         return true;\r
1866 }\r
1867 \r
1868 bool ThumbnailCommand::DoExecuteList()\r
1869 {\r
1870         std::wstringstream replyString;\r
1871         replyString << TEXT("200 THUMBNAIL LIST OK\r\n");\r
1872 \r
1873         for (boost::filesystem::wrecursive_directory_iterator itr(env::thumbnails_folder()), end; itr != end; ++itr)\r
1874         {                       \r
1875                 if(boost::filesystem::is_regular_file(itr->path()))\r
1876                 {\r
1877                         if(!boost::iequals(itr->path().extension(), L".png"))\r
1878                                 continue;\r
1879                         \r
1880                         auto relativePath = boost::filesystem::wpath(itr->path().file_string().substr(env::thumbnails_folder().size()-1, itr->path().file_string().size()));\r
1881                         \r
1882                         auto str = relativePath.replace_extension(L"").external_file_string();\r
1883                         if(str[0] == '\\' || str[0] == '/')\r
1884                                 str = std::wstring(str.begin() + 1, str.end());\r
1885 \r
1886                         auto mtime = boost::filesystem::last_write_time(itr->path());\r
1887                         auto mtime_readable = boost::posix_time::to_iso_string(boost::posix_time::from_time_t(mtime));\r
1888                         auto file_size = boost::filesystem::file_size(itr->path());\r
1889 \r
1890                         replyString << L"\"" << str << L"\" " << widen(mtime_readable) << L" " << file_size << L"\r\n";\r
1891                 }\r
1892         }\r
1893         \r
1894         replyString << TEXT("\r\n");\r
1895 \r
1896         SetReplyString(boost::to_upper_copy(replyString.str()));\r
1897         return true;\r
1898 }\r
1899 \r
1900 bool ThumbnailCommand::DoExecuteGenerate()\r
1901 {\r
1902         if (_parameters.size() < 2) \r
1903         {\r
1904                 SetReplyString(L"402 THUMBNAIL GENERATE ERROR\r\n");\r
1905                 return false;\r
1906         }\r
1907 \r
1908         auto thumb_gen = GetThumbGenerator();\r
1909 \r
1910         if (thumb_gen)\r
1911         {\r
1912                 thumb_gen->generate(_parameters[1]);\r
1913                 SetReplyString(L"200 THUMBNAIL GENERATE OK\r\n");\r
1914                 return true;\r
1915         }\r
1916         else\r
1917         {\r
1918                 SetReplyString(L"501 THUMBNAIL GENERATE ERROR\r\n");\r
1919                 return false;\r
1920         }\r
1921 }\r
1922 \r
1923 bool ThumbnailCommand::DoExecuteGenerateAll()\r
1924 {\r
1925         auto thumb_gen = GetThumbGenerator();\r
1926 \r
1927         if (thumb_gen)\r
1928         {\r
1929                 thumb_gen->generate_all();\r
1930                 SetReplyString(L"200 THUMBNAIL GENERATE_ALL OK\r\n");\r
1931                 return true;\r
1932         }\r
1933         else\r
1934         {\r
1935                 SetReplyString(L"501 THUMBNAIL GENERATE_ALL ERROR\r\n");\r
1936                 return false;\r
1937         }\r
1938 }\r
1939 \r
1940 bool CinfCommand::DoExecute()\r
1941 {\r
1942         std::wstringstream replyString;\r
1943         \r
1944         try\r
1945         {\r
1946                 std::wstring info;\r
1947                 for (boost::filesystem::wrecursive_directory_iterator itr(env::media_folder()), end; itr != end; ++itr)\r
1948                 {\r
1949                         auto path = itr->path();\r
1950                         auto file = path.replace_extension(L"").filename();\r
1951                         if(boost::iequals(file, _parameters.at(0)))\r
1952                                 info += MediaInfo(itr->path(), GetMediaInfoRepo()) + L"\r\n";\r
1953                 }\r
1954 \r
1955                 if(info.empty())\r
1956                 {\r
1957                         SetReplyString(TEXT("404 CINF ERROR\r\n"));\r
1958                         return false;\r
1959                 }\r
1960                 replyString << TEXT("200 CINF OK\r\n");\r
1961                 replyString << info << "\r\n";\r
1962         }\r
1963         catch(...)\r
1964         {\r
1965                 SetReplyString(TEXT("404 CINF ERROR\r\n"));\r
1966                 return false;\r
1967         }\r
1968         \r
1969         SetReplyString(replyString.str());\r
1970         return true;\r
1971 }\r
1972 \r
1973 void GenerateChannelInfo(int index, const safe_ptr<core::video_channel>& pChannel, std::wstringstream& replyString)\r
1974 {\r
1975         replyString << index+1 << TEXT(" ") << pChannel->get_video_format_desc().name << TEXT(" PLAYING") << TEXT("\r\n");\r
1976 }\r
1977 \r
1978 bool InfoCommand::DoExecute()\r
1979 {\r
1980         std::wstringstream replyString;\r
1981         \r
1982         boost::property_tree::xml_writer_settings<wchar_t> w(' ', 3);\r
1983 \r
1984         try\r
1985         {\r
1986                 if(_parameters.size() >= 1 && _parameters[0] == L"TEMPLATE")\r
1987                 {               \r
1988                         replyString << L"201 INFO TEMPLATE OK\r\n";\r
1989 \r
1990                         // Needs to be extended for any file, not just flash.\r
1991 \r
1992                         auto filename = flash::find_template(env::template_folder() + _parameters.at(1));\r
1993                                                 \r
1994                         std::wstringstream str;\r
1995                         str << widen(flash::read_template_meta_info(filename));\r
1996                         boost::property_tree::wptree info;\r
1997                         boost::property_tree::xml_parser::read_xml(str, info, boost::property_tree::xml_parser::trim_whitespace | boost::property_tree::xml_parser::no_comments);\r
1998 \r
1999                         boost::property_tree::xml_parser::write_xml(replyString, info, w);\r
2000                 }\r
2001                 else if(_parameters.size() >= 1 && _parameters[0] == L"CONFIG")\r
2002                 {               \r
2003                         replyString << L"201 INFO CONFIG OK\r\n";\r
2004 \r
2005                         boost::property_tree::write_xml(replyString, caspar::env::properties(), w);\r
2006                 }\r
2007                 else if(_parameters.size() >= 1 && _parameters[0] == L"PATHS")\r
2008                 {\r
2009                         replyString << L"201 INFO PATHS OK\r\n";\r
2010 \r
2011                         boost::property_tree::wptree info;\r
2012                         info.add_child(L"paths", caspar::env::properties().get_child(L"configuration.paths"));\r
2013                         info.add(L"paths.initial-path", boost::filesystem2::initial_path<boost::filesystem2::wpath>().directory_string() + L"\\");\r
2014 \r
2015                         boost::property_tree::write_xml(replyString, info, w);\r
2016                 }\r
2017                 else if(_parameters.size() >= 1 && _parameters[0] == L"SYSTEM")\r
2018                 {\r
2019                         replyString << L"201 INFO SYSTEM OK\r\n";\r
2020                         \r
2021                         boost::property_tree::wptree info;\r
2022                         \r
2023                         info.add(L"system.name",                                        caspar::get_system_product_name());\r
2024                         info.add(L"system.windows.name",                        caspar::get_win_product_name());\r
2025                         info.add(L"system.windows.service-pack",        caspar::get_win_sp_version());\r
2026                         info.add(L"system.cpu",                                         caspar::get_cpu_info());\r
2027         \r
2028                         BOOST_FOREACH(auto device, caspar::decklink::get_device_list())\r
2029                                 info.add(L"system.caspar.decklink.device", device);\r
2030 \r
2031                         BOOST_FOREACH(auto device, caspar::bluefish::get_device_list())\r
2032                                 info.add(L"system.caspar.bluefish.device", device);\r
2033                                 \r
2034                         info.add(L"system.caspar.flash",                                        caspar::flash::get_version());\r
2035                         info.add(L"system.caspar.template-host",                        caspar::flash::get_cg_version());\r
2036                         info.add(L"system.caspar.free-image",                           caspar::image::get_version());\r
2037                         info.add(L"system.caspar.ffmpeg.avcodec",                       caspar::ffmpeg::get_avcodec_version());\r
2038                         info.add(L"system.caspar.ffmpeg.avformat",                      caspar::ffmpeg::get_avformat_version());\r
2039                         info.add(L"system.caspar.ffmpeg.avfilter",                      caspar::ffmpeg::get_avfilter_version());\r
2040                         info.add(L"system.caspar.ffmpeg.avutil",                        caspar::ffmpeg::get_avutil_version());\r
2041                         info.add(L"system.caspar.ffmpeg.swscale",                       caspar::ffmpeg::get_swscale_version());\r
2042                                                                         \r
2043                         boost::property_tree::write_xml(replyString, info, w);\r
2044                 }\r
2045                 else if(_parameters.size() >= 1 && _parameters[0] == L"SERVER")\r
2046                 {\r
2047                         replyString << L"201 INFO SERVER OK\r\n";\r
2048                         \r
2049                         boost::property_tree::wptree info;\r
2050 \r
2051                         int index = 0;\r
2052                         BOOST_FOREACH(auto channel, channels_)\r
2053                                 info.add_child(L"channels.channel", channel->info())\r
2054                                         .add(L"index", ++index);\r
2055                         \r
2056                         boost::property_tree::write_xml(replyString, info, w);\r
2057                 }\r
2058                 else if(_parameters.size() >= 2 && _parameters[1] == L"DELAY")\r
2059                 {\r
2060                         replyString << L"201 INFO DELAY OK\r\n";\r
2061                         boost::property_tree::wptree info;\r
2062 \r
2063                         std::vector<std::wstring> split;\r
2064                         boost::split(split, _parameters[0], boost::is_any_of("-"));\r
2065                                         \r
2066                         int layer = std::numeric_limits<int>::min();\r
2067                         int channel = boost::lexical_cast<int>(split[0]) - 1;\r
2068 \r
2069                         if(split.size() > 1)\r
2070                                 layer = boost::lexical_cast<int>(split[1]);\r
2071                                 \r
2072                         if(layer == std::numeric_limits<int>::min())\r
2073                         {       \r
2074                                 info.add_child(L"channel-delay", channels_.at(channel)->delay_info());\r
2075                         }\r
2076                         else\r
2077                         {\r
2078                                 info.add_child(L"layer-delay", channels_.at(channel)->stage()->delay_info(layer).get())\r
2079                                         .add(L"index", layer);\r
2080                         }\r
2081                         boost::property_tree::xml_parser::write_xml(replyString, info, w);\r
2082                 }\r
2083                 else // channel\r
2084                 {                       \r
2085                         if(_parameters.size() >= 1)\r
2086                         {\r
2087                                 replyString << TEXT("201 INFO OK\r\n");\r
2088                                 boost::property_tree::wptree info;\r
2089 \r
2090                                 std::vector<std::wstring> split;\r
2091                                 boost::split(split, _parameters[0], boost::is_any_of("-"));\r
2092                                         \r
2093                                 int layer = std::numeric_limits<int>::min();\r
2094                                 int channel = boost::lexical_cast<int>(split[0]) - 1;\r
2095 \r
2096                                 if(split.size() > 1)\r
2097                                         layer = boost::lexical_cast<int>(split[1]);\r
2098                                 \r
2099                                 if(layer == std::numeric_limits<int>::min())\r
2100                                 {       \r
2101                                         info.add_child(L"channel", channels_.at(channel)->info())\r
2102                                                         .add(L"index", channel);\r
2103                                 }\r
2104                                 else\r
2105                                 {\r
2106                                         if(_parameters.size() >= 2)\r
2107                                         {\r
2108                                                 if(_parameters[1] == L"B")\r
2109                                                         info.add_child(L"producer", channels_.at(channel)->stage()->background(layer).get()->info());\r
2110                                                 else\r
2111                                                         info.add_child(L"producer", channels_.at(channel)->stage()->foreground(layer).get()->info());\r
2112                                         }\r
2113                                         else\r
2114                                         {\r
2115                                                 info.add_child(L"layer", channels_.at(channel)->stage()->info(layer).get())\r
2116                                                         .add(L"index", layer);\r
2117                                         }\r
2118                                 }\r
2119                                 boost::property_tree::xml_parser::write_xml(replyString, info, w);\r
2120                         }\r
2121                         else\r
2122                         {\r
2123                                 // This is needed for backwards compatibility with old clients\r
2124                                 replyString << TEXT("200 INFO OK\r\n");\r
2125                                 for(size_t n = 0; n < channels_.size(); ++n)\r
2126                                         GenerateChannelInfo(n, channels_[n], replyString);\r
2127                         }\r
2128 \r
2129                 }\r
2130         }\r
2131         catch(...)\r
2132         {\r
2133                 SetReplyString(TEXT("403 INFO ERROR\r\n"));\r
2134                 return false;\r
2135         }\r
2136 \r
2137         replyString << TEXT("\r\n");\r
2138         SetReplyString(replyString.str());\r
2139         return true;\r
2140 }\r
2141 \r
2142 bool ClsCommand::DoExecute()\r
2143 {\r
2144 /*\r
2145                 wav = audio\r
2146                 mp3 = audio\r
2147                 swf     = movie\r
2148                 dv  = movie\r
2149                 tga = still\r
2150                 col = still\r
2151         */\r
2152         std::wstringstream replyString;\r
2153         replyString << TEXT("200 CLS OK\r\n");\r
2154         replyString << ListMedia(GetMediaInfoRepo());\r
2155         replyString << TEXT("\r\n");\r
2156         SetReplyString(boost::to_upper_copy(replyString.str()));\r
2157         return true;\r
2158 }\r
2159 \r
2160 bool TlsCommand::DoExecute()\r
2161 {\r
2162         std::wstringstream replyString;\r
2163         replyString << TEXT("200 TLS OK\r\n");\r
2164 \r
2165         replyString << ListTemplates();\r
2166         replyString << TEXT("\r\n");\r
2167 \r
2168         SetReplyString(replyString.str());\r
2169         return true;\r
2170 }\r
2171 \r
2172 bool VersionCommand::DoExecute()\r
2173 {\r
2174         std::wstring replyString = TEXT("201 VERSION OK\r\n") + env::version() + TEXT("\r\n");\r
2175 \r
2176         if(_parameters.size() > 0)\r
2177         {\r
2178                 if(_parameters[0] == L"FLASH")\r
2179                         replyString = TEXT("201 VERSION OK\r\n") + flash::get_version() + TEXT("\r\n");\r
2180                 else if(_parameters[0] == L"TEMPLATEHOST")\r
2181                         replyString = TEXT("201 VERSION OK\r\n") + flash::get_cg_version() + TEXT("\r\n");\r
2182                 else if(_parameters[0] != L"SERVER")\r
2183                         replyString = TEXT("403 VERSION ERROR\r\n");\r
2184         }\r
2185 \r
2186         SetReplyString(replyString);\r
2187         return true;\r
2188 }\r
2189 \r
2190 bool ByeCommand::DoExecute()\r
2191 {\r
2192         GetClientInfo()->Disconnect();\r
2193         return true;\r
2194 }\r
2195 \r
2196 bool SetCommand::DoExecute()\r
2197 {\r
2198         std::wstring name = _parameters[0];\r
2199         std::transform(name.begin(), name.end(), name.begin(), toupper);\r
2200 \r
2201         std::wstring value = _parameters[1];\r
2202         std::transform(value.begin(), value.end(), value.begin(), toupper);\r
2203 \r
2204         if(name == TEXT("MODE"))\r
2205         {\r
2206                 auto format_desc = core::video_format_desc::get(value);\r
2207                 if(format_desc.format != core::video_format::invalid)\r
2208                 {\r
2209                         GetChannel()->set_video_format_desc(format_desc);\r
2210                         SetReplyString(TEXT("202 SET MODE OK\r\n"));\r
2211                 }\r
2212                 else\r
2213                         SetReplyString(TEXT("501 SET MODE FAILED\r\n"));\r
2214         }\r
2215         else\r
2216         {\r
2217                 this->SetReplyString(TEXT("403 SET ERROR\r\n"));\r
2218         }\r
2219 \r
2220         return true;\r
2221 }\r
2222 \r
2223 bool KillCommand::DoExecute()\r
2224 {\r
2225         GetShutdownServerNow().set_value(false); // False for not attempting to restart.\r
2226         return true;\r
2227 }\r
2228 \r
2229 bool RestartCommand::DoExecute()\r
2230 {\r
2231         GetShutdownServerNow().set_value(true); // True for attempting to restart\r
2232         return true;\r
2233 }\r
2234 \r
2235 }       //namespace amcp\r
2236 }}      //namespace caspar\r