]> git.sesse.net Git - casparcg/blob - protocol/amcp/AMCPCommandsImpl.cpp
2.0.0.2: Fixed ffmpeg-consumer crash.
[casparcg] / protocol / amcp / AMCPCommandsImpl.cpp
1 /*\r
2 * copyright (c) 2010 Sveriges Television AB <info@casparcg.com>\r
3 *\r
4 *  This file is part of CasparCG.\r
5 *\r
6 *    CasparCG is free software: you can redistribute it and/or modify\r
7 *    it under the terms of the GNU General Public License as published by\r
8 *    the Free Software Foundation, either version 3 of the License, or\r
9 *    (at your option) any later version.\r
10 *\r
11 *    CasparCG is distributed in the hope that it will be useful,\r
12 *    but WITHOUT ANY WARRANTY; without even the implied warranty of\r
13 *    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the\r
14 *    GNU General Public License for more details.\r
15 \r
16 *    You should have received a copy of the GNU General Public License\r
17 *    along with CasparCG.  If not, see <http://www.gnu.org/licenses/>.\r
18 *\r
19 */\r
20 \r
21 #include "../StdAfx.h"\r
22 \r
23 #include "AMCPCommandsImpl.h"\r
24 #include "AMCPProtocolStrategy.h"\r
25 \r
26 #include "../media.h"\r
27 \r
28 #include <common/env.h>\r
29 \r
30 #include <core/producer/frame_producer.h>\r
31 #include <core/video_format.h>\r
32 #include <core/producer/flash/flash_producer.h>\r
33 #include <core/producer/transition/transition_producer.h>\r
34 #include <core/producer/flash/cg_producer.h>\r
35 \r
36 #include <mixer/image/image_transform.h>\r
37 #include <mixer/audio/audio_transform.h>\r
38 \r
39 #include <algorithm>\r
40 #include <locale>\r
41 #include <fstream>\r
42 #include <cctype>\r
43 #include <io.h>\r
44 \r
45 #include <boost/date_time/posix_time/posix_time.hpp>\r
46 #include <boost/lexical_cast.hpp>\r
47 #include <boost/algorithm/string.hpp>\r
48 #include <boost/filesystem.hpp>\r
49 \r
50 #if defined(_MSC_VER)\r
51 #pragma warning (push, 1) // TODO: Legacy code, just disable warnings\r
52 #endif\r
53 \r
54 /* Return codes\r
55 \r
56 100 [action]                    Information om att något har hänt  \r
57 101 [action]                    Information om att något har hänt, en rad data skickas  \r
58 \r
59 202 [kommando] OK               Kommandot har utförts  \r
60 201 [kommando] OK               Kommandot har utförts, och en rad data skickas tillbaka  \r
61 200 [kommando] OK               Kommandot har utförts, och flera rader data skickas tillbaka. Avslutas med tomrad  \r
62 \r
63 400 ERROR                               Kommandot kunde inte förstås  \r
64 401 [kommando] ERROR    Ogiltig kanal  \r
65 402 [kommando] ERROR    Parameter saknas  \r
66 403 [kommando] ERROR    Ogiltig parameter  \r
67 404 [kommando] ERROR    Mediafilen hittades inte  \r
68 \r
69 500 FAILED                              Internt configurationfel  \r
70 501 [kommando] FAILED   Internt configurationfel  \r
71 502 [kommando] FAILED   Oläslig mediafil  \r
72 \r
73 600 [kommando] FAILED   funktion ej implementerad\r
74 */\r
75 \r
76 namespace caspar { namespace protocol {\r
77 \r
78 using namespace core;\r
79 \r
80 std::wstring ListMedia()\r
81 {       \r
82         std::wstringstream replyString;\r
83         for (boost::filesystem::wrecursive_directory_iterator itr(env::media_folder()), end; itr != end; ++itr)\r
84         {                       \r
85                 if(boost::filesystem::is_regular_file(itr->path()))\r
86                 {\r
87                         std::wstring clipttype = TEXT(" N/A ");\r
88                         std::wstring extension = boost::to_upper_copy(itr->path().extension());\r
89                         if(extension == TEXT(".TGA") || extension == TEXT(".COL"))\r
90                                 clipttype = TEXT(" STILL ");\r
91                         else if(extension == TEXT(".SWF") || extension == TEXT(".DV") || extension == TEXT(".MOV") || extension == TEXT(".MPG") || \r
92                                         extension == TEXT(".AVI") || extension == TEXT(".FLV") || extension == TEXT(".F4V") || extension == TEXT(".MP4"))\r
93                                 clipttype = TEXT(" MOVIE ");\r
94                         else if(extension == TEXT(".WAV") || extension == TEXT(".MP3"))\r
95                                 clipttype = TEXT(" STILL ");\r
96 \r
97                         if(clipttype != TEXT(" N/A "))\r
98                         {               \r
99                                 auto is_not_digit = [](char c){ return std::isdigit(c) == 0; };\r
100 \r
101                                 auto relativePath = boost::filesystem::wpath(itr->path().file_string().substr(env::media_folder().size()-1, itr->path().file_string().size()));\r
102 \r
103                                 auto writeTimeStr = boost::posix_time::to_iso_string(boost::posix_time::from_time_t(boost::filesystem::last_write_time(itr->path())));\r
104                                 writeTimeStr.erase(std::remove_if(writeTimeStr.begin(), writeTimeStr.end(), is_not_digit), writeTimeStr.end());\r
105                                 auto writeTimeWStr = std::wstring(writeTimeStr.begin(), writeTimeStr.end());\r
106 \r
107                                 auto sizeStr = boost::lexical_cast<std::wstring>(boost::filesystem::file_size(itr->path()));\r
108                                 sizeStr.erase(std::remove_if(sizeStr.begin(), sizeStr.end(), is_not_digit), sizeStr.end());\r
109                                 auto sizeWStr = std::wstring(sizeStr.begin(), sizeStr.end());\r
110 \r
111                                 replyString << TEXT("\"") << relativePath.replace_extension(TEXT(""))\r
112                                                         << TEXT("\" ") << clipttype \r
113                                                         << TEXT(" ") << sizeStr\r
114                                                         << TEXT(" ") << writeTimeWStr\r
115                                                         << TEXT("\r\n");\r
116                         }       \r
117                 }\r
118         }\r
119         return boost::to_upper_copy(replyString.str());\r
120 }\r
121 \r
122 std::wstring ListTemplates() \r
123 {\r
124         std::wstringstream replyString;\r
125 \r
126         for (boost::filesystem::wrecursive_directory_iterator itr(env::template_folder()), end; itr != end; ++itr)\r
127         {               \r
128                 if(boost::filesystem::is_regular_file(itr->path()) && itr->path().extension() == L".ft")\r
129                 {\r
130                         auto relativePath = boost::filesystem::wpath(itr->path().file_string().substr(env::template_folder().size()-1, itr->path().file_string().size()));\r
131 \r
132                         auto writeTimeStr = boost::posix_time::to_iso_string(boost::posix_time::from_time_t(boost::filesystem::last_write_time(itr->path())));\r
133                         writeTimeStr.erase(std::remove_if(writeTimeStr.begin(), writeTimeStr.end(), [](char c){ return std::isdigit(c) == 0;}), writeTimeStr.end());\r
134                         auto writeTimeWStr = std::wstring(writeTimeStr.begin(), writeTimeStr.end());\r
135 \r
136                         auto sizeStr = boost::lexical_cast<std::string>(boost::filesystem::file_size(itr->path()));\r
137                         sizeStr.erase(std::remove_if(sizeStr.begin(), sizeStr.end(), [](char c){ return std::isdigit(c) == 0;}), sizeStr.end());\r
138 \r
139                         auto sizeWStr = std::wstring(sizeStr.begin(), sizeStr.end());\r
140                         \r
141                         replyString << TEXT("\"") << relativePath.replace_extension(TEXT(""))\r
142                                                 << TEXT("\" ") << sizeWStr\r
143                                                 << TEXT(" ") << writeTimeWStr\r
144                                                 << TEXT("\r\n");                \r
145                 }\r
146         }\r
147         return boost::to_upper_copy(replyString.str());\r
148 }\r
149 \r
150 namespace amcp {\r
151         \r
152 AMCPCommand::AMCPCommand() : channelIndex_(0), scheduling_(Default), layerIndex_(-1)\r
153 {}\r
154 \r
155 void AMCPCommand::SendReply()\r
156 {\r
157         if(!pClientInfo_) \r
158                 return;\r
159 \r
160         if(replyString_.empty())\r
161                 return;\r
162         pClientInfo_->Send(replyString_);\r
163 }\r
164 \r
165 void AMCPCommand::Clear() \r
166 {\r
167         pChannel_->producer().clear();\r
168         pClientInfo_.reset();\r
169         channelIndex_ = 0;\r
170         _parameters.clear();\r
171 }\r
172 \r
173 bool MixerCommand::DoExecute()\r
174 {       \r
175         //Perform loading of the clip\r
176         try\r
177         {       \r
178                 if(_parameters[0] == L"VIDEO")\r
179                 {\r
180                         if(_parameters[1] == L"OPACITY")\r
181                         {\r
182                                 double value = boost::lexical_cast<double>(_parameters.at(2));\r
183                                 auto transform = GetChannel()->mixer().get_image_transform(GetLayerIndex());\r
184                                 transform.set_opacity(value);\r
185                                 GetChannel()->mixer().set_image_transform(GetLayerIndex(), std::move(transform));\r
186                         }\r
187                         else if(_parameters[1] == L"GAIN")\r
188                         {\r
189                                 double value = boost::lexical_cast<double>(_parameters.at(2));\r
190                                 auto transform = GetChannel()->mixer().get_image_transform(GetLayerIndex());\r
191                                 transform.set_gain(value);\r
192                                 GetChannel()->mixer().set_image_transform(GetLayerIndex(), std::move(transform));\r
193                         }\r
194                         else if(_parameters[1] == L"FIX_RECT")\r
195                         {\r
196                                 double x        = boost::lexical_cast<double>(_parameters.at(2));\r
197                                 double y        = boost::lexical_cast<double>(_parameters.at(3));\r
198                                 double x_s      = boost::lexical_cast<double>(_parameters.at(4));\r
199                                 double y_s      = boost::lexical_cast<double>(_parameters.at(5));\r
200                                 auto transform = GetChannel()->mixer().get_image_transform(GetLayerIndex());\r
201                                 transform.set_image_translation(x, y);\r
202                                 transform.set_image_scale(x_s, y_s);\r
203                                 transform.set_mask_translation(x, y);\r
204                                 transform.set_mask_scale(x_s, y_s);\r
205                                 GetChannel()->mixer().set_image_transform(GetLayerIndex(), std::move(transform));\r
206                         }\r
207                         else if(_parameters[1] == L"CLIP_RECT")\r
208                         {\r
209                                 double x        = boost::lexical_cast<double>(_parameters.at(2));\r
210                                 double y        = boost::lexical_cast<double>(_parameters.at(3));\r
211                                 double x_s      = boost::lexical_cast<double>(_parameters.at(4));\r
212                                 double y_s      = boost::lexical_cast<double>(_parameters.at(5));\r
213                                 auto transform = GetChannel()->mixer().get_image_transform(GetLayerIndex());\r
214                                 transform.set_image_translation(0.0, 0.0);\r
215                                 transform.set_image_scale(1.0, 1.0);\r
216                                 transform.set_mask_translation(x, y);\r
217                                 transform.set_mask_scale(x_s, y_s);\r
218                                 GetChannel()->mixer().set_image_transform(GetLayerIndex(), std::move(transform));\r
219                         }\r
220                         else if(_parameters[1] == L"GRID")\r
221                         {\r
222                                 int n = boost::lexical_cast<int>(_parameters.at(2));\r
223                                 double delta = 1.0/static_cast<double>(n);\r
224                                 for(int x = 0; x < n; ++x)\r
225                                 {\r
226                                         for(int y = 0; y < n; ++y)\r
227                                         {\r
228                                                 int index = x+y*n;\r
229                                                 auto transform = GetChannel()->mixer().get_image_transform(index);                                              \r
230                                                 transform.set_image_translation(x*delta, y*delta);\r
231                                                 transform.set_image_scale(delta, delta);                        \r
232                                                 transform.set_mask_translation(x*delta, y*delta);\r
233                                                 transform.set_mask_scale(delta, delta);\r
234                                                 GetChannel()->mixer().set_image_transform(index, std::move(transform));\r
235                                         }\r
236                                 }\r
237                         }\r
238                         else if(_parameters[1] == L"RESET")\r
239                         {\r
240                                 GetChannel()->mixer().set_image_transform(GetLayerIndex(), image_transform());\r
241                         }\r
242                 }\r
243                 else if(_parameters[0] == L"AUDIO")\r
244                 {\r
245                         if(_parameters[1] == L"GAIN")\r
246                         {\r
247                                 double value = boost::lexical_cast<double>(_parameters[2]);\r
248                                 auto transform = GetChannel()->mixer().get_audio_transform(GetLayerIndex());\r
249                                 transform.set_gain(value);\r
250                                 GetChannel()->mixer().set_audio_transform(GetLayerIndex(), std::move(transform));\r
251                         }\r
252                         else if(_parameters[1] == L"RESET")\r
253                         {\r
254                                 GetChannel()->mixer().set_audio_transform(GetLayerIndex(), audio_transform());\r
255                         }\r
256                 }\r
257                 else if(_parameters[0] == L"RESET")\r
258                 {\r
259                         GetChannel()->mixer().set_image_transform(GetLayerIndex(), image_transform());\r
260                         GetChannel()->mixer().set_audio_transform(GetLayerIndex(), audio_transform());\r
261                 }\r
262         \r
263                 SetReplyString(TEXT("202 MIXER OK\r\n"));\r
264 \r
265                 return true;\r
266         }\r
267         catch(file_not_found&)\r
268         {\r
269                 CASPAR_LOG_CURRENT_EXCEPTION();\r
270                 SetReplyString(TEXT("404 MIXER ERROR\r\n"));\r
271                 return false;\r
272         }\r
273         catch(...)\r
274         {\r
275                 CASPAR_LOG_CURRENT_EXCEPTION();\r
276                 SetReplyString(TEXT("502 MIXER FAILED\r\n"));\r
277                 return false;\r
278         }\r
279 }\r
280 \r
281 bool SwapCommand::DoExecute()\r
282 {       \r
283         //Perform loading of the clip\r
284         try\r
285         {\r
286                 if(GetLayerIndex(-1) != -1)\r
287                 {\r
288                         std::vector<std::string> strs;\r
289                         boost::split(strs, _parameters[0], boost::is_any_of("-"));\r
290                         \r
291                         auto ch1 = GetChannel();\r
292                         auto ch2 = GetChannels().at(boost::lexical_cast<int>(strs.at(0))-1);\r
293 \r
294                         int l1 = GetLayerIndex();\r
295                         int l2 = boost::lexical_cast<int>(strs.at(1));\r
296 \r
297                         ch1->producer().swap_layer(l1, l2, ch2->producer());\r
298                 }\r
299                 else\r
300                 {\r
301                         auto ch1 = GetChannel();\r
302                         auto ch2 = GetChannels().at(boost::lexical_cast<int>(_parameters[0])-1);\r
303                         ch1->producer().swap(ch2->producer());\r
304                 }\r
305 \r
306                 CASPAR_LOG(info) << "Swapped successfully";\r
307 \r
308                 SetReplyString(TEXT("202 SWAP OK\r\n"));\r
309 \r
310                 return true;\r
311         }\r
312         catch(file_not_found&)\r
313         {\r
314                 CASPAR_LOG_CURRENT_EXCEPTION();\r
315                 SetReplyString(TEXT("404 SWAP ERROR\r\n"));\r
316                 return false;\r
317         }\r
318         catch(...)\r
319         {\r
320                 CASPAR_LOG_CURRENT_EXCEPTION();\r
321                 SetReplyString(TEXT("502 SWAP FAILED\r\n"));\r
322                 return false;\r
323         }\r
324 }\r
325 \r
326 bool AddCommand::DoExecute()\r
327 {       \r
328         //Perform loading of the clip\r
329         try\r
330         {\r
331                 GetChannel()->consumer().add(GetLayerIndex(), create_consumer(_parameters));\r
332         \r
333                 CASPAR_LOG(info) << "Added " <<  _parameters[0] << TEXT(" successfully");\r
334 \r
335                 SetReplyString(TEXT("202 ADD OK\r\n"));\r
336 \r
337                 return true;\r
338         }\r
339         catch(file_not_found&)\r
340         {\r
341                 CASPAR_LOG_CURRENT_EXCEPTION();\r
342                 SetReplyString(TEXT("404 ADD ERROR\r\n"));\r
343                 return false;\r
344         }\r
345         catch(...)\r
346         {\r
347                 CASPAR_LOG_CURRENT_EXCEPTION();\r
348                 SetReplyString(TEXT("502 ADD FAILED\r\n"));\r
349                 return false;\r
350         }\r
351 }\r
352 \r
353 bool RemoveCommand::DoExecute()\r
354 {       \r
355         //Perform loading of the clip\r
356         try\r
357         {\r
358                 GetChannel()->consumer().remove(GetLayerIndex());\r
359 \r
360                 SetReplyString(TEXT("202 REMOVE OK\r\n"));\r
361 \r
362                 return true;\r
363         }\r
364         catch(file_not_found&)\r
365         {\r
366                 CASPAR_LOG_CURRENT_EXCEPTION();\r
367                 SetReplyString(TEXT("404 REMOVE ERROR\r\n"));\r
368                 return false;\r
369         }\r
370         catch(...)\r
371         {\r
372                 CASPAR_LOG_CURRENT_EXCEPTION();\r
373                 SetReplyString(TEXT("502 REMOVE FAILED\r\n"));\r
374                 return false;\r
375         }\r
376 }\r
377 \r
378 bool LoadCommand::DoExecute()\r
379 {       \r
380         //Perform loading of the clip\r
381         try\r
382         {\r
383                 _parameters[0] = _parameters[0];\r
384                 auto pFP = create_producer(_parameters);                \r
385                 GetChannel()->producer().load(GetLayerIndex(), pFP, false, true);\r
386         \r
387                 CASPAR_LOG(info) << "Loaded " <<  _parameters[0] << TEXT(" successfully");\r
388 \r
389                 SetReplyString(TEXT("202 LOAD OK\r\n"));\r
390 \r
391                 return true;\r
392         }\r
393         catch(file_not_found&)\r
394         {\r
395                 CASPAR_LOG_CURRENT_EXCEPTION();\r
396                 SetReplyString(TEXT("404 LOADBG ERROR\r\n"));\r
397                 return false;\r
398         }\r
399         catch(...)\r
400         {\r
401                 CASPAR_LOG_CURRENT_EXCEPTION();\r
402                 SetReplyString(TEXT("502 LOADBG FAILED\r\n"));\r
403                 return false;\r
404         }\r
405 }\r
406 \r
407 bool LoadbgCommand::DoExecute()\r
408 {\r
409         transition_info transitionInfo;\r
410         \r
411         bool bLoop = false;\r
412         unsigned short transitionParameterIndex = 1;\r
413 \r
414         if(_parameters.size() > 1 && _parameters[1] == TEXT("LOOP"))\r
415                 ++transitionParameterIndex;\r
416 \r
417         //Setup transition info\r
418         if(_parameters.size() > transitionParameterIndex)       //type\r
419         {\r
420                 std::wstring transitionType = _parameters[transitionParameterIndex];\r
421 \r
422                 if(transitionType == TEXT("CUT"))\r
423                         transitionInfo.type = transition::cut;\r
424                 else if(transitionType == TEXT("MIX"))\r
425                         transitionInfo.type = transition::mix;\r
426                 else if(transitionType == TEXT("PUSH"))\r
427                         transitionInfo.type = transition::push;\r
428                 else if(transitionType == TEXT("SLIDE"))\r
429                         transitionInfo.type = transition::slide;\r
430                 else if(transitionType == TEXT("WIPE"))\r
431                         transitionInfo.type = transition::wipe;\r
432 \r
433                 if(_parameters.size() > static_cast<unsigned short>(transitionParameterIndex+1))        //duration\r
434                 {\r
435                         int duration = _ttoi(_parameters[transitionParameterIndex+1].c_str());\r
436                         if(duration > 0)\r
437                                 transitionInfo.duration = duration;\r
438 \r
439                         if(_parameters.size() > static_cast<unsigned short>(transitionParameterIndex+2))        //direction\r
440                         {\r
441                                 std::wstring direction = _parameters[transitionParameterIndex+2];\r
442 \r
443                                 if(direction == TEXT("FROMLEFT"))\r
444                                         transitionInfo.direction = transition_direction::from_left;\r
445                                 else if(direction == TEXT("FROMRIGHT"))\r
446                                         transitionInfo.direction = transition_direction::from_right;\r
447                                 else if(direction == TEXT("LEFT"))\r
448                                         transitionInfo.direction = transition_direction::from_right;\r
449                                 else if(direction == TEXT("RIGHT"))\r
450                                         transitionInfo.direction = transition_direction::from_left;\r
451                         }\r
452                 }\r
453         }\r
454 \r
455         //Perform loading of the clip\r
456         try\r
457         {\r
458                 _parameters[0] = _parameters[0];\r
459                 auto pFP = create_producer(_parameters);\r
460                 if(pFP == frame_producer::empty())\r
461                         BOOST_THROW_EXCEPTION(file_not_found() << msg_info(_parameters.size() > 0 ? narrow(_parameters[0]) : ""));\r
462 \r
463                 pFP = safe_ptr<core::frame_producer>(transition_producer(pFP, transitionInfo));\r
464                 bool autoPlay = std::find(_parameters.begin(), _parameters.end(), TEXT("AUTOPLAY")) != _parameters.end();\r
465                 GetChannel()->producer().load(GetLayerIndex(), pFP, autoPlay); // TODO: LOOP\r
466         \r
467                 CASPAR_LOG(info) << "Loaded " << _parameters[0] << TEXT(" successfully to background");\r
468                 SetReplyString(TEXT("202 LOADBG OK\r\n"));\r
469 \r
470                 return true;\r
471         }\r
472         catch(file_not_found&)\r
473         {\r
474                 CASPAR_LOG_CURRENT_EXCEPTION();\r
475                 SetReplyString(TEXT("404 LOADBG ERROR\r\n"));\r
476                 return false;\r
477         }\r
478         catch(...)\r
479         {\r
480                 CASPAR_LOG_CURRENT_EXCEPTION();\r
481                 SetReplyString(TEXT("502 LOADBG FAILED\r\n"));\r
482                 return false;\r
483         }\r
484 }\r
485 \r
486 bool PauseCommand::DoExecute()\r
487 {\r
488         try\r
489         {\r
490                 GetChannel()->producer().pause(GetLayerIndex());\r
491                 SetReplyString(TEXT("202 PAUSE OK\r\n"));\r
492                 return true;\r
493         }\r
494         catch(...)\r
495         {\r
496                 SetReplyString(TEXT("501 PAUSE FAILED\r\n"));\r
497         }\r
498 \r
499         return false;\r
500 }\r
501 \r
502 bool PlayCommand::DoExecute()\r
503 {\r
504         try\r
505         {\r
506                 GetChannel()->producer().play(GetLayerIndex());\r
507                 SetReplyString(TEXT("202 PLAY OK\r\n"));\r
508                 return true;\r
509         }\r
510         catch(...)\r
511         {\r
512                 SetReplyString(TEXT("501 PLAY FAILED\r\n"));\r
513         }\r
514 \r
515         return false;\r
516 }\r
517 \r
518 bool StopCommand::DoExecute()\r
519 {\r
520         try\r
521         {\r
522                 GetChannel()->producer().stop(GetLayerIndex());\r
523                 SetReplyString(TEXT("202 STOP OK\r\n"));\r
524                 return true;\r
525         }\r
526         catch(...)\r
527         {\r
528                 SetReplyString(TEXT("501 STOP FAILED\r\n"));\r
529         }\r
530 \r
531         return false;\r
532 }\r
533 \r
534 bool ClearCommand::DoExecute()\r
535 {\r
536         GetChannel()->producer().clear(GetLayerIndex());\r
537                 \r
538         SetReplyString(TEXT("202 CLEAR OK\r\n"));\r
539 \r
540         return true;\r
541 }\r
542 \r
543 bool CGCommand::DoExecute()\r
544 {\r
545         std::wstring command = _parameters[0];\r
546         if(command == TEXT("ADD"))\r
547                 return DoExecuteAdd();\r
548         else if(command == TEXT("PLAY"))\r
549                 return DoExecutePlay();\r
550         else if(command == TEXT("STOP"))\r
551                 return DoExecuteStop();\r
552         else if(command == TEXT("NEXT"))\r
553                 return DoExecuteNext();\r
554         else if(command == TEXT("REMOVE"))\r
555                 return DoExecuteRemove();\r
556         else if(command == TEXT("CLEAR"))\r
557                 return DoExecuteClear();\r
558         else if(command == TEXT("UPDATE"))\r
559                 return DoExecuteUpdate();\r
560         else if(command == TEXT("INVOKE"))\r
561                 return DoExecuteInvoke();\r
562         else if(command == TEXT("INFO"))\r
563                 return DoExecuteInfo();\r
564 \r
565         SetReplyString(TEXT("403 CG ERROR\r\n"));\r
566         return false;\r
567 }\r
568 \r
569 bool CGCommand::ValidateLayer(const std::wstring& layerstring) {\r
570         int length = layerstring.length();\r
571         for(int i = 0; i < length; ++i) {\r
572                 if(!_istdigit(layerstring[i])) {\r
573                         return false;\r
574                 }\r
575         }\r
576 \r
577         return true;\r
578 }\r
579 \r
580 bool CGCommand::DoExecuteAdd() {\r
581         //CG 1 ADD 0 "template_folder/templatename" [STARTLABEL] 0/1 [DATA]\r
582 \r
583         int layer = 0;                          //_parameters[1]\r
584 //      std::wstring templateName;      //_parameters[2]\r
585         std::wstring label;             //_parameters[3]\r
586         bool bDoStart = false;          //_parameters[3] alt. _parameters[4]\r
587 //      std::wstring data;                      //_parameters[4] alt. _parameters[5]\r
588 \r
589         if(_parameters.size() < 4) \r
590         {\r
591                 SetReplyString(TEXT("402 CG ERROR\r\n"));\r
592                 return false;\r
593         }\r
594         unsigned int dataIndex = 4;\r
595 \r
596         if(!ValidateLayer(_parameters[1])) \r
597         {\r
598                 SetReplyString(TEXT("403 CG ERROR\r\n"));\r
599                 return false;\r
600         }\r
601 \r
602         layer = _ttoi(_parameters[1].c_str());\r
603 \r
604         if(_parameters[3].length() > 1) \r
605         {       //read label\r
606                 label = _parameters[3];\r
607                 ++dataIndex;\r
608 \r
609                 if(_parameters.size() > 4 && _parameters[4].length() > 0)       //read play-on-load-flag\r
610                         bDoStart = (_parameters[4][0]==TEXT('1')) ? true : false;\r
611                 else \r
612                 {\r
613                         SetReplyString(TEXT("402 CG ERROR\r\n"));\r
614                         return false;\r
615                 }\r
616         }\r
617         else if(_parameters[3].length() > 0) {  //read play-on-load-flag\r
618                 bDoStart = (_parameters[3][0]==TEXT('1')) ? true : false;\r
619         }\r
620         else \r
621         {\r
622                 SetReplyString(TEXT("403 CG ERROR\r\n"));\r
623                 return false;\r
624         }\r
625 \r
626         const TCHAR* pDataString = 0;\r
627         std::wstringstream data;\r
628         std::wstring dataFromFile;\r
629         if(_parameters.size() > dataIndex) \r
630         {       //read data\r
631                 const std::wstring& dataString = _parameters[dataIndex];\r
632 \r
633                 if(dataString[0] == TEXT('<')) //the data is an XML-string\r
634                         pDataString = dataString.c_str();\r
635                 else \r
636                 {\r
637                         //The data is not an XML-string, it must be a filename\r
638                         std::wstring filename = env::data_folder();\r
639                         filename.append(dataString);\r
640                         filename.append(TEXT(".ftd"));\r
641 \r
642                         //open file\r
643                         std::wifstream datafile(filename.c_str());\r
644                         if(datafile) \r
645                         {\r
646                                 //read all data\r
647                                 data << datafile.rdbuf();\r
648                                 datafile.close();\r
649 \r
650                                 //extract data to _parameters\r
651                                 dataFromFile = data.str();\r
652                                 pDataString = dataFromFile.c_str();\r
653                         }\r
654                 }\r
655         }\r
656 \r
657         std::wstring fullFilename = core::flash::flash_producer::find_template(env::template_folder() + _parameters[2]);\r
658         if(!fullFilename.empty())\r
659         {\r
660                 std::wstring extension = boost::filesystem::wpath(fullFilename).extension();\r
661                 std::wstring filename = _parameters[2];\r
662                 filename.append(extension);\r
663 \r
664                 core::flash::get_default_cg_producer(safe_ptr<core::channel>(GetChannel()), GetLayerIndex(core::flash::cg_producer::DEFAULT_LAYER))->add(layer, filename, bDoStart, label, (pDataString!=0) ? pDataString : TEXT(""));\r
665                 SetReplyString(TEXT("202 CG OK\r\n"));\r
666         }\r
667         else\r
668         {\r
669                 CASPAR_LOG(warning) << "Could not find template " << _parameters[2];\r
670                 SetReplyString(TEXT("404 CG ERROR\r\n"));\r
671         }\r
672         return true;\r
673 }\r
674 \r
675 bool CGCommand::DoExecutePlay()\r
676 {\r
677         if(_parameters.size() > 1)\r
678         {\r
679                 if(!ValidateLayer(_parameters[1])) \r
680                 {\r
681                         SetReplyString(TEXT("403 CG ERROR\r\n"));\r
682                         return false;\r
683                 }\r
684                 int layer = _ttoi(_parameters[1].c_str());\r
685                 core::flash::get_default_cg_producer(safe_ptr<core::channel>(GetChannel()), GetLayerIndex(core::flash::cg_producer::DEFAULT_LAYER))->play(layer);\r
686         }\r
687         else\r
688         {\r
689                 SetReplyString(TEXT("402 CG ERROR\r\n"));\r
690                 return true;\r
691         }\r
692 \r
693         SetReplyString(TEXT("202 CG OK\r\n"));\r
694         return true;\r
695 }\r
696 \r
697 bool CGCommand::DoExecuteStop() \r
698 {\r
699         if(_parameters.size() > 1)\r
700         {\r
701                 if(!ValidateLayer(_parameters[1])) \r
702                 {\r
703                         SetReplyString(TEXT("403 CG ERROR\r\n"));\r
704                         return false;\r
705                 }\r
706                 int layer = _ttoi(_parameters[1].c_str());\r
707                 core::flash::get_default_cg_producer(safe_ptr<core::channel>(GetChannel()), GetLayerIndex(core::flash::cg_producer::DEFAULT_LAYER))->stop(layer, 0);\r
708         }\r
709         else \r
710         {\r
711                 SetReplyString(TEXT("402 CG ERROR\r\n"));\r
712                 return true;\r
713         }\r
714 \r
715         SetReplyString(TEXT("202 CG OK\r\n"));\r
716         return true;\r
717 }\r
718 \r
719 bool CGCommand::DoExecuteNext()\r
720 {\r
721         if(_parameters.size() > 1) \r
722         {\r
723                 if(!ValidateLayer(_parameters[1])) \r
724                 {\r
725                         SetReplyString(TEXT("403 CG ERROR\r\n"));\r
726                         return false;\r
727                 }\r
728                 int layer = _ttoi(_parameters[1].c_str());\r
729                 core::flash::get_default_cg_producer(safe_ptr<core::channel>(GetChannel()), GetLayerIndex(core::flash::cg_producer::DEFAULT_LAYER))->next(layer);\r
730         }\r
731         else \r
732         {\r
733                 SetReplyString(TEXT("402 CG ERROR\r\n"));\r
734                 return true;\r
735         }\r
736 \r
737         SetReplyString(TEXT("202 CG OK\r\n"));\r
738         return true;\r
739 }\r
740 \r
741 bool CGCommand::DoExecuteRemove() \r
742 {\r
743         if(_parameters.size() > 1) \r
744         {\r
745                 if(!ValidateLayer(_parameters[1])) \r
746                 {\r
747                         SetReplyString(TEXT("403 CG ERROR\r\n"));\r
748                         return false;\r
749                 }\r
750                 int layer = _ttoi(_parameters[1].c_str());\r
751                 core::flash::get_default_cg_producer(safe_ptr<core::channel>(GetChannel()), GetLayerIndex(core::flash::cg_producer::DEFAULT_LAYER))->remove(layer);\r
752         }\r
753         else \r
754         {\r
755                 SetReplyString(TEXT("402 CG ERROR\r\n"));\r
756                 return true;\r
757         }\r
758 \r
759         SetReplyString(TEXT("202 CG OK\r\n"));\r
760         return true;\r
761 }\r
762 \r
763 bool CGCommand::DoExecuteClear() \r
764 {\r
765         core::flash::get_default_cg_producer(safe_ptr<core::channel>(GetChannel()), GetLayerIndex(core::flash::cg_producer::DEFAULT_LAYER))->clear();\r
766         SetReplyString(TEXT("202 CG OK\r\n"));\r
767         return true;\r
768 }\r
769 \r
770 bool CGCommand::DoExecuteUpdate() \r
771 {\r
772         if(_parameters.size() > 2) \r
773         {\r
774                 if(!ValidateLayer(_parameters[1]))\r
775                 {\r
776                         SetReplyString(TEXT("403 CG ERROR\r\n"));\r
777                         return false;\r
778                 }\r
779                 int layer = _ttoi(_parameters[1].c_str());\r
780                 //TODO: Implement indirect data loading from file. Same as in Add\r
781                 core::flash::get_default_cg_producer(safe_ptr<core::channel>(GetChannel()), GetLayerIndex(core::flash::cg_producer::DEFAULT_LAYER))->update(layer, _parameters[2]);\r
782         }\r
783         else \r
784         {\r
785                 SetReplyString(TEXT("402 CG ERROR\r\n"));\r
786                 return true;\r
787         }\r
788 \r
789         SetReplyString(TEXT("202 CG OK\r\n"));\r
790         return true;\r
791 }\r
792 \r
793 bool CGCommand::DoExecuteInvoke() \r
794 {\r
795         if(_parameters.size() > 2)\r
796         {\r
797                 if(!ValidateLayer(_parameters[1]))\r
798                 {\r
799                         SetReplyString(TEXT("403 CG ERROR\r\n"));\r
800                         return false;\r
801                 }\r
802                 int layer = _ttoi(_parameters[1].c_str());\r
803                 core::flash::get_default_cg_producer(safe_ptr<core::channel>(GetChannel()), GetLayerIndex(core::flash::cg_producer::DEFAULT_LAYER))->invoke(layer, _parameters[2]);\r
804         }\r
805         else \r
806         {\r
807                 SetReplyString(TEXT("402 CG ERROR\r\n"));\r
808                 return true;\r
809         }\r
810 \r
811         SetReplyString(TEXT("202 CG OK\r\n"));\r
812         return true;\r
813 }\r
814 \r
815 bool CGCommand::DoExecuteInfo() \r
816 {\r
817         // TODO\r
818         //core::flash::get_default_cg_producer(GetChannel())->Info();\r
819         SetReplyString(TEXT("600 CG FAILED\r\n"));\r
820         return true;\r
821 }\r
822 \r
823 bool DataCommand::DoExecute()\r
824 {\r
825         std::wstring command = _parameters[0];\r
826         if(command == TEXT("STORE"))\r
827                 return DoExecuteStore();\r
828         else if(command == TEXT("RETRIEVE"))\r
829                 return DoExecuteRetrieve();\r
830         else if(command == TEXT("LIST"))\r
831                 return DoExecuteList();\r
832 \r
833         SetReplyString(TEXT("403 DATA ERROR\r\n"));\r
834         return false;\r
835 }\r
836 \r
837 bool DataCommand::DoExecuteStore() \r
838 {\r
839         if(_parameters.size() < 3) \r
840         {\r
841                 SetReplyString(TEXT("402 DATA STORE ERROR\r\n"));\r
842                 return false;\r
843         }\r
844 \r
845         std::wstring filename = env::data_folder();\r
846         filename.append(_parameters[1]);\r
847         filename.append(TEXT(".ftd"));\r
848 \r
849         std::wofstream datafile(filename.c_str());\r
850         if(!datafile) \r
851         {\r
852                 SetReplyString(TEXT("501 DATA STORE FAILED\r\n"));\r
853                 return false;\r
854         }\r
855 \r
856         datafile << _parameters[2];\r
857         datafile.close();\r
858 \r
859         std::wstring replyString = TEXT("202 DATA STORE OK\r\n");\r
860         SetReplyString(replyString);\r
861         return true;\r
862 }\r
863 \r
864 bool DataCommand::DoExecuteRetrieve() \r
865 {\r
866         if(_parameters.size() < 2) \r
867         {\r
868                 SetReplyString(TEXT("402 DATA RETRIEVE ERROR\r\n"));\r
869                 return false;\r
870         }\r
871 \r
872         std::wstring filename = env::data_folder();\r
873         filename.append(_parameters[1]);\r
874         filename.append(TEXT(".ftd"));\r
875 \r
876         std::wifstream datafile(filename.c_str());\r
877         if(!datafile) \r
878         {\r
879                 SetReplyString(TEXT("404 DATA RETRIEVE ERROR\r\n"));\r
880                 return false;\r
881         }\r
882 \r
883         std::wstringstream reply(TEXT("201 DATA RETRIEVE OK\r\n"));\r
884         std::wstring line;\r
885         bool bFirstLine = true;\r
886         while(std::getline(datafile, line))\r
887         {\r
888                 if(!bFirstLine)\r
889                         reply << "\\n";\r
890                 else\r
891                         bFirstLine = false;\r
892 \r
893                 reply << line;\r
894         }\r
895         datafile.close();\r
896 \r
897         reply << "\r\n";\r
898         SetReplyString(reply.str());\r
899         return true;\r
900 }\r
901 \r
902 bool DataCommand::DoExecuteList() \r
903 {\r
904         std::wstringstream replyString;\r
905         replyString << TEXT("200 DATA LIST OK\r\n");\r
906         replyString << ListMedia();\r
907         replyString << TEXT("\r\n");\r
908 \r
909         SetReplyString(boost::to_upper_copy(replyString.str()));\r
910         return true;\r
911 }\r
912 \r
913 bool CinfCommand::DoExecute()\r
914 {\r
915         std::wstringstream replyString;\r
916 \r
917         std::wstring filename = _parameters[0];\r
918 \r
919         // TODO:\r
920 \r
921         //FileInfo fileInfo;\r
922 \r
923         //MediaManagerPtr pMediaManager = GetApplication()->FindMediaFile(filename, &fileInfo);\r
924         //if(pMediaManager != 0 && fileInfo.filetype.length() >0)       //File was found\r
925         //{\r
926         //      if(pMediaManager->getFileInfo(&fileInfo))\r
927         //      {\r
928         //              TCHAR numBuffer[32];\r
929         //              _ui64tot_s(fileInfo.size, numBuffer, 32, 10);\r
930 \r
931         //              replyString << TEXT("201 CINF OK\r\n\"") << fileInfo.filename << TEXT("\" ") << fileInfo.type << TEXT("/") << fileInfo.filetype << TEXT("/") << fileInfo.encoding << TEXT(" ") << numBuffer << TEXT("\r\n");\r
932 \r
933         //              SetReplyString(replyString.str());\r
934         //              return true;\r
935         //      }\r
936         //}\r
937 \r
938         SetReplyString(TEXT("404 CINF ERROR\r\n"));\r
939         return false;\r
940 }\r
941 \r
942 void GenerateChannelInfo(int index, const safe_ptr<core::channel>& pChannel, std::wstringstream& replyString)\r
943 {\r
944         replyString << index+1 << TEXT(" ") << pChannel->get_video_format_desc().name << TEXT(" PLAYING") << TEXT("\r\n");\r
945 }\r
946 \r
947 bool InfoCommand::DoExecute()\r
948 {\r
949         std::wstringstream replyString;\r
950 \r
951         if(_parameters.size() >= 1)\r
952         {\r
953                 int channelIndex = _ttoi(_parameters[0].c_str())-1;\r
954 \r
955                 if(channelIndex < channels_.size())\r
956                 {\r
957                         replyString << TEXT("201 INFO OK\r\n");\r
958                         GenerateChannelInfo(channelIndex, channels_[channelIndex], replyString);\r
959                 }\r
960                 else\r
961                 {\r
962                         SetReplyString(TEXT("401 INFO ERROR\r\n"));\r
963                         return false;\r
964                 }\r
965         }\r
966         else\r
967         {\r
968                 replyString << TEXT("200 INFO OK\r\n");\r
969                 for(size_t n = 0; n < channels_.size(); ++n)\r
970                         GenerateChannelInfo(n, channels_[n], replyString);\r
971                 replyString << TEXT("\r\n");\r
972         }\r
973 \r
974         SetReplyString(replyString.str());\r
975         return true;\r
976 }\r
977 \r
978 bool ClsCommand::DoExecute()\r
979 {\r
980 /*\r
981                 wav = audio\r
982                 mp3 = audio\r
983                 swf     = movie\r
984                 dv  = movie\r
985                 tga = still\r
986                 col = still\r
987         */\r
988         std::wstringstream replyString;\r
989         replyString << TEXT("200 CLS OK\r\n");\r
990         replyString << ListMedia();\r
991         replyString << TEXT("\r\n");\r
992         SetReplyString(boost::to_upper_copy(replyString.str()));\r
993         return true;\r
994 }\r
995 \r
996 bool TlsCommand::DoExecute()\r
997 {\r
998         std::wstringstream replyString;\r
999         replyString << TEXT("200 TLS OK\r\n");\r
1000 \r
1001         replyString << ListTemplates();\r
1002         replyString << TEXT("\r\n");\r
1003 \r
1004         SetReplyString(replyString.str());\r
1005         return true;\r
1006 }\r
1007 \r
1008 bool VersionCommand::DoExecute()\r
1009 {\r
1010         std::wstring replyString = TEXT("201 VERSION OK\r\n SERVER: ") + env::version() + TEXT("\r\n");\r
1011 \r
1012         if(_parameters.size() > 0)\r
1013         {\r
1014                 if(_parameters[0] == L"FLASH")\r
1015                         replyString = TEXT("201 VERSION OK\r\n FLASH: ") + flash::flash_producer::version() + TEXT("\r\n");\r
1016                 else if(_parameters[0] == L"TEMPLATEHOST")\r
1017                         replyString = TEXT("201 VERSION OK\r\n TEMPLATEHOST: ") + flash::cg_producer::version() + TEXT("\r\n");\r
1018                 else if(_parameters[0] != L"SERVER")\r
1019                         replyString = TEXT("403 VERSION ERROR\r\n");\r
1020         }\r
1021 \r
1022         SetReplyString(replyString);\r
1023         return true;\r
1024 }\r
1025 \r
1026 bool ByeCommand::DoExecute()\r
1027 {\r
1028         GetClientInfo()->Disconnect();\r
1029         return true;\r
1030 }\r
1031 \r
1032 bool SetCommand::DoExecute()\r
1033 {\r
1034         std::wstring name = _parameters[0];\r
1035         std::transform(name.begin(), name.end(), name.begin(), toupper);\r
1036 \r
1037         std::wstring value = _parameters[1];\r
1038         std::transform(value.begin(), value.end(), value.begin(), toupper);\r
1039 \r
1040         if(name == TEXT("MODE"))\r
1041         {\r
1042                 //if(this->GetChannel()->consumer().SetVideoFormat(value)) TODO\r
1043                 //      this->SetReplyString(TEXT("202 SET MODE OK\r\n"));\r
1044                 //else\r
1045                         this->SetReplyString(TEXT("501 SET MODE FAILED\r\n"));\r
1046         }\r
1047         else\r
1048         {\r
1049                 this->SetReplyString(TEXT("403 SET ERROR\r\n"));\r
1050         }\r
1051 \r
1052         return true;\r
1053 }\r
1054 \r
1055 \r
1056 }       //namespace amcp\r
1057 }}      //namespace caspar