git.sesse.net Git - casparcg/blob - protocol/amcp/AMCPCommandsImpl.cpp

   1 /*\r
   2 * Copyright (c) 2011 Sveriges Television AB <info@casparcg.com>\r
   3 *\r
   4 * This file is part of CasparCG (www.casparcg.com).\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 * Author: Nicklas P Andersson\r
  20 */\r
  21 \r
  22 #include "../StdAfx.h"\r
  23 \r
  24 #if defined(_MSC_VER)\r
  25 #pragma warning (push, 1) // TODO: Legacy code, just disable warnings\r
  26 #endif\r
  27 \r
  28 #include "AMCPCommandsImpl.h"\r
  29 #include "AMCPProtocolStrategy.h"\r
  30 \r
  31 #include <common/env.h>\r
  32 \r
  33 #include <common/log.h>\r
  34 #include <common/diagnostics/graph.h>\r
  35 #include <common/os/windows/current_version.h>\r
  36 #include <common/os/windows/system_info.h>\r
  37 \r
  38 #include <core/producer/frame_producer.h>\r
  39 #include <core/video_format.h>\r
  40 #include <core/producer/transition/transition_producer.h>\r
  41 #include <core/frame/frame_transform.h>\r
  42 #include <core/producer/stage.h>\r
  43 #include <core/producer/layer.h>\r
  44 #include <core/mixer/mixer.h>\r
  45 #include <core/consumer/output.h>\r
  46 \r
  47 #include <modules/bluefish/bluefish.h>\r
  48 #include <modules/decklink/decklink.h>\r
  49 #include <modules/ffmpeg/ffmpeg.h>\r
  50 #include <modules/flash/flash.h>\r
  51 #include <modules/flash/util/swf.h>\r
  52 #include <modules/flash/producer/flash_producer.h>\r
  53 #include <modules/flash/producer/cg_proxy.h>\r
  54 #include <modules/ffmpeg/producer/util/util.h>\r
  55 #include <modules/image/image.h>\r
  56 #include <modules/screen/screen.h>\r
  57 #include <modules/reroute/producer/reroute_producer.h>\r
  58 \r
  59 #include <algorithm>\r
  60 #include <locale>\r
  61 #include <fstream>\r
  62 #include <cctype>\r
  63 #include <io.h>\r
  64 \r
  65 #include <boost/date_time/posix_time/posix_time.hpp>\r
  66 #include <boost/lexical_cast.hpp>\r
  67 #include <boost/algorithm/string.hpp>\r
  68 #include <boost/filesystem.hpp>\r
  69 #include <boost/regex.hpp>\r
  70 #include <boost/property_tree/xml_parser.hpp>\r
  71 \r
  72 #include <tbb/concurrent_unordered_map.h>\r
  73 \r
  74 /* Return codes\r
  75 \r
  76 100 [action]                    Information om att något har hänt  \r
  77 101 [action]                    Information om att något har hänt, en rad data skickas  \r
  78 \r
  79 202 [kommando] OK               Kommandot har utförts  \r
  80 201 [kommando] OK               Kommandot har utförts, och en rad data skickas tillbaka  \r
  81 200 [kommando] OK               Kommandot har utförts, och flera rader data skickas tillbaka. Avslutas med tomrad  \r
  82 \r
  83 400 ERROR                               Kommandot kunde inte förstås  \r
  84 401 [kommando] ERROR    Ogiltig kanal  \r
  85 402 [kommando] ERROR    Parameter saknas  \r
  86 403 [kommando] ERROR    Ogiltig parameter  \r
  87 404 [kommando] ERROR    Mediafilen hittades inte  \r
  88 \r
  89 500 FAILED                              Internt configurationfel  \r
  90 501 [kommando] FAILED   Internt configurationfel  \r
  91 502 [kommando] FAILED   Oläslig mediafil  \r
  92 \r
  93 600 [kommando] FAILED   funktion ej implementerad\r
  94 */\r
  95 \r
  96 namespace caspar { namespace protocol {\r
  97 \r
  98 using namespace core;\r
  99 \r
 100 std::wstring MediaInfo(const boost::filesystem::path& path)\r
 101 {\r
 102         if(boost::filesystem::is_regular_file(path))\r
 103         {\r
 104                 std::wstring clipttype = TEXT(" N/A ");\r
 105                 std::wstring extension = boost::to_upper_copy(path.extension().wstring());\r
 106                 if(extension == TEXT(".TGA") || extension == TEXT(".COL") || extension == L".PNG" || extension == L".JPEG" || extension == L".JPG" ||\r
 107                         extension == L"GIF" || extension == L"BMP")\r
 108                         clipttype = TEXT(" STILL ");\r
 109                 else if(extension == TEXT(".WAV") || extension == TEXT(".MP3"))\r
 110                         clipttype = TEXT(" STILL ");\r
 111                 else if(extension == L".MOV" || extension == L".DV"  || extension == L".CT" || extension == L".AVI" || extension == L".FLV" || extension == L".F4V" ||\r
 112                             extension == L".MP4" || extension == L".WAV" || extension == L".MP4" || extension == L".MPG" || extension == L".H264" ||\r
 113                                 caspar::ffmpeg::is_valid_file(path.wstring()))\r
 114                         clipttype = TEXT(" MOVIE ");\r
 115 \r
 116                 if(clipttype != TEXT(" N/A "))\r
 117                 {               \r
 118                         auto is_not_digit = [](char c){ return std::isdigit(c) == 0; };\r
 119 \r
 120                         auto relativePath = boost::filesystem::path(path.wstring().substr(env::media_folder().size()-1, path.wstring().size()));\r
 121 \r
 122                         auto writeTimeStr = boost::posix_time::to_iso_string(boost::posix_time::from_time_t(boost::filesystem::last_write_time(path)));\r
 123                         writeTimeStr.erase(std::remove_if(writeTimeStr.begin(), writeTimeStr.end(), is_not_digit), writeTimeStr.end());\r
 124                         auto writeTimeWStr = std::wstring(writeTimeStr.begin(), writeTimeStr.end());\r
 125 \r
 126                         auto sizeStr = boost::lexical_cast<std::wstring>(boost::filesystem::file_size(path));\r
 127                         sizeStr.erase(std::remove_if(sizeStr.begin(), sizeStr.end(), is_not_digit), sizeStr.end());\r
 128                         auto sizeWStr = std::wstring(sizeStr.begin(), sizeStr.end());\r
 129                                 \r
 130                         auto str = relativePath.replace_extension(TEXT("")).native();\r
 131                         while(str.size() > 0 && (str[0] == '\\' || str[0] == '/'))\r
 132                                 str = std::wstring(str.begin() + 1, str.end());\r
 133 \r
 134                         return std::wstring() + TEXT("\"") + str +\r
 135                                         + TEXT("\" ") + clipttype +\r
 136                                         + TEXT(" ") + sizeStr +\r
 137                                         + TEXT(" ") + writeTimeWStr +\r
 138                                         + TEXT("\r\n");         \r
 139                 }       \r
 140         }\r
 141         return L"";\r
 142 }\r
 143 \r
 144 std::wstring ListMedia()\r
 145 {       \r
 146         std::wstringstream replyString;\r
 147         for (boost::filesystem::recursive_directory_iterator itr(env::media_folder()), end; itr != end; ++itr)  \r
 148                 replyString << MediaInfo(itr->path());\r
 149         \r
 150         return boost::to_upper_copy(replyString.str());\r
 151 }\r
 152 \r
 153 std::wstring ListTemplates() \r
 154 {\r
 155         std::wstringstream replyString;\r
 156 \r
 157         for (boost::filesystem::recursive_directory_iterator itr(env::template_folder()), end; itr != end; ++itr)\r
 158         {               \r
 159                 if(boost::filesystem::is_regular_file(itr->path()) && (itr->path().extension() == L".ft" || itr->path().extension() == L".ct"))\r
 160                 {\r
 161                         auto relativePath = boost::filesystem::wpath(itr->path().wstring().substr(env::template_folder().size()-1, itr->path().wstring().size()));\r
 162 \r
 163                         auto writeTimeStr = boost::posix_time::to_iso_string(boost::posix_time::from_time_t(boost::filesystem::last_write_time(itr->path())));\r
 164                         writeTimeStr.erase(std::remove_if(writeTimeStr.begin(), writeTimeStr.end(), [](char c){ return std::isdigit(c) == 0;}), writeTimeStr.end());\r
 165                         auto writeTimeWStr = std::wstring(writeTimeStr.begin(), writeTimeStr.end());\r
 166 \r
 167                         auto sizeStr = boost::lexical_cast<std::string>(boost::filesystem::file_size(itr->path()));\r
 168                         sizeStr.erase(std::remove_if(sizeStr.begin(), sizeStr.end(), [](char c){ return std::isdigit(c) == 0;}), sizeStr.end());\r
 169 \r
 170                         auto sizeWStr = std::wstring(sizeStr.begin(), sizeStr.end());\r
 171 \r
 172                         std::wstring dir = relativePath.parent_path().native();\r
 173                         std::wstring file = boost::to_upper_copy(relativePath.filename().wstring());\r
 174                         relativePath = boost::filesystem::wpath(dir + L"/" + file);\r
 175                                                 \r
 176                         auto str = relativePath.replace_extension(TEXT("")).native();\r
 177                         while(str.size() > 0 && (str[0] == '\\' || str[0] == '/'))\r
 178                                 str = std::wstring(str.begin() + 1, str.end());\r
 179 \r
 180                         replyString << TEXT("\"") << str\r
 181                                                 << TEXT("\" ") << sizeWStr\r
 182                                                 << TEXT(" ") << writeTimeWStr\r
 183                                                 << TEXT("\r\n");                \r
 184                 }\r
 185         }\r
 186         return replyString.str();\r
 187 }\r
 188 \r
 189 namespace amcp {\r
 190         \r
 191 AMCPCommand::AMCPCommand() : channelIndex_(0), scheduling_(Default), layerIndex_(-1)\r
 192 {}\r
 193 \r
 194 void AMCPCommand::SendReply()\r
 195 {\r
 196         if(!pClientInfo_) \r
 197                 return;\r
 198 \r
 199         if(replyString_.empty())\r
 200                 return;\r
 201         pClientInfo_->Send(replyString_);\r
 202 }\r
 203 \r
 204 void AMCPCommand::Clear() \r
 205 {\r
 206         pChannel_->stage().clear();\r
 207         pClientInfo_.reset();\r
 208         channelIndex_ = 0;\r
 209         _parameters.clear();\r
 210 }\r
 211 \r
 212 bool DiagnosticsCommand::DoExecute()\r
 213 {       \r
 214         try\r
 215         {\r
 216                 diagnostics::show_graphs(true);\r
 217 \r
 218                 SetReplyString(TEXT("202 DIAG OK\r\n"));\r
 219 \r
 220                 return true;\r
 221         }\r
 222         catch(...)\r
 223         {\r
 224                 CASPAR_LOG_CURRENT_EXCEPTION();\r
 225                 SetReplyString(TEXT("502 DIAG FAILED\r\n"));\r
 226                 return false;\r
 227         }\r
 228 }\r
 229 \r
 230 bool ChannelGridCommand::DoExecute()\r
 231 {\r
 232         int index = 1;\r
 233         auto self = GetChannels().back();\r
 234         \r
 235         std::vector<std::wstring> params;\r
 236         params.push_back(L"SCREEN");\r
 237         params.push_back(L"NAME");\r
 238         params.push_back(L"Channel Grid Window");\r
 239         auto screen = create_consumer(params);\r
 240 \r
 241         self->output().add(screen);\r
 242 \r
 243         BOOST_FOREACH(auto channel, GetChannels())\r
 244         {\r
 245                 if(channel != self)\r
 246                 {\r
 247                         auto producer = reroute::create_producer(self->frame_factory(), *channel);              \r
 248                         self->stage().load(index, producer, false);\r
 249                         self->stage().play(index);\r
 250                         index++;\r
 251                 }\r
 252         }\r
 253 \r
 254         int n = GetChannels().size()-1;\r
 255         double delta = 1.0/static_cast<double>(n);\r
 256         for(int x = 0; x < n; ++x)\r
 257         {\r
 258                 for(int y = 0; y < n; ++y)\r
 259                 {\r
 260                         int index = x+y*n+1;\r
 261                         auto transform = [=](frame_transform transform) -> frame_transform\r
 262                         {               \r
 263                                 transform.image_transform.fill_translation[0]   = x*delta;\r
 264                                 transform.image_transform.fill_translation[1]   = y*delta;\r
 265                                 transform.image_transform.fill_scale[0]                 = delta;\r
 266                                 transform.image_transform.fill_scale[1]                 = delta;\r
 267                                 transform.image_transform.clip_translation[0]   = x*delta;\r
 268                                 transform.image_transform.clip_translation[1]   = y*delta;\r
 269                                 transform.image_transform.clip_scale[0]                 = delta;\r
 270                                 transform.image_transform.clip_scale[1]                 = delta;                        \r
 271                                 return transform;\r
 272                         };\r
 273                         self->stage().apply_transform(index, transform);\r
 274                 }\r
 275         }\r
 276 \r
 277         return true;\r
 278 }\r
 279 \r
 280 bool CallCommand::DoExecute()\r
 281 {       \r
 282         //Perform loading of the clip\r
 283         try\r
 284         {\r
 285                 auto what = _parameters.at(0);\r
 286                                 \r
 287                 std::wstring param;\r
 288                 for(auto it = std::begin(_parameters2); it != std::end(_parameters2); ++it, param += L" ")\r
 289                         param += *it;\r
 290 \r
 291                 auto producer = GetChannel()->stage().foreground(GetLayerIndex()).get();\r
 292 \r
 293                 auto result = producer->call(boost::trim_copy(param));\r
 294 \r
 295                 if(!result.timed_wait(boost::posix_time::seconds(2)))\r
 296                         BOOST_THROW_EXCEPTION(timed_out());\r
 297                                 \r
 298                 std::wstringstream replyString;\r
 299                 if(result.get().empty())\r
 300                         replyString << TEXT("202 CALL OK\r\n");\r
 301                 else\r
 302                         replyString << TEXT("201 CALL OK\r\n") << result.get() << L"\r\n";\r
 303                 \r
 304                 SetReplyString(replyString.str());\r
 305 \r
 306                 return true;\r
 307         }\r
 308         catch(...)\r
 309         {\r
 310                 CASPAR_LOG_CURRENT_EXCEPTION();\r
 311                 SetReplyString(TEXT("502 CALL FAILED\r\n"));\r
 312                 return false;\r
 313         }\r
 314 }\r
 315 \r
 316 tbb::concurrent_unordered_map<int, std::vector<stage::transform_tuple_t>> deferred_transforms;\r
 317 \r
 318 bool MixerCommand::DoExecute()\r
 319 {       \r
 320         //Perform loading of the clip\r
 321         try\r
 322         {       \r
 323                 bool defer = _parameters.back() == L"DEFER";\r
 324                 if(defer)\r
 325                         _parameters.pop_back();\r
 326 \r
 327                 std::vector<stage::transform_tuple_t> transforms;\r
 328 \r
 329                 if(_parameters[0] == L"KEYER" || _parameters[0] == L"IS_KEY")\r
 330                 {\r
 331                         bool value = boost::lexical_cast<int>(_parameters.at(1));\r
 332                         transforms.push_back(stage::transform_tuple_t(GetLayerIndex(), [=](frame_transform transform) -> frame_transform\r
 333                         {\r
 334                                 transform.image_transform.is_key = value;\r
 335                                 return transform;                                       \r
 336                         }, 0, L"linear"));\r
 337                 }\r
 338                 else if(_parameters[0] == L"OPACITY")\r
 339                 {\r
 340                         int duration = _parameters.size() > 2 ? boost::lexical_cast<int>(_parameters[2]) : 0;\r
 341                         std::wstring tween = _parameters.size() > 3 ? _parameters[3] : L"linear";\r
 342 \r
 343                         double value = boost::lexical_cast<double>(_parameters.at(1));\r
 344                         \r
 345                         transforms.push_back(stage::transform_tuple_t(GetLayerIndex(), [=](frame_transform transform) -> frame_transform\r
 346                         {\r
 347                                 transform.image_transform.opacity = value;\r
 348                                 return transform;                                       \r
 349                         }, duration, tween));\r
 350                 }\r
 351                 else if(_parameters[0] == L"FILL" || _parameters[0] == L"FILL_RECT")\r
 352                 {\r
 353                         int duration = _parameters.size() > 5 ? boost::lexical_cast<int>(_parameters[5]) : 0;\r
 354                         std::wstring tween = _parameters.size() > 6 ? _parameters[6] : L"linear";\r
 355                         double x        = boost::lexical_cast<double>(_parameters.at(1));\r
 356                         double y        = boost::lexical_cast<double>(_parameters.at(2));\r
 357                         double x_s      = boost::lexical_cast<double>(_parameters.at(3));\r
 358                         double y_s      = boost::lexical_cast<double>(_parameters.at(4));\r
 359 \r
 360                         transforms.push_back(stage::transform_tuple_t(GetLayerIndex(), [=](frame_transform transform) mutable -> frame_transform\r
 361                         {\r
 362                                 transform.image_transform.fill_translation[0]   = x;\r
 363                                 transform.image_transform.fill_translation[1]   = y;\r
 364                                 transform.image_transform.fill_scale[0]                 = x_s;\r
 365                                 transform.image_transform.fill_scale[1]                 = y_s;\r
 366                                 transform.image_transform.clip_translation[0]   = x;\r
 367                                 transform.image_transform.clip_translation[1]   = y;\r
 368                                 transform.image_transform.clip_scale[0]                 = x_s;\r
 369                                 transform.image_transform.clip_scale[1]                 = y_s;\r
 370                                 return transform;\r
 371                         }, duration, tween));\r
 372                 }\r
 373                 else if(_parameters[0] == L"CLIP" || _parameters[0] == L"CLIP_RECT")\r
 374                 {\r
 375                         int duration = _parameters.size() > 5 ? boost::lexical_cast<int>(_parameters[5]) : 0;\r
 376                         std::wstring tween = _parameters.size() > 6 ? _parameters[6] : L"linear";\r
 377                         double x        = boost::lexical_cast<double>(_parameters.at(1));\r
 378                         double y        = boost::lexical_cast<double>(_parameters.at(2));\r
 379                         double x_s      = boost::lexical_cast<double>(_parameters.at(3));\r
 380                         double y_s      = boost::lexical_cast<double>(_parameters.at(4));\r
 381 \r
 382                         transforms.push_back(stage::transform_tuple_t(GetLayerIndex(), [=](frame_transform transform) -> frame_transform\r
 383                         {\r
 384                                 transform.image_transform.clip_translation[0]   = x;\r
 385                                 transform.image_transform.clip_translation[1]   = y;\r
 386                                 transform.image_transform.clip_scale[0]                 = x_s;\r
 387                                 transform.image_transform.clip_scale[1]                 = y_s;\r
 388                                 return transform;\r
 389                         }, duration, tween));\r
 390                 }\r
 391                 else if(_parameters[0] == L"GRID")\r
 392                 {\r
 393                         int duration = _parameters.size() > 2 ? boost::lexical_cast<int>(_parameters[2]) : 0;\r
 394                         std::wstring tween = _parameters.size() > 3 ? _parameters[3] : L"linear";\r
 395                         int n = boost::lexical_cast<int>(_parameters.at(1));\r
 396                         double delta = 1.0/static_cast<double>(n);\r
 397                         for(int x = 0; x < n; ++x)\r
 398                         {\r
 399                                 for(int y = 0; y < n; ++y)\r
 400                                 {\r
 401                                         int index = x+y*n+1;\r
 402                                         transforms.push_back(stage::transform_tuple_t(index, [=](frame_transform transform) -> frame_transform\r
 403                                         {               \r
 404                                                 transform.image_transform.fill_translation[0]   = x*delta;\r
 405                                                 transform.image_transform.fill_translation[1]   = y*delta;\r
 406                                                 transform.image_transform.fill_scale[0]                 = delta;\r
 407                                                 transform.image_transform.fill_scale[1]                 = delta;\r
 408                                                 transform.image_transform.clip_translation[0]   = x*delta;\r
 409                                                 transform.image_transform.clip_translation[1]   = y*delta;\r
 410                                                 transform.image_transform.clip_scale[0]                 = delta;\r
 411                                                 transform.image_transform.clip_scale[1]                 = delta;                        \r
 412                                                 return transform;\r
 413                                         }, duration, tween));\r
 414                                 }\r
 415                         }\r
 416                 }\r
 417                 else if(_parameters[0] == L"BLEND")\r
 418                 {\r
 419                         auto blend_str = _parameters.at(1);                                                             \r
 420                         int layer = GetLayerIndex();\r
 421                         GetChannel()->mixer().set_blend_mode(GetLayerIndex(), get_blend_mode(blend_str));       \r
 422                 }\r
 423                 else if(_parameters[0] == L"BRIGHTNESS")\r
 424                 {\r
 425                         auto value = boost::lexical_cast<double>(_parameters.at(1));\r
 426                         int duration = _parameters.size() > 2 ? boost::lexical_cast<int>(_parameters[2]) : 0;\r
 427                         std::wstring tween = _parameters.size() > 3 ? _parameters[3] : L"linear";\r
 428                         transforms.push_back(stage::transform_tuple_t(GetLayerIndex(), [=](frame_transform transform) -> frame_transform\r
 429                         {\r
 430                                 transform.image_transform.brightness = value;\r
 431                                 return transform;\r
 432                         }, duration, tween));\r
 433                 }\r
 434                 else if(_parameters[0] == L"SATURATION")\r
 435                 {\r
 436                         auto value = boost::lexical_cast<double>(_parameters.at(1));\r
 437                         int duration = _parameters.size() > 2 ? boost::lexical_cast<int>(_parameters[2]) : 0;\r
 438                         std::wstring tween = _parameters.size() > 3 ? _parameters[3] : L"linear";\r
 439                         transforms.push_back(stage::transform_tuple_t(GetLayerIndex(), [=](frame_transform transform) -> frame_transform\r
 440                         {\r
 441                                 transform.image_transform.saturation = value;\r
 442                                 return transform;\r
 443                         }, duration, tween));   \r
 444                 }\r
 445                 else if(_parameters[0] == L"CONTRAST")\r
 446                 {\r
 447                         auto value = boost::lexical_cast<double>(_parameters.at(1));\r
 448                         int duration = _parameters.size() > 2 ? boost::lexical_cast<int>(_parameters[2]) : 0;\r
 449                         std::wstring tween = _parameters.size() > 3 ? _parameters[3] : L"linear";\r
 450                         transforms.push_back(stage::transform_tuple_t(GetLayerIndex(), [=](frame_transform transform) -> frame_transform\r
 451                         {\r
 452                                 transform.image_transform.contrast = value;\r
 453                                 return transform;\r
 454                         }, duration, tween));   \r
 455                 }\r
 456                 else if(_parameters[0] == L"LEVELS")\r
 457                 {\r
 458                         levels value;\r
 459                         value.min_input  = boost::lexical_cast<double>(_parameters.at(1));\r
 460                         value.max_input  = boost::lexical_cast<double>(_parameters.at(2));\r
 461                         value.gamma              = boost::lexical_cast<double>(_parameters.at(3));\r
 462                         value.min_output = boost::lexical_cast<double>(_parameters.at(4));\r
 463                         value.max_output = boost::lexical_cast<double>(_parameters.at(5));\r
 464                         int duration = _parameters.size() > 6 ? boost::lexical_cast<int>(_parameters[6]) : 0;\r
 465                         std::wstring tween = _parameters.size() > 7 ? _parameters[7] : L"linear";\r
 466 \r
 467                         transforms.push_back(stage::transform_tuple_t(GetLayerIndex(), [=](frame_transform transform) -> frame_transform\r
 468                         {\r
 469                                 transform.image_transform.levels = value;\r
 470                                 return transform;\r
 471                         }, duration, tween));\r
 472                 }\r
 473                 else if(_parameters[0] == L"VOLUME")\r
 474                 {\r
 475                         int duration = _parameters.size() > 2 ? boost::lexical_cast<int>(_parameters[2]) : 0;\r
 476                         std::wstring tween = _parameters.size() > 3 ? _parameters[3] : L"linear";\r
 477                         double value = boost::lexical_cast<double>(_parameters[1]);\r
 478 \r
 479                         transforms.push_back(stage::transform_tuple_t(GetLayerIndex(), [=](frame_transform transform) -> frame_transform\r
 480                         {\r
 481                                 transform.audio_transform.volume = value;\r
 482                                 return transform;\r
 483                         }, duration, tween));\r
 484                 }\r
 485                 else if(_parameters[0] == L"CLEAR")\r
 486                 {\r
 487                         int layer = GetLayerIndex(std::numeric_limits<int>::max());\r
 488                         if(layer ==     std::numeric_limits<int>::max())\r
 489                                 GetChannel()->stage().clear_transforms();\r
 490                         else\r
 491                                 GetChannel()->stage().clear_transforms(layer);\r
 492                 }\r
 493                 else if(_parameters[0] == L"COMMIT")\r
 494                 {\r
 495                         transforms = std::move(deferred_transforms[GetChannelIndex()]);\r
 496                 }\r
 497                 else\r
 498                 {\r
 499                         SetReplyString(TEXT("404 MIXER ERROR\r\n"));\r
 500                         return false;\r
 501                 }\r
 502 \r
 503                 if(defer)\r
 504                 {\r
 505                         auto& defer_tranforms = deferred_transforms[GetChannelIndex()];\r
 506                         defer_tranforms.insert(defer_tranforms.end(), transforms.begin(), transforms.end());\r
 507                 }\r
 508                 else\r
 509                         GetChannel()->stage().apply_transforms(transforms);\r
 510         \r
 511                 SetReplyString(TEXT("202 MIXER OK\r\n"));\r
 512 \r
 513                 return true;\r
 514         }\r
 515         catch(file_not_found&)\r
 516         {\r
 517                 CASPAR_LOG_CURRENT_EXCEPTION();\r
 518                 SetReplyString(TEXT("404 MIXER ERROR\r\n"));\r
 519                 return false;\r
 520         }\r
 521         catch(...)\r
 522         {\r
 523                 CASPAR_LOG_CURRENT_EXCEPTION();\r
 524                 SetReplyString(TEXT("502 MIXER FAILED\r\n"));\r
 525                 return false;\r
 526         }\r
 527 }\r
 528 \r
 529 bool SwapCommand::DoExecute()\r
 530 {       \r
 531         //Perform loading of the clip\r
 532         try\r
 533         {\r
 534                 if(GetLayerIndex(-1) != -1)\r
 535                 {\r
 536                         std::vector<std::string> strs;\r
 537                         boost::split(strs, _parameters[0], boost::is_any_of("-"));\r
 538                         \r
 539                         auto ch1 = GetChannel();\r
 540                         auto ch2 = GetChannels().at(boost::lexical_cast<int>(strs.at(0))-1);\r
 541 \r
 542                         int l1 = GetLayerIndex();\r
 543                         int l2 = boost::lexical_cast<int>(strs.at(1));\r
 544 \r
 545                         ch1->stage().swap_layer(l1, l2, ch2->stage());\r
 546                 }\r
 547                 else\r
 548                 {\r
 549                         auto ch1 = GetChannel();\r
 550                         auto ch2 = GetChannels().at(boost::lexical_cast<int>(_parameters[0])-1);\r
 551                         ch1->stage().swap_layers(ch2->stage());\r
 552                 }\r
 553                 \r
 554                 SetReplyString(TEXT("202 SWAP OK\r\n"));\r
 555 \r
 556                 return true;\r
 557         }\r
 558         catch(file_not_found&)\r
 559         {\r
 560                 CASPAR_LOG_CURRENT_EXCEPTION();\r
 561                 SetReplyString(TEXT("404 SWAP ERROR\r\n"));\r
 562                 return false;\r
 563         }\r
 564         catch(...)\r
 565         {\r
 566                 CASPAR_LOG_CURRENT_EXCEPTION();\r
 567                 SetReplyString(TEXT("502 SWAP FAILED\r\n"));\r
 568                 return false;\r
 569         }\r
 570 }\r
 571 \r
 572 bool AddCommand::DoExecute()\r
 573 {       \r
 574         //Perform loading of the clip\r
 575         try\r
 576         {\r
 577                 auto consumer = create_consumer(_parameters);\r
 578                 GetChannel()->output().add(GetLayerIndex(consumer->index()), consumer);\r
 579         \r
 580                 SetReplyString(TEXT("202 ADD OK\r\n"));\r
 581 \r
 582                 return true;\r
 583         }\r
 584         catch(file_not_found&)\r
 585         {\r
 586                 CASPAR_LOG_CURRENT_EXCEPTION();\r
 587                 SetReplyString(TEXT("404 ADD ERROR\r\n"));\r
 588                 return false;\r
 589         }\r
 590         catch(...)\r
 591         {\r
 592                 CASPAR_LOG_CURRENT_EXCEPTION();\r
 593                 SetReplyString(TEXT("502 ADD FAILED\r\n"));\r
 594                 return false;\r
 595         }\r
 596 }\r
 597 \r
 598 bool RemoveCommand::DoExecute()\r
 599 {       \r
 600         //Perform loading of the clip\r
 601         try\r
 602         {\r
 603                 auto index = GetLayerIndex(std::numeric_limits<int>::min());\r
 604                 if(index == std::numeric_limits<int>::min())\r
 605                         index = create_consumer(_parameters)->index();\r
 606 \r
 607                 GetChannel()->output().remove(index);\r
 608 \r
 609                 SetReplyString(TEXT("202 REMOVE OK\r\n"));\r
 610 \r
 611                 return true;\r
 612         }\r
 613         catch(file_not_found&)\r
 614         {\r
 615                 CASPAR_LOG_CURRENT_EXCEPTION();\r
 616                 SetReplyString(TEXT("404 REMOVE ERROR\r\n"));\r
 617                 return false;\r
 618         }\r
 619         catch(...)\r
 620         {\r
 621                 CASPAR_LOG_CURRENT_EXCEPTION();\r
 622                 SetReplyString(TEXT("502 REMOVE FAILED\r\n"));\r
 623                 return false;\r
 624         }\r
 625 }\r
 626 \r
 627 bool LoadCommand::DoExecute()\r
 628 {       \r
 629         //Perform loading of the clip\r
 630         try\r
 631         {\r
 632                 _parameters[0] = _parameters[0];\r
 633                 auto pFP = create_producer(GetChannel()->frame_factory(), GetChannel()->video_format_desc(), _parameters);              \r
 634                 GetChannel()->stage().load(GetLayerIndex(), pFP, true);\r
 635         \r
 636                 SetReplyString(TEXT("202 LOAD OK\r\n"));\r
 637 \r
 638                 return true;\r
 639         }\r
 640         catch(file_not_found&)\r
 641         {\r
 642                 CASPAR_LOG_CURRENT_EXCEPTION();\r
 643                 SetReplyString(TEXT("404 LOAD ERROR\r\n"));\r
 644                 return false;\r
 645         }\r
 646         catch(...)\r
 647         {\r
 648                 CASPAR_LOG_CURRENT_EXCEPTION();\r
 649                 SetReplyString(TEXT("502 LOAD FAILED\r\n"));\r
 650                 return false;\r
 651         }\r
 652 }\r
 653 \r
 654 \r
 655 \r
 656 //std::function<std::wstring()> channel_cg_add_command::parse(const std::wstring& message, const std::vector<renderer::render_device_ptr>& channels)\r
 657 //{\r
 658 //      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
 659 //\r
 660 //      boost::wsmatch what;\r
 661 //      if(!boost::regex_match(message, what, expr))\r
 662 //              return nullptr;\r
 663 //\r
 664 //      auto info = channel_info::parse(what, channels);\r
 665 //\r
 666 //      int flash_layer_index = boost::lexical_cast<int>(what["FLASH_LAYER"].str());\r
 667 //\r
 668 //      std::wstring templatename = what["TEMPLATE"].str();\r
 669 //      bool play_on_load = what["PLAY_ON_LOAD"].matched ? what["PLAY_ON_LOAD"].str() != L"0" : 0;\r
 670 //      std::wstring start_label = what["START_LABEL"].str();   \r
 671 //      std::wstring data = get_data(what["DATA"].str());\r
 672 //      \r
 673 //      boost::replace_all(templatename, "\"", "");\r
 674 //\r
 675 //      return [=]() -> std::wstring\r
 676 //      {       \r
 677 //              std::wstring fullFilename = flash::flash_producer::find_template(server::template_folder() + templatename);\r
 678 //              if(fullFilename.empty())\r
 679 //                      BOOST_THROW_EXCEPTION(file_not_found());\r
 680 //      \r
 681 //              std::wstring extension = boost::filesystem::wpath(fullFilename).extension();\r
 682 //              std::wstring filename = templatename;\r
 683 //              filename.append(extension);\r
 684 //\r
 685 //              flash::flash::create_cg_proxy(info.video_channel, std::max<int>(DEFAULT_CHANNEL_LAYER+1, info.layer_index))\r
 686 //                      ->add(flash_layer_index, filename, play_on_load, start_label, data);\r
 687 //\r
 688 //              CASPAR_LOG(info) << L"Executed [amcp_channel_cg_add]";\r
 689 //              return L"";\r
 690 //      };\r
 691 \r
 692 bool LoadbgCommand::DoExecute()\r
 693 {\r
 694         transition_info transitionInfo;\r
 695         \r
 696         bool bLoop = false;\r
 697 \r
 698         // TRANSITION\r
 699 \r
 700         std::wstring message;\r
 701         for(size_t n = 0; n < _parameters.size(); ++n)\r
 702                 message += _parameters[n] + L" ";\r
 703                 \r
 704         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
 705         boost::wsmatch what;\r
 706         if(boost::regex_match(message, what, expr))\r
 707         {\r
 708                 auto transition = what["TRANSITION"].str();\r
 709                 transitionInfo.duration = boost::lexical_cast<size_t>(what["DURATION"].str());\r
 710                 auto direction = what["DIRECTION"].matched ? what["DIRECTION"].str() : L"";\r
 711                 auto tween = what["TWEEN"].matched ? what["TWEEN"].str() : L"";\r
 712                 transitionInfo.tweener = tween;         \r
 713 \r
 714                 if(transition == TEXT("CUT"))\r
 715                         transitionInfo.type = transition_type::cut;\r
 716                 else if(transition == TEXT("MIX"))\r
 717                         transitionInfo.type = transition_type::mix;\r
 718                 else if(transition == TEXT("PUSH"))\r
 719                         transitionInfo.type = transition_type::push;\r
 720                 else if(transition == TEXT("SLIDE"))\r
 721                         transitionInfo.type = transition_type::slide;\r
 722                 else if(transition == TEXT("WIPE"))\r
 723                         transitionInfo.type = transition_type::wipe;\r
 724                 \r
 725                 if(direction == TEXT("FROMLEFT"))\r
 726                         transitionInfo.direction = transition_direction::from_left;\r
 727                 else if(direction == TEXT("FROMRIGHT"))\r
 728                         transitionInfo.direction = transition_direction::from_right;\r
 729                 else if(direction == TEXT("LEFT"))\r
 730                         transitionInfo.direction = transition_direction::from_right;\r
 731                 else if(direction == TEXT("RIGHT"))\r
 732                         transitionInfo.direction = transition_direction::from_left;\r
 733         }\r
 734         \r
 735         //Perform loading of the clip\r
 736         try\r
 737         {\r
 738                 _parameters[0] = _parameters[0];\r
 739                 auto pFP = create_producer(GetChannel()->frame_factory(), GetChannel()->video_format_desc(), _parameters);\r
 740                 if(pFP == frame_producer::empty())\r
 741                         BOOST_THROW_EXCEPTION(file_not_found() << msg_info(_parameters.size() > 0 ? _parameters[0] : L""));\r
 742 \r
 743                 bool auto_play = std::find(_parameters.begin(), _parameters.end(), L"AUTO") != _parameters.end();\r
 744 \r
 745                 auto pFP2 = create_transition_producer(GetChannel()->video_format_desc().field_mode, pFP, transitionInfo);\r
 746                 if(auto_play)\r
 747                         GetChannel()->stage().load(GetLayerIndex(), pFP2, false, transitionInfo.duration); // TODO: LOOP\r
 748                 else\r
 749                         GetChannel()->stage().load(GetLayerIndex(), pFP2, false); // TODO: LOOP\r
 750         \r
 751                 SetReplyString(TEXT("202 LOADBG OK\r\n"));\r
 752 \r
 753                 return true;\r
 754         }\r
 755         catch(file_not_found&)\r
 756         {               \r
 757                 std::wstring params2;\r
 758                 for(auto it = _parameters.begin(); it != _parameters.end(); ++it)\r
 759                         params2 += L" " + *it;\r
 760                 CASPAR_LOG(error) << L"File not found. No match found for parameters. Check syntax:" << params2;\r
 761                 SetReplyString(TEXT("404 LOADBG ERROR\r\n"));\r
 762                 return false;\r
 763         }\r
 764         catch(...)\r
 765         {\r
 766                 CASPAR_LOG_CURRENT_EXCEPTION();\r
 767                 SetReplyString(TEXT("502 LOADBG FAILED\r\n"));\r
 768                 return false;\r
 769         }\r
 770 }\r
 771 \r
 772 bool PauseCommand::DoExecute()\r
 773 {\r
 774         try\r
 775         {\r
 776                 GetChannel()->stage().pause(GetLayerIndex());\r
 777                 SetReplyString(TEXT("202 PAUSE OK\r\n"));\r
 778                 return true;\r
 779         }\r
 780         catch(...)\r
 781         {\r
 782                 SetReplyString(TEXT("501 PAUSE FAILED\r\n"));\r
 783         }\r
 784 \r
 785         return false;\r
 786 }\r
 787 \r
 788 bool PlayCommand::DoExecute()\r
 789 {\r
 790         try\r
 791         {\r
 792                 if(!_parameters.empty())\r
 793                 {\r
 794                         LoadbgCommand lbg;\r
 795                         lbg.SetChannel(GetChannel());\r
 796                         lbg.SetChannelIndex(GetChannelIndex());\r
 797                         lbg.SetLayerIntex(GetLayerIndex());\r
 798                         lbg.SetClientInfo(GetClientInfo());\r
 799                         for(auto it = _parameters.begin(); it != _parameters.end(); ++it)\r
 800                                 lbg.AddParameter(*it);\r
 801                         if(!lbg.Execute())\r
 802                                 throw std::exception();\r
 803                 }\r
 804 \r
 805                 GetChannel()->stage().play(GetLayerIndex());\r
 806                 \r
 807                 SetReplyString(TEXT("202 PLAY OK\r\n"));\r
 808                 return true;\r
 809         }\r
 810         catch(...)\r
 811         {\r
 812                 SetReplyString(TEXT("501 PLAY FAILED\r\n"));\r
 813         }\r
 814 \r
 815         return false;\r
 816 }\r
 817 \r
 818 bool StopCommand::DoExecute()\r
 819 {\r
 820         try\r
 821         {\r
 822                 GetChannel()->stage().stop(GetLayerIndex());\r
 823                 SetReplyString(TEXT("202 STOP OK\r\n"));\r
 824                 return true;\r
 825         }\r
 826         catch(...)\r
 827         {\r
 828                 SetReplyString(TEXT("501 STOP FAILED\r\n"));\r
 829         }\r
 830 \r
 831         return false;\r
 832 }\r
 833 \r
 834 bool ClearCommand::DoExecute()\r
 835 {\r
 836         int index = GetLayerIndex(std::numeric_limits<int>::min());\r
 837         if(index != std::numeric_limits<int>::min())\r
 838                 GetChannel()->stage().clear(index);\r
 839         else\r
 840                 GetChannel()->stage().clear();\r
 841                 \r
 842         SetReplyString(TEXT("202 CLEAR OK\r\n"));\r
 843 \r
 844         return true;\r
 845 }\r
 846 \r
 847 bool PrintCommand::DoExecute()\r
 848 {\r
 849         GetChannel()->output().add(create_consumer(boost::assign::list_of(L"IMAGE")));\r
 850                 \r
 851         SetReplyString(TEXT("202 PRINT OK\r\n"));\r
 852 \r
 853         return true;\r
 854 }\r
 855 \r
 856 bool LogCommand::DoExecute()\r
 857 {\r
 858         if(_parameters.at(0) == L"LEVEL")\r
 859                 log::set_log_level(_parameters.at(1));\r
 860 \r
 861         SetReplyString(TEXT("202 LOG OK\r\n"));\r
 862 \r
 863         return true;\r
 864 }\r
 865 \r
 866 bool CGCommand::DoExecute()\r
 867 {\r
 868         try\r
 869         {\r
 870                 std::wstring command = _parameters[0];\r
 871                 if(command == TEXT("ADD"))\r
 872                         return DoExecuteAdd();\r
 873                 else if(command == TEXT("PLAY"))\r
 874                         return DoExecutePlay();\r
 875                 else if(command == TEXT("STOP"))\r
 876                         return DoExecuteStop();\r
 877                 else if(command == TEXT("NEXT"))\r
 878                         return DoExecuteNext();\r
 879                 else if(command == TEXT("REMOVE"))\r
 880                         return DoExecuteRemove();\r
 881                 else if(command == TEXT("CLEAR"))\r
 882                         return DoExecuteClear();\r
 883                 else if(command == TEXT("UPDATE"))\r
 884                         return DoExecuteUpdate();\r
 885                 else if(command == TEXT("INVOKE"))\r
 886                         return DoExecuteInvoke();\r
 887                 else if(command == TEXT("INFO"))\r
 888                         return DoExecuteInfo();\r
 889         }\r
 890         catch(...)\r
 891         {\r
 892                 CASPAR_LOG_CURRENT_EXCEPTION();\r
 893         }\r
 894 \r
 895         SetReplyString(TEXT("403 CG ERROR\r\n"));\r
 896         return false;\r
 897 }\r
 898 \r
 899 bool CGCommand::ValidateLayer(const std::wstring& layerstring) {\r
 900         int length = layerstring.length();\r
 901         for(int i = 0; i < length; ++i) {\r
 902                 if(!_istdigit(layerstring[i])) {\r
 903                         return false;\r
 904                 }\r
 905         }\r
 906 \r
 907         return true;\r
 908 }\r
 909 \r
 910 bool CGCommand::DoExecuteAdd() {\r
 911         //CG 1 ADD 0 "template_folder/templatename" [STARTLABEL] 0/1 [DATA]\r
 912 \r
 913         int layer = 0;                          //_parameters[1]\r
 914 //      std::wstring templateName;      //_parameters[2]\r
 915         std::wstring label;             //_parameters[3]\r
 916         bool bDoStart = false;          //_parameters[3] alt. _parameters[4]\r
 917 //      std::wstring data;                      //_parameters[4] alt. _parameters[5]\r
 918 \r
 919         if(_parameters.size() < 4) \r
 920         {\r
 921                 SetReplyString(TEXT("402 CG ERROR\r\n"));\r
 922                 return false;\r
 923         }\r
 924         unsigned int dataIndex = 4;\r
 925 \r
 926         if(!ValidateLayer(_parameters[1])) \r
 927         {\r
 928                 SetReplyString(TEXT("403 CG ERROR\r\n"));\r
 929                 return false;\r
 930         }\r
 931 \r
 932         layer = _ttoi(_parameters[1].c_str());\r
 933 \r
 934         if(_parameters[3].length() > 1) \r
 935         {       //read label\r
 936                 label = _parameters2[3];\r
 937                 ++dataIndex;\r
 938 \r
 939                 if(_parameters.size() > 4 && _parameters[4].length() > 0)       //read play-on-load-flag\r
 940                         bDoStart = (_parameters[4][0]==TEXT('1')) ? true : false;\r
 941                 else \r
 942                 {\r
 943                         SetReplyString(TEXT("402 CG ERROR\r\n"));\r
 944                         return false;\r
 945                 }\r
 946         }\r
 947         else if(_parameters[3].length() > 0) {  //read play-on-load-flag\r
 948                 bDoStart = (_parameters[3][0]==TEXT('1')) ? true : false;\r
 949         }\r
 950         else \r
 951         {\r
 952                 SetReplyString(TEXT("403 CG ERROR\r\n"));\r
 953                 return false;\r
 954         }\r
 955 \r
 956         const TCHAR* pDataString = 0;\r
 957         std::wstringstream data;\r
 958         std::wstring dataFromFile;\r
 959         if(_parameters.size() > dataIndex) \r
 960         {       //read data\r
 961                 const std::wstring& dataString = _parameters2[dataIndex];\r
 962 \r
 963                 if(dataString[0] == TEXT('<')) //the data is an XML-string\r
 964                         pDataString = dataString.c_str();\r
 965                 else \r
 966                 {\r
 967                         //The data is not an XML-string, it must be a filename\r
 968                         std::wstring filename = env::data_folder();\r
 969                         filename.append(dataString);\r
 970                         filename.append(TEXT(".ftd"));\r
 971 \r
 972                         //open file\r
 973                         std::wifstream datafile(filename.c_str());\r
 974                         if(datafile) \r
 975                         {\r
 976                                 //read all data\r
 977                                 data << datafile.rdbuf();\r
 978                                 datafile.close();\r
 979 \r
 980                                 //extract data to _parameters\r
 981                                 dataFromFile = data.str();\r
 982                                 pDataString = dataFromFile.c_str();\r
 983                         }\r
 984                 }\r
 985         }\r
 986 \r
 987         std::wstring fullFilename = flash::find_template(env::template_folder() + _parameters[2]);\r
 988         if(!fullFilename.empty())\r
 989         {\r
 990                 std::wstring extension = boost::filesystem::path(fullFilename).extension().wstring();\r
 991                 std::wstring filename = _parameters[2];\r
 992                 filename.append(extension);\r
 993 \r
 994                 flash::create_cg_proxy(spl::shared_ptr<core::video_channel>(GetChannel()), GetLayerIndex(flash::cg_proxy::DEFAULT_LAYER)).add(layer, filename, bDoStart, label, (pDataString!=0) ? pDataString : TEXT(""));\r
 995                 SetReplyString(TEXT("202 CG OK\r\n"));\r
 996         }\r
 997         else\r
 998         {\r
 999                 CASPAR_LOG(warning) << "Could not find template " << _parameters[2];\r
1000                 SetReplyString(TEXT("404 CG ERROR\r\n"));\r
1001         }\r
1002         return true;\r
1003 }\r
1004 \r
1005 bool CGCommand::DoExecutePlay()\r
1006 {\r
1007         if(_parameters.size() > 1)\r
1008         {\r
1009                 if(!ValidateLayer(_parameters[1])) \r
1010                 {\r
1011                         SetReplyString(TEXT("403 CG ERROR\r\n"));\r
1012                         return false;\r
1013                 }\r
1014                 int layer = _ttoi(_parameters[1].c_str());\r
1015                 flash::create_cg_proxy(spl::shared_ptr<core::video_channel>(GetChannel()), GetLayerIndex(flash::cg_proxy::DEFAULT_LAYER)).play(layer);\r
1016         }\r
1017         else\r
1018         {\r
1019                 SetReplyString(TEXT("402 CG ERROR\r\n"));\r
1020                 return true;\r
1021         }\r
1022 \r
1023         SetReplyString(TEXT("202 CG OK\r\n"));\r
1024         return true;\r
1025 }\r
1026 \r
1027 bool CGCommand::DoExecuteStop() \r
1028 {\r
1029         if(_parameters.size() > 1)\r
1030         {\r
1031                 if(!ValidateLayer(_parameters[1])) \r
1032                 {\r
1033                         SetReplyString(TEXT("403 CG ERROR\r\n"));\r
1034                         return false;\r
1035                 }\r
1036                 int layer = _ttoi(_parameters[1].c_str());\r
1037                 flash::create_cg_proxy(spl::shared_ptr<core::video_channel>(GetChannel()), GetLayerIndex(flash::cg_proxy::DEFAULT_LAYER)).stop(layer, 0);\r
1038         }\r
1039         else \r
1040         {\r
1041                 SetReplyString(TEXT("402 CG ERROR\r\n"));\r
1042                 return true;\r
1043         }\r
1044 \r
1045         SetReplyString(TEXT("202 CG OK\r\n"));\r
1046         return true;\r
1047 }\r
1048 \r
1049 bool CGCommand::DoExecuteNext()\r
1050 {\r
1051         if(_parameters.size() > 1) \r
1052         {\r
1053                 if(!ValidateLayer(_parameters[1])) \r
1054                 {\r
1055                         SetReplyString(TEXT("403 CG ERROR\r\n"));\r
1056                         return false;\r
1057                 }\r
1058 \r
1059                 int layer = _ttoi(_parameters[1].c_str());\r
1060                 flash::create_cg_proxy(spl::shared_ptr<core::video_channel>(GetChannel()), GetLayerIndex(flash::cg_proxy::DEFAULT_LAYER)).next(layer);\r
1061         }\r
1062         else \r
1063         {\r
1064                 SetReplyString(TEXT("402 CG ERROR\r\n"));\r
1065                 return true;\r
1066         }\r
1067 \r
1068         SetReplyString(TEXT("202 CG OK\r\n"));\r
1069         return true;\r
1070 }\r
1071 \r
1072 bool CGCommand::DoExecuteRemove() \r
1073 {\r
1074         if(_parameters.size() > 1) \r
1075         {\r
1076                 if(!ValidateLayer(_parameters[1])) \r
1077                 {\r
1078                         SetReplyString(TEXT("403 CG ERROR\r\n"));\r
1079                         return false;\r
1080                 }\r
1081 \r
1082                 int layer = _ttoi(_parameters[1].c_str());\r
1083                 flash::create_cg_proxy(spl::shared_ptr<core::video_channel>(GetChannel()), GetLayerIndex(flash::cg_proxy::DEFAULT_LAYER)).remove(layer);\r
1084         }\r
1085         else \r
1086         {\r
1087                 SetReplyString(TEXT("402 CG ERROR\r\n"));\r
1088                 return true;\r
1089         }\r
1090 \r
1091         SetReplyString(TEXT("202 CG OK\r\n"));\r
1092         return true;\r
1093 }\r
1094 \r
1095 bool CGCommand::DoExecuteClear() \r
1096 {\r
1097         GetChannel()->stage().clear(GetLayerIndex(flash::cg_proxy::DEFAULT_LAYER));\r
1098         SetReplyString(TEXT("202 CG OK\r\n"));\r
1099         return true;\r
1100 }\r
1101 \r
1102 bool CGCommand::DoExecuteUpdate() \r
1103 {\r
1104         try\r
1105         {\r
1106                 if(!ValidateLayer(_parameters.at(1)))\r
1107                 {\r
1108                         SetReplyString(TEXT("403 CG ERROR\r\n"));\r
1109                         return false;\r
1110                 }\r
1111                                                 \r
1112                 std::wstring dataString = _parameters2.at(2);                           \r
1113                 if(dataString.at(0) != TEXT('<'))\r
1114                 {\r
1115                         //The data is not an XML-string, it must be a filename\r
1116                         std::wstring filename = env::data_folder();\r
1117                         filename.append(dataString);\r
1118                         filename.append(TEXT(".ftd"));\r
1119 \r
1120                         //open file\r
1121                         std::wifstream datafile(filename.c_str());\r
1122                         if(datafile) \r
1123                         {\r
1124                                 std::wstringstream data;\r
1125                                 //read all data\r
1126                                 data << datafile.rdbuf();\r
1127                                 datafile.close();\r
1128 \r
1129                                 //extract data to _parameters\r
1130                                 dataString = data.str();\r
1131                         }\r
1132                 }               \r
1133 \r
1134                 int layer = _ttoi(_parameters.at(1).c_str());\r
1135                 flash::create_cg_proxy(spl::shared_ptr<core::video_channel>(GetChannel()), GetLayerIndex(flash::cg_proxy::DEFAULT_LAYER)).update(layer, dataString);\r
1136         }\r
1137         catch(...)\r
1138         {\r
1139                 SetReplyString(TEXT("402 CG ERROR\r\n"));\r
1140                 return true;\r
1141         }\r
1142 \r
1143         SetReplyString(TEXT("202 CG OK\r\n"));\r
1144         return true;\r
1145 }\r
1146 \r
1147 bool CGCommand::DoExecuteInvoke() \r
1148 {\r
1149         std::wstringstream replyString;\r
1150         replyString << TEXT("201 CG OK\r\n");\r
1151 \r
1152         if(_parameters.size() > 2)\r
1153         {\r
1154                 if(!ValidateLayer(_parameters[1]))\r
1155                 {\r
1156                         SetReplyString(TEXT("403 CG ERROR\r\n"));\r
1157                         return false;\r
1158                 }\r
1159                 int layer = _ttoi(_parameters[1].c_str());\r
1160                 auto result = flash::create_cg_proxy(spl::shared_ptr<core::video_channel>(GetChannel()), GetLayerIndex(flash::cg_proxy::DEFAULT_LAYER)).invoke(layer, _parameters2[2]);\r
1161                 replyString << result << TEXT("\r\n"); \r
1162         }\r
1163         else \r
1164         {\r
1165                 SetReplyString(TEXT("402 CG ERROR\r\n"));\r
1166                 return true;\r
1167         }\r
1168         \r
1169         SetReplyString(replyString.str());\r
1170         return true;\r
1171 }\r
1172 \r
1173 bool CGCommand::DoExecuteInfo() \r
1174 {\r
1175         std::wstringstream replyString;\r
1176         replyString << TEXT("201 CG OK\r\n");\r
1177 \r
1178         if(_parameters.size() > 1)\r
1179         {\r
1180                 if(!ValidateLayer(_parameters[1]))\r
1181                 {\r
1182                         SetReplyString(TEXT("403 CG ERROR\r\n"));\r
1183                         return false;\r
1184                 }\r
1185 \r
1186                 int layer = _ttoi(_parameters[1].c_str());\r
1187                 auto desc = flash::create_cg_proxy(spl::shared_ptr<core::video_channel>(GetChannel()), GetLayerIndex(flash::cg_proxy::DEFAULT_LAYER)).description(layer);\r
1188                 \r
1189                 replyString << desc << TEXT("\r\n"); \r
1190         }\r
1191         else \r
1192         {\r
1193                 auto info = flash::create_cg_proxy(spl::shared_ptr<core::video_channel>(GetChannel()), GetLayerIndex(flash::cg_proxy::DEFAULT_LAYER)).template_host_info();\r
1194                 replyString << info << TEXT("\r\n"); \r
1195         }       \r
1196 \r
1197         SetReplyString(replyString.str());\r
1198         return true;\r
1199 }\r
1200 \r
1201 bool DataCommand::DoExecute()\r
1202 {\r
1203         std::wstring command = _parameters[0];\r
1204         if(command == TEXT("STORE"))\r
1205                 return DoExecuteStore();\r
1206         else if(command == TEXT("RETRIEVE"))\r
1207                 return DoExecuteRetrieve();\r
1208         else if(command == TEXT("LIST"))\r
1209                 return DoExecuteList();\r
1210 \r
1211         SetReplyString(TEXT("403 DATA ERROR\r\n"));\r
1212         return false;\r
1213 }\r
1214 \r
1215 bool DataCommand::DoExecuteStore() \r
1216 {\r
1217         if(_parameters.size() < 3) \r
1218         {\r
1219                 SetReplyString(TEXT("402 DATA STORE ERROR\r\n"));\r
1220                 return false;\r
1221         }\r
1222 \r
1223         std::wstring filename = env::data_folder();\r
1224         filename.append(_parameters[1]);\r
1225         filename.append(TEXT(".ftd"));\r
1226 \r
1227         std::wofstream datafile(filename.c_str());\r
1228         if(!datafile) \r
1229         {\r
1230                 SetReplyString(TEXT("501 DATA STORE FAILED\r\n"));\r
1231                 return false;\r
1232         }\r
1233 \r
1234         datafile << _parameters2[2];\r
1235         datafile.close();\r
1236 \r
1237         std::wstring replyString = TEXT("202 DATA STORE OK\r\n");\r
1238         SetReplyString(replyString);\r
1239         return true;\r
1240 }\r
1241 \r
1242 bool DataCommand::DoExecuteRetrieve() \r
1243 {\r
1244         if(_parameters.size() < 2) \r
1245         {\r
1246                 SetReplyString(TEXT("402 DATA RETRIEVE ERROR\r\n"));\r
1247                 return false;\r
1248         }\r
1249 \r
1250         std::wstring filename = env::data_folder();\r
1251         filename.append(_parameters[1]);\r
1252         filename.append(TEXT(".ftd"));\r
1253 \r
1254         std::wifstream datafile(filename.c_str());\r
1255         if(!datafile) \r
1256         {\r
1257                 SetReplyString(TEXT("404 DATA RETRIEVE ERROR\r\n"));\r
1258                 return false;\r
1259         }\r
1260 \r
1261         std::wstringstream reply(TEXT("201 DATA RETRIEVE OK\r\n"));\r
1262         std::wstring line;\r
1263         bool bFirstLine = true;\r
1264         while(std::getline(datafile, line))\r
1265         {\r
1266                 if(!bFirstLine)\r
1267                         reply << "\\n";\r
1268                 else\r
1269                         bFirstLine = false;\r
1270 \r
1271                 reply << line;\r
1272         }\r
1273         datafile.close();\r
1274 \r
1275         reply << "\r\n";\r
1276         SetReplyString(reply.str());\r
1277         return true;\r
1278 }\r
1279 \r
1280 bool DataCommand::DoExecuteList() \r
1281 {\r
1282         std::wstringstream replyString;\r
1283         replyString << TEXT("200 DATA LIST OK\r\n");\r
1284 \r
1285         for (boost::filesystem::recursive_directory_iterator itr(env::data_folder()), end; itr != end; ++itr)\r
1286         {                       \r
1287                 if(boost::filesystem::is_regular_file(itr->path()))\r
1288                 {\r
1289                         if(!boost::iequals(itr->path().extension().wstring(), L".ftd"))\r
1290                                 continue;\r
1291                         \r
1292                         auto relativePath = boost::filesystem::wpath(itr->path().wstring().substr(env::data_folder().size()-1, itr->path().wstring().size()));\r
1293                         \r
1294                         auto str = relativePath.replace_extension(TEXT("")).native();\r
1295                         if(str[0] == '\\' || str[0] == '/')\r
1296                                 str = std::wstring(str.begin() + 1, str.end());\r
1297 \r
1298                         replyString << str << TEXT("\r\n");     \r
1299                 }\r
1300         }\r
1301         \r
1302         replyString << TEXT("\r\n");\r
1303 \r
1304         SetReplyString(boost::to_upper_copy(replyString.str()));\r
1305         return true;\r
1306 }\r
1307 \r
1308 bool CinfCommand::DoExecute()\r
1309 {\r
1310         std::wstringstream replyString;\r
1311         \r
1312         try\r
1313         {\r
1314                 std::wstring info;\r
1315                 for (boost::filesystem::recursive_directory_iterator itr(env::media_folder()), end; itr != end; ++itr)\r
1316                 {\r
1317                         auto path = itr->path();\r
1318                         auto file = path.replace_extension(L"").filename();\r
1319                         if(boost::iequals(file.wstring(), _parameters.at(0)))\r
1320                                 info += MediaInfo(itr->path()) + L"\r\n";\r
1321                 }\r
1322 \r
1323                 if(info.empty())\r
1324                 {\r
1325                         SetReplyString(TEXT("404 CINF ERROR\r\n"));\r
1326                         return false;\r
1327                 }\r
1328                 replyString << TEXT("200 CINF OK\r\n");\r
1329                 replyString << info << "\r\n";\r
1330         }\r
1331         catch(...)\r
1332         {\r
1333                 CASPAR_LOG_CURRENT_EXCEPTION();\r
1334                 SetReplyString(TEXT("404 CINF ERROR\r\n"));\r
1335                 return false;\r
1336         }\r
1337         \r
1338         SetReplyString(replyString.str());\r
1339         return true;\r
1340 }\r
1341 \r
1342 void GenerateChannelInfo(int index, const spl::shared_ptr<core::video_channel>& pChannel, std::wstringstream& replyString)\r
1343 {\r
1344         replyString << index+1 << TEXT(" ") << pChannel->video_format_desc().name << TEXT(" PLAYING") << TEXT("\r\n");\r
1345 }\r
1346 \r
1347 bool InfoCommand::DoExecute()\r
1348 {\r
1349         std::wstringstream replyString;\r
1350         \r
1351         boost::property_tree::xml_writer_settings<wchar_t> w(' ', 3);\r
1352 \r
1353         try\r
1354         {\r
1355                 if(_parameters.size() >= 1 && _parameters[0] == L"TEMPLATE")\r
1356                 {               \r
1357                         replyString << L"201 INFO TEMPLATE OK\r\n";\r
1358 \r
1359                         // Needs to be extended for any file, not just flash.\r
1360 \r
1361                         auto filename = flash::find_template(env::template_folder() + _parameters.at(1));\r
1362                                                 \r
1363                         std::wstringstream str;\r
1364                         str << u16(flash::read_template_meta_info(filename));\r
1365                         boost::property_tree::wptree info;\r
1366                         boost::property_tree::xml_parser::read_xml(str, info, boost::property_tree::xml_parser::trim_whitespace | boost::property_tree::xml_parser::no_comments);\r
1367 \r
1368                         boost::property_tree::xml_parser::write_xml(replyString, info, w);\r
1369                 }\r
1370                 else if(_parameters.size() >= 1 && _parameters[0] == L"CONFIG")\r
1371                 {               \r
1372                         replyString << L"201 INFO CONFIG OK\r\n";\r
1373 \r
1374                         boost::property_tree::write_xml(replyString, caspar::env::properties(), w);\r
1375                 }\r
1376                 else if(_parameters.size() >= 1 && _parameters[0] == L"PATHS")\r
1377                 {\r
1378                         replyString << L"201 INFO PATHS OK\r\n";\r
1379 \r
1380                         boost::property_tree::wptree info;\r
1381                         info.add_child(L"paths", caspar::env::properties().get_child(L"configuration.paths"));\r
1382                         info.add(L"paths.initial-path", boost::filesystem3::initial_path().wstring() + L"\\");\r
1383 \r
1384                         boost::property_tree::write_xml(replyString, info, w);\r
1385                 }\r
1386                 else if(_parameters.size() >= 1 && _parameters[0] == L"SYSTEM")\r
1387                 {\r
1388                         replyString << L"201 INFO SYSTEM OK\r\n";\r
1389                         \r
1390                         boost::property_tree::wptree info;\r
1391                         \r
1392                         info.add(L"system.name",                                        caspar::system_product_name());\r
1393                         info.add(L"system.windows.name",                        caspar::win_product_name());\r
1394                         info.add(L"system.windows.service-pack",        caspar::win_sp_version());\r
1395                         info.add(L"system.cpu",                                         caspar::cpu_info());\r
1396         \r
1397                         BOOST_FOREACH(auto device, caspar::decklink::device_list())\r
1398                                 info.add(L"system.decklink.device", device);\r
1399 \r
1400                         BOOST_FOREACH(auto device, caspar::bluefish::device_list())\r
1401                                 info.add(L"system.bluefish.device", device);\r
1402                                 \r
1403                         info.add(L"system.flash",                                       caspar::flash::version());\r
1404                         //info.add(L"system.free-image",                                caspar::image::version());\r
1405                         info.add(L"system.ffmpeg.avcodec",                      caspar::ffmpeg::avcodec_version());\r
1406                         info.add(L"system.ffmpeg.avformat",                     caspar::ffmpeg::avformat_version());\r
1407                         info.add(L"system.ffmpeg.avfilter",                     caspar::ffmpeg::avfilter_version());\r
1408                         info.add(L"system.ffmpeg.avutil",                       caspar::ffmpeg::avutil_version());\r
1409                         info.add(L"system.ffmpeg.swscale",                      caspar::ffmpeg::swscale_version());\r
1410                                                 \r
1411                         boost::property_tree::write_xml(replyString, info, w);\r
1412                 }\r
1413                 else if(_parameters.size() >= 1 && _parameters[0] == L"SERVER")\r
1414                 {\r
1415                         replyString << L"201 INFO SYSTEM OK\r\n";\r
1416                         \r
1417                         boost::property_tree::wptree info;\r
1418 \r
1419                         int index = 0;\r
1420                         BOOST_FOREACH(auto channel, channels_)\r
1421                                 info.add_child(L"channels.channel", channel->info())\r
1422                                         .add(L"index", ++index);\r
1423                         \r
1424                         boost::property_tree::write_xml(replyString, info, w);\r
1425                 }\r
1426                 else // channel\r
1427                 {                       \r
1428                         if(_parameters.size() >= 1)\r
1429                         {\r
1430                                 replyString << TEXT("201 INFO OK\r\n");\r
1431                                 boost::property_tree::wptree info;\r
1432 \r
1433                                 std::vector<std::wstring> split;\r
1434                                 boost::split(split, _parameters[0], boost::is_any_of("-"));\r
1435                                         \r
1436                                 int layer = std::numeric_limits<int>::min();\r
1437                                 int channel = boost::lexical_cast<int>(split[0]) - 1;\r
1438 \r
1439                                 if(split.size() > 1)\r
1440                                         layer = boost::lexical_cast<int>(split[1]);\r
1441                                 \r
1442                                 if(layer == std::numeric_limits<int>::min())\r
1443                                 {       \r
1444                                         info.add_child(L"channel", channels_.at(channel)->info())\r
1445                                                         .add(L"index", channel);\r
1446                                 }\r
1447                                 else\r
1448                                 {\r
1449                                         if(_parameters.size() >= 2)\r
1450                                         {\r
1451                                                 if(_parameters[1] == L"B")\r
1452                                                         info.add_child(L"producer", channels_.at(channel)->stage().background(layer).get()->info());\r
1453                                                 else\r
1454                                                         info.add_child(L"producer", channels_.at(channel)->stage().foreground(layer).get()->info());\r
1455                                         }\r
1456                                         else\r
1457                                         {\r
1458                                                 info.add_child(L"layer", channels_.at(channel)->stage().info(layer).get())\r
1459                                                         .add(L"index", layer);\r
1460                                         }\r
1461                                 }\r
1462                                 boost::property_tree::xml_parser::write_xml(replyString, info, w);\r
1463                         }\r
1464                         else\r
1465                         {\r
1466                                 // This is needed for backwards compatibility with old clients\r
1467                                 replyString << TEXT("200 INFO OK\r\n");\r
1468                                 for(size_t n = 0; n < channels_.size(); ++n)\r
1469                                         GenerateChannelInfo(n, channels_[n], replyString);\r
1470                         }\r
1471 \r
1472                 }\r
1473         }\r
1474         catch(...)\r
1475         {\r
1476                 CASPAR_LOG_CURRENT_EXCEPTION();\r
1477                 SetReplyString(TEXT("403 INFO ERROR\r\n"));\r
1478                 return false;\r
1479         }\r
1480 \r
1481         replyString << TEXT("\r\n");\r
1482         SetReplyString(replyString.str());\r
1483         return true;\r
1484 }\r
1485 \r
1486 bool ClsCommand::DoExecute()\r
1487 {\r
1488 /*\r
1489                 wav = audio\r
1490                 mp3 = audio\r
1491                 swf     = movie\r
1492                 dv  = movie\r
1493                 tga = still\r
1494                 col = still\r
1495         */\r
1496         try\r
1497         {\r
1498                 std::wstringstream replyString;\r
1499                 replyString << TEXT("200 CLS OK\r\n");\r
1500                 replyString << ListMedia();\r
1501                 replyString << TEXT("\r\n");\r
1502                 SetReplyString(boost::to_upper_copy(replyString.str()));\r
1503         }\r
1504         catch(...)\r
1505         {\r
1506                 CASPAR_LOG_CURRENT_EXCEPTION();\r
1507                 SetReplyString(TEXT("501 CLS FAILED\r\n"));\r
1508                 return false;\r
1509         }\r
1510 \r
1511         return true;\r
1512 }\r
1513 \r
1514 bool TlsCommand::DoExecute()\r
1515 {\r
1516         try\r
1517         {\r
1518                 std::wstringstream replyString;\r
1519                 replyString << TEXT("200 TLS OK\r\n");\r
1520 \r
1521                 replyString << ListTemplates();\r
1522                 replyString << TEXT("\r\n");\r
1523 \r
1524                 SetReplyString(replyString.str());\r
1525         }\r
1526         catch(...)\r
1527         {\r
1528                 CASPAR_LOG_CURRENT_EXCEPTION();\r
1529                 SetReplyString(TEXT("501 TLS FAILED\r\n"));\r
1530                 return false;\r
1531         }\r
1532         return true;\r
1533 }\r
1534 \r
1535 bool VersionCommand::DoExecute()\r
1536 {\r
1537         std::wstring replyString = TEXT("201 VERSION OK\r\n") + env::version() + TEXT("\r\n");\r
1538 \r
1539         if(_parameters.size() > 0)\r
1540         {\r
1541                 if(_parameters[0] == L"FLASH")\r
1542                         replyString = TEXT("201 VERSION OK\r\n") + flash::version() + TEXT("\r\n");\r
1543                 else if(_parameters[0] == L"TEMPLATEHOST")\r
1544                         replyString = TEXT("201 VERSION OK\r\n") + flash::cg_version() + TEXT("\r\n");\r
1545                 else if(_parameters[0] != L"SERVER")\r
1546                         replyString = TEXT("403 VERSION ERROR\r\n");\r
1547         }\r
1548 \r
1549         SetReplyString(replyString);\r
1550         return true;\r
1551 }\r
1552 \r
1553 bool ByeCommand::DoExecute()\r
1554 {\r
1555         GetClientInfo()->Disconnect();\r
1556         return true;\r
1557 }\r
1558 \r
1559 bool SetCommand::DoExecute()\r
1560 {\r
1561         try\r
1562         {\r
1563                 std::wstring name = _parameters[0];\r
1564                 std::transform(name.begin(), name.end(), name.begin(), toupper);\r
1565 \r
1566                 std::wstring value = _parameters[1];\r
1567                 std::transform(value.begin(), value.end(), value.begin(), toupper);\r
1568 \r
1569                 if(name == TEXT("MODE"))\r
1570                 {\r
1571                         auto format_desc = core::video_format_desc(value);\r
1572                         if(format_desc.format != core::video_format::invalid)\r
1573                         {\r
1574                                 GetChannel()->video_format_desc(format_desc);\r
1575                                 SetReplyString(TEXT("202 SET MODE OK\r\n"));\r
1576                         }\r
1577                         else\r
1578                                 SetReplyString(TEXT("501 SET MODE FAILED\r\n"));\r
1579                 }\r
1580                 else\r
1581                 {\r
1582                         this->SetReplyString(TEXT("403 SET ERROR\r\n"));\r
1583                 }\r
1584         }\r
1585         catch(...)\r
1586         {\r
1587                 CASPAR_LOG_CURRENT_EXCEPTION();\r
1588                 SetReplyString(TEXT("501 SET FAILED\r\n"));\r
1589                 return false;\r
1590         }\r
1591 \r
1592         return true;\r
1593 }\r
1594 \r
1595 \r
1596 }       //namespace amcp\r
1597 }}      //namespace caspar