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