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