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