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 \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                                 int duration = _parameters.size() > 2 ? lexical_cast_or_default(_parameters[2], 0) : 0;\r
 183                                 double value = boost::lexical_cast<double>(_parameters.at(2));\r
 184                                 auto transform = GetChannel()->mixer().get_image_transform(GetLayerIndex());\r
 185                                 transform.set_opacity(value);\r
 186 \r
 187                                 int layer = GetLayerIndex(std::numeric_limits<int>::min());\r
 188                                 if(layer != std::numeric_limits<int>::min())                                    \r
 189                                         GetChannel()->mixer().set_image_transform(GetLayerIndex(), transform, duration);\r
 190                                 else\r
 191                                         GetChannel()->mixer().set_image_transform(transform, duration);\r
 192                         }\r
 193                         else if(_parameters[1] == L"GAIN")\r
 194                         {\r
 195                                 int duration = _parameters.size() > 2 ? lexical_cast_or_default(_parameters[2], 0) : 0;\r
 196                                 double value = boost::lexical_cast<double>(_parameters.at(2));\r
 197                                 auto transform = GetChannel()->mixer().get_image_transform(GetLayerIndex());\r
 198                                 transform.set_gain(value);\r
 199 \r
 200                                 int layer = GetLayerIndex(std::numeric_limits<int>::min());\r
 201                                 if(layer != std::numeric_limits<int>::min())\r
 202                                         GetChannel()->mixer().set_image_transform(GetLayerIndex(), transform, duration);\r
 203                                 else\r
 204                                         GetChannel()->mixer().set_image_transform(GetLayerIndex(), transform, duration);\r
 205                         }\r
 206                         else if(_parameters[1] == L"FIX_RECT")\r
 207                         {\r
 208                                 int duration = _parameters.size() > 6 ? lexical_cast_or_default(_parameters[5], 0) : 0;\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(x, y);\r
 215                                 transform.set_image_scale(x_s, y_s);\r
 216                                 transform.set_mask_translation(x, y);\r
 217                                 transform.set_mask_scale(x_s, y_s);\r
 218 \r
 219                                 int layer = GetLayerIndex(std::numeric_limits<int>::min());\r
 220                                 if(layer != std::numeric_limits<int>::min())\r
 221                                         GetChannel()->mixer().set_image_transform(GetLayerIndex(), transform, duration);\r
 222                                 else\r
 223                                         GetChannel()->mixer().set_image_transform(transform, duration);\r
 224                         }\r
 225                         else if(_parameters[1] == L"CLIP_RECT")\r
 226                         {\r
 227                                 int duration = _parameters.size() > 6 ? lexical_cast_or_default(_parameters[5], 0) : 0;\r
 228                                 double x        = boost::lexical_cast<double>(_parameters.at(2));\r
 229                                 double y        = boost::lexical_cast<double>(_parameters.at(3));\r
 230                                 double x_s      = boost::lexical_cast<double>(_parameters.at(4));\r
 231                                 double y_s      = boost::lexical_cast<double>(_parameters.at(5));\r
 232                                 auto transform = GetChannel()->mixer().get_image_transform(GetLayerIndex());\r
 233                                 transform.set_image_translation(0.0, 0.0);\r
 234                                 transform.set_image_scale(1.0, 1.0);\r
 235                                 transform.set_mask_translation(x, y);\r
 236                                 transform.set_mask_scale(x_s, y_s);\r
 237 \r
 238                                 int layer = GetLayerIndex(std::numeric_limits<int>::min());\r
 239                                 if(layer != std::numeric_limits<int>::min())\r
 240                                         GetChannel()->mixer().set_image_transform(GetLayerIndex(), transform, duration);\r
 241                                 else\r
 242                                         GetChannel()->mixer().set_image_transform(transform, duration);\r
 243                         }\r
 244                         else if(_parameters[1] == L"GRID")\r
 245                         {\r
 246                                 int n = boost::lexical_cast<int>(_parameters.at(2));\r
 247                                 double delta = 1.0/static_cast<double>(n);\r
 248                                 for(int x = 0; x < n; ++x)\r
 249                                 {\r
 250                                         for(int y = 0; y < n; ++y)\r
 251                                         {\r
 252                                                 int index = x+y*n;\r
 253                                                 auto transform = GetChannel()->mixer().get_image_transform(index);                                              \r
 254                                                 transform.set_image_translation(x*delta, y*delta);\r
 255                                                 transform.set_image_scale(delta, delta);                        \r
 256                                                 transform.set_mask_translation(x*delta, y*delta);\r
 257                                                 transform.set_mask_scale(delta, delta);\r
 258                                                 GetChannel()->mixer().set_image_transform(index, transform, 0);\r
 259                                         }\r
 260                                 }\r
 261                         }\r
 262                         else if(_parameters[1] == L"RESET")\r
 263                         {\r
 264                                 GetChannel()->mixer().set_image_transform(GetLayerIndex(), image_transform());\r
 265                         }\r
 266                 }\r
 267                 else if(_parameters[0] == L"AUDIO")\r
 268                 {\r
 269                         if(_parameters[1] == L"GAIN")\r
 270                         {\r
 271                                 int duration = _parameters.size() > 2 ? lexical_cast_or_default(_parameters[2], 0) : 0;\r
 272                                 double value = boost::lexical_cast<double>(_parameters[2]);\r
 273                                 auto transform = GetChannel()->mixer().get_audio_transform(GetLayerIndex());\r
 274                                 transform.set_gain(value);\r
 275 \r
 276                                 int layer = GetLayerIndex(std::numeric_limits<int>::min());\r
 277                                 if(layer != std::numeric_limits<int>::min())\r
 278                                         GetChannel()->mixer().set_audio_transform(GetLayerIndex(), transform, duration);\r
 279                                 else\r
 280                                         GetChannel()->mixer().set_audio_transform(transform, duration);\r
 281                         }\r
 282                         else if(_parameters[1] == L"RESET")\r
 283                         {\r
 284                                 GetChannel()->mixer().set_audio_transform(GetLayerIndex(), audio_transform());\r
 285                         }\r
 286                 }\r
 287                 else if(_parameters[0] == L"RESET")\r
 288                 {\r
 289                         GetChannel()->mixer().set_image_transform(GetLayerIndex(), image_transform());\r
 290                         GetChannel()->mixer().set_audio_transform(GetLayerIndex(), audio_transform());\r
 291                 }\r
 292         \r
 293                 SetReplyString(TEXT("202 MIXER OK\r\n"));\r
 294 \r
 295                 return true;\r
 296         }\r
 297         catch(file_not_found&)\r
 298         {\r
 299                 CASPAR_LOG_CURRENT_EXCEPTION();\r
 300                 SetReplyString(TEXT("404 MIXER ERROR\r\n"));\r
 301                 return false;\r
 302         }\r
 303         catch(...)\r
 304         {\r
 305                 CASPAR_LOG_CURRENT_EXCEPTION();\r
 306                 SetReplyString(TEXT("502 MIXER FAILED\r\n"));\r
 307                 return false;\r
 308         }\r
 309 }\r
 310 \r
 311 bool SwapCommand::DoExecute()\r
 312 {       \r
 313         //Perform loading of the clip\r
 314         try\r
 315         {\r
 316                 if(GetLayerIndex(-1) != -1)\r
 317                 {\r
 318                         std::vector<std::string> strs;\r
 319                         boost::split(strs, _parameters[0], boost::is_any_of("-"));\r
 320                         \r
 321                         auto ch1 = GetChannel();\r
 322                         auto ch2 = GetChannels().at(boost::lexical_cast<int>(strs.at(0))-1);\r
 323 \r
 324                         int l1 = GetLayerIndex();\r
 325                         int l2 = boost::lexical_cast<int>(strs.at(1));\r
 326 \r
 327                         ch1->producer().swap_layer(l1, l2, ch2->producer());\r
 328                 }\r
 329                 else\r
 330                 {\r
 331                         auto ch1 = GetChannel();\r
 332                         auto ch2 = GetChannels().at(boost::lexical_cast<int>(_parameters[0])-1);\r
 333                         ch1->producer().swap(ch2->producer());\r
 334                 }\r
 335 \r
 336                 CASPAR_LOG(info) << "Swapped successfully";\r
 337 \r
 338                 SetReplyString(TEXT("202 SWAP OK\r\n"));\r
 339 \r
 340                 return true;\r
 341         }\r
 342         catch(file_not_found&)\r
 343         {\r
 344                 CASPAR_LOG_CURRENT_EXCEPTION();\r
 345                 SetReplyString(TEXT("404 SWAP ERROR\r\n"));\r
 346                 return false;\r
 347         }\r
 348         catch(...)\r
 349         {\r
 350                 CASPAR_LOG_CURRENT_EXCEPTION();\r
 351                 SetReplyString(TEXT("502 SWAP FAILED\r\n"));\r
 352                 return false;\r
 353         }\r
 354 }\r
 355 \r
 356 bool AddCommand::DoExecute()\r
 357 {       \r
 358         //Perform loading of the clip\r
 359         try\r
 360         {\r
 361                 GetChannel()->consumer().add(GetLayerIndex(), create_consumer(_parameters));\r
 362         \r
 363                 CASPAR_LOG(info) << "Added " <<  _parameters[0] << TEXT(" successfully");\r
 364 \r
 365                 SetReplyString(TEXT("202 ADD OK\r\n"));\r
 366 \r
 367                 return true;\r
 368         }\r
 369         catch(file_not_found&)\r
 370         {\r
 371                 CASPAR_LOG_CURRENT_EXCEPTION();\r
 372                 SetReplyString(TEXT("404 ADD ERROR\r\n"));\r
 373                 return false;\r
 374         }\r
 375         catch(...)\r
 376         {\r
 377                 CASPAR_LOG_CURRENT_EXCEPTION();\r
 378                 SetReplyString(TEXT("502 ADD FAILED\r\n"));\r
 379                 return false;\r
 380         }\r
 381 }\r
 382 \r
 383 bool RemoveCommand::DoExecute()\r
 384 {       \r
 385         //Perform loading of the clip\r
 386         try\r
 387         {\r
 388                 GetChannel()->consumer().remove(GetLayerIndex());\r
 389 \r
 390                 SetReplyString(TEXT("202 REMOVE OK\r\n"));\r
 391 \r
 392                 return true;\r
 393         }\r
 394         catch(file_not_found&)\r
 395         {\r
 396                 CASPAR_LOG_CURRENT_EXCEPTION();\r
 397                 SetReplyString(TEXT("404 REMOVE ERROR\r\n"));\r
 398                 return false;\r
 399         }\r
 400         catch(...)\r
 401         {\r
 402                 CASPAR_LOG_CURRENT_EXCEPTION();\r
 403                 SetReplyString(TEXT("502 REMOVE FAILED\r\n"));\r
 404                 return false;\r
 405         }\r
 406 }\r
 407 \r
 408 bool LoadCommand::DoExecute()\r
 409 {       \r
 410         //Perform loading of the clip\r
 411         try\r
 412         {\r
 413                 _parameters[0] = _parameters[0];\r
 414                 auto pFP = create_producer(_parameters);                \r
 415                 GetChannel()->producer().load(GetLayerIndex(), pFP, false, true);\r
 416         \r
 417                 CASPAR_LOG(info) << "Loaded " <<  _parameters[0] << TEXT(" successfully");\r
 418 \r
 419                 SetReplyString(TEXT("202 LOAD OK\r\n"));\r
 420 \r
 421                 return true;\r
 422         }\r
 423         catch(file_not_found&)\r
 424         {\r
 425                 CASPAR_LOG_CURRENT_EXCEPTION();\r
 426                 SetReplyString(TEXT("404 LOADBG ERROR\r\n"));\r
 427                 return false;\r
 428         }\r
 429         catch(...)\r
 430         {\r
 431                 CASPAR_LOG_CURRENT_EXCEPTION();\r
 432                 SetReplyString(TEXT("502 LOADBG FAILED\r\n"));\r
 433                 return false;\r
 434         }\r
 435 }\r
 436 \r
 437 bool LoadbgCommand::DoExecute()\r
 438 {\r
 439         transition_info transitionInfo;\r
 440         \r
 441         bool bLoop = false;\r
 442         unsigned short transitionParameterIndex = 1;\r
 443 \r
 444         if(_parameters.size() > 1 && _parameters[1] == TEXT("LOOP"))\r
 445                 ++transitionParameterIndex;\r
 446 \r
 447         //Setup transition info\r
 448         if(_parameters.size() > transitionParameterIndex)       //type\r
 449         {\r
 450                 std::wstring transitionType = _parameters[transitionParameterIndex];\r
 451 \r
 452                 if(transitionType == TEXT("CUT"))\r
 453                         transitionInfo.type = transition::cut;\r
 454                 else if(transitionType == TEXT("MIX"))\r
 455                         transitionInfo.type = transition::mix;\r
 456                 else if(transitionType == TEXT("PUSH"))\r
 457                         transitionInfo.type = transition::push;\r
 458                 else if(transitionType == TEXT("SLIDE"))\r
 459                         transitionInfo.type = transition::slide;\r
 460                 else if(transitionType == TEXT("WIPE"))\r
 461                         transitionInfo.type = transition::wipe;\r
 462 \r
 463                 if(_parameters.size() > static_cast<unsigned short>(transitionParameterIndex+1))        //duration\r
 464                 {\r
 465                         int duration = _ttoi(_parameters[transitionParameterIndex+1].c_str());\r
 466                         if(duration > 0)\r
 467                                 transitionInfo.duration = duration;\r
 468 \r
 469                         if(_parameters.size() > static_cast<unsigned short>(transitionParameterIndex+2))        //direction\r
 470                         {\r
 471                                 std::wstring direction = _parameters[transitionParameterIndex+2];\r
 472 \r
 473                                 if(direction == TEXT("FROMLEFT"))\r
 474                                         transitionInfo.direction = transition_direction::from_left;\r
 475                                 else if(direction == TEXT("FROMRIGHT"))\r
 476                                         transitionInfo.direction = transition_direction::from_right;\r
 477                                 else if(direction == TEXT("LEFT"))\r
 478                                         transitionInfo.direction = transition_direction::from_right;\r
 479                                 else if(direction == TEXT("RIGHT"))\r
 480                                         transitionInfo.direction = transition_direction::from_left;\r
 481                         }\r
 482                 }\r
 483         }\r
 484 \r
 485         //Perform loading of the clip\r
 486         try\r
 487         {\r
 488                 _parameters[0] = _parameters[0];\r
 489                 auto pFP = create_producer(_parameters);\r
 490                 if(pFP == frame_producer::empty())\r
 491                         BOOST_THROW_EXCEPTION(file_not_found() << msg_info(_parameters.size() > 0 ? narrow(_parameters[0]) : ""));\r
 492 \r
 493                 pFP = safe_ptr<core::frame_producer>(transition_producer(pFP, transitionInfo));\r
 494                 bool autoPlay = std::find(_parameters.begin(), _parameters.end(), TEXT("AUTOPLAY")) != _parameters.end();\r
 495                 GetChannel()->producer().load(GetLayerIndex(), pFP, autoPlay); // TODO: LOOP\r
 496         \r
 497                 CASPAR_LOG(info) << "Loaded " << _parameters[0] << TEXT(" successfully to background");\r
 498                 SetReplyString(TEXT("202 LOADBG OK\r\n"));\r
 499 \r
 500                 return true;\r
 501         }\r
 502         catch(file_not_found&)\r
 503         {\r
 504                 CASPAR_LOG_CURRENT_EXCEPTION();\r
 505                 SetReplyString(TEXT("404 LOADBG ERROR\r\n"));\r
 506                 return false;\r
 507         }\r
 508         catch(...)\r
 509         {\r
 510                 CASPAR_LOG_CURRENT_EXCEPTION();\r
 511                 SetReplyString(TEXT("502 LOADBG FAILED\r\n"));\r
 512                 return false;\r
 513         }\r
 514 }\r
 515 \r
 516 bool PauseCommand::DoExecute()\r
 517 {\r
 518         try\r
 519         {\r
 520                 GetChannel()->producer().pause(GetLayerIndex());\r
 521                 SetReplyString(TEXT("202 PAUSE OK\r\n"));\r
 522                 return true;\r
 523         }\r
 524         catch(...)\r
 525         {\r
 526                 SetReplyString(TEXT("501 PAUSE FAILED\r\n"));\r
 527         }\r
 528 \r
 529         return false;\r
 530 }\r
 531 \r
 532 bool PlayCommand::DoExecute()\r
 533 {\r
 534         try\r
 535         {\r
 536                 GetChannel()->producer().play(GetLayerIndex());\r
 537                 SetReplyString(TEXT("202 PLAY OK\r\n"));\r
 538                 return true;\r
 539         }\r
 540         catch(...)\r
 541         {\r
 542                 SetReplyString(TEXT("501 PLAY FAILED\r\n"));\r
 543         }\r
 544 \r
 545         return false;\r
 546 }\r
 547 \r
 548 bool StopCommand::DoExecute()\r
 549 {\r
 550         try\r
 551         {\r
 552                 GetChannel()->producer().stop(GetLayerIndex());\r
 553                 SetReplyString(TEXT("202 STOP OK\r\n"));\r
 554                 return true;\r
 555         }\r
 556         catch(...)\r
 557         {\r
 558                 SetReplyString(TEXT("501 STOP FAILED\r\n"));\r
 559         }\r
 560 \r
 561         return false;\r
 562 }\r
 563 \r
 564 bool ClearCommand::DoExecute()\r
 565 {\r
 566         GetChannel()->producer().clear(GetLayerIndex());\r
 567                 \r
 568         SetReplyString(TEXT("202 CLEAR OK\r\n"));\r
 569 \r
 570         return true;\r
 571 }\r
 572 \r
 573 bool CGCommand::DoExecute()\r
 574 {\r
 575         std::wstring command = _parameters[0];\r
 576         if(command == TEXT("ADD"))\r
 577                 return DoExecuteAdd();\r
 578         else if(command == TEXT("PLAY"))\r
 579                 return DoExecutePlay();\r
 580         else if(command == TEXT("STOP"))\r
 581                 return DoExecuteStop();\r
 582         else if(command == TEXT("NEXT"))\r
 583                 return DoExecuteNext();\r
 584         else if(command == TEXT("REMOVE"))\r
 585                 return DoExecuteRemove();\r
 586         else if(command == TEXT("CLEAR"))\r
 587                 return DoExecuteClear();\r
 588         else if(command == TEXT("UPDATE"))\r
 589                 return DoExecuteUpdate();\r
 590         else if(command == TEXT("INVOKE"))\r
 591                 return DoExecuteInvoke();\r
 592         else if(command == TEXT("INFO"))\r
 593                 return DoExecuteInfo();\r
 594 \r
 595         SetReplyString(TEXT("403 CG ERROR\r\n"));\r
 596         return false;\r
 597 }\r
 598 \r
 599 bool CGCommand::ValidateLayer(const std::wstring& layerstring) {\r
 600         int length = layerstring.length();\r
 601         for(int i = 0; i < length; ++i) {\r
 602                 if(!_istdigit(layerstring[i])) {\r
 603                         return false;\r
 604                 }\r
 605         }\r
 606 \r
 607         return true;\r
 608 }\r
 609 \r
 610 bool CGCommand::DoExecuteAdd() {\r
 611         //CG 1 ADD 0 "template_folder/templatename" [STARTLABEL] 0/1 [DATA]\r
 612 \r
 613         int layer = 0;                          //_parameters[1]\r
 614 //      std::wstring templateName;      //_parameters[2]\r
 615         std::wstring label;             //_parameters[3]\r
 616         bool bDoStart = false;          //_parameters[3] alt. _parameters[4]\r
 617 //      std::wstring data;                      //_parameters[4] alt. _parameters[5]\r
 618 \r
 619         if(_parameters.size() < 4) \r
 620         {\r
 621                 SetReplyString(TEXT("402 CG ERROR\r\n"));\r
 622                 return false;\r
 623         }\r
 624         unsigned int dataIndex = 4;\r
 625 \r
 626         if(!ValidateLayer(_parameters[1])) \r
 627         {\r
 628                 SetReplyString(TEXT("403 CG ERROR\r\n"));\r
 629                 return false;\r
 630         }\r
 631 \r
 632         layer = _ttoi(_parameters[1].c_str());\r
 633 \r
 634         if(_parameters[3].length() > 1) \r
 635         {       //read label\r
 636                 label = _parameters[3];\r
 637                 ++dataIndex;\r
 638 \r
 639                 if(_parameters.size() > 4 && _parameters[4].length() > 0)       //read play-on-load-flag\r
 640                         bDoStart = (_parameters[4][0]==TEXT('1')) ? true : false;\r
 641                 else \r
 642                 {\r
 643                         SetReplyString(TEXT("402 CG ERROR\r\n"));\r
 644                         return false;\r
 645                 }\r
 646         }\r
 647         else if(_parameters[3].length() > 0) {  //read play-on-load-flag\r
 648                 bDoStart = (_parameters[3][0]==TEXT('1')) ? true : false;\r
 649         }\r
 650         else \r
 651         {\r
 652                 SetReplyString(TEXT("403 CG ERROR\r\n"));\r
 653                 return false;\r
 654         }\r
 655 \r
 656         const TCHAR* pDataString = 0;\r
 657         std::wstringstream data;\r
 658         std::wstring dataFromFile;\r
 659         if(_parameters.size() > dataIndex) \r
 660         {       //read data\r
 661                 const std::wstring& dataString = _parameters[dataIndex];\r
 662 \r
 663                 if(dataString[0] == TEXT('<')) //the data is an XML-string\r
 664                         pDataString = dataString.c_str();\r
 665                 else \r
 666                 {\r
 667                         //The data is not an XML-string, it must be a filename\r
 668                         std::wstring filename = env::data_folder();\r
 669                         filename.append(dataString);\r
 670                         filename.append(TEXT(".ftd"));\r
 671 \r
 672                         //open file\r
 673                         std::wifstream datafile(filename.c_str());\r
 674                         if(datafile) \r
 675                         {\r
 676                                 //read all data\r
 677                                 data << datafile.rdbuf();\r
 678                                 datafile.close();\r
 679 \r
 680                                 //extract data to _parameters\r
 681                                 dataFromFile = data.str();\r
 682                                 pDataString = dataFromFile.c_str();\r
 683                         }\r
 684                 }\r
 685         }\r
 686 \r
 687         std::wstring fullFilename = core::flash::flash_producer::find_template(env::template_folder() + _parameters[2]);\r
 688         if(!fullFilename.empty())\r
 689         {\r
 690                 std::wstring extension = boost::filesystem::wpath(fullFilename).extension();\r
 691                 std::wstring filename = _parameters[2];\r
 692                 filename.append(extension);\r
 693 \r
 694                 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
 695                 SetReplyString(TEXT("202 CG OK\r\n"));\r
 696         }\r
 697         else\r
 698         {\r
 699                 CASPAR_LOG(warning) << "Could not find template " << _parameters[2];\r
 700                 SetReplyString(TEXT("404 CG ERROR\r\n"));\r
 701         }\r
 702         return true;\r
 703 }\r
 704 \r
 705 bool CGCommand::DoExecutePlay()\r
 706 {\r
 707         if(_parameters.size() > 1)\r
 708         {\r
 709                 if(!ValidateLayer(_parameters[1])) \r
 710                 {\r
 711                         SetReplyString(TEXT("403 CG ERROR\r\n"));\r
 712                         return false;\r
 713                 }\r
 714                 int layer = _ttoi(_parameters[1].c_str());\r
 715                 core::flash::get_default_cg_producer(safe_ptr<core::channel>(GetChannel()), GetLayerIndex(core::flash::cg_producer::DEFAULT_LAYER))->play(layer);\r
 716         }\r
 717         else\r
 718         {\r
 719                 SetReplyString(TEXT("402 CG ERROR\r\n"));\r
 720                 return true;\r
 721         }\r
 722 \r
 723         SetReplyString(TEXT("202 CG OK\r\n"));\r
 724         return true;\r
 725 }\r
 726 \r
 727 bool CGCommand::DoExecuteStop() \r
 728 {\r
 729         if(_parameters.size() > 1)\r
 730         {\r
 731                 if(!ValidateLayer(_parameters[1])) \r
 732                 {\r
 733                         SetReplyString(TEXT("403 CG ERROR\r\n"));\r
 734                         return false;\r
 735                 }\r
 736                 int layer = _ttoi(_parameters[1].c_str());\r
 737                 core::flash::get_default_cg_producer(safe_ptr<core::channel>(GetChannel()), GetLayerIndex(core::flash::cg_producer::DEFAULT_LAYER))->stop(layer, 0);\r
 738         }\r
 739         else \r
 740         {\r
 741                 SetReplyString(TEXT("402 CG ERROR\r\n"));\r
 742                 return true;\r
 743         }\r
 744 \r
 745         SetReplyString(TEXT("202 CG OK\r\n"));\r
 746         return true;\r
 747 }\r
 748 \r
 749 bool CGCommand::DoExecuteNext()\r
 750 {\r
 751         if(_parameters.size() > 1) \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                 core::flash::get_default_cg_producer(safe_ptr<core::channel>(GetChannel()), GetLayerIndex(core::flash::cg_producer::DEFAULT_LAYER))->next(layer);\r
 760         }\r
 761         else \r
 762         {\r
 763                 SetReplyString(TEXT("402 CG ERROR\r\n"));\r
 764                 return true;\r
 765         }\r
 766 \r
 767         SetReplyString(TEXT("202 CG OK\r\n"));\r
 768         return true;\r
 769 }\r
 770 \r
 771 bool CGCommand::DoExecuteRemove() \r
 772 {\r
 773         if(_parameters.size() > 1) \r
 774         {\r
 775                 if(!ValidateLayer(_parameters[1])) \r
 776                 {\r
 777                         SetReplyString(TEXT("403 CG ERROR\r\n"));\r
 778                         return false;\r
 779                 }\r
 780                 int layer = _ttoi(_parameters[1].c_str());\r
 781                 core::flash::get_default_cg_producer(safe_ptr<core::channel>(GetChannel()), GetLayerIndex(core::flash::cg_producer::DEFAULT_LAYER))->remove(layer);\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::DoExecuteClear() \r
 794 {\r
 795         core::flash::get_default_cg_producer(safe_ptr<core::channel>(GetChannel()), GetLayerIndex(core::flash::cg_producer::DEFAULT_LAYER))->clear();\r
 796         SetReplyString(TEXT("202 CG OK\r\n"));\r
 797         return true;\r
 798 }\r
 799 \r
 800 bool CGCommand::DoExecuteUpdate() \r
 801 {\r
 802         if(_parameters.size() > 2) \r
 803         {\r
 804                 if(!ValidateLayer(_parameters[1]))\r
 805                 {\r
 806                         SetReplyString(TEXT("403 CG ERROR\r\n"));\r
 807                         return false;\r
 808                 }\r
 809                 int layer = _ttoi(_parameters[1].c_str());\r
 810                 //TODO: Implement indirect data loading from file. Same as in Add\r
 811                 core::flash::get_default_cg_producer(safe_ptr<core::channel>(GetChannel()), GetLayerIndex(core::flash::cg_producer::DEFAULT_LAYER))->update(layer, _parameters[2]);\r
 812         }\r
 813         else \r
 814         {\r
 815                 SetReplyString(TEXT("402 CG ERROR\r\n"));\r
 816                 return true;\r
 817         }\r
 818 \r
 819         SetReplyString(TEXT("202 CG OK\r\n"));\r
 820         return true;\r
 821 }\r
 822 \r
 823 bool CGCommand::DoExecuteInvoke() \r
 824 {\r
 825         if(_parameters.size() > 2)\r
 826         {\r
 827                 if(!ValidateLayer(_parameters[1]))\r
 828                 {\r
 829                         SetReplyString(TEXT("403 CG ERROR\r\n"));\r
 830                         return false;\r
 831                 }\r
 832                 int layer = _ttoi(_parameters[1].c_str());\r
 833                 core::flash::get_default_cg_producer(safe_ptr<core::channel>(GetChannel()), GetLayerIndex(core::flash::cg_producer::DEFAULT_LAYER))->invoke(layer, _parameters[2]);\r
 834         }\r
 835         else \r
 836         {\r
 837                 SetReplyString(TEXT("402 CG ERROR\r\n"));\r
 838                 return true;\r
 839         }\r
 840 \r
 841         SetReplyString(TEXT("202 CG OK\r\n"));\r
 842         return true;\r
 843 }\r
 844 \r
 845 bool CGCommand::DoExecuteInfo() \r
 846 {\r
 847         // TODO\r
 848         //core::flash::get_default_cg_producer(GetChannel())->Info();\r
 849         SetReplyString(TEXT("600 CG FAILED\r\n"));\r
 850         return true;\r
 851 }\r
 852 \r
 853 bool DataCommand::DoExecute()\r
 854 {\r
 855         std::wstring command = _parameters[0];\r
 856         if(command == TEXT("STORE"))\r
 857                 return DoExecuteStore();\r
 858         else if(command == TEXT("RETRIEVE"))\r
 859                 return DoExecuteRetrieve();\r
 860         else if(command == TEXT("LIST"))\r
 861                 return DoExecuteList();\r
 862 \r
 863         SetReplyString(TEXT("403 DATA ERROR\r\n"));\r
 864         return false;\r
 865 }\r
 866 \r
 867 bool DataCommand::DoExecuteStore() \r
 868 {\r
 869         if(_parameters.size() < 3) \r
 870         {\r
 871                 SetReplyString(TEXT("402 DATA STORE ERROR\r\n"));\r
 872                 return false;\r
 873         }\r
 874 \r
 875         std::wstring filename = env::data_folder();\r
 876         filename.append(_parameters[1]);\r
 877         filename.append(TEXT(".ftd"));\r
 878 \r
 879         std::wofstream datafile(filename.c_str());\r
 880         if(!datafile) \r
 881         {\r
 882                 SetReplyString(TEXT("501 DATA STORE FAILED\r\n"));\r
 883                 return false;\r
 884         }\r
 885 \r
 886         datafile << _parameters[2];\r
 887         datafile.close();\r
 888 \r
 889         std::wstring replyString = TEXT("202 DATA STORE OK\r\n");\r
 890         SetReplyString(replyString);\r
 891         return true;\r
 892 }\r
 893 \r
 894 bool DataCommand::DoExecuteRetrieve() \r
 895 {\r
 896         if(_parameters.size() < 2) \r
 897         {\r
 898                 SetReplyString(TEXT("402 DATA RETRIEVE ERROR\r\n"));\r
 899                 return false;\r
 900         }\r
 901 \r
 902         std::wstring filename = env::data_folder();\r
 903         filename.append(_parameters[1]);\r
 904         filename.append(TEXT(".ftd"));\r
 905 \r
 906         std::wifstream datafile(filename.c_str());\r
 907         if(!datafile) \r
 908         {\r
 909                 SetReplyString(TEXT("404 DATA RETRIEVE ERROR\r\n"));\r
 910                 return false;\r
 911         }\r
 912 \r
 913         std::wstringstream reply(TEXT("201 DATA RETRIEVE OK\r\n"));\r
 914         std::wstring line;\r
 915         bool bFirstLine = true;\r
 916         while(std::getline(datafile, line))\r
 917         {\r
 918                 if(!bFirstLine)\r
 919                         reply << "\\n";\r
 920                 else\r
 921                         bFirstLine = false;\r
 922 \r
 923                 reply << line;\r
 924         }\r
 925         datafile.close();\r
 926 \r
 927         reply << "\r\n";\r
 928         SetReplyString(reply.str());\r
 929         return true;\r
 930 }\r
 931 \r
 932 bool DataCommand::DoExecuteList() \r
 933 {\r
 934         std::wstringstream replyString;\r
 935         replyString << TEXT("200 DATA LIST OK\r\n");\r
 936         replyString << ListMedia();\r
 937         replyString << TEXT("\r\n");\r
 938 \r
 939         SetReplyString(boost::to_upper_copy(replyString.str()));\r
 940         return true;\r
 941 }\r
 942 \r
 943 bool CinfCommand::DoExecute()\r
 944 {\r
 945         std::wstringstream replyString;\r
 946 \r
 947         std::wstring filename = _parameters[0];\r
 948 \r
 949         // TODO:\r
 950 \r
 951         //FileInfo fileInfo;\r
 952 \r
 953         //MediaManagerPtr pMediaManager = GetApplication()->FindMediaFile(filename, &fileInfo);\r
 954         //if(pMediaManager != 0 && fileInfo.filetype.length() >0)       //File was found\r
 955         //{\r
 956         //      if(pMediaManager->getFileInfo(&fileInfo))\r
 957         //      {\r
 958         //              TCHAR numBuffer[32];\r
 959         //              _ui64tot_s(fileInfo.size, numBuffer, 32, 10);\r
 960 \r
 961         //              replyString << TEXT("201 CINF OK\r\n\"") << fileInfo.filename << TEXT("\" ") << fileInfo.type << TEXT("/") << fileInfo.filetype << TEXT("/") << fileInfo.encoding << TEXT(" ") << numBuffer << TEXT("\r\n");\r
 962 \r
 963         //              SetReplyString(replyString.str());\r
 964         //              return true;\r
 965         //      }\r
 966         //}\r
 967 \r
 968         SetReplyString(TEXT("404 CINF ERROR\r\n"));\r
 969         return false;\r
 970 }\r
 971 \r
 972 void GenerateChannelInfo(int index, const safe_ptr<core::channel>& pChannel, std::wstringstream& replyString)\r
 973 {\r
 974         replyString << index+1 << TEXT(" ") << pChannel->get_video_format_desc().name << TEXT(" PLAYING") << TEXT("\r\n");\r
 975 }\r
 976 \r
 977 bool InfoCommand::DoExecute()\r
 978 {\r
 979         std::wstringstream replyString;\r
 980 \r
 981         if(_parameters.size() >= 1)\r
 982         {\r
 983                 int channelIndex = _ttoi(_parameters[0].c_str())-1;\r
 984 \r
 985                 if(channelIndex < channels_.size())\r
 986                 {\r
 987                         replyString << TEXT("201 INFO OK\r\n");\r
 988                         GenerateChannelInfo(channelIndex, channels_[channelIndex], replyString);\r
 989                 }\r
 990                 else\r
 991                 {\r
 992                         SetReplyString(TEXT("401 INFO ERROR\r\n"));\r
 993                         return false;\r
 994                 }\r
 995         }\r
 996         else\r
 997         {\r
 998                 replyString << TEXT("200 INFO OK\r\n");\r
 999                 for(size_t n = 0; n < channels_.size(); ++n)\r
1000                         GenerateChannelInfo(n, channels_[n], replyString);\r
1001                 replyString << TEXT("\r\n");\r
1002         }\r
1003 \r
1004         SetReplyString(replyString.str());\r
1005         return true;\r
1006 }\r
1007 \r
1008 bool ClsCommand::DoExecute()\r
1009 {\r
1010 /*\r
1011                 wav = audio\r
1012                 mp3 = audio\r
1013                 swf     = movie\r
1014                 dv  = movie\r
1015                 tga = still\r
1016                 col = still\r
1017         */\r
1018         std::wstringstream replyString;\r
1019         replyString << TEXT("200 CLS OK\r\n");\r
1020         replyString << ListMedia();\r
1021         replyString << TEXT("\r\n");\r
1022         SetReplyString(boost::to_upper_copy(replyString.str()));\r
1023         return true;\r
1024 }\r
1025 \r
1026 bool TlsCommand::DoExecute()\r
1027 {\r
1028         std::wstringstream replyString;\r
1029         replyString << TEXT("200 TLS OK\r\n");\r
1030 \r
1031         replyString << ListTemplates();\r
1032         replyString << TEXT("\r\n");\r
1033 \r
1034         SetReplyString(replyString.str());\r
1035         return true;\r
1036 }\r
1037 \r
1038 bool VersionCommand::DoExecute()\r
1039 {\r
1040         std::wstring replyString = TEXT("201 VERSION OK\r\n SERVER: ") + env::version() + TEXT("\r\n");\r
1041 \r
1042         if(_parameters.size() > 0)\r
1043         {\r
1044                 if(_parameters[0] == L"FLASH")\r
1045                         replyString = TEXT("201 VERSION OK\r\n FLASH: ") + flash::get_flash_version() + TEXT("\r\n");\r
1046                 else if(_parameters[0] == L"TEMPLATEHOST")\r
1047                         replyString = TEXT("201 VERSION OK\r\n TEMPLATEHOST: ") + flash::get_cg_version() + TEXT("\r\n");\r
1048                 else if(_parameters[0] != L"SERVER")\r
1049                         replyString = TEXT("403 VERSION ERROR\r\n");\r
1050         }\r
1051 \r
1052         SetReplyString(replyString);\r
1053         return true;\r
1054 }\r
1055 \r
1056 bool ByeCommand::DoExecute()\r
1057 {\r
1058         GetClientInfo()->Disconnect();\r
1059         return true;\r
1060 }\r
1061 \r
1062 bool SetCommand::DoExecute()\r
1063 {\r
1064         std::wstring name = _parameters[0];\r
1065         std::transform(name.begin(), name.end(), name.begin(), toupper);\r
1066 \r
1067         std::wstring value = _parameters[1];\r
1068         std::transform(value.begin(), value.end(), value.begin(), toupper);\r
1069 \r
1070         if(name == TEXT("MODE"))\r
1071         {\r
1072                 //if(this->GetChannel()->consumer().SetVideoFormat(value)) TODO\r
1073                 //      this->SetReplyString(TEXT("202 SET MODE OK\r\n"));\r
1074                 //else\r
1075                         this->SetReplyString(TEXT("501 SET MODE FAILED\r\n"));\r
1076         }\r
1077         else\r
1078         {\r
1079                 this->SetReplyString(TEXT("403 SET ERROR\r\n"));\r
1080         }\r
1081 \r
1082         return true;\r
1083 }\r
1084 \r
1085 \r
1086 }       //namespace amcp\r
1087 }}      //namespace caspar