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