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