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