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