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