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