]> git.sesse.net Git - casparcg/blob - protocol/amcp/AMCPCommandsImpl.cpp
Applied patch which adds support for creating directories that does not exist with...
[casparcg] / protocol / amcp / AMCPCommandsImpl.cpp
1 /*\r
2 * Copyright (c) 2011 Sveriges Television AB <info@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 \r
40 #include <core/producer/frame_producer.h>\r
41 #include <core/video_format.h>\r
42 #include <core/producer/transition/transition_producer.h>\r
43 #include <core/producer/channel/channel_producer.h>\r
44 #include <core/producer/frame/frame_transform.h>\r
45 #include <core/producer/stage.h>\r
46 #include <core/producer/layer.h>\r
47 #include <core/mixer/mixer.h>\r
48 #include <core/mixer/gpu/ogl_device.h>\r
49 #include <core/consumer/output.h>\r
50 \r
51 #include <modules/bluefish/bluefish.h>\r
52 #include <modules/decklink/decklink.h>\r
53 #include <modules/ffmpeg/ffmpeg.h>\r
54 #include <modules/flash/flash.h>\r
55 #include <modules/flash/util/swf.h>\r
56 #include <modules/flash/producer/flash_producer.h>\r
57 #include <modules/flash/producer/cg_producer.h>\r
58 #include <modules/ffmpeg/producer/util/util.h>\r
59 #include <modules/image/image.h>\r
60 #include <modules/ogl/ogl.h>\r
61 \r
62 #include <algorithm>\r
63 #include <locale>\r
64 #include <fstream>\r
65 #include <memory>\r
66 #include <cctype>\r
67 #include <io.h>\r
68 \r
69 #include <boost/date_time/posix_time/posix_time.hpp>\r
70 #include <boost/lexical_cast.hpp>\r
71 #include <boost/algorithm/string.hpp>\r
72 #include <boost/filesystem.hpp>\r
73 #include <boost/filesystem/fstream.hpp>\r
74 #include <boost/regex.hpp>\r
75 #include <boost/property_tree/xml_parser.hpp>\r
76 #include <boost/locale.hpp>\r
77 #include <boost/range/adaptor/transformed.hpp>\r
78 #include <boost/range/algorithm/copy.hpp>\r
79 \r
80 #include <tbb/concurrent_unordered_map.h>\r
81 \r
82 /* Return codes\r
83 \r
84 100 [action]                    Information om att något har hänt  \r
85 101 [action]                    Information om att något har hänt, en rad data skickas  \r
86 \r
87 202 [kommando] OK               Kommandot har utförts  \r
88 201 [kommando] OK               Kommandot har utförts, och en rad data skickas tillbaka  \r
89 200 [kommando] OK               Kommandot har utförts, och flera rader data skickas tillbaka. Avslutas med tomrad  \r
90 \r
91 400 ERROR                               Kommandot kunde inte förstås  \r
92 401 [kommando] ERROR    Ogiltig kanal  \r
93 402 [kommando] ERROR    Parameter saknas  \r
94 403 [kommando] ERROR    Ogiltig parameter  \r
95 404 [kommando] ERROR    Mediafilen hittades inte  \r
96 \r
97 500 FAILED                              Internt configurationfel  \r
98 501 [kommando] FAILED   Internt configurationfel  \r
99 502 [kommando] FAILED   Oläslig mediafil  \r
100 \r
101 600 [kommando] FAILED   funktion ej implementerad\r
102 */\r
103 \r
104 namespace caspar { namespace protocol {\r
105 \r
106 using namespace core;\r
107 \r
108 std::wstring read_utf8_file(const boost::filesystem::wpath& file)\r
109 {\r
110         std::wstringstream result;\r
111         boost::filesystem::wifstream filestream(file);\r
112 \r
113         if (filestream) \r
114         {\r
115                 // Consume BOM first\r
116                 filestream.get();\r
117                 // read all data\r
118                 result << filestream.rdbuf();\r
119         }\r
120 \r
121         return result.str();\r
122 }\r
123 \r
124 std::wstring read_latin1_file(const boost::filesystem::wpath& file)\r
125 {\r
126         boost::locale::generator gen;\r
127         gen.locale_cache_enabled(true);\r
128         gen.categories(boost::locale::codepage_facet);\r
129 \r
130         std::stringstream result_stream;\r
131         boost::filesystem::ifstream filestream(file);\r
132         filestream.imbue(gen("en_US.ISO8859-1"));\r
133 \r
134         if (filestream)\r
135         {\r
136                 // read all data\r
137                 result_stream << filestream.rdbuf();\r
138         }\r
139 \r
140         std::string result = result_stream.str();\r
141         std::wstring widened_result;\r
142 \r
143         // The first 255 codepoints in unicode is the same as in latin1\r
144         auto from_signed_to_signed = std::function<unsigned char(char)>(\r
145                 [] (char c) { return static_cast<unsigned char>(c); }\r
146         );\r
147         boost::copy(\r
148                 result | boost::adaptors::transformed(from_signed_to_signed),\r
149                 std::back_inserter(widened_result));\r
150 \r
151         return widened_result;\r
152 }\r
153 \r
154 std::wstring read_file(const boost::filesystem::wpath& file)\r
155 {\r
156         static const uint8_t BOM[] = {0xef, 0xbb, 0xbf};\r
157 \r
158         if (!boost::filesystem::exists(file))\r
159         {\r
160                 return L"";\r
161         }\r
162 \r
163         if (boost::filesystem::file_size(file) >= 3)\r
164         {\r
165                 boost::filesystem::ifstream bom_stream(file);\r
166 \r
167                 char header[3];\r
168                 bom_stream.read(header, 3);\r
169                 bom_stream.close();\r
170 \r
171                 if (std::memcmp(BOM, header, 3) == 0)\r
172                         return read_utf8_file(file);\r
173         }\r
174 \r
175         return read_latin1_file(file);\r
176 }\r
177 \r
178 std::wstring MediaInfo(const boost::filesystem::wpath& path)\r
179 {\r
180         if(boost::filesystem::is_regular_file(path))\r
181         {\r
182                 std::wstring clipttype = TEXT(" N/A ");\r
183                 std::wstring extension = boost::to_upper_copy(path.extension());\r
184                 if(extension == TEXT(".TGA") || extension == TEXT(".COL") || extension == L".PNG" || extension == L".JPEG" || extension == L".JPG" ||\r
185                         extension == L"GIF" || extension == L"BMP")\r
186                         clipttype = TEXT(" STILL ");\r
187                 else if(extension == TEXT(".WAV") || extension == TEXT(".MP3"))\r
188                         clipttype = TEXT(" AUDIO ");\r
189                 else if(extension == TEXT(".SWF") || extension == TEXT(".CT") || \r
190                             extension == TEXT(".DV") || extension == TEXT(".MOV") || \r
191                                 extension == TEXT(".MPG") || extension == TEXT(".AVI") || \r
192                                 extension == TEXT(".MP4") || extension == TEXT(".FLV") || \r
193                                 extension == TEXT(".STGA") || \r
194                                 caspar::ffmpeg::is_valid_file(path.file_string()))\r
195                         clipttype = TEXT(" MOVIE ");\r
196 \r
197                 if(clipttype != TEXT(" N/A "))\r
198                 {               \r
199                         auto is_not_digit = [](char c){ return std::isdigit(c) == 0; };\r
200 \r
201                         auto relativePath = boost::filesystem::wpath(path.file_string().substr(env::media_folder().size()-1, path.file_string().size()));\r
202 \r
203                         auto writeTimeStr = boost::posix_time::to_iso_string(boost::posix_time::from_time_t(boost::filesystem::last_write_time(path)));\r
204                         writeTimeStr.erase(std::remove_if(writeTimeStr.begin(), writeTimeStr.end(), is_not_digit), writeTimeStr.end());\r
205                         auto writeTimeWStr = std::wstring(writeTimeStr.begin(), writeTimeStr.end());\r
206 \r
207                         auto sizeStr = boost::lexical_cast<std::wstring>(boost::filesystem::file_size(path));\r
208                         sizeStr.erase(std::remove_if(sizeStr.begin(), sizeStr.end(), is_not_digit), sizeStr.end());\r
209                         auto sizeWStr = std::wstring(sizeStr.begin(), sizeStr.end());\r
210                                 \r
211                         auto str = relativePath.replace_extension(TEXT("")).external_file_string();\r
212                         if(str[0] == '\\' || str[0] == '/')\r
213                                 str = std::wstring(str.begin() + 1, str.end());\r
214 \r
215                         return std::wstring() + TEXT("\"") + str +\r
216                                         + TEXT("\" ") + clipttype +\r
217                                         + TEXT(" ") + sizeStr +\r
218                                         + TEXT(" ") + writeTimeWStr +\r
219                                         + TEXT("\r\n");         \r
220                 }       \r
221         }\r
222         return L"";\r
223 }\r
224 \r
225 std::wstring ListMedia()\r
226 {       \r
227         std::wstringstream replyString;\r
228         for (boost::filesystem::wrecursive_directory_iterator itr(env::media_folder()), end; itr != end; ++itr) \r
229                 replyString << MediaInfo(itr->path());\r
230         \r
231         return boost::to_upper_copy(replyString.str());\r
232 }\r
233 \r
234 std::wstring ListTemplates() \r
235 {\r
236         std::wstringstream replyString;\r
237 \r
238         for (boost::filesystem::wrecursive_directory_iterator itr(env::template_folder()), end; itr != end; ++itr)\r
239         {               \r
240                 if(boost::filesystem::is_regular_file(itr->path()) && (itr->path().extension() == L".ft" || itr->path().extension() == L".ct"))\r
241                 {\r
242                         auto relativePath = boost::filesystem::wpath(itr->path().file_string().substr(env::template_folder().size()-1, itr->path().file_string().size()));\r
243 \r
244                         auto writeTimeStr = boost::posix_time::to_iso_string(boost::posix_time::from_time_t(boost::filesystem::last_write_time(itr->path())));\r
245                         writeTimeStr.erase(std::remove_if(writeTimeStr.begin(), writeTimeStr.end(), [](char c){ return std::isdigit(c) == 0;}), writeTimeStr.end());\r
246                         auto writeTimeWStr = std::wstring(writeTimeStr.begin(), writeTimeStr.end());\r
247 \r
248                         auto sizeStr = boost::lexical_cast<std::string>(boost::filesystem::file_size(itr->path()));\r
249                         sizeStr.erase(std::remove_if(sizeStr.begin(), sizeStr.end(), [](char c){ return std::isdigit(c) == 0;}), sizeStr.end());\r
250 \r
251                         auto sizeWStr = std::wstring(sizeStr.begin(), sizeStr.end());\r
252 \r
253                         std::wstring dir = relativePath.parent_path().external_directory_string();\r
254                         std::wstring file = boost::to_upper_copy(relativePath.filename());\r
255                         relativePath = boost::filesystem::wpath(dir + L"/" + file);\r
256                                                 \r
257                         auto str = relativePath.replace_extension(TEXT("")).external_file_string();\r
258                         boost::trim_if(str, boost::is_any_of("\\/"));\r
259 \r
260                         replyString << TEXT("\"") << str\r
261                                                 << TEXT("\" ") << sizeWStr\r
262                                                 << TEXT(" ") << writeTimeWStr\r
263                                                 << TEXT("\r\n");                \r
264                 }\r
265         }\r
266         return replyString.str();\r
267 }\r
268 \r
269 namespace amcp {\r
270         \r
271 AMCPCommand::AMCPCommand() : channelIndex_(0), scheduling_(Default), layerIndex_(-1)\r
272 {}\r
273 \r
274 void AMCPCommand::SendReply()\r
275 {\r
276         if(!pClientInfo_) \r
277                 return;\r
278 \r
279         if(replyString_.empty())\r
280                 return;\r
281         pClientInfo_->Send(replyString_);\r
282 }\r
283 \r
284 void AMCPCommand::Clear() \r
285 {\r
286         pChannel_->stage()->clear();\r
287         pClientInfo_.reset();\r
288         channelIndex_ = 0;\r
289         _parameters.clear();\r
290 }\r
291 \r
292 bool DiagnosticsCommand::DoExecute()\r
293 {       \r
294         try\r
295         {\r
296                 diagnostics::show_graphs(true);\r
297 \r
298                 SetReplyString(TEXT("202 DIAG OK\r\n"));\r
299 \r
300                 return true;\r
301         }\r
302         catch(...)\r
303         {\r
304                 CASPAR_LOG_CURRENT_EXCEPTION();\r
305                 SetReplyString(TEXT("502 DIAG FAILED\r\n"));\r
306                 return false;\r
307         }\r
308 }\r
309 \r
310 bool ChannelGridCommand::DoExecute()\r
311 {\r
312         int index = 1;\r
313         auto self = GetChannels().back();\r
314         \r
315         std::vector<std::wstring> params;\r
316         params.push_back(L"SCREEN");\r
317         params.push_back(L"NAME");\r
318         params.push_back(L"Channel Grid Window");\r
319         auto screen = create_consumer(params);\r
320 \r
321         self->output()->add(screen);\r
322 \r
323         BOOST_FOREACH(auto channel, GetChannels())\r
324         {\r
325                 if(channel != self)\r
326                 {\r
327                         auto producer = create_channel_producer(self->mixer(), channel);                \r
328                         self->stage()->load(index, producer, false);\r
329                         self->stage()->play(index);\r
330                         index++;\r
331                 }\r
332         }\r
333 \r
334         int n = GetChannels().size()-1;\r
335         double delta = 1.0/static_cast<double>(n);\r
336         for(int x = 0; x < n; ++x)\r
337         {\r
338                 for(int y = 0; y < n; ++y)\r
339                 {\r
340                         int index = x+y*n+1;\r
341                         auto transform = [=](frame_transform transform) -> frame_transform\r
342                         {               \r
343                                 transform.fill_translation[0]   = x*delta;\r
344                                 transform.fill_translation[1]   = y*delta;\r
345                                 transform.fill_scale[0]                 = delta;\r
346                                 transform.fill_scale[1]                 = delta;\r
347                                 transform.clip_translation[0]   = x*delta;\r
348                                 transform.clip_translation[1]   = y*delta;\r
349                                 transform.clip_scale[0]                 = delta;\r
350                                 transform.clip_scale[1]                 = delta;                        \r
351                                 return transform;\r
352                         };\r
353                         self->stage()->apply_transform(index, transform);\r
354                 }\r
355         }\r
356 \r
357         return true;\r
358 }\r
359 \r
360 bool CallCommand::DoExecute()\r
361 {       \r
362         //Perform loading of the clip\r
363         try\r
364         {\r
365                 auto what = _parameters.at(0);\r
366                                 \r
367                 boost::unique_future<std::wstring> result;\r
368                 if(what == L"B" || what == L"F")\r
369                 {\r
370                         std::wstring param;\r
371                         for(auto it = std::begin(_parameters2)+1; it != std::end(_parameters2); ++it, param += L" ")\r
372                                 param += *it;\r
373                         result = GetChannel()->stage()->call(GetLayerIndex(), what == L"F", boost::trim_copy(param));\r
374                 }\r
375                 else\r
376                 {\r
377                         std::wstring param;\r
378                         for(auto it = std::begin(_parameters2); it != std::end(_parameters2); ++it, param += L" ")\r
379                                 param += *it;\r
380                         result = GetChannel()->stage()->call(GetLayerIndex(), true, boost::trim_copy(param));\r
381                 }\r
382 \r
383                 if(!result.timed_wait(boost::posix_time::seconds(2)))\r
384                         BOOST_THROW_EXCEPTION(timed_out());\r
385                                 \r
386                 std::wstringstream replyString;\r
387                 if(result.get().empty())\r
388                         replyString << TEXT("202 CALL OK\r\n");\r
389                 else\r
390                         replyString << TEXT("201 CALL OK\r\n") << result.get() << L"\r\n";\r
391                 \r
392                 SetReplyString(replyString.str());\r
393 \r
394                 return true;\r
395         }\r
396         catch(...)\r
397         {\r
398                 CASPAR_LOG_CURRENT_EXCEPTION();\r
399                 SetReplyString(TEXT("502 CALL FAILED\r\n"));\r
400                 return false;\r
401         }\r
402 }\r
403 \r
404 // UGLY HACK\r
405 tbb::concurrent_unordered_map<int, std::vector<stage::transform_tuple_t>> deferred_transforms;\r
406 \r
407 bool MixerCommand::DoExecute()\r
408 {       \r
409         //Perform loading of the clip\r
410         try\r
411         {       \r
412                 bool defer = _parameters.back() == L"DEFER";\r
413                 if(defer)\r
414                         _parameters.pop_back();\r
415 \r
416                 std::vector<stage::transform_tuple_t> transforms;\r
417 \r
418                 if(_parameters[0] == L"KEYER" || _parameters[0] == L"IS_KEY")\r
419                 {\r
420                         bool value = boost::lexical_cast<int>(_parameters.at(1));\r
421                         transforms.push_back(stage::transform_tuple_t(GetLayerIndex(), [=](frame_transform transform) -> frame_transform\r
422                         {\r
423                                 transform.is_key = value;\r
424                                 return transform;                                       \r
425                         }, 0, L"linear"));\r
426                 }\r
427                 else if(_parameters[0] == L"OPACITY")\r
428                 {\r
429                         int duration = _parameters.size() > 2 ? boost::lexical_cast<int>(_parameters[2]) : 0;\r
430                         std::wstring tween = _parameters.size() > 3 ? _parameters[3] : L"linear";\r
431 \r
432                         double value = boost::lexical_cast<double>(_parameters.at(1));\r
433                         \r
434                         transforms.push_back(stage::transform_tuple_t(GetLayerIndex(), [=](frame_transform transform) -> frame_transform\r
435                         {\r
436                                 transform.opacity = value;\r
437                                 return transform;                                       \r
438                         }, duration, tween));\r
439                 }\r
440                 else if(_parameters[0] == L"FILL" || _parameters[0] == L"FILL_RECT")\r
441                 {\r
442                         int duration = _parameters.size() > 5 ? boost::lexical_cast<int>(_parameters[5]) : 0;\r
443                         std::wstring tween = _parameters.size() > 6 ? _parameters[6] : L"linear";\r
444                         double x        = boost::lexical_cast<double>(_parameters.at(1));\r
445                         double y        = boost::lexical_cast<double>(_parameters.at(2));\r
446                         double x_s      = boost::lexical_cast<double>(_parameters.at(3));\r
447                         double y_s      = boost::lexical_cast<double>(_parameters.at(4));\r
448 \r
449                         transforms.push_back(stage::transform_tuple_t(GetLayerIndex(), [=](frame_transform transform) mutable -> frame_transform\r
450                         {\r
451                                 transform.fill_translation[0]   = x;\r
452                                 transform.fill_translation[1]   = y;\r
453                                 transform.fill_scale[0]                 = x_s;\r
454                                 transform.fill_scale[1]                 = y_s;\r
455                                 transform.clip_translation[0]   = x;\r
456                                 transform.clip_translation[1]   = y;\r
457                                 transform.clip_scale[0]                 = x_s;\r
458                                 transform.clip_scale[1]                 = y_s;\r
459                                 return transform;\r
460                         }, duration, tween));\r
461                 }\r
462                 else if(_parameters[0] == L"CLIP" || _parameters[0] == L"CLIP_RECT")\r
463                 {\r
464                         int duration = _parameters.size() > 5 ? boost::lexical_cast<int>(_parameters[5]) : 0;\r
465                         std::wstring tween = _parameters.size() > 6 ? _parameters[6] : L"linear";\r
466                         double x        = boost::lexical_cast<double>(_parameters.at(1));\r
467                         double y        = boost::lexical_cast<double>(_parameters.at(2));\r
468                         double x_s      = boost::lexical_cast<double>(_parameters.at(3));\r
469                         double y_s      = boost::lexical_cast<double>(_parameters.at(4));\r
470 \r
471                         transforms.push_back(stage::transform_tuple_t(GetLayerIndex(), [=](frame_transform transform) -> frame_transform\r
472                         {\r
473                                 transform.clip_translation[0]   = x;\r
474                                 transform.clip_translation[1]   = y;\r
475                                 transform.clip_scale[0]                 = x_s;\r
476                                 transform.clip_scale[1]                 = y_s;\r
477                                 return transform;\r
478                         }, duration, tween));\r
479                 }\r
480                 else if(_parameters[0] == L"GRID")\r
481                 {\r
482                         int duration = _parameters.size() > 2 ? boost::lexical_cast<int>(_parameters[2]) : 0;\r
483                         std::wstring tween = _parameters.size() > 3 ? _parameters[3] : L"linear";\r
484                         int n = boost::lexical_cast<int>(_parameters.at(1));\r
485                         double delta = 1.0/static_cast<double>(n);\r
486                         for(int x = 0; x < n; ++x)\r
487                         {\r
488                                 for(int y = 0; y < n; ++y)\r
489                                 {\r
490                                         int index = x+y*n+1;\r
491                                         transforms.push_back(stage::transform_tuple_t(index, [=](frame_transform transform) -> frame_transform\r
492                                         {               \r
493                                                 transform.fill_translation[0]   = x*delta;\r
494                                                 transform.fill_translation[1]   = y*delta;\r
495                                                 transform.fill_scale[0]                 = delta;\r
496                                                 transform.fill_scale[1]                 = delta;\r
497                                                 transform.clip_translation[0]   = x*delta;\r
498                                                 transform.clip_translation[1]   = y*delta;\r
499                                                 transform.clip_scale[0]                 = delta;\r
500                                                 transform.clip_scale[1]                 = delta;                        \r
501                                                 return transform;\r
502                                         }, duration, tween));\r
503                                 }\r
504                         }\r
505                 }\r
506                 else if(_parameters[0] == L"BLEND")\r
507                 {\r
508                         auto blend_str = _parameters.at(1);                                                             \r
509                         int layer = GetLayerIndex();\r
510                         GetChannel()->mixer()->set_blend_mode(GetLayerIndex(), get_blend_mode(blend_str));      \r
511                 }\r
512                 else if(_parameters[0] == L"BRIGHTNESS")\r
513                 {\r
514                         auto value = boost::lexical_cast<double>(_parameters.at(1));\r
515                         int duration = _parameters.size() > 2 ? boost::lexical_cast<int>(_parameters[2]) : 0;\r
516                         std::wstring tween = _parameters.size() > 3 ? _parameters[3] : L"linear";\r
517                         transforms.push_back(stage::transform_tuple_t(GetLayerIndex(), [=](frame_transform transform) -> frame_transform\r
518                         {\r
519                                 transform.brightness = value;\r
520                                 return transform;\r
521                         }, duration, tween));\r
522                 }\r
523                 else if(_parameters[0] == L"SATURATION")\r
524                 {\r
525                         auto value = boost::lexical_cast<double>(_parameters.at(1));\r
526                         int duration = _parameters.size() > 2 ? boost::lexical_cast<int>(_parameters[2]) : 0;\r
527                         std::wstring tween = _parameters.size() > 3 ? _parameters[3] : L"linear";\r
528                         transforms.push_back(stage::transform_tuple_t(GetLayerIndex(), [=](frame_transform transform) -> frame_transform\r
529                         {\r
530                                 transform.saturation = value;\r
531                                 return transform;\r
532                         }, duration, tween));   \r
533                 }\r
534                 else if(_parameters[0] == L"CONTRAST")\r
535                 {\r
536                         auto value = boost::lexical_cast<double>(_parameters.at(1));\r
537                         int duration = _parameters.size() > 2 ? boost::lexical_cast<int>(_parameters[2]) : 0;\r
538                         std::wstring tween = _parameters.size() > 3 ? _parameters[3] : L"linear";\r
539                         transforms.push_back(stage::transform_tuple_t(GetLayerIndex(), [=](frame_transform transform) -> frame_transform\r
540                         {\r
541                                 transform.contrast = value;\r
542                                 return transform;\r
543                         }, duration, tween));   \r
544                 }\r
545                 else if(_parameters[0] == L"LEVELS")\r
546                 {\r
547                         levels value;\r
548                         value.min_input  = boost::lexical_cast<double>(_parameters.at(1));\r
549                         value.max_input  = boost::lexical_cast<double>(_parameters.at(2));\r
550                         value.gamma              = boost::lexical_cast<double>(_parameters.at(3));\r
551                         value.min_output = boost::lexical_cast<double>(_parameters.at(4));\r
552                         value.max_output = boost::lexical_cast<double>(_parameters.at(5));\r
553                         int duration = _parameters.size() > 6 ? boost::lexical_cast<int>(_parameters[6]) : 0;\r
554                         std::wstring tween = _parameters.size() > 7 ? _parameters[7] : L"linear";\r
555 \r
556                         transforms.push_back(stage::transform_tuple_t(GetLayerIndex(), [=](frame_transform transform) -> frame_transform\r
557                         {\r
558                                 transform.levels = value;\r
559                                 return transform;\r
560                         }, duration, tween));\r
561                 }\r
562                 else if(_parameters[0] == L"VOLUME")\r
563                 {\r
564                         int duration = _parameters.size() > 2 ? boost::lexical_cast<int>(_parameters[2]) : 0;\r
565                         std::wstring tween = _parameters.size() > 3 ? _parameters[3] : L"linear";\r
566                         double value = boost::lexical_cast<double>(_parameters[1]);\r
567 \r
568                         transforms.push_back(stage::transform_tuple_t(GetLayerIndex(), [=](frame_transform transform) -> frame_transform\r
569                         {\r
570                                 transform.volume = value;\r
571                                 return transform;\r
572                         }, duration, tween));\r
573                 }\r
574                 else if(_parameters[0] == L"CLEAR")\r
575                 {\r
576                         int layer = GetLayerIndex(std::numeric_limits<int>::max());\r
577                         if (layer == std::numeric_limits<int>::max())\r
578                         {\r
579                                 GetChannel()->stage()->clear_transforms();\r
580                                 GetChannel()->mixer()->clear_blend_modes();\r
581                         }\r
582                         else\r
583                         {\r
584                                 GetChannel()->stage()->clear_transforms(layer);\r
585                                 GetChannel()->mixer()->clear_blend_mode(layer);\r
586                         }\r
587                 }\r
588                 else if(_parameters[0] == L"COMMIT")\r
589                 {\r
590                         transforms = std::move(deferred_transforms[GetChannelIndex()]);\r
591                 }\r
592                 else\r
593                 {\r
594                         SetReplyString(TEXT("404 MIXER ERROR\r\n"));\r
595                         return false;\r
596                 }\r
597 \r
598                 if(defer)\r
599                 {\r
600                         auto& defer_tranforms = deferred_transforms[GetChannelIndex()];\r
601                         defer_tranforms.insert(defer_tranforms.end(), transforms.begin(), transforms.end());\r
602                 }\r
603                 else\r
604                         GetChannel()->stage()->apply_transforms(transforms);\r
605         \r
606                 SetReplyString(TEXT("202 MIXER OK\r\n"));\r
607 \r
608                 return true;\r
609         }\r
610         catch(file_not_found&)\r
611         {\r
612                 CASPAR_LOG_CURRENT_EXCEPTION();\r
613                 SetReplyString(TEXT("404 MIXER ERROR\r\n"));\r
614                 return false;\r
615         }\r
616         catch(...)\r
617         {\r
618                 CASPAR_LOG_CURRENT_EXCEPTION();\r
619                 SetReplyString(TEXT("502 MIXER FAILED\r\n"));\r
620                 return false;\r
621         }\r
622 }\r
623 \r
624 bool SwapCommand::DoExecute()\r
625 {       \r
626         //Perform loading of the clip\r
627         try\r
628         {\r
629                 if(GetLayerIndex(-1) != -1)\r
630                 {\r
631                         std::vector<std::string> strs;\r
632                         boost::split(strs, _parameters[0], boost::is_any_of("-"));\r
633                         \r
634                         auto ch1 = GetChannel();\r
635                         auto ch2 = GetChannels().at(boost::lexical_cast<int>(strs.at(0))-1);\r
636 \r
637                         int l1 = GetLayerIndex();\r
638                         int l2 = boost::lexical_cast<int>(strs.at(1));\r
639 \r
640                         ch1->stage()->swap_layer(l1, l2, ch2->stage());\r
641                 }\r
642                 else\r
643                 {\r
644                         auto ch1 = GetChannel();\r
645                         auto ch2 = GetChannels().at(boost::lexical_cast<int>(_parameters[0])-1);\r
646                         ch1->stage()->swap_layers(ch2->stage());\r
647                 }\r
648                 \r
649                 SetReplyString(TEXT("202 SWAP OK\r\n"));\r
650 \r
651                 return true;\r
652         }\r
653         catch(file_not_found&)\r
654         {\r
655                 CASPAR_LOG_CURRENT_EXCEPTION();\r
656                 SetReplyString(TEXT("404 SWAP ERROR\r\n"));\r
657                 return false;\r
658         }\r
659         catch(...)\r
660         {\r
661                 CASPAR_LOG_CURRENT_EXCEPTION();\r
662                 SetReplyString(TEXT("502 SWAP FAILED\r\n"));\r
663                 return false;\r
664         }\r
665 }\r
666 \r
667 bool AddCommand::DoExecute()\r
668 {       \r
669         //Perform loading of the clip\r
670         try\r
671         {\r
672                 auto consumer = create_consumer(_parameters);\r
673                 GetChannel()->output()->add(GetLayerIndex(consumer->index()), consumer);\r
674         \r
675                 SetReplyString(TEXT("202 ADD OK\r\n"));\r
676 \r
677                 return true;\r
678         }\r
679         catch(file_not_found&)\r
680         {\r
681                 CASPAR_LOG_CURRENT_EXCEPTION();\r
682                 SetReplyString(TEXT("404 ADD ERROR\r\n"));\r
683                 return false;\r
684         }\r
685         catch(...)\r
686         {\r
687                 CASPAR_LOG_CURRENT_EXCEPTION();\r
688                 SetReplyString(TEXT("502 ADD FAILED\r\n"));\r
689                 return false;\r
690         }\r
691 }\r
692 \r
693 bool RemoveCommand::DoExecute()\r
694 {       \r
695         //Perform loading of the clip\r
696         try\r
697         {\r
698                 auto index = GetLayerIndex(std::numeric_limits<int>::min());\r
699                 if(index == std::numeric_limits<int>::min())\r
700                         index = create_consumer(_parameters)->index();\r
701 \r
702                 GetChannel()->output()->remove(index);\r
703 \r
704                 SetReplyString(TEXT("202 REMOVE OK\r\n"));\r
705 \r
706                 return true;\r
707         }\r
708         catch(file_not_found&)\r
709         {\r
710                 CASPAR_LOG_CURRENT_EXCEPTION();\r
711                 SetReplyString(TEXT("404 REMOVE ERROR\r\n"));\r
712                 return false;\r
713         }\r
714         catch(...)\r
715         {\r
716                 CASPAR_LOG_CURRENT_EXCEPTION();\r
717                 SetReplyString(TEXT("502 REMOVE FAILED\r\n"));\r
718                 return false;\r
719         }\r
720 }\r
721 \r
722 bool LoadCommand::DoExecute()\r
723 {       \r
724         //Perform loading of the clip\r
725         try\r
726         {\r
727                 _parameters[0] = _parameters[0];\r
728                 auto pFP = create_producer(GetChannel()->mixer(), _parameters);         \r
729                 GetChannel()->stage()->load(GetLayerIndex(), pFP, true);\r
730         \r
731                 SetReplyString(TEXT("202 LOAD OK\r\n"));\r
732 \r
733                 return true;\r
734         }\r
735         catch(file_not_found&)\r
736         {\r
737                 CASPAR_LOG_CURRENT_EXCEPTION();\r
738                 SetReplyString(TEXT("404 LOAD ERROR\r\n"));\r
739                 return false;\r
740         }\r
741         catch(...)\r
742         {\r
743                 CASPAR_LOG_CURRENT_EXCEPTION();\r
744                 SetReplyString(TEXT("502 LOAD FAILED\r\n"));\r
745                 return false;\r
746         }\r
747 }\r
748 \r
749 \r
750 \r
751 //std::function<std::wstring()> channel_cg_add_command::parse(const std::wstring& message, const std::vector<renderer::render_device_ptr>& channels)\r
752 //{\r
753 //      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
754 //\r
755 //      boost::wsmatch what;\r
756 //      if(!boost::regex_match(message, what, expr))\r
757 //              return nullptr;\r
758 //\r
759 //      auto info = channel_info::parse(what, channels);\r
760 //\r
761 //      int flash_layer_index = boost::lexical_cast<int>(what["FLASH_LAYER"].str());\r
762 //\r
763 //      std::wstring templatename = what["TEMPLATE"].str();\r
764 //      bool play_on_load = what["PLAY_ON_LOAD"].matched ? what["PLAY_ON_LOAD"].str() != L"0" : 0;\r
765 //      std::wstring start_label = what["START_LABEL"].str();   \r
766 //      std::wstring data = get_data(what["DATA"].str());\r
767 //      \r
768 //      boost::replace_all(templatename, "\"", "");\r
769 //\r
770 //      return [=]() -> std::wstring\r
771 //      {       \r
772 //              std::wstring fullFilename = flash::flash_producer::find_template(server::template_folder() + templatename);\r
773 //              if(fullFilename.empty())\r
774 //                      BOOST_THROW_EXCEPTION(file_not_found());\r
775 //      \r
776 //              std::wstring extension = boost::filesystem::wpath(fullFilename).extension();\r
777 //              std::wstring filename = templatename;\r
778 //              filename.append(extension);\r
779 //\r
780 //              flash::flash::get_default_cg_producer(info.video_channel, std::max<int>(DEFAULT_CHANNEL_LAYER+1, info.layer_index))\r
781 //                      ->add(flash_layer_index, filename, play_on_load, start_label, data);\r
782 //\r
783 //              CASPAR_LOG(info) << L"Executed [amcp_channel_cg_add]";\r
784 //              return L"";\r
785 //      };\r
786 \r
787 bool LoadbgCommand::DoExecute()\r
788 {\r
789         transition_info transitionInfo;\r
790         \r
791         bool bLoop = false;\r
792 \r
793         // TRANSITION\r
794 \r
795         std::wstring message;\r
796         for(size_t n = 0; n < _parameters.size(); ++n)\r
797                 message += _parameters[n] + L" ";\r
798                 \r
799         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
800         boost::wsmatch what;\r
801         if(boost::regex_match(message, what, expr))\r
802         {\r
803                 auto transition = what["TRANSITION"].str();\r
804                 transitionInfo.duration = lexical_cast_or_default<size_t>(what["DURATION"].str());\r
805                 auto direction = what["DIRECTION"].matched ? what["DIRECTION"].str() : L"";\r
806                 auto tween = what["TWEEN"].matched ? what["TWEEN"].str() : L"";\r
807                 transitionInfo.tweener = get_tweener(tween);            \r
808 \r
809                 if(transition == TEXT("CUT"))\r
810                         transitionInfo.type = transition::cut;\r
811                 else if(transition == TEXT("MIX"))\r
812                         transitionInfo.type = transition::mix;\r
813                 else if(transition == TEXT("PUSH"))\r
814                         transitionInfo.type = transition::push;\r
815                 else if(transition == TEXT("SLIDE"))\r
816                         transitionInfo.type = transition::slide;\r
817                 else if(transition == TEXT("WIPE"))\r
818                         transitionInfo.type = transition::wipe;\r
819                 \r
820                 if(direction == TEXT("FROMLEFT"))\r
821                         transitionInfo.direction = transition_direction::from_left;\r
822                 else if(direction == TEXT("FROMRIGHT"))\r
823                         transitionInfo.direction = transition_direction::from_right;\r
824                 else if(direction == TEXT("LEFT"))\r
825                         transitionInfo.direction = transition_direction::from_right;\r
826                 else if(direction == TEXT("RIGHT"))\r
827                         transitionInfo.direction = transition_direction::from_left;\r
828         }\r
829         \r
830         //Perform loading of the clip\r
831         try\r
832         {\r
833                 _parameters[0] = _parameters[0];\r
834                 auto pFP = create_producer(GetChannel()->mixer(), _parameters);\r
835                 if(pFP == frame_producer::empty())\r
836                         BOOST_THROW_EXCEPTION(file_not_found() << msg_info(_parameters.size() > 0 ? narrow(_parameters[0]) : ""));\r
837 \r
838                 bool auto_play = std::find(_parameters.begin(), _parameters.end(), L"AUTO") != _parameters.end();\r
839 \r
840                 auto pFP2 = create_transition_producer(GetChannel()->get_video_format_desc().field_mode, pFP, transitionInfo);\r
841                 GetChannel()->stage()->load(GetLayerIndex(), pFP2, false, auto_play ? transitionInfo.duration : -1); // TODO: LOOP\r
842         \r
843                 SetReplyString(TEXT("202 LOADBG OK\r\n"));\r
844 \r
845                 return true;\r
846         }\r
847         catch(file_not_found&)\r
848         {               \r
849                 std::wstring params2;\r
850                 for(auto it = _parameters.begin(); it != _parameters.end(); ++it)\r
851                         params2 += L" " + *it;\r
852                 CASPAR_LOG(error) << L"File not found. No match found for parameters. Check syntax:" << params2;\r
853                 SetReplyString(TEXT("404 LOADBG ERROR\r\n"));\r
854                 return false;\r
855         }\r
856         catch(...)\r
857         {\r
858                 CASPAR_LOG_CURRENT_EXCEPTION();\r
859                 SetReplyString(TEXT("502 LOADBG FAILED\r\n"));\r
860                 return false;\r
861         }\r
862 }\r
863 \r
864 bool PauseCommand::DoExecute()\r
865 {\r
866         try\r
867         {\r
868                 GetChannel()->stage()->pause(GetLayerIndex());\r
869                 SetReplyString(TEXT("202 PAUSE OK\r\n"));\r
870                 return true;\r
871         }\r
872         catch(...)\r
873         {\r
874                 SetReplyString(TEXT("501 PAUSE FAILED\r\n"));\r
875         }\r
876 \r
877         return false;\r
878 }\r
879 \r
880 bool PlayCommand::DoExecute()\r
881 {\r
882         try\r
883         {\r
884                 if(!_parameters.empty())\r
885                 {\r
886                         LoadbgCommand lbg;\r
887                         lbg.SetChannel(GetChannel());\r
888                         lbg.SetChannelIndex(GetChannelIndex());\r
889                         lbg.SetLayerIntex(GetLayerIndex());\r
890                         lbg.SetClientInfo(GetClientInfo());\r
891                         for(auto it = _parameters.begin(); it != _parameters.end(); ++it)\r
892                                 lbg.AddParameter(*it);\r
893                         if(!lbg.Execute())\r
894                                 throw std::exception();\r
895                 }\r
896 \r
897                 GetChannel()->stage()->play(GetLayerIndex());\r
898                 \r
899                 SetReplyString(TEXT("202 PLAY OK\r\n"));\r
900                 return true;\r
901         }\r
902         catch(...)\r
903         {\r
904                 SetReplyString(TEXT("501 PLAY FAILED\r\n"));\r
905         }\r
906 \r
907         return false;\r
908 }\r
909 \r
910 bool StopCommand::DoExecute()\r
911 {\r
912         try\r
913         {\r
914                 GetChannel()->stage()->stop(GetLayerIndex());\r
915                 SetReplyString(TEXT("202 STOP OK\r\n"));\r
916                 return true;\r
917         }\r
918         catch(...)\r
919         {\r
920                 SetReplyString(TEXT("501 STOP FAILED\r\n"));\r
921         }\r
922 \r
923         return false;\r
924 }\r
925 \r
926 bool ClearCommand::DoExecute()\r
927 {\r
928         int index = GetLayerIndex(std::numeric_limits<int>::min());\r
929         if(index != std::numeric_limits<int>::min())\r
930                 GetChannel()->stage()->clear(index);\r
931         else\r
932                 GetChannel()->stage()->clear();\r
933                 \r
934         SetReplyString(TEXT("202 CLEAR OK\r\n"));\r
935 \r
936         return true;\r
937 }\r
938 \r
939 bool PrintCommand::DoExecute()\r
940 {\r
941         GetChannel()->output()->add(create_consumer(boost::assign::list_of(L"IMAGE")));\r
942                 \r
943         SetReplyString(TEXT("202 PRINT OK\r\n"));\r
944 \r
945         return true;\r
946 }\r
947 \r
948 bool LogCommand::DoExecute()\r
949 {\r
950         if(_parameters.at(0) == L"LEVEL")\r
951                 log::set_log_level(_parameters.at(1));\r
952 \r
953         SetReplyString(TEXT("202 LOG OK\r\n"));\r
954 \r
955         return true;\r
956 }\r
957 \r
958 bool CGCommand::DoExecute()\r
959 {\r
960         try\r
961         {\r
962                 std::wstring command = _parameters[0];\r
963                 if(command == TEXT("ADD"))\r
964                         return DoExecuteAdd();\r
965                 else if(command == TEXT("PLAY"))\r
966                         return DoExecutePlay();\r
967                 else if(command == TEXT("STOP"))\r
968                         return DoExecuteStop();\r
969                 else if(command == TEXT("NEXT"))\r
970                         return DoExecuteNext();\r
971                 else if(command == TEXT("REMOVE"))\r
972                         return DoExecuteRemove();\r
973                 else if(command == TEXT("CLEAR"))\r
974                         return DoExecuteClear();\r
975                 else if(command == TEXT("UPDATE"))\r
976                         return DoExecuteUpdate();\r
977                 else if(command == TEXT("INVOKE"))\r
978                         return DoExecuteInvoke();\r
979                 else if(command == TEXT("INFO"))\r
980                         return DoExecuteInfo();\r
981         }\r
982         catch(...)\r
983         {\r
984                 CASPAR_LOG_CURRENT_EXCEPTION();\r
985         }\r
986 \r
987         SetReplyString(TEXT("403 CG ERROR\r\n"));\r
988         return false;\r
989 }\r
990 \r
991 bool CGCommand::ValidateLayer(const std::wstring& layerstring) {\r
992         int length = layerstring.length();\r
993         for(int i = 0; i < length; ++i) {\r
994                 if(!_istdigit(layerstring[i])) {\r
995                         return false;\r
996                 }\r
997         }\r
998 \r
999         return true;\r
1000 }\r
1001 \r
1002 bool CGCommand::DoExecuteAdd() {\r
1003         //CG 1 ADD 0 "template_folder/templatename" [STARTLABEL] 0/1 [DATA]\r
1004 \r
1005         int layer = 0;                          //_parameters[1]\r
1006 //      std::wstring templateName;      //_parameters[2]\r
1007         std::wstring label;             //_parameters[3]\r
1008         bool bDoStart = false;          //_parameters[3] alt. _parameters[4]\r
1009 //      std::wstring data;                      //_parameters[4] alt. _parameters[5]\r
1010 \r
1011         if(_parameters.size() < 4) \r
1012         {\r
1013                 SetReplyString(TEXT("402 CG ERROR\r\n"));\r
1014                 return false;\r
1015         }\r
1016         unsigned int dataIndex = 4;\r
1017 \r
1018         if(!ValidateLayer(_parameters[1])) \r
1019         {\r
1020                 SetReplyString(TEXT("403 CG ERROR\r\n"));\r
1021                 return false;\r
1022         }\r
1023 \r
1024         layer = _ttoi(_parameters[1].c_str());\r
1025 \r
1026         if(_parameters[3].length() > 1) \r
1027         {       //read label\r
1028                 label = _parameters2[3];\r
1029                 ++dataIndex;\r
1030 \r
1031                 if(_parameters.size() > 4 && _parameters[4].length() > 0)       //read play-on-load-flag\r
1032                         bDoStart = (_parameters[4][0]==TEXT('1')) ? true : false;\r
1033                 else \r
1034                 {\r
1035                         SetReplyString(TEXT("402 CG ERROR\r\n"));\r
1036                         return false;\r
1037                 }\r
1038         }\r
1039         else if(_parameters[3].length() > 0) {  //read play-on-load-flag\r
1040                 bDoStart = (_parameters[3][0]==TEXT('1')) ? true : false;\r
1041         }\r
1042         else \r
1043         {\r
1044                 SetReplyString(TEXT("403 CG ERROR\r\n"));\r
1045                 return false;\r
1046         }\r
1047 \r
1048         const TCHAR* pDataString = 0;\r
1049         std::wstringstream data;\r
1050         std::wstring dataFromFile;\r
1051         if(_parameters.size() > dataIndex) \r
1052         {       //read data\r
1053                 const std::wstring& dataString = _parameters2[dataIndex];\r
1054 \r
1055                 if(dataString[0] == TEXT('<')) //the data is an XML-string\r
1056                         pDataString = dataString.c_str();\r
1057                 else \r
1058                 {\r
1059                         //The data is not an XML-string, it must be a filename\r
1060                         std::wstring filename = env::data_folder();\r
1061                         filename.append(dataString);\r
1062                         filename.append(TEXT(".ftd"));\r
1063 \r
1064                         dataFromFile = read_file(boost::filesystem::wpath(filename));\r
1065                         pDataString = dataFromFile.c_str();\r
1066                 }\r
1067         }\r
1068 \r
1069         std::wstring fullFilename = flash::find_template(env::template_folder() + _parameters[2]);\r
1070         if(!fullFilename.empty())\r
1071         {\r
1072                 std::wstring extension = boost::filesystem::wpath(fullFilename).extension();\r
1073                 std::wstring filename = _parameters[2];\r
1074                 filename.append(extension);\r
1075 \r
1076                 flash::get_default_cg_producer(safe_ptr<core::video_channel>(GetChannel()), GetLayerIndex(flash::cg_producer::DEFAULT_LAYER))->add(layer, filename, bDoStart, label, (pDataString!=0) ? pDataString : TEXT(""));\r
1077                 SetReplyString(TEXT("202 CG OK\r\n"));\r
1078         }\r
1079         else\r
1080         {\r
1081                 CASPAR_LOG(warning) << "Could not find template " << _parameters[2];\r
1082                 SetReplyString(TEXT("404 CG ERROR\r\n"));\r
1083         }\r
1084         return true;\r
1085 }\r
1086 \r
1087 bool CGCommand::DoExecutePlay()\r
1088 {\r
1089         if(_parameters.size() > 1)\r
1090         {\r
1091                 if(!ValidateLayer(_parameters[1])) \r
1092                 {\r
1093                         SetReplyString(TEXT("403 CG ERROR\r\n"));\r
1094                         return false;\r
1095                 }\r
1096                 int layer = _ttoi(_parameters[1].c_str());\r
1097                 flash::get_default_cg_producer(safe_ptr<core::video_channel>(GetChannel()), GetLayerIndex(flash::cg_producer::DEFAULT_LAYER))->play(layer);\r
1098         }\r
1099         else\r
1100         {\r
1101                 SetReplyString(TEXT("402 CG ERROR\r\n"));\r
1102                 return true;\r
1103         }\r
1104 \r
1105         SetReplyString(TEXT("202 CG OK\r\n"));\r
1106         return true;\r
1107 }\r
1108 \r
1109 bool CGCommand::DoExecuteStop() \r
1110 {\r
1111         if(_parameters.size() > 1)\r
1112         {\r
1113                 if(!ValidateLayer(_parameters[1])) \r
1114                 {\r
1115                         SetReplyString(TEXT("403 CG ERROR\r\n"));\r
1116                         return false;\r
1117                 }\r
1118                 int layer = _ttoi(_parameters[1].c_str());\r
1119                 flash::get_default_cg_producer(safe_ptr<core::video_channel>(GetChannel()), GetLayerIndex(flash::cg_producer::DEFAULT_LAYER))->stop(layer, 0);\r
1120         }\r
1121         else \r
1122         {\r
1123                 SetReplyString(TEXT("402 CG ERROR\r\n"));\r
1124                 return true;\r
1125         }\r
1126 \r
1127         SetReplyString(TEXT("202 CG OK\r\n"));\r
1128         return true;\r
1129 }\r
1130 \r
1131 bool CGCommand::DoExecuteNext()\r
1132 {\r
1133         if(_parameters.size() > 1) \r
1134         {\r
1135                 if(!ValidateLayer(_parameters[1])) \r
1136                 {\r
1137                         SetReplyString(TEXT("403 CG ERROR\r\n"));\r
1138                         return false;\r
1139                 }\r
1140 \r
1141                 int layer = _ttoi(_parameters[1].c_str());\r
1142                 flash::get_default_cg_producer(safe_ptr<core::video_channel>(GetChannel()), GetLayerIndex(flash::cg_producer::DEFAULT_LAYER))->next(layer);\r
1143         }\r
1144         else \r
1145         {\r
1146                 SetReplyString(TEXT("402 CG ERROR\r\n"));\r
1147                 return true;\r
1148         }\r
1149 \r
1150         SetReplyString(TEXT("202 CG OK\r\n"));\r
1151         return true;\r
1152 }\r
1153 \r
1154 bool CGCommand::DoExecuteRemove() \r
1155 {\r
1156         if(_parameters.size() > 1) \r
1157         {\r
1158                 if(!ValidateLayer(_parameters[1])) \r
1159                 {\r
1160                         SetReplyString(TEXT("403 CG ERROR\r\n"));\r
1161                         return false;\r
1162                 }\r
1163 \r
1164                 int layer = _ttoi(_parameters[1].c_str());\r
1165                 flash::get_default_cg_producer(safe_ptr<core::video_channel>(GetChannel()), GetLayerIndex(flash::cg_producer::DEFAULT_LAYER))->remove(layer);\r
1166         }\r
1167         else \r
1168         {\r
1169                 SetReplyString(TEXT("402 CG ERROR\r\n"));\r
1170                 return true;\r
1171         }\r
1172 \r
1173         SetReplyString(TEXT("202 CG OK\r\n"));\r
1174         return true;\r
1175 }\r
1176 \r
1177 bool CGCommand::DoExecuteClear() \r
1178 {\r
1179         GetChannel()->stage()->clear(GetLayerIndex(flash::cg_producer::DEFAULT_LAYER));\r
1180         SetReplyString(TEXT("202 CG OK\r\n"));\r
1181         return true;\r
1182 }\r
1183 \r
1184 bool CGCommand::DoExecuteUpdate() \r
1185 {\r
1186         try\r
1187         {\r
1188                 if(!ValidateLayer(_parameters.at(1)))\r
1189                 {\r
1190                         SetReplyString(TEXT("403 CG ERROR\r\n"));\r
1191                         return false;\r
1192                 }\r
1193                                                 \r
1194                 std::wstring dataString = _parameters2.at(2);                           \r
1195                 if(dataString.at(0) != TEXT('<'))\r
1196                 {\r
1197                         //The data is not an XML-string, it must be a filename\r
1198                         std::wstring filename = env::data_folder();\r
1199                         filename.append(dataString);\r
1200                         filename.append(TEXT(".ftd"));\r
1201 \r
1202                         dataString = read_file(boost::filesystem::wpath(filename));\r
1203                 }               \r
1204 \r
1205                 int layer = _ttoi(_parameters.at(1).c_str());\r
1206                 flash::get_default_cg_producer(safe_ptr<core::video_channel>(GetChannel()), GetLayerIndex(flash::cg_producer::DEFAULT_LAYER))->update(layer, dataString);\r
1207         }\r
1208         catch(...)\r
1209         {\r
1210                 SetReplyString(TEXT("402 CG ERROR\r\n"));\r
1211                 return true;\r
1212         }\r
1213 \r
1214         SetReplyString(TEXT("202 CG OK\r\n"));\r
1215         return true;\r
1216 }\r
1217 \r
1218 bool CGCommand::DoExecuteInvoke() \r
1219 {\r
1220         std::wstringstream replyString;\r
1221         replyString << TEXT("201 CG OK\r\n");\r
1222 \r
1223         if(_parameters.size() > 2)\r
1224         {\r
1225                 if(!ValidateLayer(_parameters[1]))\r
1226                 {\r
1227                         SetReplyString(TEXT("403 CG ERROR\r\n"));\r
1228                         return false;\r
1229                 }\r
1230                 int layer = _ttoi(_parameters[1].c_str());\r
1231                 auto result = flash::get_default_cg_producer(safe_ptr<core::video_channel>(GetChannel()), GetLayerIndex(flash::cg_producer::DEFAULT_LAYER))->invoke(layer, _parameters2[2]);\r
1232                 replyString << result << TEXT("\r\n"); \r
1233         }\r
1234         else \r
1235         {\r
1236                 SetReplyString(TEXT("402 CG ERROR\r\n"));\r
1237                 return true;\r
1238         }\r
1239         \r
1240         SetReplyString(replyString.str());\r
1241         return true;\r
1242 }\r
1243 \r
1244 bool CGCommand::DoExecuteInfo() \r
1245 {\r
1246         std::wstringstream replyString;\r
1247         replyString << TEXT("201 CG OK\r\n");\r
1248 \r
1249         if(_parameters.size() > 1)\r
1250         {\r
1251                 if(!ValidateLayer(_parameters[1]))\r
1252                 {\r
1253                         SetReplyString(TEXT("403 CG ERROR\r\n"));\r
1254                         return false;\r
1255                 }\r
1256 \r
1257                 int layer = _ttoi(_parameters[1].c_str());\r
1258                 auto desc = flash::get_default_cg_producer(safe_ptr<core::video_channel>(GetChannel()), GetLayerIndex(flash::cg_producer::DEFAULT_LAYER))->description(layer);\r
1259                 \r
1260                 replyString << desc << TEXT("\r\n"); \r
1261         }\r
1262         else \r
1263         {\r
1264                 auto info = flash::get_default_cg_producer(safe_ptr<core::video_channel>(GetChannel()), GetLayerIndex(flash::cg_producer::DEFAULT_LAYER))->template_host_info();\r
1265                 replyString << info << TEXT("\r\n"); \r
1266         }       \r
1267 \r
1268         SetReplyString(replyString.str());\r
1269         return true;\r
1270 }\r
1271 \r
1272 bool DataCommand::DoExecute()\r
1273 {\r
1274         std::wstring command = _parameters[0];\r
1275         if(command == TEXT("STORE"))\r
1276                 return DoExecuteStore();\r
1277         else if(command == TEXT("RETRIEVE"))\r
1278                 return DoExecuteRetrieve();\r
1279         else if(command == TEXT("REMOVE"))\r
1280                 return DoExecuteRemove();\r
1281         else if(command == TEXT("LIST"))\r
1282                 return DoExecuteList();\r
1283 \r
1284         SetReplyString(TEXT("403 DATA ERROR\r\n"));\r
1285         return false;\r
1286 }\r
1287 \r
1288 bool DataCommand::DoExecuteStore() \r
1289 {\r
1290         if(_parameters.size() < 3) \r
1291         {\r
1292                 SetReplyString(TEXT("402 DATA STORE ERROR\r\n"));\r
1293                 return false;\r
1294         }\r
1295 \r
1296         std::wstring filename = env::data_folder();\r
1297         filename.append(_parameters[1]);\r
1298         filename.append(TEXT(".ftd"));\r
1299 \r
1300         auto data_path = boost::filesystem::wpath(\r
1301                         boost::filesystem::wpath(filename).parent_path());\r
1302         \r
1303         if(!boost::filesystem::exists(data_path))\r
1304                 boost::filesystem::create_directories(data_path);\r
1305 \r
1306         std::wofstream datafile(filename.c_str());\r
1307 \r
1308         if(!datafile) \r
1309         {\r
1310                 SetReplyString(TEXT("501 DATA STORE FAILED\r\n"));\r
1311                 return false;\r
1312         }\r
1313 \r
1314         datafile << static_cast<wchar_t>(65279); // UTF-8 BOM character\r
1315         datafile << _parameters2[2] << std::flush;\r
1316         datafile.close();\r
1317 \r
1318         std::wstring replyString = TEXT("202 DATA STORE OK\r\n");\r
1319         SetReplyString(replyString);\r
1320         return true;\r
1321 }\r
1322 \r
1323 bool DataCommand::DoExecuteRetrieve() \r
1324 {\r
1325         if(_parameters.size() < 2) \r
1326         {\r
1327                 SetReplyString(TEXT("402 DATA RETRIEVE ERROR\r\n"));\r
1328                 return false;\r
1329         }\r
1330 \r
1331         std::wstring filename = env::data_folder();\r
1332         filename.append(_parameters[1]);\r
1333         filename.append(TEXT(".ftd"));\r
1334 \r
1335         std::wstring file_contents = read_file(boost::filesystem::wpath(filename));\r
1336 \r
1337         //std::wifstream datafile(filename.c_str());\r
1338 \r
1339         if (file_contents.empty()) \r
1340         {\r
1341                 SetReplyString(TEXT("404 DATA RETRIEVE ERROR\r\n"));\r
1342                 return false;\r
1343         }\r
1344 \r
1345         std::wstringstream reply(TEXT("201 DATA RETRIEVE OK\r\n"));\r
1346         /*std::wstring line;\r
1347         bool bFirstLine = true;\r
1348         while(std::getline(datafile, line))\r
1349         {\r
1350                 if(!bFirstLine)\r
1351                         reply << "\\n";\r
1352                 else\r
1353                         bFirstLine = false;\r
1354 \r
1355                 reply << line;\r
1356         }\r
1357         datafile.close();*/\r
1358 \r
1359         reply << file_contents;\r
1360         reply << "\r\n";\r
1361         SetReplyString(reply.str());\r
1362         return true;\r
1363 }\r
1364 \r
1365 bool DataCommand::DoExecuteRemove() \r
1366\r
1367         if (_parameters.size() < 2) \r
1368         {\r
1369                 SetReplyString(TEXT("402 DATA REMOVE ERROR\r\n"));\r
1370                 return false;\r
1371         }\r
1372 \r
1373         std::wstring filename = env::data_folder();\r
1374         filename.append(_parameters[1]);\r
1375         filename.append(TEXT(".ftd"));\r
1376 \r
1377         if (!boost::filesystem::exists(filename)) \r
1378         {\r
1379                 SetReplyString(TEXT("404 DATA REMOVE ERROR\r\n"));\r
1380                 return false;\r
1381         }\r
1382 \r
1383         if (!boost::filesystem::remove(filename))\r
1384         {\r
1385                 SetReplyString(TEXT("403 DATA REMOVE ERROR\r\n"));\r
1386                 return false;\r
1387         }\r
1388 \r
1389         SetReplyString(TEXT("201 DATA REMOVE OK\r\n"));\r
1390 \r
1391         return true;\r
1392 }\r
1393 \r
1394 bool DataCommand::DoExecuteList() \r
1395 {\r
1396         std::wstringstream replyString;\r
1397         replyString << TEXT("200 DATA LIST OK\r\n");\r
1398 \r
1399         for (boost::filesystem::wrecursive_directory_iterator itr(env::data_folder()), end; itr != end; ++itr)\r
1400         {                       \r
1401                 if(boost::filesystem::is_regular_file(itr->path()))\r
1402                 {\r
1403                         if(!boost::iequals(itr->path().extension(), L".ftd"))\r
1404                                 continue;\r
1405                         \r
1406                         auto relativePath = boost::filesystem::wpath(itr->path().file_string().substr(env::data_folder().size()-1, itr->path().file_string().size()));\r
1407                         \r
1408                         auto str = relativePath.replace_extension(TEXT("")).external_file_string();\r
1409                         if(str[0] == '\\' || str[0] == '/')\r
1410                                 str = std::wstring(str.begin() + 1, str.end());\r
1411 \r
1412                         replyString << str << TEXT("\r\n");     \r
1413                 }\r
1414         }\r
1415         \r
1416         replyString << TEXT("\r\n");\r
1417 \r
1418         SetReplyString(boost::to_upper_copy(replyString.str()));\r
1419         return true;\r
1420 }\r
1421 \r
1422 bool CinfCommand::DoExecute()\r
1423 {\r
1424         std::wstringstream replyString;\r
1425         \r
1426         try\r
1427         {\r
1428                 std::wstring info;\r
1429                 for (boost::filesystem::wrecursive_directory_iterator itr(env::media_folder()), end; itr != end; ++itr)\r
1430                 {\r
1431                         auto path = itr->path();\r
1432                         auto file = path.replace_extension(L"").filename();\r
1433                         if(boost::iequals(file, _parameters.at(0)))\r
1434                                 info += MediaInfo(itr->path()) + L"\r\n";\r
1435                 }\r
1436 \r
1437                 if(info.empty())\r
1438                 {\r
1439                         SetReplyString(TEXT("404 CINF ERROR\r\n"));\r
1440                         return false;\r
1441                 }\r
1442                 replyString << TEXT("200 CINF OK\r\n");\r
1443                 replyString << info << "\r\n";\r
1444         }\r
1445         catch(...)\r
1446         {\r
1447                 SetReplyString(TEXT("404 CINF ERROR\r\n"));\r
1448                 return false;\r
1449         }\r
1450         \r
1451         SetReplyString(replyString.str());\r
1452         return true;\r
1453 }\r
1454 \r
1455 void GenerateChannelInfo(int index, const safe_ptr<core::video_channel>& pChannel, std::wstringstream& replyString)\r
1456 {\r
1457         replyString << index+1 << TEXT(" ") << pChannel->get_video_format_desc().name << TEXT(" PLAYING") << TEXT("\r\n");\r
1458 }\r
1459 \r
1460 bool InfoCommand::DoExecute()\r
1461 {\r
1462         std::wstringstream replyString;\r
1463         \r
1464         boost::property_tree::xml_writer_settings<wchar_t> w(' ', 3);\r
1465 \r
1466         try\r
1467         {\r
1468                 if(_parameters.size() >= 1 && _parameters[0] == L"TEMPLATE")\r
1469                 {               \r
1470                         replyString << L"201 INFO TEMPLATE OK\r\n";\r
1471 \r
1472                         // Needs to be extended for any file, not just flash.\r
1473 \r
1474                         auto filename = flash::find_template(env::template_folder() + _parameters.at(1));\r
1475                                                 \r
1476                         std::wstringstream str;\r
1477                         str << widen(flash::read_template_meta_info(filename));\r
1478                         boost::property_tree::wptree info;\r
1479                         boost::property_tree::xml_parser::read_xml(str, info, boost::property_tree::xml_parser::trim_whitespace | boost::property_tree::xml_parser::no_comments);\r
1480 \r
1481                         boost::property_tree::xml_parser::write_xml(replyString, info, w);\r
1482                 }\r
1483                 else if(_parameters.size() >= 1 && _parameters[0] == L"CONFIG")\r
1484                 {               \r
1485                         replyString << L"201 INFO CONFIG OK\r\n";\r
1486 \r
1487                         boost::property_tree::write_xml(replyString, caspar::env::properties(), w);\r
1488                 }\r
1489                 else if(_parameters.size() >= 1 && _parameters[0] == L"PATHS")\r
1490                 {\r
1491                         replyString << L"201 INFO PATHS OK\r\n";\r
1492 \r
1493                         boost::property_tree::wptree info;\r
1494                         info.add_child(L"paths", caspar::env::properties().get_child(L"configuration.paths"));\r
1495                         info.add(L"paths.initial-path", boost::filesystem2::initial_path<boost::filesystem2::wpath>().directory_string() + L"\\");\r
1496 \r
1497                         boost::property_tree::write_xml(replyString, info, w);\r
1498                 }\r
1499                 else if(_parameters.size() >= 1 && _parameters[0] == L"SYSTEM")\r
1500                 {\r
1501                         replyString << L"201 INFO SYSTEM OK\r\n";\r
1502                         \r
1503                         boost::property_tree::wptree info;\r
1504                         \r
1505                         info.add(L"system.name",                                        caspar::get_system_product_name());\r
1506                         info.add(L"system.windows.name",                        caspar::get_win_product_name());\r
1507                         info.add(L"system.windows.service-pack",        caspar::get_win_sp_version());\r
1508                         info.add(L"system.cpu",                                         caspar::get_cpu_info());\r
1509         \r
1510                         BOOST_FOREACH(auto device, caspar::decklink::get_device_list())\r
1511                                 info.add(L"system.caspar.decklink.device", device);\r
1512 \r
1513                         BOOST_FOREACH(auto device, caspar::bluefish::get_device_list())\r
1514                                 info.add(L"system.caspar.bluefish.device", device);\r
1515                                 \r
1516                         info.add(L"system.caspar.flash",                                        caspar::flash::get_version());\r
1517                         info.add(L"system.caspar.template-host",                        caspar::flash::get_cg_version());\r
1518                         info.add(L"system.caspar.free-image",                           caspar::image::get_version());\r
1519                         info.add(L"system.caspar.ffmpeg.avcodec",                       caspar::ffmpeg::get_avcodec_version());\r
1520                         info.add(L"system.caspar.ffmpeg.avformat",                      caspar::ffmpeg::get_avformat_version());\r
1521                         info.add(L"system.caspar.ffmpeg.avfilter",                      caspar::ffmpeg::get_avfilter_version());\r
1522                         info.add(L"system.caspar.ffmpeg.avutil",                        caspar::ffmpeg::get_avutil_version());\r
1523                         info.add(L"system.caspar.ffmpeg.swscale",                       caspar::ffmpeg::get_swscale_version());\r
1524                                                                         \r
1525                         boost::property_tree::write_xml(replyString, info, w);\r
1526                 }\r
1527                 else if(_parameters.size() >= 1 && _parameters[0] == L"SERVER")\r
1528                 {\r
1529                         replyString << L"201 INFO SERVER OK\r\n";\r
1530                         \r
1531                         boost::property_tree::wptree info;\r
1532 \r
1533                         int index = 0;\r
1534                         BOOST_FOREACH(auto channel, channels_)\r
1535                                 info.add_child(L"channels.channel", channel->info())\r
1536                                         .add(L"index", ++index);\r
1537                         \r
1538                         boost::property_tree::write_xml(replyString, info, w);\r
1539                 }\r
1540                 else // channel\r
1541                 {                       \r
1542                         if(_parameters.size() >= 1)\r
1543                         {\r
1544                                 replyString << TEXT("201 INFO OK\r\n");\r
1545                                 boost::property_tree::wptree info;\r
1546 \r
1547                                 std::vector<std::wstring> split;\r
1548                                 boost::split(split, _parameters[0], boost::is_any_of("-"));\r
1549                                         \r
1550                                 int layer = std::numeric_limits<int>::min();\r
1551                                 int channel = boost::lexical_cast<int>(split[0]) - 1;\r
1552 \r
1553                                 if(split.size() > 1)\r
1554                                         layer = boost::lexical_cast<int>(split[1]);\r
1555                                 \r
1556                                 if(layer == std::numeric_limits<int>::min())\r
1557                                 {       \r
1558                                         info.add_child(L"channel", channels_.at(channel)->info())\r
1559                                                         .add(L"index", channel);\r
1560                                 }\r
1561                                 else\r
1562                                 {\r
1563                                         if(_parameters.size() >= 2)\r
1564                                         {\r
1565                                                 if(_parameters[1] == L"B")\r
1566                                                         info.add_child(L"producer", channels_.at(channel)->stage()->background(layer).get()->info());\r
1567                                                 else\r
1568                                                         info.add_child(L"producer", channels_.at(channel)->stage()->foreground(layer).get()->info());\r
1569                                         }\r
1570                                         else\r
1571                                         {\r
1572                                                 info.add_child(L"layer", channels_.at(channel)->stage()->info(layer).get())\r
1573                                                         .add(L"index", layer);\r
1574                                         }\r
1575                                 }\r
1576                                 boost::property_tree::xml_parser::write_xml(replyString, info, w);\r
1577                         }\r
1578                         else\r
1579                         {\r
1580                                 // This is needed for backwards compatibility with old clients\r
1581                                 replyString << TEXT("200 INFO OK\r\n");\r
1582                                 for(size_t n = 0; n < channels_.size(); ++n)\r
1583                                         GenerateChannelInfo(n, channels_[n], replyString);\r
1584                         }\r
1585 \r
1586                 }\r
1587         }\r
1588         catch(...)\r
1589         {\r
1590                 SetReplyString(TEXT("403 INFO ERROR\r\n"));\r
1591                 return false;\r
1592         }\r
1593 \r
1594         replyString << TEXT("\r\n");\r
1595         SetReplyString(replyString.str());\r
1596         return true;\r
1597 }\r
1598 \r
1599 bool ClsCommand::DoExecute()\r
1600 {\r
1601 /*\r
1602                 wav = audio\r
1603                 mp3 = audio\r
1604                 swf     = movie\r
1605                 dv  = movie\r
1606                 tga = still\r
1607                 col = still\r
1608         */\r
1609         std::wstringstream replyString;\r
1610         replyString << TEXT("200 CLS OK\r\n");\r
1611         replyString << ListMedia();\r
1612         replyString << TEXT("\r\n");\r
1613         SetReplyString(boost::to_upper_copy(replyString.str()));\r
1614         return true;\r
1615 }\r
1616 \r
1617 bool TlsCommand::DoExecute()\r
1618 {\r
1619         std::wstringstream replyString;\r
1620         replyString << TEXT("200 TLS OK\r\n");\r
1621 \r
1622         replyString << ListTemplates();\r
1623         replyString << TEXT("\r\n");\r
1624 \r
1625         SetReplyString(replyString.str());\r
1626         return true;\r
1627 }\r
1628 \r
1629 bool VersionCommand::DoExecute()\r
1630 {\r
1631         std::wstring replyString = TEXT("201 VERSION OK\r\n") + env::version() + TEXT("\r\n");\r
1632 \r
1633         if(_parameters.size() > 0)\r
1634         {\r
1635                 if(_parameters[0] == L"FLASH")\r
1636                         replyString = TEXT("201 VERSION OK\r\n") + flash::get_version() + TEXT("\r\n");\r
1637                 else if(_parameters[0] == L"TEMPLATEHOST")\r
1638                         replyString = TEXT("201 VERSION OK\r\n") + flash::get_cg_version() + TEXT("\r\n");\r
1639                 else if(_parameters[0] != L"SERVER")\r
1640                         replyString = TEXT("403 VERSION ERROR\r\n");\r
1641         }\r
1642 \r
1643         SetReplyString(replyString);\r
1644         return true;\r
1645 }\r
1646 \r
1647 bool ByeCommand::DoExecute()\r
1648 {\r
1649         GetClientInfo()->Disconnect();\r
1650         return true;\r
1651 }\r
1652 \r
1653 bool SetCommand::DoExecute()\r
1654 {\r
1655         std::wstring name = _parameters[0];\r
1656         std::transform(name.begin(), name.end(), name.begin(), toupper);\r
1657 \r
1658         std::wstring value = _parameters[1];\r
1659         std::transform(value.begin(), value.end(), value.begin(), toupper);\r
1660 \r
1661         if(name == TEXT("MODE"))\r
1662         {\r
1663                 auto format_desc = core::video_format_desc::get(value);\r
1664                 if(format_desc.format != core::video_format::invalid)\r
1665                 {\r
1666                         GetChannel()->set_video_format_desc(format_desc);\r
1667                         SetReplyString(TEXT("202 SET MODE OK\r\n"));\r
1668                 }\r
1669                 else\r
1670                         SetReplyString(TEXT("501 SET MODE FAILED\r\n"));\r
1671         }\r
1672         else\r
1673         {\r
1674                 this->SetReplyString(TEXT("403 SET ERROR\r\n"));\r
1675         }\r
1676 \r
1677         return true;\r
1678 }\r
1679 \r
1680 \r
1681 }       //namespace amcp\r
1682 }}      //namespace caspar