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