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