]> git.sesse.net Git - casparcg/blob - protocol/amcp/AMCPCommandsImpl.cpp
2.0.2: - stage: PARAM command is now synchronized with rendering thread.
[casparcg] / protocol / amcp / AMCPCommandsImpl.cpp
1 /*\r
2 * copyright (c) 2010 Sveriges Television AB <info@casparcg.com>\r
3 *\r
4 *  This file is part of CasparCG.\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 */\r
20 \r
21 #include "../StdAfx.h"\r
22 \r
23 #if defined(_MSC_VER)\r
24 #pragma warning (push, 1) // TODO: Legacy code, just disable warnings\r
25 #endif\r
26 \r
27 #include "AMCPCommandsImpl.h"\r
28 #include "AMCPProtocolStrategy.h"\r
29 \r
30 #include <common/env.h>\r
31 \r
32 #include <common/log/log.h>\r
33 #include <common/diagnostics/graph.h>\r
34 \r
35 #include <core/producer/frame_producer.h>\r
36 #include <core/video_format.h>\r
37 #include <core/producer/transition/transition_producer.h>\r
38 #include <core/producer/frame/frame_transform.h>\r
39 #include <core/producer/stage.h>\r
40 #include <core/producer/layer.h>\r
41 #include <core/mixer/mixer.h>\r
42 #include <core/consumer/output.h>\r
43 \r
44 #include <modules/flash/flash.h>\r
45 #include <modules/flash/producer/flash_producer.h>\r
46 #include <modules/flash/producer/cg_producer.h>\r
47 \r
48 #include <algorithm>\r
49 #include <locale>\r
50 #include <fstream>\r
51 #include <cctype>\r
52 #include <io.h>\r
53 \r
54 #include <boost/date_time/posix_time/posix_time.hpp>\r
55 #include <boost/lexical_cast.hpp>\r
56 #include <boost/algorithm/string.hpp>\r
57 #include <boost/filesystem.hpp>\r
58 #include <boost/regex.hpp>\r
59 \r
60 /* Return codes\r
61 \r
62 100 [action]                    Information om att något har hänt  \r
63 101 [action]                    Information om att något har hänt, en rad data skickas  \r
64 \r
65 202 [kommando] OK               Kommandot har utförts  \r
66 201 [kommando] OK               Kommandot har utförts, och en rad data skickas tillbaka  \r
67 200 [kommando] OK               Kommandot har utförts, och flera rader data skickas tillbaka. Avslutas med tomrad  \r
68 \r
69 400 ERROR                               Kommandot kunde inte förstås  \r
70 401 [kommando] ERROR    Ogiltig kanal  \r
71 402 [kommando] ERROR    Parameter saknas  \r
72 403 [kommando] ERROR    Ogiltig parameter  \r
73 404 [kommando] ERROR    Mediafilen hittades inte  \r
74 \r
75 500 FAILED                              Internt configurationfel  \r
76 501 [kommando] FAILED   Internt configurationfel  \r
77 502 [kommando] FAILED   Oläslig mediafil  \r
78 \r
79 600 [kommando] FAILED   funktion ej implementerad\r
80 */\r
81 \r
82 namespace caspar { namespace protocol {\r
83 \r
84 using namespace core;\r
85 \r
86 std::wstring MediaInfo(const boost::filesystem::wpath& path)\r
87 {\r
88         if(boost::filesystem::is_regular_file(path))\r
89         {\r
90                 std::wstring clipttype = TEXT(" N/A ");\r
91                 std::wstring extension = boost::to_upper_copy(path.extension());\r
92                 if(extension == TEXT(".TGA") || extension == TEXT(".COL") || extension == L".PNG" || extension == L".JPEG" || extension == L".JPG" ||\r
93                         extension == L"GIF" || extension == L"BMP")\r
94                         clipttype = TEXT(" STILL ");\r
95                 else if(extension == TEXT(".SWF") || extension == TEXT(".DV") || extension == TEXT(".MOV") || extension == TEXT(".MPG") || \r
96                                 extension == TEXT(".AVI") || extension == TEXT(".FLV") || extension == TEXT(".F4V") || extension == TEXT(".MP4") ||\r
97                                 extension == L".M2V" || extension == L".H264" || extension == L".MKV" || extension == L".WMV" || extension == L".DIVX" || \r
98                                 extension == L".XVID" || extension == L".OGG")\r
99                         clipttype = TEXT(" MOVIE ");\r
100                 else if(extension == TEXT(".WAV") || extension == TEXT(".MP3"))\r
101                         clipttype = TEXT(" STILL ");\r
102 \r
103                 if(clipttype != TEXT(" N/A "))\r
104                 {               \r
105                         auto is_not_digit = [](char c){ return std::isdigit(c) == 0; };\r
106 \r
107                         auto relativePath = boost::filesystem::wpath(path.file_string().substr(env::media_folder().size()-1, path.file_string().size()));\r
108 \r
109                         auto writeTimeStr = boost::posix_time::to_iso_string(boost::posix_time::from_time_t(boost::filesystem::last_write_time(path)));\r
110                         writeTimeStr.erase(std::remove_if(writeTimeStr.begin(), writeTimeStr.end(), is_not_digit), writeTimeStr.end());\r
111                         auto writeTimeWStr = std::wstring(writeTimeStr.begin(), writeTimeStr.end());\r
112 \r
113                         auto sizeStr = boost::lexical_cast<std::wstring>(boost::filesystem::file_size(path));\r
114                         sizeStr.erase(std::remove_if(sizeStr.begin(), sizeStr.end(), is_not_digit), sizeStr.end());\r
115                         auto sizeWStr = std::wstring(sizeStr.begin(), sizeStr.end());\r
116                                 \r
117                         auto str = relativePath.replace_extension(TEXT("")).external_file_string();\r
118                         if(str[0] == '\\' || str[0] == '/')\r
119                                 str = std::wstring(str.begin() + 1, str.end());\r
120 \r
121                         return std::wstring() + TEXT("\"") + str +\r
122                                         + TEXT("\" ") + clipttype +\r
123                                         + TEXT(" ") + sizeStr +\r
124                                         + TEXT(" ") + writeTimeWStr +\r
125                                         + TEXT("\r\n");         \r
126                 }       \r
127         }\r
128         return L"";\r
129 }\r
130 \r
131 std::wstring ListMedia()\r
132 {       \r
133         std::wstringstream replyString;\r
134         for (boost::filesystem::wrecursive_directory_iterator itr(env::media_folder()), end; itr != end; ++itr) \r
135                 replyString << MediaInfo(itr->path());\r
136         \r
137         return boost::to_upper_copy(replyString.str());\r
138 }\r
139 \r
140 std::wstring ListTemplates() \r
141 {\r
142         std::wstringstream replyString;\r
143 \r
144         for (boost::filesystem::wrecursive_directory_iterator itr(env::template_folder()), end; itr != end; ++itr)\r
145         {               \r
146                 if(boost::filesystem::is_regular_file(itr->path()) && itr->path().extension() == L".ft")\r
147                 {\r
148                         auto relativePath = boost::filesystem::wpath(itr->path().file_string().substr(env::template_folder().size()-1, itr->path().file_string().size()));\r
149 \r
150                         auto writeTimeStr = boost::posix_time::to_iso_string(boost::posix_time::from_time_t(boost::filesystem::last_write_time(itr->path())));\r
151                         writeTimeStr.erase(std::remove_if(writeTimeStr.begin(), writeTimeStr.end(), [](char c){ return std::isdigit(c) == 0;}), writeTimeStr.end());\r
152                         auto writeTimeWStr = std::wstring(writeTimeStr.begin(), writeTimeStr.end());\r
153 \r
154                         auto sizeStr = boost::lexical_cast<std::string>(boost::filesystem::file_size(itr->path()));\r
155                         sizeStr.erase(std::remove_if(sizeStr.begin(), sizeStr.end(), [](char c){ return std::isdigit(c) == 0;}), sizeStr.end());\r
156 \r
157                         auto sizeWStr = std::wstring(sizeStr.begin(), sizeStr.end());\r
158 \r
159                         std::wstring dir = relativePath.parent_path().external_directory_string();\r
160                         std::wstring file = boost::to_upper_copy(relativePath.filename());\r
161                         relativePath = boost::filesystem::wpath(dir + L"/" + file);\r
162                                                 \r
163                         auto str = relativePath.replace_extension(TEXT("")).external_file_string();\r
164                         if(str[0] == '\\' || str[0] == '/')\r
165                                 str = std::wstring(str.begin() + 1, str.end());\r
166 \r
167                         replyString << TEXT("\"") << str\r
168                                                 << TEXT("\" ") << sizeWStr\r
169                                                 << TEXT(" ") << writeTimeWStr\r
170                                                 << TEXT("\r\n");                \r
171                 }\r
172         }\r
173         return replyString.str();\r
174 }\r
175 \r
176 namespace amcp {\r
177         \r
178 AMCPCommand::AMCPCommand() : channelIndex_(0), scheduling_(Default), layerIndex_(-1)\r
179 {}\r
180 \r
181 void AMCPCommand::SendReply()\r
182 {\r
183         if(!pClientInfo_) \r
184                 return;\r
185 \r
186         if(replyString_.empty())\r
187                 return;\r
188         pClientInfo_->Send(replyString_);\r
189 }\r
190 \r
191 void AMCPCommand::Clear() \r
192 {\r
193         pChannel_->stage()->clear();\r
194         pClientInfo_.reset();\r
195         channelIndex_ = 0;\r
196         _parameters.clear();\r
197 }\r
198 \r
199 bool DiagnosticsCommand::DoExecute()\r
200 {       \r
201         try\r
202         {\r
203                 diagnostics::show_graphs(true);\r
204 \r
205                 SetReplyString(TEXT("202 DIAG OK\r\n"));\r
206 \r
207                 return true;\r
208         }\r
209         catch(...)\r
210         {\r
211                 CASPAR_LOG_CURRENT_EXCEPTION();\r
212                 SetReplyString(TEXT("502 DIAG FAILED\r\n"));\r
213                 return false;\r
214         }\r
215 }\r
216 \r
217 bool ParamCommand::DoExecute()\r
218 {       \r
219         //Perform loading of the clip\r
220         try\r
221         {\r
222                 auto what = _parameters.at(0);\r
223 \r
224                 std::wstring param = _parameters2.at(1);\r
225                 for(auto it = std::begin(_parameters2)+2; it != std::end(_parameters2); ++it)\r
226                         param += L" " + *it;\r
227                 \r
228                 std::wstring result;\r
229                 if(what == L"B")\r
230                         result = GetChannel()->stage()->param(GetLayerIndex(), false, param);\r
231                 else\r
232                         result = GetChannel()->stage()->param(GetLayerIndex(), true, param);\r
233         \r
234                 CASPAR_LOG(info) << "Executed param: " <<  _parameters[0] << TEXT(" successfully");\r
235                 \r
236                 std::wstringstream replyString;\r
237                 replyString << TEXT("201 PARAM OK\r\n") << result << L"\r\n";\r
238                 \r
239                 SetReplyString(replyString.str());\r
240 \r
241                 return true;\r
242         }\r
243         catch(...)\r
244         {\r
245                 CASPAR_LOG_CURRENT_EXCEPTION();\r
246                 SetReplyString(TEXT("502 PARAM FAILED\r\n"));\r
247                 return false;\r
248         }\r
249 }\r
250 \r
251 bool MixerCommand::DoExecute()\r
252 {       \r
253         //Perform loading of the clip\r
254         try\r
255         {       \r
256                 if(_parameters[0] == L"KEYER" || _parameters[0] == L"IS_KEY")\r
257                 {\r
258                         bool value = lexical_cast_or_default(_parameters.at(1), false);\r
259                         auto transform = [=](frame_transform transform) -> frame_transform\r
260                         {\r
261                                 transform.is_key = value;\r
262                                 return transform;                                       \r
263                         };\r
264 \r
265                         int layer = GetLayerIndex();\r
266                         GetChannel()->mixer()->apply_frame_transform(GetLayerIndex(), transform);\r
267                 }\r
268                 else if(_parameters[0] == L"OPACITY")\r
269                 {\r
270                         int duration = _parameters.size() > 2 ? lexical_cast_or_default(_parameters[2], 0) : 0;\r
271                         std::wstring tween = _parameters.size() > 3 ? _parameters[3] : L"linear";\r
272 \r
273                         double value = boost::lexical_cast<double>(_parameters.at(1));\r
274                         \r
275                         auto transform = [=](frame_transform transform) -> frame_transform\r
276                         {\r
277                                 transform.opacity = value;\r
278                                 return transform;                                       \r
279                         };\r
280 \r
281                         int layer = GetLayerIndex();\r
282                         GetChannel()->mixer()->apply_frame_transform(GetLayerIndex(), transform, duration, tween);\r
283                 }\r
284                 else if(_parameters[0] == L"FILL" || _parameters[0] == L"FILL_RECT")\r
285                 {\r
286                         int duration = _parameters.size() > 5 ? lexical_cast_or_default(_parameters[5], 0) : 0;\r
287                         std::wstring tween = _parameters.size() > 6 ? _parameters[6] : L"linear";\r
288                         double x        = boost::lexical_cast<double>(_parameters.at(1));\r
289                         double y        = boost::lexical_cast<double>(_parameters.at(2));\r
290                         double x_s      = boost::lexical_cast<double>(_parameters.at(3));\r
291                         double y_s      = boost::lexical_cast<double>(_parameters.at(4));\r
292 \r
293                         auto transform = [=](frame_transform transform) mutable -> frame_transform\r
294                         {\r
295                                 transform.fill_translation[0]   = x;\r
296                                 transform.fill_translation[1]   = y;\r
297                                 transform.fill_scale[0]                 = x_s;\r
298                                 transform.fill_scale[1]                 = y_s;\r
299                                 transform.clip_translation[0]   = x;\r
300                                 transform.clip_translation[1]   = y;\r
301                                 transform.clip_scale[0]                 = x_s;\r
302                                 transform.clip_scale[1]                 = y_s;\r
303                                 return transform;\r
304                         };\r
305                                 \r
306                         int layer = GetLayerIndex();\r
307                         GetChannel()->mixer()->apply_frame_transform(GetLayerIndex(), transform, duration, tween);\r
308                 }\r
309                 else if(_parameters[0] == L"CLIP" || _parameters[0] == L"CLIP_RECT")\r
310                 {\r
311                         int duration = _parameters.size() > 5 ? lexical_cast_or_default(_parameters[5], 0) : 0;\r
312                         std::wstring tween = _parameters.size() > 6 ? _parameters[6] : L"linear";\r
313                         double x        = boost::lexical_cast<double>(_parameters.at(1));\r
314                         double y        = boost::lexical_cast<double>(_parameters.at(2));\r
315                         double x_s      = boost::lexical_cast<double>(_parameters.at(3));\r
316                         double y_s      = boost::lexical_cast<double>(_parameters.at(4));\r
317 \r
318                         auto transform = [=](frame_transform transform) -> frame_transform\r
319                         {\r
320                                 transform.clip_translation[0]   = x;\r
321                                 transform.clip_translation[1]   = y;\r
322                                 transform.clip_scale[0]                 = x_s;\r
323                                 transform.clip_scale[1]                 = y_s;\r
324                                 return transform;\r
325                         };\r
326                                 \r
327                         int layer = GetLayerIndex();\r
328                         GetChannel()->mixer()->apply_frame_transform(GetLayerIndex(), transform, duration, tween);\r
329                 }\r
330                 else if(_parameters[0] == L"GRID")\r
331                 {\r
332                         int duration = _parameters.size() > 2 ? lexical_cast_or_default(_parameters[2], 0) : 0;\r
333                         std::wstring tween = _parameters.size() > 3 ? _parameters[3] : L"linear";\r
334                         int n = boost::lexical_cast<int>(_parameters.at(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                                         GetChannel()->mixer()->apply_frame_transform(index, transform, duration, tween);\r
354                                 }\r
355                         }\r
356                 }\r
357                 else if(_parameters[0] == L"BLEND")\r
358                 {\r
359                         auto blend_str = _parameters.at(1);                                                             \r
360                         int layer = GetLayerIndex();\r
361                         GetChannel()->mixer()->set_blend_mode(GetLayerIndex(), get_blend_mode(blend_str));      \r
362                 }\r
363                 else if(_parameters[0] == L"BRIGHTNESS")\r
364                 {\r
365                         auto value = boost::lexical_cast<double>(_parameters.at(1));\r
366                         int duration = _parameters.size() > 2 ? lexical_cast_or_default(_parameters[2], 0) : 0;\r
367                         std::wstring tween = _parameters.size() > 3 ? _parameters[3] : L"linear";\r
368                         auto transform = [=](frame_transform transform) -> frame_transform\r
369                         {\r
370                                 transform.brightness = value;\r
371                                 return transform;\r
372                         };\r
373                                 \r
374                         int layer = GetLayerIndex();\r
375                         GetChannel()->mixer()->apply_frame_transform(GetLayerIndex(), transform, duration, tween);      \r
376                 }\r
377                 else if(_parameters[0] == L"SATURATION")\r
378                 {\r
379                         auto value = boost::lexical_cast<double>(_parameters.at(1));\r
380                         int duration = _parameters.size() > 2 ? lexical_cast_or_default(_parameters[2], 0) : 0;\r
381                         std::wstring tween = _parameters.size() > 3 ? _parameters[3] : L"linear";\r
382                         auto transform = [=](frame_transform transform) -> frame_transform\r
383                         {\r
384                                 transform.saturation = value;\r
385                                 return transform;\r
386                         };\r
387                                 \r
388                         int layer = GetLayerIndex();\r
389                         GetChannel()->mixer()->apply_frame_transform(GetLayerIndex(), transform, duration, tween);      \r
390                 }\r
391                 else if(_parameters[0] == L"CONTRAST")\r
392                 {\r
393                         auto value = boost::lexical_cast<double>(_parameters.at(1));\r
394                         int duration = _parameters.size() > 2 ? lexical_cast_or_default(_parameters[2], 0) : 0;\r
395                         std::wstring tween = _parameters.size() > 3 ? _parameters[3] : L"linear";\r
396                         auto transform = [=](frame_transform transform) -> frame_transform\r
397                         {\r
398                                 transform.contrast = value;\r
399                                 return transform;\r
400                         };\r
401                                 \r
402                         int layer = GetLayerIndex();\r
403                         GetChannel()->mixer()->apply_frame_transform(GetLayerIndex(), transform, duration, tween);      \r
404                 }\r
405                 else if(_parameters[0] == L"LEVELS")\r
406                 {\r
407                         levels value;\r
408                         value.min_input  = boost::lexical_cast<double>(_parameters.at(1));\r
409                         value.max_input  = boost::lexical_cast<double>(_parameters.at(2));\r
410                         value.gamma              = boost::lexical_cast<double>(_parameters.at(3));\r
411                         value.min_output = boost::lexical_cast<double>(_parameters.at(4));\r
412                         value.max_output = boost::lexical_cast<double>(_parameters.at(5));\r
413                         int duration = _parameters.size() > 6 ? lexical_cast_or_default(_parameters[6], 0) : 0;\r
414                         std::wstring tween = _parameters.size() > 7 ? _parameters[7] : L"linear";\r
415 \r
416                         auto transform = [=](frame_transform transform) -> frame_transform\r
417                         {\r
418                                 transform.levels = value;\r
419                                 return transform;\r
420                         };\r
421                                 \r
422                         int layer = GetLayerIndex();\r
423                         GetChannel()->mixer()->apply_frame_transform(GetLayerIndex(), transform, duration, tween);      \r
424                 }\r
425                 else if(_parameters[0] == L"VOLUME")\r
426                 {\r
427                         int duration = _parameters.size() > 2 ? lexical_cast_or_default(_parameters[2], 0) : 0;\r
428                         std::wstring tween = _parameters.size() > 3 ? _parameters[3] : L"linear";\r
429                         double value = boost::lexical_cast<double>(_parameters[1]);\r
430 \r
431                         auto transform = [=](frame_transform transform) -> frame_transform\r
432                         {\r
433                                 transform.volume = value;\r
434                                 return transform;\r
435                         };\r
436                                 \r
437                         int layer = GetLayerIndex();\r
438                         GetChannel()->mixer()->apply_frame_transform(GetLayerIndex(), transform, duration, tween);\r
439                 }\r
440                 else if(_parameters[0] == L"CLEAR")\r
441                 {\r
442                         int layer = GetLayerIndex(std::numeric_limits<int>::max());\r
443                         if(layer ==     std::numeric_limits<int>::max())\r
444                                 GetChannel()->mixer()->clear_transforms();\r
445                         else\r
446                                 GetChannel()->mixer()->clear_transforms(layer);\r
447                 }\r
448                 else\r
449                 {\r
450                         SetReplyString(TEXT("404 MIXER ERROR\r\n"));\r
451                         return false;\r
452                 }\r
453         \r
454                 SetReplyString(TEXT("202 MIXER OK\r\n"));\r
455 \r
456                 return true;\r
457         }\r
458         catch(file_not_found&)\r
459         {\r
460                 CASPAR_LOG_CURRENT_EXCEPTION();\r
461                 SetReplyString(TEXT("404 MIXER ERROR\r\n"));\r
462                 return false;\r
463         }\r
464         catch(...)\r
465         {\r
466                 CASPAR_LOG_CURRENT_EXCEPTION();\r
467                 SetReplyString(TEXT("502 MIXER FAILED\r\n"));\r
468                 return false;\r
469         }\r
470 }\r
471 \r
472 bool SwapCommand::DoExecute()\r
473 {       \r
474         //Perform loading of the clip\r
475         try\r
476         {\r
477                 if(GetLayerIndex(-1) != -1)\r
478                 {\r
479                         std::vector<std::string> strs;\r
480                         boost::split(strs, _parameters[0], boost::is_any_of("-"));\r
481                         \r
482                         auto ch1 = GetChannel();\r
483                         auto ch2 = GetChannels().at(boost::lexical_cast<int>(strs.at(0))-1);\r
484 \r
485                         int l1 = GetLayerIndex();\r
486                         int l2 = boost::lexical_cast<int>(strs.at(1));\r
487 \r
488                         ch1->stage()->swap_layer(l1, l2, *ch2->stage());\r
489                 }\r
490                 else\r
491                 {\r
492                         auto ch1 = GetChannel();\r
493                         auto ch2 = GetChannels().at(boost::lexical_cast<int>(_parameters[0])-1);\r
494                         ch1->stage()->swap(*ch2->stage());\r
495                 }\r
496 \r
497                 CASPAR_LOG(info) << "Swapped successfully";\r
498 \r
499                 SetReplyString(TEXT("202 SWAP OK\r\n"));\r
500 \r
501                 return true;\r
502         }\r
503         catch(file_not_found&)\r
504         {\r
505                 CASPAR_LOG_CURRENT_EXCEPTION();\r
506                 SetReplyString(TEXT("404 SWAP ERROR\r\n"));\r
507                 return false;\r
508         }\r
509         catch(...)\r
510         {\r
511                 CASPAR_LOG_CURRENT_EXCEPTION();\r
512                 SetReplyString(TEXT("502 SWAP FAILED\r\n"));\r
513                 return false;\r
514         }\r
515 }\r
516 \r
517 bool AddCommand::DoExecute()\r
518 {       \r
519         //Perform loading of the clip\r
520         try\r
521         {\r
522                 GetChannel()->output()->add(GetLayerIndex(), create_consumer(_parameters));\r
523         \r
524                 CASPAR_LOG(info) << "Added " <<  _parameters[0] << TEXT(" successfully");\r
525 \r
526                 SetReplyString(TEXT("202 ADD OK\r\n"));\r
527 \r
528                 return true;\r
529         }\r
530         catch(file_not_found&)\r
531         {\r
532                 CASPAR_LOG_CURRENT_EXCEPTION();\r
533                 SetReplyString(TEXT("404 ADD ERROR\r\n"));\r
534                 return false;\r
535         }\r
536         catch(...)\r
537         {\r
538                 CASPAR_LOG_CURRENT_EXCEPTION();\r
539                 SetReplyString(TEXT("502 ADD FAILED\r\n"));\r
540                 return false;\r
541         }\r
542 }\r
543 \r
544 bool RemoveCommand::DoExecute()\r
545 {       \r
546         //Perform loading of the clip\r
547         try\r
548         {\r
549                 GetChannel()->output()->remove(GetLayerIndex());\r
550 \r
551                 SetReplyString(TEXT("202 REMOVE OK\r\n"));\r
552 \r
553                 return true;\r
554         }\r
555         catch(file_not_found&)\r
556         {\r
557                 CASPAR_LOG_CURRENT_EXCEPTION();\r
558                 SetReplyString(TEXT("404 REMOVE ERROR\r\n"));\r
559                 return false;\r
560         }\r
561         catch(...)\r
562         {\r
563                 CASPAR_LOG_CURRENT_EXCEPTION();\r
564                 SetReplyString(TEXT("502 REMOVE FAILED\r\n"));\r
565                 return false;\r
566         }\r
567 }\r
568 \r
569 bool LoadCommand::DoExecute()\r
570 {       \r
571         //Perform loading of the clip\r
572         try\r
573         {\r
574                 _parameters[0] = _parameters[0];\r
575                 auto pFP = create_producer(GetChannel()->mixer(), _parameters);         \r
576                 GetChannel()->stage()->load(GetLayerIndex(), pFP, true);\r
577         \r
578                 CASPAR_LOG(info) << "Loaded " <<  _parameters[0] << TEXT(" successfully");\r
579 \r
580                 SetReplyString(TEXT("202 LOAD OK\r\n"));\r
581 \r
582                 return true;\r
583         }\r
584         catch(file_not_found&)\r
585         {\r
586                 CASPAR_LOG_CURRENT_EXCEPTION();\r
587                 SetReplyString(TEXT("404 LOAD ERROR\r\n"));\r
588                 return false;\r
589         }\r
590         catch(...)\r
591         {\r
592                 CASPAR_LOG_CURRENT_EXCEPTION();\r
593                 SetReplyString(TEXT("502 LOAD FAILED\r\n"));\r
594                 return false;\r
595         }\r
596 }\r
597 \r
598 \r
599 \r
600 //std::function<std::wstring()> channel_cg_add_command::parse(const std::wstring& message, const std::vector<renderer::render_device_ptr>& channels)\r
601 //{\r
602 //      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
603 //\r
604 //      boost::wsmatch what;\r
605 //      if(!boost::regex_match(message, what, expr))\r
606 //              return nullptr;\r
607 //\r
608 //      auto info = channel_info::parse(what, channels);\r
609 //\r
610 //      int flash_layer_index = boost::lexical_cast<int>(what["FLASH_LAYER"].str());\r
611 //\r
612 //      std::wstring templatename = what["TEMPLATE"].str();\r
613 //      bool play_on_load = what["PLAY_ON_LOAD"].matched ? what["PLAY_ON_LOAD"].str() != L"0" : 0;\r
614 //      std::wstring start_label = what["START_LABEL"].str();   \r
615 //      std::wstring data = get_data(what["DATA"].str());\r
616 //      \r
617 //      boost::replace_all(templatename, "\"", "");\r
618 //\r
619 //      return [=]() -> std::wstring\r
620 //      {       \r
621 //              std::wstring fullFilename = flash::flash_producer::find_template(server::template_folder() + templatename);\r
622 //              if(fullFilename.empty())\r
623 //                      BOOST_THROW_EXCEPTION(file_not_found());\r
624 //      \r
625 //              std::wstring extension = boost::filesystem::wpath(fullFilename).extension();\r
626 //              std::wstring filename = templatename;\r
627 //              filename.append(extension);\r
628 //\r
629 //              flash::flash::get_default_cg_producer(info.video_channel, std::max<int>(DEFAULT_CHANNEL_LAYER+1, info.layer_index))\r
630 //                      ->add(flash_layer_index, filename, play_on_load, start_label, data);\r
631 //\r
632 //              CASPAR_LOG(info) << L"Executed [amcp_channel_cg_add]";\r
633 //              return L"";\r
634 //      };\r
635 \r
636 bool LoadbgCommand::DoExecute()\r
637 {\r
638         transition_info transitionInfo;\r
639         \r
640         bool bLoop = false;\r
641 \r
642         // TRANSITION\r
643 \r
644         std::wstring message;\r
645         for(size_t n = 0; n < _parameters.size(); ++n)\r
646                 message += _parameters[n] + L" ";\r
647                 \r
648         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
649         boost::wsmatch what;\r
650         if(boost::regex_match(message, what, expr))\r
651         {\r
652                 auto transition = what["TRANSITION"].str();\r
653                 transitionInfo.duration = lexical_cast_or_default<size_t>(what["DURATION"].str());\r
654                 auto direction = what["DIRECTION"].matched ? what["DIRECTION"].str() : L"";\r
655                 auto tween = what["TWEEN"].matched ? what["TWEEN"].str() : L"";\r
656                 transitionInfo.tweener = get_tweener(tween);            \r
657 \r
658                 if(transition == TEXT("CUT"))\r
659                         transitionInfo.type = transition::cut;\r
660                 else if(transition == TEXT("MIX"))\r
661                         transitionInfo.type = transition::mix;\r
662                 else if(transition == TEXT("PUSH"))\r
663                         transitionInfo.type = transition::push;\r
664                 else if(transition == TEXT("SLIDE"))\r
665                         transitionInfo.type = transition::slide;\r
666                 else if(transition == TEXT("WIPE"))\r
667                         transitionInfo.type = transition::wipe;\r
668                 \r
669                 if(direction == TEXT("FROMLEFT"))\r
670                         transitionInfo.direction = transition_direction::from_left;\r
671                 else if(direction == TEXT("FROMRIGHT"))\r
672                         transitionInfo.direction = transition_direction::from_right;\r
673                 else if(direction == TEXT("LEFT"))\r
674                         transitionInfo.direction = transition_direction::from_right;\r
675                 else if(direction == TEXT("RIGHT"))\r
676                         transitionInfo.direction = transition_direction::from_left;\r
677         }\r
678         \r
679         //Perform loading of the clip\r
680         try\r
681         {\r
682                 _parameters[0] = _parameters[0];\r
683                 auto pFP = create_producer(GetChannel()->mixer(), _parameters);\r
684                 if(pFP == frame_producer::empty())\r
685                         BOOST_THROW_EXCEPTION(file_not_found() << msg_info(_parameters.size() > 0 ? narrow(_parameters[0]) : ""));\r
686 \r
687                 bool auto_play = std::find(_parameters.begin(), _parameters.end(), L"AUTO") != _parameters.end();\r
688 \r
689                 auto pFP2 = create_transition_producer(GetChannel()->get_video_format_desc().field_mode, pFP, transitionInfo);\r
690                 GetChannel()->stage()->load(GetLayerIndex(), pFP2, false, auto_play ? transitionInfo.duration : -1); // TODO: LOOP\r
691         \r
692                 CASPAR_LOG(info) << "Loaded " << _parameters[0] << TEXT(" successfully to background");\r
693                 SetReplyString(TEXT("202 LOADBG OK\r\n"));\r
694 \r
695                 return true;\r
696         }\r
697         catch(file_not_found&)\r
698         {\r
699                 CASPAR_LOG_CURRENT_EXCEPTION();\r
700                 SetReplyString(TEXT("404 LOADBG ERROR\r\n"));\r
701                 return false;\r
702         }\r
703         catch(...)\r
704         {\r
705                 CASPAR_LOG_CURRENT_EXCEPTION();\r
706                 SetReplyString(TEXT("502 LOADBG FAILED\r\n"));\r
707                 return false;\r
708         }\r
709 }\r
710 \r
711 bool PauseCommand::DoExecute()\r
712 {\r
713         try\r
714         {\r
715                 GetChannel()->stage()->pause(GetLayerIndex());\r
716                 SetReplyString(TEXT("202 PAUSE OK\r\n"));\r
717                 return true;\r
718         }\r
719         catch(...)\r
720         {\r
721                 SetReplyString(TEXT("501 PAUSE FAILED\r\n"));\r
722         }\r
723 \r
724         return false;\r
725 }\r
726 \r
727 bool PlayCommand::DoExecute()\r
728 {\r
729         try\r
730         {\r
731                 if(!_parameters.empty())\r
732                 {\r
733                         LoadbgCommand lbg;\r
734                         lbg.SetChannel(GetChannel());\r
735                         lbg.SetChannelIndex(GetChannelIndex());\r
736                         lbg.SetLayerIntex(GetLayerIndex());\r
737                         lbg.SetClientInfo(GetClientInfo());\r
738                         for(auto it = _parameters.begin(); it != _parameters.end(); ++it)\r
739                                 lbg.AddParameter(*it);\r
740                         if(!lbg.Execute())\r
741                                 CASPAR_LOG(warning) << " Failed to play.";\r
742 \r
743                         CASPAR_LOG(info) << "Playing " << _parameters[0];\r
744                 }\r
745 \r
746                 GetChannel()->stage()->play(GetLayerIndex());\r
747                 \r
748                 SetReplyString(TEXT("202 PLAY OK\r\n"));\r
749                 return true;\r
750         }\r
751         catch(...)\r
752         {\r
753                 SetReplyString(TEXT("501 PLAY FAILED\r\n"));\r
754         }\r
755 \r
756         return false;\r
757 }\r
758 \r
759 bool StopCommand::DoExecute()\r
760 {\r
761         try\r
762         {\r
763                 GetChannel()->stage()->stop(GetLayerIndex());\r
764                 SetReplyString(TEXT("202 STOP OK\r\n"));\r
765                 return true;\r
766         }\r
767         catch(...)\r
768         {\r
769                 SetReplyString(TEXT("501 STOP FAILED\r\n"));\r
770         }\r
771 \r
772         return false;\r
773 }\r
774 \r
775 bool ClearCommand::DoExecute()\r
776 {\r
777         int index = GetLayerIndex(std::numeric_limits<int>::min());\r
778         if(index != std::numeric_limits<int>::min())\r
779                 GetChannel()->stage()->clear(index);\r
780         else\r
781                 GetChannel()->stage()->clear();\r
782                 \r
783         SetReplyString(TEXT("202 CLEAR OK\r\n"));\r
784 \r
785         return true;\r
786 }\r
787 \r
788 bool PrintCommand::DoExecute()\r
789 {\r
790         GetChannel()->output()->add(99978, create_consumer(boost::assign::list_of(L"IMAGE")));\r
791                 \r
792         SetReplyString(TEXT("202 PRINT OK\r\n"));\r
793 \r
794         return true;\r
795 }\r
796 \r
797 bool StatusCommand::DoExecute()\r
798 {                               \r
799         if (GetLayerIndex() > -1)\r
800         {\r
801                 auto status = GetChannel()->stage()->get_status(GetLayerIndex());\r
802                 std::wstringstream status_text;\r
803                 status_text\r
804                         << L"200 STATUS OK\r\n"\r
805                         << L"FOREGROUND:"               << status.foreground << L"\r\n"\r
806                         << L"BACKGROUND:"               << status.background << L"\r\n"\r
807                         << L"STATUS:"                   << (status.is_paused ? L"PAUSED" : L"PLAYING") << L"\r\n"\r
808                         << L"TOTAL FRAMES:"             << (status.total_frames == std::numeric_limits<int64_t>::max() ? 0 : status.total_frames) << L"\r\n"\r
809                         << L"CURRENT FRAME:"    << status.current_frame << L"\r\n\r\n";\r
810 \r
811                 SetReplyString(status_text.str());\r
812                 return true;\r
813         }\r
814         else\r
815         {\r
816                 //NOTE: Possible to extend soo that "channel" status is returned when no layer is specified.\r
817 \r
818                 SetReplyString(TEXT("403 LAYER MUST BE SPECIFIED\r\n"));\r
819                 return false;\r
820         }\r
821 }\r
822 \r
823 bool LogCommand::DoExecute()\r
824 {\r
825         if(_parameters.at(0) == L"LEVEL")\r
826                 log::set_log_level(_parameters.at(1));\r
827 \r
828         SetReplyString(TEXT("202 LOG OK\r\n"));\r
829 \r
830         return true;\r
831 }\r
832 \r
833 bool CGCommand::DoExecute()\r
834 {\r
835         std::wstring command = _parameters[0];\r
836         if(command == TEXT("ADD"))\r
837                 return DoExecuteAdd();\r
838         else if(command == TEXT("PLAY"))\r
839                 return DoExecutePlay();\r
840         else if(command == TEXT("STOP"))\r
841                 return DoExecuteStop();\r
842         else if(command == TEXT("NEXT"))\r
843                 return DoExecuteNext();\r
844         else if(command == TEXT("REMOVE"))\r
845                 return DoExecuteRemove();\r
846         else if(command == TEXT("CLEAR"))\r
847                 return DoExecuteClear();\r
848         else if(command == TEXT("UPDATE"))\r
849                 return DoExecuteUpdate();\r
850         else if(command == TEXT("INVOKE"))\r
851                 return DoExecuteInvoke();\r
852         else if(command == TEXT("INFO"))\r
853                 return DoExecuteInfo();\r
854 \r
855         SetReplyString(TEXT("403 CG ERROR\r\n"));\r
856         return false;\r
857 }\r
858 \r
859 bool CGCommand::ValidateLayer(const std::wstring& layerstring) {\r
860         int length = layerstring.length();\r
861         for(int i = 0; i < length; ++i) {\r
862                 if(!_istdigit(layerstring[i])) {\r
863                         return false;\r
864                 }\r
865         }\r
866 \r
867         return true;\r
868 }\r
869 \r
870 bool CGCommand::DoExecuteAdd() {\r
871         //CG 1 ADD 0 "template_folder/templatename" [STARTLABEL] 0/1 [DATA]\r
872 \r
873         int layer = 0;                          //_parameters[1]\r
874 //      std::wstring templateName;      //_parameters[2]\r
875         std::wstring label;             //_parameters[3]\r
876         bool bDoStart = false;          //_parameters[3] alt. _parameters[4]\r
877 //      std::wstring data;                      //_parameters[4] alt. _parameters[5]\r
878 \r
879         if(_parameters.size() < 4) \r
880         {\r
881                 SetReplyString(TEXT("402 CG ERROR\r\n"));\r
882                 return false;\r
883         }\r
884         unsigned int dataIndex = 4;\r
885 \r
886         if(!ValidateLayer(_parameters[1])) \r
887         {\r
888                 SetReplyString(TEXT("403 CG ERROR\r\n"));\r
889                 return false;\r
890         }\r
891 \r
892         layer = _ttoi(_parameters[1].c_str());\r
893 \r
894         if(_parameters[3].length() > 1) \r
895         {       //read label\r
896                 label = _parameters2[3];\r
897                 ++dataIndex;\r
898 \r
899                 if(_parameters.size() > 4 && _parameters[4].length() > 0)       //read play-on-load-flag\r
900                         bDoStart = (_parameters[4][0]==TEXT('1')) ? true : false;\r
901                 else \r
902                 {\r
903                         SetReplyString(TEXT("402 CG ERROR\r\n"));\r
904                         return false;\r
905                 }\r
906         }\r
907         else if(_parameters[3].length() > 0) {  //read play-on-load-flag\r
908                 bDoStart = (_parameters[3][0]==TEXT('1')) ? true : false;\r
909         }\r
910         else \r
911         {\r
912                 SetReplyString(TEXT("403 CG ERROR\r\n"));\r
913                 return false;\r
914         }\r
915 \r
916         const TCHAR* pDataString = 0;\r
917         std::wstringstream data;\r
918         std::wstring dataFromFile;\r
919         if(_parameters.size() > dataIndex) \r
920         {       //read data\r
921                 const std::wstring& dataString = _parameters2[dataIndex];\r
922 \r
923                 if(dataString[0] == TEXT('<')) //the data is an XML-string\r
924                         pDataString = dataString.c_str();\r
925                 else \r
926                 {\r
927                         //The data is not an XML-string, it must be a filename\r
928                         std::wstring filename = env::data_folder();\r
929                         filename.append(dataString);\r
930                         filename.append(TEXT(".ftd"));\r
931 \r
932                         //open file\r
933                         std::wifstream datafile(filename.c_str());\r
934                         if(datafile) \r
935                         {\r
936                                 //read all data\r
937                                 data << datafile.rdbuf();\r
938                                 datafile.close();\r
939 \r
940                                 //extract data to _parameters\r
941                                 dataFromFile = data.str();\r
942                                 pDataString = dataFromFile.c_str();\r
943                         }\r
944                 }\r
945         }\r
946 \r
947         std::wstring fullFilename = flash::find_template(env::template_folder() + _parameters[2]);\r
948         if(!fullFilename.empty())\r
949         {\r
950                 std::wstring extension = boost::filesystem::wpath(fullFilename).extension();\r
951                 std::wstring filename = _parameters[2];\r
952                 filename.append(extension);\r
953 \r
954                 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
955                 SetReplyString(TEXT("202 CG OK\r\n"));\r
956         }\r
957         else\r
958         {\r
959                 CASPAR_LOG(warning) << "Could not find template " << _parameters[2];\r
960                 SetReplyString(TEXT("404 CG ERROR\r\n"));\r
961         }\r
962         return true;\r
963 }\r
964 \r
965 bool CGCommand::DoExecutePlay()\r
966 {\r
967         if(_parameters.size() > 1)\r
968         {\r
969                 if(!ValidateLayer(_parameters[1])) \r
970                 {\r
971                         SetReplyString(TEXT("403 CG ERROR\r\n"));\r
972                         return false;\r
973                 }\r
974                 int layer = _ttoi(_parameters[1].c_str());\r
975                 flash::get_default_cg_producer(safe_ptr<core::video_channel>(GetChannel()), GetLayerIndex(flash::cg_producer::DEFAULT_LAYER))->play(layer);\r
976         }\r
977         else\r
978         {\r
979                 SetReplyString(TEXT("402 CG ERROR\r\n"));\r
980                 return true;\r
981         }\r
982 \r
983         SetReplyString(TEXT("202 CG OK\r\n"));\r
984         return true;\r
985 }\r
986 \r
987 bool CGCommand::DoExecuteStop() \r
988 {\r
989         if(_parameters.size() > 1)\r
990         {\r
991                 if(!ValidateLayer(_parameters[1])) \r
992                 {\r
993                         SetReplyString(TEXT("403 CG ERROR\r\n"));\r
994                         return false;\r
995                 }\r
996                 int layer = _ttoi(_parameters[1].c_str());\r
997                 flash::get_default_cg_producer(safe_ptr<core::video_channel>(GetChannel()), GetLayerIndex(flash::cg_producer::DEFAULT_LAYER))->stop(layer, 0);\r
998         }\r
999         else \r
1000         {\r
1001                 SetReplyString(TEXT("402 CG ERROR\r\n"));\r
1002                 return true;\r
1003         }\r
1004 \r
1005         SetReplyString(TEXT("202 CG OK\r\n"));\r
1006         return true;\r
1007 }\r
1008 \r
1009 bool CGCommand::DoExecuteNext()\r
1010 {\r
1011         if(_parameters.size() > 1) \r
1012         {\r
1013                 if(!ValidateLayer(_parameters[1])) \r
1014                 {\r
1015                         SetReplyString(TEXT("403 CG ERROR\r\n"));\r
1016                         return false;\r
1017                 }\r
1018 \r
1019                 int layer = _ttoi(_parameters[1].c_str());\r
1020                 flash::get_default_cg_producer(safe_ptr<core::video_channel>(GetChannel()), GetLayerIndex(flash::cg_producer::DEFAULT_LAYER))->next(layer);\r
1021         }\r
1022         else \r
1023         {\r
1024                 SetReplyString(TEXT("402 CG ERROR\r\n"));\r
1025                 return true;\r
1026         }\r
1027 \r
1028         SetReplyString(TEXT("202 CG OK\r\n"));\r
1029         return true;\r
1030 }\r
1031 \r
1032 bool CGCommand::DoExecuteRemove() \r
1033 {\r
1034         if(_parameters.size() > 1) \r
1035         {\r
1036                 if(!ValidateLayer(_parameters[1])) \r
1037                 {\r
1038                         SetReplyString(TEXT("403 CG ERROR\r\n"));\r
1039                         return false;\r
1040                 }\r
1041 \r
1042                 int layer = _ttoi(_parameters[1].c_str());\r
1043                 flash::get_default_cg_producer(safe_ptr<core::video_channel>(GetChannel()), GetLayerIndex(flash::cg_producer::DEFAULT_LAYER))->remove(layer);\r
1044         }\r
1045         else \r
1046         {\r
1047                 SetReplyString(TEXT("402 CG ERROR\r\n"));\r
1048                 return true;\r
1049         }\r
1050 \r
1051         SetReplyString(TEXT("202 CG OK\r\n"));\r
1052         return true;\r
1053 }\r
1054 \r
1055 bool CGCommand::DoExecuteClear() \r
1056 {\r
1057         GetChannel()->stage()->clear(GetLayerIndex(flash::cg_producer::DEFAULT_LAYER));\r
1058         SetReplyString(TEXT("202 CG OK\r\n"));\r
1059         return true;\r
1060 }\r
1061 \r
1062 bool CGCommand::DoExecuteUpdate() \r
1063 {\r
1064         try\r
1065         {\r
1066                 if(!ValidateLayer(_parameters.at(1)))\r
1067                 {\r
1068                         SetReplyString(TEXT("403 CG ERROR\r\n"));\r
1069                         return false;\r
1070                 }\r
1071                                                 \r
1072                 std::wstring dataString = _parameters2.at(2);                           \r
1073                 if(dataString.at(0) != TEXT('<'))\r
1074                 {\r
1075                         //The data is not an XML-string, it must be a filename\r
1076                         std::wstring filename = env::data_folder();\r
1077                         filename.append(dataString);\r
1078                         filename.append(TEXT(".ftd"));\r
1079 \r
1080                         //open file\r
1081                         std::wifstream datafile(filename.c_str());\r
1082                         if(datafile) \r
1083                         {\r
1084                                 std::wstringstream data;\r
1085                                 //read all data\r
1086                                 data << datafile.rdbuf();\r
1087                                 datafile.close();\r
1088 \r
1089                                 //extract data to _parameters\r
1090                                 dataString = data.str();\r
1091                         }\r
1092                 }               \r
1093 \r
1094                 int layer = _ttoi(_parameters.at(1).c_str());\r
1095                 flash::get_default_cg_producer(safe_ptr<core::video_channel>(GetChannel()), GetLayerIndex(flash::cg_producer::DEFAULT_LAYER))->update(layer, dataString);\r
1096         }\r
1097         catch(...)\r
1098         {\r
1099                 SetReplyString(TEXT("402 CG ERROR\r\n"));\r
1100                 return true;\r
1101         }\r
1102 \r
1103         SetReplyString(TEXT("202 CG OK\r\n"));\r
1104         return true;\r
1105 }\r
1106 \r
1107 bool CGCommand::DoExecuteInvoke() \r
1108 {\r
1109         std::wstringstream replyString;\r
1110         replyString << TEXT("201 CG OK\r\n");\r
1111 \r
1112         if(_parameters.size() > 2)\r
1113         {\r
1114                 if(!ValidateLayer(_parameters[1]))\r
1115                 {\r
1116                         SetReplyString(TEXT("403 CG ERROR\r\n"));\r
1117                         return false;\r
1118                 }\r
1119                 int layer = _ttoi(_parameters[1].c_str());\r
1120                 auto result = flash::get_default_cg_producer(safe_ptr<core::video_channel>(GetChannel()), GetLayerIndex(flash::cg_producer::DEFAULT_LAYER))->invoke(layer, _parameters2[2]);\r
1121                 replyString << result << TEXT("\r\n"); \r
1122         }\r
1123         else \r
1124         {\r
1125                 SetReplyString(TEXT("402 CG ERROR\r\n"));\r
1126                 return true;\r
1127         }\r
1128         \r
1129         SetReplyString(replyString.str());\r
1130         return true;\r
1131 }\r
1132 \r
1133 bool CGCommand::DoExecuteInfo() \r
1134 {\r
1135         std::wstringstream replyString;\r
1136         replyString << TEXT("201 CG OK\r\n");\r
1137 \r
1138         if(_parameters.size() > 1)\r
1139         {\r
1140                 if(!ValidateLayer(_parameters[1]))\r
1141                 {\r
1142                         SetReplyString(TEXT("403 CG ERROR\r\n"));\r
1143                         return false;\r
1144                 }\r
1145 \r
1146                 int layer = _ttoi(_parameters[1].c_str());\r
1147                 auto desc = flash::get_default_cg_producer(safe_ptr<core::video_channel>(GetChannel()), GetLayerIndex(flash::cg_producer::DEFAULT_LAYER))->description(layer);\r
1148                 \r
1149                 replyString << desc << TEXT("\r\n"); \r
1150         }\r
1151         else \r
1152         {\r
1153                 auto info = flash::get_default_cg_producer(safe_ptr<core::video_channel>(GetChannel()), GetLayerIndex(flash::cg_producer::DEFAULT_LAYER))->info();\r
1154                 replyString << info << TEXT("\r\n"); \r
1155         }       \r
1156 \r
1157         SetReplyString(replyString.str());\r
1158         return true;\r
1159 }\r
1160 \r
1161 bool DataCommand::DoExecute()\r
1162 {\r
1163         std::wstring command = _parameters[0];\r
1164         if(command == TEXT("STORE"))\r
1165                 return DoExecuteStore();\r
1166         else if(command == TEXT("RETRIEVE"))\r
1167                 return DoExecuteRetrieve();\r
1168         else if(command == TEXT("LIST"))\r
1169                 return DoExecuteList();\r
1170 \r
1171         SetReplyString(TEXT("403 DATA ERROR\r\n"));\r
1172         return false;\r
1173 }\r
1174 \r
1175 bool DataCommand::DoExecuteStore() \r
1176 {\r
1177         if(_parameters.size() < 3) \r
1178         {\r
1179                 SetReplyString(TEXT("402 DATA STORE ERROR\r\n"));\r
1180                 return false;\r
1181         }\r
1182 \r
1183         std::wstring filename = env::data_folder();\r
1184         filename.append(_parameters[1]);\r
1185         filename.append(TEXT(".ftd"));\r
1186 \r
1187         std::wofstream datafile(filename.c_str());\r
1188         if(!datafile) \r
1189         {\r
1190                 SetReplyString(TEXT("501 DATA STORE FAILED\r\n"));\r
1191                 return false;\r
1192         }\r
1193 \r
1194         datafile << _parameters2[2];\r
1195         datafile.close();\r
1196 \r
1197         std::wstring replyString = TEXT("202 DATA STORE OK\r\n");\r
1198         SetReplyString(replyString);\r
1199         return true;\r
1200 }\r
1201 \r
1202 bool DataCommand::DoExecuteRetrieve() \r
1203 {\r
1204         if(_parameters.size() < 2) \r
1205         {\r
1206                 SetReplyString(TEXT("402 DATA RETRIEVE ERROR\r\n"));\r
1207                 return false;\r
1208         }\r
1209 \r
1210         std::wstring filename = env::data_folder();\r
1211         filename.append(_parameters[1]);\r
1212         filename.append(TEXT(".ftd"));\r
1213 \r
1214         std::wifstream datafile(filename.c_str());\r
1215         if(!datafile) \r
1216         {\r
1217                 SetReplyString(TEXT("404 DATA RETRIEVE ERROR\r\n"));\r
1218                 return false;\r
1219         }\r
1220 \r
1221         std::wstringstream reply(TEXT("201 DATA RETRIEVE OK\r\n"));\r
1222         std::wstring line;\r
1223         bool bFirstLine = true;\r
1224         while(std::getline(datafile, line))\r
1225         {\r
1226                 if(!bFirstLine)\r
1227                         reply << "\\n";\r
1228                 else\r
1229                         bFirstLine = false;\r
1230 \r
1231                 reply << line;\r
1232         }\r
1233         datafile.close();\r
1234 \r
1235         reply << "\r\n";\r
1236         SetReplyString(reply.str());\r
1237         return true;\r
1238 }\r
1239 \r
1240 bool DataCommand::DoExecuteList() \r
1241 {\r
1242         std::wstringstream replyString;\r
1243         replyString << TEXT("200 DATA LIST OK\r\n");\r
1244 \r
1245         for (boost::filesystem::wrecursive_directory_iterator itr(env::data_folder()), end; itr != end; ++itr)\r
1246         {                       \r
1247                 if(boost::filesystem::is_regular_file(itr->path()))\r
1248                 {\r
1249                         if(!boost::iequals(itr->path().extension(), L".ftd"))\r
1250                                 continue;\r
1251                         \r
1252                         auto relativePath = boost::filesystem::wpath(itr->path().file_string().substr(env::data_folder().size()-1, itr->path().file_string().size()));\r
1253                         \r
1254                         auto str = relativePath.replace_extension(TEXT("")).external_file_string();\r
1255                         if(str[0] == '\\' || str[0] == '/')\r
1256                                 str = std::wstring(str.begin() + 1, str.end());\r
1257 \r
1258                         replyString << str << TEXT("\r\n");     \r
1259                 }\r
1260         }\r
1261         \r
1262         replyString << TEXT("\r\n");\r
1263 \r
1264         SetReplyString(boost::to_upper_copy(replyString.str()));\r
1265         return true;\r
1266 }\r
1267 \r
1268 bool CinfCommand::DoExecute()\r
1269 {\r
1270         std::wstringstream replyString;\r
1271         \r
1272         try\r
1273         {\r
1274                 std::wstring info;\r
1275                 for (boost::filesystem::wrecursive_directory_iterator itr(env::media_folder()), end; itr != end; ++itr)\r
1276                 {\r
1277                         auto path = itr->path();\r
1278                         auto file = path.replace_extension(L"").filename();\r
1279                         if(boost::iequals(file, _parameters.at(0)))\r
1280                                 info += MediaInfo(itr->path()) + L"\r\n";\r
1281                 }\r
1282 \r
1283                 if(info.empty())\r
1284                 {\r
1285                         SetReplyString(TEXT("404 CINF ERROR\r\n"));\r
1286                         return false;\r
1287                 }\r
1288                 replyString << TEXT("200 INFO OK\r\n");\r
1289                 replyString << info << "\r\n";\r
1290         }\r
1291         catch(...)\r
1292         {\r
1293                 SetReplyString(TEXT("404 CINF ERROR\r\n"));\r
1294                 return false;\r
1295         }\r
1296         \r
1297         SetReplyString(replyString.str());\r
1298         return true;\r
1299 }\r
1300 \r
1301 void GenerateChannelInfo(int index, const safe_ptr<core::video_channel>& pChannel, std::wstringstream& replyString)\r
1302 {\r
1303         replyString << index+1 << TEXT(" ") << pChannel->get_video_format_desc().name << TEXT(" PLAYING") << TEXT("\r\n");\r
1304 }\r
1305 \r
1306 bool InfoCommand::DoExecute()\r
1307 {\r
1308         try\r
1309         {\r
1310                 std::wstringstream replyString;\r
1311                 if(_parameters.size() >= 1)\r
1312                 {\r
1313                         int channelIndex = _ttoi(_parameters.at(0).c_str())-1;\r
1314                         replyString << TEXT("201 INFO OK\r\n");\r
1315                         GenerateChannelInfo(channelIndex, channels_.at(channelIndex), replyString);\r
1316                 }\r
1317                 else\r
1318                 {\r
1319                         replyString << TEXT("200 INFO OK\r\n");\r
1320                         for(size_t n = 0; n < channels_.size(); ++n)\r
1321                                 GenerateChannelInfo(n, channels_[n], replyString);\r
1322                         replyString << TEXT("\r\n");\r
1323                 }\r
1324                 SetReplyString(replyString.str());\r
1325         }\r
1326         catch(...)\r
1327         {\r
1328                 SetReplyString(TEXT("401 INFO ERROR\r\n"));\r
1329                 return false;\r
1330         }\r
1331 \r
1332         return true;\r
1333 }\r
1334 \r
1335 bool ClsCommand::DoExecute()\r
1336 {\r
1337 /*\r
1338                 wav = audio\r
1339                 mp3 = audio\r
1340                 swf     = movie\r
1341                 dv  = movie\r
1342                 tga = still\r
1343                 col = still\r
1344         */\r
1345         std::wstringstream replyString;\r
1346         replyString << TEXT("200 CLS OK\r\n");\r
1347         replyString << ListMedia();\r
1348         replyString << TEXT("\r\n");\r
1349         SetReplyString(boost::to_upper_copy(replyString.str()));\r
1350         return true;\r
1351 }\r
1352 \r
1353 bool TlsCommand::DoExecute()\r
1354 {\r
1355         std::wstringstream replyString;\r
1356         replyString << TEXT("200 TLS OK\r\n");\r
1357 \r
1358         replyString << ListTemplates();\r
1359         replyString << TEXT("\r\n");\r
1360 \r
1361         SetReplyString(replyString.str());\r
1362         return true;\r
1363 }\r
1364 \r
1365 bool VersionCommand::DoExecute()\r
1366 {\r
1367         std::wstring replyString = TEXT("201 VERSION OK\r\n SERVER: ") + env::version() + TEXT("\r\n");\r
1368 \r
1369         if(_parameters.size() > 0)\r
1370         {\r
1371                 if(_parameters[0] == L"FLASH")\r
1372                         replyString = TEXT("201 VERSION OK\r\n FLASH: ") + flash::get_version() + TEXT("\r\n");\r
1373                 else if(_parameters[0] == L"TEMPLATEHOST")\r
1374                         replyString = TEXT("201 VERSION OK\r\n TEMPLATEHOST: ") + flash::get_cg_version() + TEXT("\r\n");\r
1375                 else if(_parameters[0] != L"SERVER")\r
1376                         replyString = TEXT("403 VERSION ERROR\r\n");\r
1377         }\r
1378 \r
1379         SetReplyString(replyString);\r
1380         return true;\r
1381 }\r
1382 \r
1383 bool ByeCommand::DoExecute()\r
1384 {\r
1385         GetClientInfo()->Disconnect();\r
1386         return true;\r
1387 }\r
1388 \r
1389 bool SetCommand::DoExecute()\r
1390 {\r
1391         std::wstring name = _parameters[0];\r
1392         std::transform(name.begin(), name.end(), name.begin(), toupper);\r
1393 \r
1394         std::wstring value = _parameters[1];\r
1395         std::transform(value.begin(), value.end(), value.begin(), toupper);\r
1396 \r
1397         if(name == TEXT("MODE"))\r
1398         {\r
1399                 auto format_desc = core::video_format_desc::get(value);\r
1400                 if(format_desc.format != core::video_format::invalid)\r
1401                 {\r
1402                         GetChannel()->set_video_format_desc(format_desc);\r
1403                         SetReplyString(TEXT("202 SET MODE OK\r\n"));\r
1404                 }\r
1405                 else\r
1406                         SetReplyString(TEXT("501 SET MODE FAILED\r\n"));\r
1407         }\r
1408         else\r
1409         {\r
1410                 this->SetReplyString(TEXT("403 SET ERROR\r\n"));\r
1411         }\r
1412 \r
1413         return true;\r
1414 }\r
1415 \r
1416 \r
1417 }       //namespace amcp\r
1418 }}      //namespace caspar