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