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