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