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

   1 /*\r
   2 * Copyright 2013 Sveriges Television AB http://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 #include <common/utility/base64.h>\r
  40 \r
  41 #include <core/producer/frame_producer.h>\r
  42 #include <core/video_format.h>\r
  43 #include <core/producer/transition/transition_producer.h>\r
  44 #include <core/producer/channel/channel_producer.h>\r
  45 #include <core/producer/layer/layer_producer.h>\r
  46 #include <core/producer/frame/frame_transform.h>\r
  47 #include <core/producer/stage.h>\r
  48 #include <core/producer/layer.h>\r
  49 #include <core/producer/media_info/media_info.h>\r
  50 #include <core/producer/media_info/media_info_repository.h>\r
  51 #include <core/mixer/mixer.h>\r
  52 #include <core/mixer/gpu/ogl_device.h>\r
  53 #include <core/consumer/output.h>\r
  54 \r
  55 #include <modules/bluefish/bluefish.h>\r
  56 #include <modules/decklink/decklink.h>\r
  57 #include <modules/ffmpeg/ffmpeg.h>\r
  58 #include <modules/flash/flash.h>\r
  59 #include <modules/html/producer/html_producer.h>\r
  60 #include <modules/flash/util/swf.h>\r
  61 #include <modules/flash/producer/flash_producer.h>\r
  62 #include <modules/flash/producer/cg_producer.h>\r
  63 #include <modules/ffmpeg/producer/util/util.h>\r
  64 #include <modules/image/image.h>\r
  65 #include <modules/ogl/ogl.h>\r
  66 \r
  67 #include <algorithm>\r
  68 #include <locale>\r
  69 #include <fstream>\r
  70 #include <memory>\r
  71 #include <cctype>\r
  72 #include <io.h>\r
  73 \r
  74 #include <boost/date_time/posix_time/posix_time.hpp>\r
  75 #include <boost/lexical_cast.hpp>\r
  76 #include <boost/algorithm/string.hpp>\r
  77 #include <boost/filesystem.hpp>\r
  78 #include <boost/filesystem/fstream.hpp>\r
  79 #include <boost/regex.hpp>\r
  80 #include <boost/property_tree/xml_parser.hpp>\r
  81 #include <boost/locale.hpp>\r
  82 #include <boost/range/adaptor/transformed.hpp>\r
  83 #include <boost/range/algorithm/copy.hpp>\r
  84 #include <boost/archive/iterators/base64_from_binary.hpp>\r
  85 #include <boost/archive/iterators/insert_linebreaks.hpp>\r
  86 #include <boost/archive/iterators/transform_width.hpp>\r
  87 #include <boost/format.hpp>\r
  88 \r
  89 #include <tbb/concurrent_unordered_map.h>\r
  90 \r
  91 /* Return codes\r
  92 \r
  93 100 [action]                    Information om att något har hänt  \r
  94 101 [action]                    Information om att något har hänt, en rad data skickas  \r
  95 \r
  96 202 [kommando] OK               Kommandot har utförts  \r
  97 201 [kommando] OK               Kommandot har utförts, och en rad data skickas tillbaka  \r
  98 200 [kommando] OK               Kommandot har utförts, och flera rader data skickas tillbaka. Avslutas med tomrad  \r
  99 \r
 100 400 ERROR                               Kommandot kunde inte förstås  \r
 101 401 [kommando] ERROR    Ogiltig kanal  \r
 102 402 [kommando] ERROR    Parameter saknas  \r
 103 403 [kommando] ERROR    Ogiltig parameter  \r
 104 404 [kommando] ERROR    Mediafilen hittades inte  \r
 105 \r
 106 500 FAILED                              Internt configurationfel  \r
 107 501 [kommando] FAILED   Internt configurationfel  \r
 108 502 [kommando] FAILED   Oläslig mediafil  \r
 109 \r
 110 600 [kommando] FAILED   funktion ej implementerad\r
 111 */\r
 112 \r
 113 namespace caspar { namespace protocol {\r
 114 \r
 115 using namespace core;\r
 116 \r
 117 std::wstring read_file_base64(const boost::filesystem::wpath& file)\r
 118 {\r
 119         using namespace boost::archive::iterators;\r
 120 \r
 121         boost::filesystem::ifstream filestream(file, std::ios::binary);\r
 122 \r
 123         if (!filestream)\r
 124                 return L"";\r
 125 \r
 126         auto length = boost::filesystem::file_size(file);\r
 127         std::vector<char> bytes;\r
 128         bytes.resize(length);\r
 129         filestream.read(bytes.data(), length);\r
 130 \r
 131         return widen(to_base64(bytes.data(), length));\r
 132 }\r
 133 \r
 134 std::wstring read_utf8_file(const boost::filesystem::wpath& file)\r
 135 {\r
 136         std::wstringstream result;\r
 137         boost::filesystem::wifstream filestream(file);\r
 138 \r
 139         if (filestream) \r
 140         {\r
 141                 // Consume BOM first\r
 142                 filestream.get();\r
 143                 // read all data\r
 144                 result << filestream.rdbuf();\r
 145         }\r
 146 \r
 147         return result.str();\r
 148 }\r
 149 \r
 150 std::wstring read_latin1_file(const boost::filesystem::wpath& file)\r
 151 {\r
 152         boost::locale::generator gen;\r
 153         gen.locale_cache_enabled(true);\r
 154         gen.categories(boost::locale::codepage_facet);\r
 155 \r
 156         std::stringstream result_stream;\r
 157         boost::filesystem::ifstream filestream(file);\r
 158         filestream.imbue(gen("en_US.ISO8859-1"));\r
 159 \r
 160         if (filestream)\r
 161         {\r
 162                 // read all data\r
 163                 result_stream << filestream.rdbuf();\r
 164         }\r
 165 \r
 166         std::string result = result_stream.str();\r
 167         std::wstring widened_result;\r
 168 \r
 169         // The first 255 codepoints in unicode is the same as in latin1\r
 170         auto from_signed_to_signed = std::function<unsigned char(char)>(\r
 171                 [] (char c) { return static_cast<unsigned char>(c); }\r
 172         );\r
 173         boost::copy(\r
 174                 result | boost::adaptors::transformed(from_signed_to_signed),\r
 175                 std::back_inserter(widened_result));\r
 176 \r
 177         return widened_result;\r
 178 }\r
 179 \r
 180 std::wstring read_file(const boost::filesystem::wpath& file)\r
 181 {\r
 182         static const uint8_t BOM[] = {0xef, 0xbb, 0xbf};\r
 183 \r
 184         if (!boost::filesystem::exists(file))\r
 185         {\r
 186                 return L"";\r
 187         }\r
 188 \r
 189         if (boost::filesystem::file_size(file) >= 3)\r
 190         {\r
 191                 boost::filesystem::ifstream bom_stream(file);\r
 192 \r
 193                 char header[3];\r
 194                 bom_stream.read(header, 3);\r
 195                 bom_stream.close();\r
 196 \r
 197                 if (std::memcmp(BOM, header, 3) == 0)\r
 198                         return read_utf8_file(file);\r
 199         }\r
 200 \r
 201         return read_latin1_file(file);\r
 202 }\r
 203 \r
 204 std::wstring MediaInfo(const boost::filesystem::wpath& path, const std::shared_ptr<core::media_info_repository>& media_info_repo)\r
 205 {\r
 206         if(boost::filesystem::is_regular_file(path))\r
 207         {\r
 208                 std::wstring clipttype = TEXT(" N/A ");\r
 209                 std::wstring extension = boost::to_upper_copy(path.extension());\r
 210                 if(extension == TEXT(".TGA") || extension == TEXT(".COL") || extension == L".PNG" || extension == L".JPEG" || extension == L".JPG" ||\r
 211                         extension == L".GIF" || extension == L".BMP")\r
 212                 {\r
 213                         clipttype = TEXT(" STILL ");                    \r
 214                 }\r
 215                 else if(extension == TEXT(".WAV") || extension == TEXT(".MP3"))\r
 216                 {\r
 217                         clipttype = TEXT(" AUDIO ");\r
 218                 }\r
 219                 else if(extension == TEXT(".SWF") || extension == TEXT(".CT") ||\r
 220                                 extension == TEXT(".DV") || extension == TEXT(".MOV") || \r
 221                                 extension == TEXT(".MPG") || extension == TEXT(".AVI") || \r
 222                                 extension == TEXT(".MP4") || extension == TEXT(".FLV") || \r
 223                                 caspar::ffmpeg::is_valid_file(path.file_string()))\r
 224                 {\r
 225                         clipttype = TEXT(" MOVIE ");\r
 226                 }\r
 227 \r
 228                 if(clipttype != TEXT(" N/A "))\r
 229                 {               \r
 230                         auto is_not_digit = [](char c){ return std::isdigit(c) == 0; };\r
 231 \r
 232                         auto relativePath = boost::filesystem::wpath(path.file_string().substr(env::media_folder().size()-1, path.file_string().size()));\r
 233 \r
 234                         auto writeTimeStr = boost::posix_time::to_iso_string(boost::posix_time::from_time_t(boost::filesystem::last_write_time(path)));\r
 235                         writeTimeStr.erase(std::remove_if(writeTimeStr.begin(), writeTimeStr.end(), is_not_digit), writeTimeStr.end());\r
 236                         auto writeTimeWStr = std::wstring(writeTimeStr.begin(), writeTimeStr.end());\r
 237 \r
 238                         auto sizeStr = boost::lexical_cast<std::wstring>(boost::filesystem::file_size(path));\r
 239                         sizeStr.erase(std::remove_if(sizeStr.begin(), sizeStr.end(), is_not_digit), sizeStr.end());\r
 240                         auto sizeWStr = std::wstring(sizeStr.begin(), sizeStr.end());\r
 241                                 \r
 242                         auto str = relativePath.replace_extension(TEXT("")).external_file_string();\r
 243                         if(str[0] == '\\' || str[0] == '/')\r
 244                                 str = std::wstring(str.begin() + 1, str.end());\r
 245                         auto media_info = media_info_repo->get(path.file_string());\r
 246                         \r
 247                         return std::wstring() \r
 248                                         + L"\""         + str +\r
 249                                         + L"\" "        + clipttype +\r
 250                                         + L" "          + sizeStr +\r
 251                                         + L" "          + writeTimeWStr +\r
 252                                         + L" "          + boost::lexical_cast<std::wstring>(media_info.duration) +\r
 253                                         + L" "          + boost::lexical_cast<std::wstring>(media_info.time_base.numerator()) + L"/" + boost::lexical_cast<std::wstring>(media_info.time_base.denominator())\r
 254                                         + L"\r\n";      \r
 255                 }       \r
 256         }\r
 257         return L"";\r
 258 }\r
 259 \r
 260 std::wstring ListMedia(const std::shared_ptr<core::media_info_repository>& media_info_repo)\r
 261 {               \r
 262         std::wstringstream replyString;\r
 263         for (boost::filesystem::wrecursive_directory_iterator itr(env::media_folder()), end; itr != end; ++itr) \r
 264                 replyString << MediaInfo(itr->path(), media_info_repo);\r
 265         \r
 266         return boost::to_upper_copy(replyString.str());\r
 267 }\r
 268 \r
 269 std::wstring ListTemplates() \r
 270 {\r
 271         std::wstringstream replyString;\r
 272 \r
 273         for (boost::filesystem::wrecursive_directory_iterator itr(env::template_folder()), end; itr != end; ++itr)\r
 274         {               \r
 275                 if(boost::filesystem::is_regular_file(itr->path()) && (itr->path().extension() == L".ft" || itr->path().extension() == L".ct" || itr->path().extension() == L".html"))\r
 276                 {\r
 277                         auto relativePath = boost::filesystem::wpath(itr->path().file_string().substr(env::template_folder().size()-1, itr->path().file_string().size()));\r
 278 \r
 279                         auto writeTimeStr = boost::posix_time::to_iso_string(boost::posix_time::from_time_t(boost::filesystem::last_write_time(itr->path())));\r
 280                         writeTimeStr.erase(std::remove_if(writeTimeStr.begin(), writeTimeStr.end(), [](char c){ return std::isdigit(c) == 0;}), writeTimeStr.end());\r
 281                         auto writeTimeWStr = std::wstring(writeTimeStr.begin(), writeTimeStr.end());\r
 282 \r
 283                         auto sizeStr = boost::lexical_cast<std::string>(boost::filesystem::file_size(itr->path()));\r
 284                         sizeStr.erase(std::remove_if(sizeStr.begin(), sizeStr.end(), [](char c){ return std::isdigit(c) == 0;}), sizeStr.end());\r
 285 \r
 286                         auto sizeWStr = std::wstring(sizeStr.begin(), sizeStr.end());\r
 287 \r
 288                         std::wstring dir = relativePath.parent_path().external_directory_string();\r
 289                         std::wstring file = boost::to_upper_copy(relativePath.filename());\r
 290                         relativePath = boost::filesystem::wpath(dir + L"/" + file);\r
 291                                                 \r
 292                         auto str = relativePath.replace_extension(TEXT("")).external_file_string();\r
 293                         boost::trim_if(str, boost::is_any_of("\\/"));\r
 294 \r
 295                         replyString << TEXT("\"") << str\r
 296                                                 << TEXT("\" ") << sizeWStr\r
 297                                                 << TEXT(" ") << writeTimeWStr\r
 298                                                 << TEXT("\r\n");                \r
 299                 }\r
 300         }\r
 301         return replyString.str();\r
 302 }\r
 303 \r
 304 namespace amcp {\r
 305         \r
 306 AMCPCommand::AMCPCommand() : channelIndex_(0), scheduling_(Default), layerIndex_(-1)\r
 307 {}\r
 308 \r
 309 void AMCPCommand::SendReply()\r
 310 {\r
 311         if(!pClientInfo_) \r
 312                 return;\r
 313 \r
 314         if(replyString_.empty())\r
 315                 return;\r
 316         pClientInfo_->Send(replyString_);\r
 317 }\r
 318 \r
 319 void AMCPCommand::Clear() \r
 320 {\r
 321         pChannel_->stage()->clear();\r
 322         pClientInfo_.reset();\r
 323         channelIndex_ = 0;\r
 324         _parameters.clear();\r
 325 }\r
 326 \r
 327 bool DiagnosticsCommand::DoExecute()\r
 328 {       \r
 329         try\r
 330         {\r
 331                 diagnostics::show_graphs(true);\r
 332 \r
 333                 SetReplyString(TEXT("202 DIAG OK\r\n"));\r
 334 \r
 335                 return true;\r
 336         }\r
 337         catch(...)\r
 338         {\r
 339                 CASPAR_LOG_CURRENT_EXCEPTION();\r
 340                 SetReplyString(TEXT("502 DIAG FAILED\r\n"));\r
 341                 return false;\r
 342         }\r
 343 }\r
 344 \r
 345 bool ChannelGridCommand::DoExecute()\r
 346 {\r
 347         int index = 1;\r
 348         auto self = GetChannels().back();\r
 349         \r
 350         core::parameters params;\r
 351         params.push_back(L"SCREEN");\r
 352         params.push_back(L"NAME");\r
 353         params.push_back(L"Channel Grid Window");\r
 354         auto screen = create_consumer(params);\r
 355 \r
 356         self->output()->add(screen);\r
 357 \r
 358         BOOST_FOREACH(auto channel, GetChannels())\r
 359         {\r
 360                 if(channel != self)\r
 361                 {\r
 362                         auto producer = create_channel_producer(self->mixer(), channel);                \r
 363                         self->stage()->load(index, producer, false);\r
 364                         self->stage()->play(index);\r
 365                         index++;\r
 366                 }\r
 367         }\r
 368 \r
 369         int n = GetChannels().size()-1;\r
 370         double delta = 1.0/static_cast<double>(n);\r
 371         for(int x = 0; x < n; ++x)\r
 372         {\r
 373                 for(int y = 0; y < n; ++y)\r
 374                 {\r
 375                         int index = x+y*n+1;\r
 376                         auto transform = [=](frame_transform transform) -> frame_transform\r
 377                         {               \r
 378                                 transform.fill_translation[0]   = x*delta;\r
 379                                 transform.fill_translation[1]   = y*delta;\r
 380                                 transform.fill_scale[0]                 = delta;\r
 381                                 transform.fill_scale[1]                 = delta;\r
 382                                 transform.clip_translation[0]   = x*delta;\r
 383                                 transform.clip_translation[1]   = y*delta;\r
 384                                 transform.clip_scale[0]                 = delta;\r
 385                                 transform.clip_scale[1]                 = delta;                        \r
 386                                 return transform;\r
 387                         };\r
 388                         self->stage()->apply_transform(index, transform);\r
 389                 }\r
 390         }\r
 391 \r
 392         return true;\r
 393 }\r
 394 \r
 395 bool CallCommand::DoExecute()\r
 396 {       \r
 397         //Perform loading of the clip\r
 398         try\r
 399         {\r
 400                 auto what = _parameters.at(0);\r
 401                                 \r
 402                 boost::unique_future<std::wstring> result;\r
 403                 auto& params_orig = _parameters.get_original();\r
 404                 if(what == L"B" || what == L"F")\r
 405                 {\r
 406                         std::wstring param;\r
 407                         for(auto it = std::begin(params_orig)+1; it != std::end(params_orig); ++it, param += L" ")\r
 408                                 param += *it;\r
 409                         result = GetChannel()->stage()->call(GetLayerIndex(), what == L"F", boost::trim_copy(param));\r
 410                 }\r
 411                 else\r
 412                 {\r
 413                         std::wstring param;\r
 414                         for(auto it = std::begin(params_orig); it != std::end(params_orig); ++it, param += L" ")\r
 415                                 param += *it;\r
 416                         result = GetChannel()->stage()->call(GetLayerIndex(), true, boost::trim_copy(param));\r
 417                 }\r
 418 \r
 419                 if(!result.timed_wait(boost::posix_time::seconds(2)))\r
 420                         BOOST_THROW_EXCEPTION(timed_out());\r
 421                                 \r
 422                 std::wstringstream replyString;\r
 423                 if(result.get().empty())\r
 424                         replyString << TEXT("202 CALL OK\r\n");\r
 425                 else\r
 426                         replyString << TEXT("201 CALL OK\r\n") << result.get() << L"\r\n";\r
 427                 \r
 428                 SetReplyString(replyString.str());\r
 429 \r
 430                 return true;\r
 431         }\r
 432         catch(...)\r
 433         {\r
 434                 CASPAR_LOG_CURRENT_EXCEPTION();\r
 435                 SetReplyString(TEXT("502 CALL FAILED\r\n"));\r
 436                 return false;\r
 437         }\r
 438 }\r
 439 \r
 440 // UGLY HACK\r
 441 tbb::concurrent_unordered_map<int, std::vector<stage::transform_tuple_t>> deferred_transforms;\r
 442 \r
 443 core::frame_transform MixerCommand::get_current_transform()\r
 444 {\r
 445         return GetChannel()->stage()->get_current_transform(GetLayerIndex());\r
 446 }\r
 447 \r
 448 bool MixerCommand::DoExecute()\r
 449 {\r
 450         using boost::lexical_cast;\r
 451         //Perform loading of the clip\r
 452         try\r
 453         {       \r
 454                 bool defer = _parameters.back() == L"DEFER";\r
 455                 if(defer)\r
 456                         _parameters.pop_back();\r
 457 \r
 458                 std::vector<stage::transform_tuple_t> transforms;\r
 459 \r
 460                 if(_parameters[0] == L"KEYER" || _parameters[0] == L"IS_KEY")\r
 461                 {\r
 462                         if (_parameters.size() == 1)\r
 463                                 return reply_value([](const frame_transform& t) { return t.is_key ? 1 : 0; });\r
 464 \r
 465                         bool value = boost::lexical_cast<int>(_parameters.at(1));\r
 466                         transforms.push_back(stage::transform_tuple_t(GetLayerIndex(), [=](frame_transform transform) -> frame_transform\r
 467                         {\r
 468                                 transform.is_key = value;\r
 469                                 return transform;                                       \r
 470                         }, 0, L"linear"));\r
 471                 }\r
 472                 else if(_parameters[0] == L"OPACITY")\r
 473                 {\r
 474                         if (_parameters.size() == 1)\r
 475                                 return reply_value([](const frame_transform& t) { return t.opacity; });\r
 476 \r
 477                         int duration = _parameters.size() > 2 ? boost::lexical_cast<int>(_parameters[2]) : 0;\r
 478                         std::wstring tween = _parameters.size() > 3 ? _parameters[3] : L"linear";\r
 479 \r
 480                         double value = boost::lexical_cast<double>(_parameters.at(1));\r
 481                         \r
 482                         transforms.push_back(stage::transform_tuple_t(GetLayerIndex(), [=](frame_transform transform) -> frame_transform\r
 483                         {\r
 484                                 transform.opacity = value;\r
 485                                 return transform;                                       \r
 486                         }, duration, tween));\r
 487                 }\r
 488                 else if(_parameters[0] == L"FILL" || _parameters[0] == L"FILL_RECT")\r
 489                 {\r
 490                         if (_parameters.size() == 1)\r
 491                         {\r
 492                                 auto transform = get_current_transform();\r
 493                                 auto translation = transform.fill_translation;\r
 494                                 auto scale = transform.fill_scale;\r
 495                                 SetReplyString(\r
 496                                                 L"201 MIXER OK\r\n" \r
 497                                                 + lexical_cast<std::wstring>(translation[0]) + L" "\r
 498                                                 + lexical_cast<std::wstring>(translation[1]) + L" "\r
 499                                                 + lexical_cast<std::wstring>(scale[0]) + L" "\r
 500                                                 + lexical_cast<std::wstring>(scale[1]) + L"\r\n");\r
 501                                 return true;\r
 502                         }\r
 503 \r
 504                         int duration = _parameters.size() > 5 ? boost::lexical_cast<int>(_parameters[5]) : 0;\r
 505                         std::wstring tween = _parameters.size() > 6 ? _parameters[6] : L"linear";\r
 506                         double x        = boost::lexical_cast<double>(_parameters.at(1));\r
 507                         double y        = boost::lexical_cast<double>(_parameters.at(2));\r
 508                         double x_s      = boost::lexical_cast<double>(_parameters.at(3));\r
 509                         double y_s      = boost::lexical_cast<double>(_parameters.at(4));\r
 510 \r
 511                         transforms.push_back(stage::transform_tuple_t(GetLayerIndex(), [=](frame_transform transform) mutable -> frame_transform\r
 512                         {\r
 513                                 transform.fill_translation[0]   = x;\r
 514                                 transform.fill_translation[1]   = y;\r
 515                                 transform.fill_scale[0]                 = x_s;\r
 516                                 transform.fill_scale[1]                 = y_s;\r
 517                                 return transform;\r
 518                         }, duration, tween));\r
 519                 }\r
 520                 else if(_parameters[0] == L"CLIP" || _parameters[0] == L"CLIP_RECT")\r
 521                 {\r
 522                         if (_parameters.size() == 1)\r
 523                         {\r
 524                                 auto transform = get_current_transform();\r
 525                                 auto translation = transform.clip_translation;\r
 526                                 auto scale = transform.clip_scale;\r
 527                                 SetReplyString(\r
 528                                                 L"201 MIXER OK\r\n" \r
 529                                                 + lexical_cast<std::wstring>(translation[0]) + L" "\r
 530                                                 + lexical_cast<std::wstring>(translation[1]) + L" "\r
 531                                                 + lexical_cast<std::wstring>(scale[0]) + L" "\r
 532                                                 + lexical_cast<std::wstring>(scale[1]) + L"\r\n");\r
 533                                 return true;\r
 534                         }\r
 535 \r
 536                         int duration = _parameters.size() > 5 ? boost::lexical_cast<int>(_parameters[5]) : 0;\r
 537                         std::wstring tween = _parameters.size() > 6 ? _parameters[6] : L"linear";\r
 538                         double x        = boost::lexical_cast<double>(_parameters.at(1));\r
 539                         double y        = boost::lexical_cast<double>(_parameters.at(2));\r
 540                         double x_s      = boost::lexical_cast<double>(_parameters.at(3));\r
 541                         double y_s      = boost::lexical_cast<double>(_parameters.at(4));\r
 542                         if(x_s < 0 || y_s < 0)\r
 543                         {\r
 544                                 SetReplyString(L"403 MIXER ERROR\r\n");\r
 545                                 return false;\r
 546                         }\r
 547 \r
 548                         transforms.push_back(stage::transform_tuple_t(GetLayerIndex(), [=](frame_transform transform) -> frame_transform\r
 549                         {\r
 550                                 transform.clip_translation[0]   = x;\r
 551                                 transform.clip_translation[1]   = y;\r
 552                                 transform.clip_scale[0]                 = x_s;\r
 553                                 transform.clip_scale[1]                 = y_s;\r
 554                                 return transform;\r
 555                         }, duration, tween));\r
 556                 }\r
 557                 else if(_parameters[0] == L"GRID")\r
 558                 {\r
 559                         int duration = _parameters.size() > 2 ? boost::lexical_cast<int>(_parameters[2]) : 0;\r
 560                         std::wstring tween = _parameters.size() > 3 ? _parameters[3] : L"linear";\r
 561                         int n = boost::lexical_cast<int>(_parameters.at(1));\r
 562                         double delta = 1.0/static_cast<double>(n);\r
 563                         for(int x = 0; x < n; ++x)\r
 564                         {\r
 565                                 for(int y = 0; y < n; ++y)\r
 566                                 {\r
 567                                         int index = x+y*n+1;\r
 568                                         transforms.push_back(stage::transform_tuple_t(index, [=](frame_transform transform) -> frame_transform\r
 569                                         {               \r
 570                                                 transform.fill_translation[0]   = x*delta;\r
 571                                                 transform.fill_translation[1]   = y*delta;\r
 572                                                 transform.fill_scale[0]                 = delta;\r
 573                                                 transform.fill_scale[1]                 = delta;\r
 574                                                 transform.clip_translation[0]   = x*delta;\r
 575                                                 transform.clip_translation[1]   = y*delta;\r
 576                                                 transform.clip_scale[0]                 = delta;\r
 577                                                 transform.clip_scale[1]                 = delta;                        \r
 578                                                 return transform;\r
 579                                         }, duration, tween));\r
 580                                 }\r
 581                         }\r
 582                 }\r
 583                 else if(_parameters[0] == L"BLEND")\r
 584                 {\r
 585                         if (_parameters.size() == 1)\r
 586                         {\r
 587                                 auto blend_mode = GetChannel()->mixer()->get_blend_mode(GetLayerIndex());\r
 588                                 SetReplyString(L"201 MIXER OK\r\n" \r
 589                                         + lexical_cast<std::wstring>(get_blend_mode(blend_mode)) \r
 590                                         + L"\r\n");\r
 591                                 return true;\r
 592                         }\r
 593 \r
 594                         auto blend_str = _parameters.at(1);                                                             \r
 595                         int layer = GetLayerIndex();\r
 596                         blend_mode::type blend = get_blend_mode(blend_str);\r
 597                         GetChannel()->mixer()->set_blend_mode(GetLayerIndex(), blend);  \r
 598                 }\r
 599         else if(_parameters[0] == L"CHROMA")\r
 600         {\r
 601                         if (_parameters.size() == 1)\r
 602                         {\r
 603                                 auto chroma = GetChannel()->mixer()->get_chroma(GetLayerIndex());\r
 604                                 SetReplyString(L"201 MIXER OK\r\n" \r
 605                                         + get_chroma_mode(chroma.key)\r
 606                                         + (chroma.key == chroma::none\r
 607                                                 ? L""\r
 608                                                 : L" "\r
 609                                                 + lexical_cast<std::wstring>(chroma.threshold) + L" "\r
 610                                                 + lexical_cast<std::wstring>(chroma.softness))\r
 611                                         + L"\r\n");\r
 612                                         // Add the rest when they are actually used and documented\r
 613                                 return true;\r
 614                         }\r
 615 \r
 616                         int layer = GetLayerIndex();\r
 617             chroma chroma;\r
 618             chroma.key = get_chroma_mode(_parameters[1]);\r
 619 \r
 620                         if (chroma.key != chroma::none)\r
 621                         {\r
 622                                 chroma.threshold    = boost::lexical_cast<double>(_parameters[2]);\r
 623                                 chroma.softness     = boost::lexical_cast<double>(_parameters[3]);\r
 624                                 chroma.spill        = _parameters.size() > 4 ? boost::lexical_cast<double>(_parameters[4]) : 0.0f;\r
 625                                 chroma.blur         = _parameters.size() > 5 ? boost::lexical_cast<double>(_parameters[5]) : 0.0f;\r
 626                                 chroma.show_mask    = _parameters.size() > 6 ? bool(boost::lexical_cast<int>(_parameters[6])) : false;\r
 627                         }\r
 628 \r
 629             GetChannel()->mixer()->set_chroma(GetLayerIndex(), chroma);\r
 630         }\r
 631                 else if(_parameters[0] == L"MASTERVOLUME")\r
 632                 {\r
 633                         if (_parameters.size() == 1)\r
 634                         {\r
 635                                 auto volume = GetChannel()->mixer()->get_master_volume();\r
 636                                 SetReplyString(L"201 MIXER OK\r\n" \r
 637                                         + lexical_cast<std::wstring>(volume) + L"\r\n");\r
 638                                 return true;\r
 639                         }\r
 640 \r
 641                         float master_volume = boost::lexical_cast<float>(_parameters.at(1));\r
 642                         GetChannel()->mixer()->set_master_volume(master_volume);\r
 643                 }\r
 644                 else if(_parameters[0] == L"BRIGHTNESS")\r
 645                 {\r
 646                         if (_parameters.size() == 1)\r
 647                                 return reply_value([](const frame_transform& t) { return t.brightness; });\r
 648 \r
 649                         auto value = boost::lexical_cast<double>(_parameters.at(1));\r
 650                         int duration = _parameters.size() > 2 ? boost::lexical_cast<int>(_parameters[2]) : 0;\r
 651                         std::wstring tween = _parameters.size() > 3 ? _parameters[3] : L"linear";\r
 652                         transforms.push_back(stage::transform_tuple_t(GetLayerIndex(), [=](frame_transform transform) -> frame_transform\r
 653                         {\r
 654                                 transform.brightness = value;\r
 655                                 return transform;\r
 656                         }, duration, tween));\r
 657                 }\r
 658                 else if(_parameters[0] == L"SATURATION")\r
 659                 {\r
 660                         if (_parameters.size() == 1)\r
 661                                 return reply_value([](const frame_transform& t) { return t.saturation; });\r
 662 \r
 663                         auto value = boost::lexical_cast<double>(_parameters.at(1));\r
 664                         int duration = _parameters.size() > 2 ? boost::lexical_cast<int>(_parameters[2]) : 0;\r
 665                         std::wstring tween = _parameters.size() > 3 ? _parameters[3] : L"linear";\r
 666                         transforms.push_back(stage::transform_tuple_t(GetLayerIndex(), [=](frame_transform transform) -> frame_transform\r
 667                         {\r
 668                                 transform.saturation = value;\r
 669                                 return transform;\r
 670                         }, duration, tween));   \r
 671                 }\r
 672                 else if(_parameters[0] == L"CONTRAST")\r
 673                 {\r
 674                         if (_parameters.size() == 1)\r
 675                                 return reply_value([](const frame_transform& t) { return t.contrast; });\r
 676 \r
 677                         auto value = boost::lexical_cast<double>(_parameters.at(1));\r
 678                         int duration = _parameters.size() > 2 ? boost::lexical_cast<int>(_parameters[2]) : 0;\r
 679                         std::wstring tween = _parameters.size() > 3 ? _parameters[3] : L"linear";\r
 680                         transforms.push_back(stage::transform_tuple_t(GetLayerIndex(), [=](frame_transform transform) -> frame_transform\r
 681                         {\r
 682                                 transform.contrast = value;\r
 683                                 return transform;\r
 684                         }, duration, tween));   \r
 685                 }\r
 686                 else if(_parameters[0] == L"LEVELS")\r
 687                 {\r
 688                         if (_parameters.size() == 1)\r
 689                         {\r
 690                                 auto levels = get_current_transform().levels;\r
 691                                 SetReplyString(L"201 MIXER OK\r\n"\r
 692                                         + lexical_cast<std::wstring>(levels.min_input) + L" "\r
 693                                         + lexical_cast<std::wstring>(levels.max_input) + L" "\r
 694                                         + lexical_cast<std::wstring>(levels.gamma) + L" "\r
 695                                         + lexical_cast<std::wstring>(levels.min_output) + L" "\r
 696                                         + lexical_cast<std::wstring>(levels.max_output) + L"\r\n");\r
 697                                 return true;\r
 698                         }\r
 699 \r
 700                         levels value;\r
 701                         value.min_input  = boost::lexical_cast<double>(_parameters.at(1));\r
 702                         value.max_input  = boost::lexical_cast<double>(_parameters.at(2));\r
 703                         value.gamma              = boost::lexical_cast<double>(_parameters.at(3));\r
 704                         value.min_output = boost::lexical_cast<double>(_parameters.at(4));\r
 705                         value.max_output = boost::lexical_cast<double>(_parameters.at(5));\r
 706                         int duration = _parameters.size() > 6 ? boost::lexical_cast<int>(_parameters[6]) : 0;\r
 707                         std::wstring tween = _parameters.size() > 7 ? _parameters[7] : L"linear";\r
 708 \r
 709                         transforms.push_back(stage::transform_tuple_t(GetLayerIndex(), [=](frame_transform transform) -> frame_transform\r
 710                         {\r
 711                                 transform.levels = value;\r
 712                                 return transform;\r
 713                         }, duration, tween));\r
 714                 }\r
 715                 else if(_parameters[0] == L"STRAIGHT_ALPHA_OUTPUT")\r
 716                 {\r
 717                         if (_parameters.size() == 1)\r
 718                         {\r
 719                                 SetReplyString(L"201 MIXER OK\r\n"\r
 720                                         + lexical_cast<std::wstring>(\r
 721                                                         GetChannel()->mixer()->get_straight_alpha_output())\r
 722                                         + L"\r\n");\r
 723                                 return true;\r
 724                         }\r
 725 \r
 726                         bool value = boost::lexical_cast<bool>(_parameters[1]);\r
 727                         GetChannel()->mixer()->set_straight_alpha_output(value);\r
 728                 }\r
 729                 else if(_parameters[0] == L"VOLUME")\r
 730                 {\r
 731                         if (_parameters.size() == 1)\r
 732                                 return reply_value([](const frame_transform& t) { return t.volume; });\r
 733 \r
 734                         int duration = _parameters.size() > 2 ? boost::lexical_cast<int>(_parameters[2]) : 0;\r
 735                         std::wstring tween = _parameters.size() > 3 ? _parameters[3] : L"linear";\r
 736                         double value = boost::lexical_cast<double>(_parameters[1]);\r
 737 \r
 738                         transforms.push_back(stage::transform_tuple_t(GetLayerIndex(), [=](frame_transform transform) -> frame_transform\r
 739                         {\r
 740                                 transform.volume = value;\r
 741                                 return transform;\r
 742                         }, duration, tween));\r
 743                 }\r
 744                 else if(_parameters[0] == L"CLEAR")\r
 745                 {\r
 746                         int layer = GetLayerIndex(std::numeric_limits<int>::max());\r
 747                         if (layer == std::numeric_limits<int>::max())\r
 748                         {\r
 749                                 GetChannel()->stage()->clear_transforms();\r
 750                                 GetChannel()->mixer()->clear_blend_modes();\r
 751                         }\r
 752                         else\r
 753                         {\r
 754                                 GetChannel()->stage()->clear_transforms(layer);\r
 755                                 GetChannel()->mixer()->clear_blend_mode(layer);\r
 756                         }\r
 757                 }\r
 758                 else if(_parameters[0] == L"COMMIT")\r
 759                 {\r
 760                         transforms = std::move(deferred_transforms[GetChannelIndex()]);\r
 761                 }\r
 762                 else\r
 763                 {\r
 764                         SetReplyString(TEXT("404 MIXER ERROR\r\n"));\r
 765                         return false;\r
 766                 }\r
 767 \r
 768                 if(defer)\r
 769                 {\r
 770                         auto& defer_tranforms = deferred_transforms[GetChannelIndex()];\r
 771                         defer_tranforms.insert(defer_tranforms.end(), transforms.begin(), transforms.end());\r
 772                 }\r
 773                 else\r
 774                         GetChannel()->stage()->apply_transforms(transforms);\r
 775         \r
 776                 SetReplyString(TEXT("202 MIXER OK\r\n"));\r
 777 \r
 778                 return true;\r
 779         }\r
 780         catch(file_not_found&)\r
 781         {\r
 782                 CASPAR_LOG_CURRENT_EXCEPTION();\r
 783                 SetReplyString(TEXT("404 MIXER ERROR\r\n"));\r
 784                 return false;\r
 785         }\r
 786         catch(...)\r
 787         {\r
 788                 CASPAR_LOG_CURRENT_EXCEPTION();\r
 789                 SetReplyString(TEXT("502 MIXER FAILED\r\n"));\r
 790                 return false;\r
 791         }\r
 792 }\r
 793 \r
 794 bool SwapCommand::DoExecute()\r
 795 {       \r
 796         //Perform loading of the clip\r
 797         try\r
 798         {\r
 799                 if(GetLayerIndex(-1) != -1)\r
 800                 {\r
 801                         std::vector<std::string> strs;\r
 802                         boost::split(strs, _parameters[0], boost::is_any_of("-"));\r
 803                         \r
 804                         auto ch1 = GetChannel();\r
 805                         auto ch2 = GetChannels().at(boost::lexical_cast<int>(strs.at(0))-1);\r
 806 \r
 807                         int l1 = GetLayerIndex();\r
 808                         int l2 = boost::lexical_cast<int>(strs.at(1));\r
 809 \r
 810                         ch1->stage()->swap_layer(l1, l2, ch2->stage());\r
 811                 }\r
 812                 else\r
 813                 {\r
 814                         auto ch1 = GetChannel();\r
 815                         auto ch2 = GetChannels().at(boost::lexical_cast<int>(_parameters[0])-1);\r
 816                         ch1->stage()->swap_layers(ch2->stage());\r
 817                 }\r
 818                 \r
 819                 SetReplyString(TEXT("202 SWAP OK\r\n"));\r
 820 \r
 821                 return true;\r
 822         }\r
 823         catch(file_not_found&)\r
 824         {\r
 825                 CASPAR_LOG_CURRENT_EXCEPTION();\r
 826                 SetReplyString(TEXT("404 SWAP ERROR\r\n"));\r
 827                 return false;\r
 828         }\r
 829         catch(...)\r
 830         {\r
 831                 CASPAR_LOG_CURRENT_EXCEPTION();\r
 832                 SetReplyString(TEXT("502 SWAP FAILED\r\n"));\r
 833                 return false;\r
 834         }\r
 835 }\r
 836 \r
 837 bool AddCommand::DoExecute()\r
 838 {       \r
 839         //Perform loading of the clip\r
 840         try\r
 841         {\r
 842                 auto consumer = create_consumer(_parameters);\r
 843                 GetChannel()->output()->add(GetLayerIndex(consumer->index()), consumer);\r
 844         \r
 845                 SetReplyString(TEXT("202 ADD OK\r\n"));\r
 846 \r
 847                 return true;\r
 848         }\r
 849         catch(file_not_found&)\r
 850         {\r
 851                 CASPAR_LOG_CURRENT_EXCEPTION();\r
 852                 SetReplyString(TEXT("404 ADD ERROR\r\n"));\r
 853                 return false;\r
 854         }\r
 855         catch(...)\r
 856         {\r
 857                 CASPAR_LOG_CURRENT_EXCEPTION();\r
 858                 SetReplyString(TEXT("502 ADD FAILED\r\n"));\r
 859                 return false;\r
 860         }\r
 861 }\r
 862 \r
 863 bool RemoveCommand::DoExecute()\r
 864 {       \r
 865         //Perform loading of the clip\r
 866         try\r
 867         {\r
 868                 auto index = GetLayerIndex(std::numeric_limits<int>::min());\r
 869                 if(index == std::numeric_limits<int>::min())\r
 870                         index = create_consumer(_parameters)->index();\r
 871 \r
 872                 GetChannel()->output()->remove(index);\r
 873 \r
 874                 SetReplyString(TEXT("202 REMOVE OK\r\n"));\r
 875 \r
 876                 return true;\r
 877         }\r
 878         catch(file_not_found&)\r
 879         {\r
 880                 CASPAR_LOG_CURRENT_EXCEPTION();\r
 881                 SetReplyString(TEXT("404 REMOVE ERROR\r\n"));\r
 882                 return false;\r
 883         }\r
 884         catch(...)\r
 885         {\r
 886                 CASPAR_LOG_CURRENT_EXCEPTION();\r
 887                 SetReplyString(TEXT("502 REMOVE FAILED\r\n"));\r
 888                 return false;\r
 889         }\r
 890 }\r
 891 \r
 892 safe_ptr<core::frame_producer> RouteCommand::TryCreateProducer(AMCPCommand& command, std::wstring const& uri)\r
 893 {\r
 894         safe_ptr<core::frame_producer> pFP(frame_producer::empty());\r
 895 \r
 896         auto tokens = core::parameters::protocol_split(uri);\r
 897         auto src_channel_layer_token = tokens[0] == L"route" ? tokens[1] : uri;\r
 898         std::vector<std::wstring> src_channel_layer;\r
 899         boost::split(src_channel_layer, src_channel_layer_token, boost::is_any_of("-"));\r
 900         bool is_channel_layer_spec = src_channel_layer.size() == 2;\r
 901         bool is_channel_spec = src_channel_layer.size() == 1;\r
 902         int src_channel_index;\r
 903 \r
 904         if (is_channel_layer_spec || is_channel_spec)\r
 905         {\r
 906                 try\r
 907                 {\r
 908                         src_channel_index = boost::lexical_cast<int>(src_channel_layer[0]);\r
 909                 }\r
 910                 catch(const boost::bad_lexical_cast&)\r
 911                 {\r
 912                         is_channel_layer_spec = false;\r
 913                         is_channel_spec = false;\r
 914                 }\r
 915         }\r
 916 \r
 917         int src_layer_index = -1;\r
 918 \r
 919         if (is_channel_layer_spec)\r
 920         {\r
 921                 if (!src_channel_layer[1].empty())\r
 922                 {\r
 923                         try\r
 924                         {\r
 925                                 src_layer_index = boost::lexical_cast<int>(src_channel_layer[1]);\r
 926                         }\r
 927                         catch(const boost::bad_lexical_cast&)\r
 928                         {\r
 929                                 is_channel_layer_spec = false;\r
 930                         }\r
 931                 }\r
 932                 else\r
 933                         is_channel_layer_spec = false;\r
 934         }\r
 935 \r
 936         if (tokens[0] == L"route" || is_channel_layer_spec || is_channel_spec) // It looks like a route\r
 937         {\r
 938                 // Find the source channel\r
 939                 auto channels = command.GetChannels();\r
 940                 auto src_channel = std::find_if(\r
 941                         channels.begin(), \r
 942                         channels.end(), \r
 943                         [src_channel_index](const safe_ptr<core::video_channel>& item) { return item->index() == src_channel_index; }\r
 944                 );\r
 945                 if (src_channel == channels.end())\r
 946                         BOOST_THROW_EXCEPTION(null_argument() << msg_info("src channel not found"));\r
 947 \r
 948                 // Find the source layer (if one is given)\r
 949                 if (is_channel_layer_spec)\r
 950                         pFP = create_layer_producer(command.GetChannel()->mixer(), (*src_channel)->stage(), src_layer_index);\r
 951                 else \r
 952                         pFP = create_channel_producer(command.GetChannel()->mixer(), *src_channel);\r
 953         }\r
 954         return pFP;\r
 955 }\r
 956 \r
 957 bool RouteCommand::DoExecute()\r
 958 {       \r
 959         try\r
 960         {\r
 961                 auto pFP = RouteCommand::TryCreateProducer(\r
 962                                 *this, _parameters.at_original(0));\r
 963 \r
 964                 if (pFP != frame_producer::empty())\r
 965                 {\r
 966                         GetChannel()->stage()->load(GetLayerIndex(), pFP, true);\r
 967                         GetChannel()->stage()->play(GetLayerIndex());\r
 968 \r
 969                         SetReplyString(TEXT("202 ROUTE OK\r\n"));\r
 970                 \r
 971                         return true;\r
 972                 }\r
 973                 SetReplyString(TEXT("404 ROUTE ERROR\r\n"));\r
 974                 return false;\r
 975         }\r
 976         catch(file_not_found&)\r
 977         {\r
 978                 CASPAR_LOG_CURRENT_EXCEPTION();\r
 979                 SetReplyString(TEXT("404 ROUTE ERROR\r\n"));\r
 980                 return false;\r
 981         }\r
 982         catch(...)\r
 983         {\r
 984                 CASPAR_LOG_CURRENT_EXCEPTION();\r
 985                 SetReplyString(TEXT("502 ROUTE FAILED\r\n"));\r
 986                 return false;\r
 987         }\r
 988 }\r
 989 \r
 990 bool LoadCommand::DoExecute()\r
 991 {       \r
 992         //Perform loading of the clip\r
 993         try\r
 994         {\r
 995                 auto uri_tokens = parameters::protocol_split(_parameters.at_original(0));\r
 996                 auto pFP = frame_producer::empty();\r
 997                 if (uri_tokens[0] == L"route")\r
 998                 {\r
 999                         pFP = RouteCommand::TryCreateProducer(*this, _parameters.at_original(0));\r
1000                 }\r
1001                 if (pFP == frame_producer::empty())\r
1002                 {\r
1003                         pFP = create_producer(GetChannel()->mixer(), _parameters);\r
1004                 }\r
1005                 GetChannel()->stage()->load(GetLayerIndex(), pFP, true);\r
1006         \r
1007                 SetReplyString(TEXT("202 LOAD OK\r\n"));\r
1008 \r
1009                 return true;\r
1010         }\r
1011         catch(file_not_found&)\r
1012         {\r
1013                 CASPAR_LOG_CURRENT_EXCEPTION();\r
1014                 SetReplyString(TEXT("404 LOAD ERROR\r\n"));\r
1015                 return false;\r
1016         }\r
1017         catch(...)\r
1018         {\r
1019                 CASPAR_LOG_CURRENT_EXCEPTION();\r
1020                 SetReplyString(TEXT("502 LOAD FAILED\r\n"));\r
1021                 return false;\r
1022         }\r
1023 }\r
1024 \r
1025 \r
1026 \r
1027 //std::function<std::wstring()> channel_cg_add_command::parse(const std::wstring& message, const std::vector<renderer::render_device_ptr>& channels)\r
1028 //{\r
1029 //      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
1030 //\r
1031 //      boost::wsmatch what;\r
1032 //      if(!boost::regex_match(message, what, expr))\r
1033 //              return nullptr;\r
1034 //\r
1035 //      auto info = channel_info::parse(what, channels);\r
1036 //\r
1037 //      int flash_layer_index = boost::lexical_cast<int>(what["FLASH_LAYER"].str());\r
1038 //\r
1039 //      std::wstring templatename = what["TEMPLATE"].str();\r
1040 //      bool play_on_load = what["PLAY_ON_LOAD"].matched ? what["PLAY_ON_LOAD"].str() != L"0" : 0;\r
1041 //      std::wstring start_label = what["START_LABEL"].str();   \r
1042 //      std::wstring data = get_data(what["DATA"].str());\r
1043 //      \r
1044 //      boost::replace_all(templatename, "\"", "");\r
1045 //\r
1046 //      return [=]() -> std::wstring\r
1047 //      {       \r
1048 //              std::wstring fullFilename = flash::flash_producer::find_template(server::template_folder() + templatename);\r
1049 //              if(fullFilename.empty())\r
1050 //                      BOOST_THROW_EXCEPTION(file_not_found());\r
1051 //      \r
1052 //              std::wstring extension = boost::filesystem::wpath(fullFilename).extension();\r
1053 //              std::wstring filename = templatename;\r
1054 //              filename.append(extension);\r
1055 //\r
1056 //              flash::flash::get_default_cg_producer(info.video_channel, std::max<int>(DEFAULT_CHANNEL_LAYER+1, info.layer_index))\r
1057 //                      ->add(flash_layer_index, filename, play_on_load, start_label, data);\r
1058 //\r
1059 //              CASPAR_LOG(info) << L"Executed [amcp_channel_cg_add]";\r
1060 //              return L"";\r
1061 //      };\r
1062 \r
1063 bool LoadbgCommand::DoExecute()\r
1064 {\r
1065         transition_info transitionInfo;\r
1066         \r
1067         bool bLoop = false;\r
1068 \r
1069         // TRANSITION\r
1070 \r
1071         std::wstring message;\r
1072         for(size_t n = 0; n < _parameters.size(); ++n)\r
1073                 message += _parameters[n] + L" ";\r
1074                 \r
1075         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
1076         boost::wsmatch what;\r
1077         if(boost::regex_match(message, what, expr))\r
1078         {\r
1079                 auto transition = what["TRANSITION"].str();\r
1080                 transitionInfo.duration = lexical_cast_or_default<size_t>(what["DURATION"].str());\r
1081                 auto direction = what["DIRECTION"].matched ? what["DIRECTION"].str() : L"";\r
1082                 auto tween = what["TWEEN"].matched ? what["TWEEN"].str() : L"";\r
1083                 transitionInfo.tweener = get_tweener(tween);            \r
1084 \r
1085                 if(transition == TEXT("CUT"))\r
1086                         transitionInfo.type = transition::cut;\r
1087                 else if(transition == TEXT("MIX"))\r
1088                         transitionInfo.type = transition::mix;\r
1089                 else if(transition == TEXT("PUSH"))\r
1090                         transitionInfo.type = transition::push;\r
1091                 else if(transition == TEXT("SLIDE"))\r
1092                         transitionInfo.type = transition::slide;\r
1093                 else if(transition == TEXT("WIPE"))\r
1094                         transitionInfo.type = transition::wipe;\r
1095                 \r
1096                 if(direction == TEXT("FROMLEFT"))\r
1097                         transitionInfo.direction = transition_direction::from_left;\r
1098                 else if(direction == TEXT("FROMRIGHT"))\r
1099                         transitionInfo.direction = transition_direction::from_right;\r
1100                 else if(direction == TEXT("LEFT"))\r
1101                         transitionInfo.direction = transition_direction::from_right;\r
1102                 else if(direction == TEXT("RIGHT"))\r
1103                         transitionInfo.direction = transition_direction::from_left;\r
1104         }\r
1105         \r
1106         //Perform loading of the clip\r
1107         try\r
1108         {\r
1109                 auto uri_tokens = core::parameters::protocol_split(_parameters.at_original(0));\r
1110                 auto pFP = frame_producer::empty();\r
1111                 if (uri_tokens[0] == L"route")\r
1112                 {\r
1113                         pFP = RouteCommand::TryCreateProducer(*this, _parameters.at_original(0));\r
1114                 }\r
1115                 if (pFP == frame_producer::empty())\r
1116                 {\r
1117                         pFP = create_producer(GetChannel()->mixer(), _parameters);\r
1118                 }\r
1119                 if(pFP == frame_producer::empty())\r
1120                         BOOST_THROW_EXCEPTION(file_not_found() << msg_info(_parameters.size() > 0 ? narrow(_parameters[0]) : ""));\r
1121 \r
1122                 bool auto_play = std::find(_parameters.begin(), _parameters.end(), L"AUTO") != _parameters.end();\r
1123 \r
1124                 auto pFP2 = create_transition_producer(GetChannel()->get_video_format_desc().field_mode, pFP, transitionInfo);\r
1125                 GetChannel()->stage()->load(GetLayerIndex(), pFP2, false, auto_play ? transitionInfo.duration : -1); // TODO: LOOP\r
1126         \r
1127                 SetReplyString(TEXT("202 LOADBG OK\r\n"));\r
1128 \r
1129                 return true;\r
1130         }\r
1131         catch(file_not_found&)\r
1132         {               \r
1133                 CASPAR_LOG(error) << L"File not found. No match found for parameters. Check syntax:" << _parameters.get_original_string();\r
1134                 SetReplyString(TEXT("404 LOADBG ERROR\r\n"));\r
1135                 return false;\r
1136         }\r
1137         catch(...)\r
1138         {\r
1139                 CASPAR_LOG_CURRENT_EXCEPTION();\r
1140                 SetReplyString(TEXT("502 LOADBG FAILED\r\n"));\r
1141                 return false;\r
1142         }\r
1143 }\r
1144 \r
1145 bool PauseCommand::DoExecute()\r
1146 {\r
1147         try\r
1148         {\r
1149                 GetChannel()->stage()->pause(GetLayerIndex());\r
1150                 SetReplyString(TEXT("202 PAUSE OK\r\n"));\r
1151                 return true;\r
1152         }\r
1153         catch(...)\r
1154         {\r
1155                 SetReplyString(TEXT("501 PAUSE FAILED\r\n"));\r
1156         }\r
1157 \r
1158         return false;\r
1159 }\r
1160 \r
1161 bool PlayCommand::DoExecute()\r
1162 {\r
1163         try\r
1164         {\r
1165                 if(!_parameters.empty())\r
1166                 {\r
1167                         LoadbgCommand lbg;\r
1168                         lbg.SetChannels(GetChannels());\r
1169                         lbg.SetChannel(GetChannel());\r
1170                         lbg.SetChannelIndex(GetChannelIndex());\r
1171                         lbg.SetLayerIntex(GetLayerIndex());\r
1172                         lbg.SetClientInfo(GetClientInfo());\r
1173                         lbg.SetParameters(_parameters);\r
1174                         if(!lbg.Execute())\r
1175                                 throw std::exception();\r
1176                 }\r
1177 \r
1178                 GetChannel()->stage()->play(GetLayerIndex());\r
1179                 \r
1180                 SetReplyString(TEXT("202 PLAY OK\r\n"));\r
1181                 return true;\r
1182         }\r
1183         catch(...)\r
1184         {\r
1185                 SetReplyString(TEXT("501 PLAY FAILED\r\n"));\r
1186         }\r
1187 \r
1188         return false;\r
1189 }\r
1190 \r
1191 bool StopCommand::DoExecute()\r
1192 {\r
1193         try\r
1194         {\r
1195                 GetChannel()->stage()->stop(GetLayerIndex());\r
1196                 SetReplyString(TEXT("202 STOP OK\r\n"));\r
1197                 return true;\r
1198         }\r
1199         catch(...)\r
1200         {\r
1201                 SetReplyString(TEXT("501 STOP FAILED\r\n"));\r
1202         }\r
1203 \r
1204         return false;\r
1205 }\r
1206 \r
1207 bool ClearCommand::DoExecute()\r
1208 {\r
1209         int index = GetLayerIndex(std::numeric_limits<int>::min());\r
1210         if(index != std::numeric_limits<int>::min())\r
1211                 GetChannel()->stage()->clear(index);\r
1212         else\r
1213                 GetChannel()->stage()->clear();\r
1214                 \r
1215         SetReplyString(TEXT("202 CLEAR OK\r\n"));\r
1216 \r
1217         return true;\r
1218 }\r
1219 \r
1220 bool PrintCommand::DoExecute()\r
1221 {\r
1222         parameters params;\r
1223         params.push_back(L"IMAGE");\r
1224         GetChannel()->output()->add(create_consumer(params));\r
1225                 \r
1226         SetReplyString(TEXT("202 PRINT OK\r\n"));\r
1227 \r
1228         return true;\r
1229 }\r
1230 \r
1231 bool LogCommand::DoExecute()\r
1232 {\r
1233         if(_parameters.at(0) == L"LEVEL")\r
1234                 log::set_log_level(_parameters.at(1));\r
1235 \r
1236         SetReplyString(TEXT("202 LOG OK\r\n"));\r
1237 \r
1238         return true;\r
1239 }\r
1240 \r
1241 bool CGCommand::DoExecute()\r
1242 {\r
1243         try\r
1244         {\r
1245                 std::wstring command = _parameters[0];\r
1246                 if(command == TEXT("ADD"))\r
1247                         return DoExecuteAdd();\r
1248                 else if(command == TEXT("PLAY"))\r
1249                         return DoExecutePlay();\r
1250                 else if(command == TEXT("STOP"))\r
1251                         return DoExecuteStop();\r
1252                 else if(command == TEXT("NEXT"))\r
1253                         return DoExecuteNext();\r
1254                 else if(command == TEXT("REMOVE"))\r
1255                         return DoExecuteRemove();\r
1256                 else if(command == TEXT("CLEAR"))\r
1257                         return DoExecuteClear();\r
1258                 else if(command == TEXT("UPDATE"))\r
1259                         return DoExecuteUpdate();\r
1260                 else if(command == TEXT("INVOKE"))\r
1261                         return DoExecuteInvoke();\r
1262                 else if(command == TEXT("INFO"))\r
1263                         return DoExecuteInfo();\r
1264         }\r
1265         catch(...)\r
1266         {\r
1267                 CASPAR_LOG_CURRENT_EXCEPTION();\r
1268         }\r
1269 \r
1270         SetReplyString(TEXT("403 CG ERROR\r\n"));\r
1271         return false;\r
1272 }\r
1273 \r
1274 bool CGCommand::ValidateLayer(const std::wstring& layerstring) {\r
1275         int length = layerstring.length();\r
1276         for(int i = 0; i < length; ++i) {\r
1277                 if(!_istdigit(layerstring[i])) {\r
1278                         return false;\r
1279                 }\r
1280         }\r
1281 \r
1282         return true;\r
1283 }\r
1284 \r
1285 bool CGCommand::DoExecuteAdd() {\r
1286         //CG 1 ADD 0 "template_folder/templatename" [STARTLABEL] 0/1 [DATA]\r
1287 \r
1288         int layer = 0;                          //_parameters[1]\r
1289 //      std::wstring templateName;      //_parameters[2]\r
1290         std::wstring label;             //_parameters[3]\r
1291         bool bDoStart = false;          //_parameters[3] alt. _parameters[4]\r
1292 //      std::wstring data;                      //_parameters[4] alt. _parameters[5]\r
1293 \r
1294         if(_parameters.size() < 4) \r
1295         {\r
1296                 SetReplyString(TEXT("402 CG ERROR\r\n"));\r
1297                 return false;\r
1298         }\r
1299         unsigned int dataIndex = 4;\r
1300 \r
1301         if(!ValidateLayer(_parameters[1])) \r
1302         {\r
1303                 SetReplyString(TEXT("403 CG ERROR\r\n"));\r
1304                 return false;\r
1305         }\r
1306 \r
1307         layer = _ttoi(_parameters[1].c_str());\r
1308 \r
1309         if(_parameters[3].length() > 1) \r
1310         {       //read label\r
1311                 label = _parameters.at_original(3);\r
1312                 ++dataIndex;\r
1313 \r
1314                 if(_parameters.size() > 4 && _parameters[4].length() > 0)       //read play-on-load-flag\r
1315                         bDoStart = (_parameters[4][0]==TEXT('1')) ? true : false;\r
1316                 else \r
1317                 {\r
1318                         SetReplyString(TEXT("402 CG ERROR\r\n"));\r
1319                         return false;\r
1320                 }\r
1321         }\r
1322         else if(_parameters[3].length() > 0) {  //read play-on-load-flag\r
1323                 bDoStart = (_parameters[3][0]==TEXT('1')) ? true : false;\r
1324         }\r
1325         else \r
1326         {\r
1327                 SetReplyString(TEXT("403 CG ERROR\r\n"));\r
1328                 return false;\r
1329         }\r
1330 \r
1331         const TCHAR* pDataString = 0;\r
1332         std::wstringstream data;\r
1333         std::wstring dataFromFile;\r
1334         if(_parameters.size() > dataIndex) \r
1335         {       //read data\r
1336                 const std::wstring& dataString = _parameters.at_original(dataIndex);\r
1337 \r
1338                 if(dataString[0] == TEXT('<')) //the data is an XML-string\r
1339                         pDataString = dataString.c_str();\r
1340                 else \r
1341                 {\r
1342                         //The data is not an XML-string, it must be a filename\r
1343                         std::wstring filename = env::data_folder();\r
1344                         filename.append(dataString);\r
1345                         filename.append(TEXT(".ftd"));\r
1346 \r
1347                         dataFromFile = read_file(boost::filesystem::wpath(filename));\r
1348                         pDataString = dataFromFile.c_str();\r
1349                 }\r
1350         }\r
1351         \r
1352         std::wstring fullFilename = flash::find_template(env::template_folder() + _parameters[2]);\r
1353         std::wstring extension = boost::filesystem::wpath(fullFilename).extension();\r
1354         std::wstring filename = _parameters[2];\r
1355 \r
1356         if(!fullFilename.empty())\r
1357         {\r
1358                 auto call = (boost::wformat(L"ADD %1% %2% %3% %4% %5%") % layer % filename % bDoStart % label % (std::wstring() + (pDataString ? pDataString : L""))).str();\r
1359                 auto producer = GetChannel()->stage()->foreground(GetLayerIndex(9999)).get();\r
1360 \r
1361                 if(producer->print().find(L"flash") == std::string::npos)\r
1362                 { \r
1363                         producer = flash::create_producer(GetChannel()->mixer(), boost::assign::list_of<std::wstring>());\r
1364 \r
1365                         if (producer != core::frame_producer::empty())\r
1366                         {\r
1367                                 producer = make_safe<flash::cg_producer>(producer);\r
1368                                 producer->call(call).wait();\r
1369                                 GetChannel()->stage()->load(GetLayerIndex(9999), producer);\r
1370                                 GetChannel()->stage()->play(GetLayerIndex(9999));\r
1371                         }\r
1372                 }\r
1373                 else\r
1374                 {\r
1375                         GetChannel()->stage()->call(GetLayerIndex(9999), true, call).wait();\r
1376                 }\r
1377                 \r
1378                 SetReplyString(TEXT("202 CG OK\r\n"));\r
1379 \r
1380                 return true;\r
1381         }\r
1382         else\r
1383         {                       \r
1384                 filename.append(extension);\r
1385                 std::vector<std::wstring> parameters = boost::assign::list_of<std::wstring>(filename);\r
1386                 auto producer = html::create_producer(GetChannel()->mixer(), core::parameters(parameters));     \r
1387                                 \r
1388                 if (producer != core::frame_producer::empty())\r
1389                 {\r
1390                         if (pDataString)\r
1391                         {\r
1392                                 producer->call((boost::wformat(L"UPDATE %1% \"%2%\"") % layer % pDataString).str()).wait();\r
1393                         }\r
1394 \r
1395                         if (bDoStart)\r
1396                         {\r
1397                                 producer->call((boost::wformat(L"PLAY %1%") % layer).str()).wait();\r
1398                         }\r
1399                         \r
1400                         GetChannel()->stage()->load(GetLayerIndex(9999), producer);\r
1401                         GetChannel()->stage()->play(GetLayerIndex(9999));\r
1402 \r
1403                         SetReplyString(TEXT("202 CG OK\r\n"));\r
1404 \r
1405                         return true;\r
1406                 };\r
1407         }\r
1408 \r
1409         CASPAR_LOG(warning) << "Could not find template " << _parameters[2];\r
1410         SetReplyString(TEXT("404 CG ERROR\r\n"));\r
1411         \r
1412         return true;\r
1413 }\r
1414 \r
1415 bool CGCommand::DoExecutePlay()\r
1416 {\r
1417         if(_parameters.size() > 1)\r
1418         {\r
1419                 if(!ValidateLayer(_parameters[1])) \r
1420                 {\r
1421                         SetReplyString(TEXT("403 CG ERROR\r\n"));\r
1422                         return false;\r
1423                 }\r
1424                 int layer = _ttoi(_parameters[1].c_str());\r
1425                 \r
1426                 GetChannel()->stage()->call(GetLayerIndex(9999), true, (boost::wformat(L"PLAY %1%") % layer).str()).wait();\r
1427         }\r
1428         else\r
1429         {\r
1430                 SetReplyString(TEXT("402 CG ERROR\r\n"));\r
1431                 return true;\r
1432         }\r
1433 \r
1434         SetReplyString(TEXT("202 CG OK\r\n"));\r
1435         return true;\r
1436 }\r
1437 \r
1438 bool CGCommand::DoExecuteStop() \r
1439 {\r
1440         if(_parameters.size() > 1)\r
1441         {\r
1442                 if(!ValidateLayer(_parameters[1])) \r
1443                 {\r
1444                         SetReplyString(TEXT("403 CG ERROR\r\n"));\r
1445                         return false;\r
1446                 }\r
1447                 int layer = _ttoi(_parameters[1].c_str());\r
1448                 \r
1449                 GetChannel()->stage()->call(GetLayerIndex(9999), true, (boost::wformat(L"STOP %1%") % layer).str()).wait();\r
1450         }\r
1451         else \r
1452         {\r
1453                 SetReplyString(TEXT("402 CG ERROR\r\n"));\r
1454                 return true;\r
1455         }\r
1456 \r
1457         SetReplyString(TEXT("202 CG OK\r\n"));\r
1458         return true;\r
1459 }\r
1460 \r
1461 bool CGCommand::DoExecuteNext()\r
1462 {\r
1463         if(_parameters.size() > 1) \r
1464         {\r
1465                 if(!ValidateLayer(_parameters[1])) \r
1466                 {\r
1467                         SetReplyString(TEXT("403 CG ERROR\r\n"));\r
1468                         return false;\r
1469                 }\r
1470 \r
1471                 int layer = _ttoi(_parameters[1].c_str());\r
1472 \r
1473                 GetChannel()->stage()->call(GetLayerIndex(9999), true, (boost::wformat(L"NEXT %1%") % layer).str()).wait();\r
1474         }\r
1475         else \r
1476         {\r
1477                 SetReplyString(TEXT("402 CG ERROR\r\n"));\r
1478                 return true;\r
1479         }\r
1480 \r
1481         SetReplyString(TEXT("202 CG OK\r\n"));\r
1482         return true;\r
1483 }\r
1484 \r
1485 bool CGCommand::DoExecuteRemove() \r
1486 {\r
1487         if(_parameters.size() > 1) \r
1488         {\r
1489                 if(!ValidateLayer(_parameters[1])) \r
1490                 {\r
1491                         SetReplyString(TEXT("403 CG ERROR\r\n"));\r
1492                         return false;\r
1493                 }\r
1494 \r
1495                 int layer = _ttoi(_parameters[1].c_str());\r
1496                 GetChannel()->stage()->call(GetLayerIndex(9999), true, (boost::wformat(L"REMOVE %1%") % layer).str()).wait();\r
1497         }\r
1498         else \r
1499         {\r
1500                 SetReplyString(TEXT("402 CG ERROR\r\n"));\r
1501                 return true;\r
1502         }\r
1503 \r
1504         SetReplyString(TEXT("202 CG OK\r\n"));\r
1505         return true;\r
1506 }\r
1507 \r
1508 bool CGCommand::DoExecuteClear() \r
1509 {\r
1510         GetChannel()->stage()->clear(GetLayerIndex(9999));\r
1511         SetReplyString(TEXT("202 CG OK\r\n"));\r
1512         return true;\r
1513 }\r
1514 \r
1515 bool CGCommand::DoExecuteUpdate() \r
1516 {\r
1517         try\r
1518         {\r
1519                 if(!ValidateLayer(_parameters.at(1)))\r
1520                 {\r
1521                         SetReplyString(TEXT("403 CG ERROR\r\n"));\r
1522                         return false;\r
1523                 }\r
1524                                                 \r
1525                 std::wstring dataString = _parameters.at_original(2);\r
1526                 if(dataString.at(0) != TEXT('<'))\r
1527                 {\r
1528                         //The data is not an XML-string, it must be a filename\r
1529                         std::wstring filename = env::data_folder();\r
1530                         filename.append(dataString);\r
1531                         filename.append(TEXT(".ftd"));\r
1532 \r
1533                         dataString = read_file(boost::filesystem::wpath(filename));\r
1534                 }               \r
1535 \r
1536                 int layer = _ttoi(_parameters.at(1).c_str());\r
1537                 \r
1538                 GetChannel()->stage()->call(GetLayerIndex(9999), true, (boost::wformat(L"UPDATE %1% \"%2%\"") % layer % dataString).str()).wait();\r
1539         }\r
1540         catch(...)\r
1541         {\r
1542                 SetReplyString(TEXT("402 CG ERROR\r\n"));\r
1543                 return true;\r
1544         }\r
1545 \r
1546         SetReplyString(TEXT("202 CG OK\r\n"));\r
1547         return true;\r
1548 }\r
1549 \r
1550 bool CGCommand::DoExecuteInvoke() \r
1551 {\r
1552         std::wstringstream replyString;\r
1553         replyString << TEXT("201 CG OK\r\n");\r
1554 \r
1555         if(_parameters.size() > 2)\r
1556         {\r
1557                 if(!ValidateLayer(_parameters[1]))\r
1558                 {\r
1559                         SetReplyString(TEXT("403 CG ERROR\r\n"));\r
1560                         return false;\r
1561                 }\r
1562                 int layer = _ttoi(_parameters[1].c_str());\r
1563 \r
1564                 auto result = GetChannel()->stage()->call(GetLayerIndex(9999), true, (boost::wformat(L"INVOKE %1% \"%2%\"") % layer % _parameters.at_original(2)).str()).get();\r
1565                 replyString << result << TEXT("\r\n"); \r
1566         }\r
1567         else \r
1568         {\r
1569                 SetReplyString(TEXT("402 CG ERROR\r\n"));\r
1570                 return true;\r
1571         }\r
1572         \r
1573         SetReplyString(replyString.str());\r
1574         return true;\r
1575 }\r
1576 \r
1577 bool CGCommand::DoExecuteInfo() \r
1578 {\r
1579         std::wstringstream replyString;\r
1580         replyString << TEXT("201 CG OK\r\n");\r
1581 \r
1582         if(_parameters.size() > 1)\r
1583         {\r
1584                 if(!ValidateLayer(_parameters[1]))\r
1585                 {\r
1586                         SetReplyString(TEXT("403 CG ERROR\r\n"));\r
1587                         return false;\r
1588                 }\r
1589 \r
1590                 int layer = _ttoi(_parameters[1].c_str());\r
1591                 auto desc = GetChannel()->stage()->call(GetLayerIndex(9999), true, (boost::wformat(L"INFO %1%") % layer).str()).get();\r
1592                                 \r
1593                 replyString << desc << TEXT("\r\n"); \r
1594         }\r
1595         else \r
1596         {\r
1597                 auto info = GetChannel()->stage()->call(GetLayerIndex(9999), true, (boost::wformat(L"INFO")).str()).get();\r
1598                 replyString << info << TEXT("\r\n"); \r
1599         }       \r
1600 \r
1601         SetReplyString(replyString.str());\r
1602         return true;\r
1603 }\r
1604 \r
1605 bool DataCommand::DoExecute()\r
1606 {\r
1607         std::wstring command = _parameters[0];\r
1608         if(command == TEXT("STORE"))\r
1609                 return DoExecuteStore();\r
1610         else if(command == TEXT("RETRIEVE"))\r
1611                 return DoExecuteRetrieve();\r
1612         else if(command == TEXT("REMOVE"))\r
1613                 return DoExecuteRemove();\r
1614         else if(command == TEXT("LIST"))\r
1615                 return DoExecuteList();\r
1616 \r
1617         SetReplyString(TEXT("403 DATA ERROR\r\n"));\r
1618         return false;\r
1619 }\r
1620 \r
1621 bool DataCommand::DoExecuteStore() \r
1622 {\r
1623         if(_parameters.size() < 3) \r
1624         {\r
1625                 SetReplyString(TEXT("402 DATA STORE ERROR\r\n"));\r
1626                 return false;\r
1627         }\r
1628 \r
1629         std::wstring filename = env::data_folder();\r
1630         filename.append(_parameters[1]);\r
1631         filename.append(TEXT(".ftd"));\r
1632 \r
1633         auto data_path = boost::filesystem::wpath(\r
1634                         boost::filesystem::wpath(filename).parent_path());\r
1635         \r
1636         if(!boost::filesystem::exists(data_path))\r
1637                 boost::filesystem::create_directories(data_path);\r
1638 \r
1639         std::wofstream datafile(filename.c_str());\r
1640 \r
1641         if(!datafile) \r
1642         {\r
1643                 SetReplyString(TEXT("501 DATA STORE FAILED\r\n"));\r
1644                 return false;\r
1645         }\r
1646 \r
1647         datafile << static_cast<wchar_t>(65279); // UTF-8 BOM character\r
1648         datafile << _parameters.at_original(2) << std::flush;\r
1649         datafile.close();\r
1650 \r
1651         std::wstring replyString = TEXT("202 DATA STORE OK\r\n");\r
1652         SetReplyString(replyString);\r
1653         return true;\r
1654 }\r
1655 \r
1656 bool DataCommand::DoExecuteRetrieve() \r
1657 {\r
1658         if(_parameters.size() < 2) \r
1659         {\r
1660                 SetReplyString(TEXT("402 DATA RETRIEVE ERROR\r\n"));\r
1661                 return false;\r
1662         }\r
1663 \r
1664         std::wstring filename = env::data_folder();\r
1665         filename.append(_parameters[1]);\r
1666         filename.append(TEXT(".ftd"));\r
1667 \r
1668         std::wstring file_contents = read_file(boost::filesystem::wpath(filename));\r
1669 \r
1670         if (file_contents.empty()) \r
1671         {\r
1672                 SetReplyString(TEXT("404 DATA RETRIEVE ERROR\r\n"));\r
1673                 return false;\r
1674         }\r
1675 \r
1676         std::wstringstream reply;\r
1677         reply << TEXT("201 DATA RETRIEVE OK\r\n");\r
1678 \r
1679         std::wstringstream file_contents_stream(file_contents);\r
1680         std::wstring line;\r
1681         bool bFirstLine = true;\r
1682         \r
1683         while(std::getline(file_contents_stream, line))\r
1684         {\r
1685                 if(!bFirstLine)\r
1686                         reply << "\n";\r
1687                 else\r
1688                         bFirstLine = false;\r
1689 \r
1690                 reply << line;\r
1691         }\r
1692 \r
1693         reply << "\r\n";\r
1694         SetReplyString(reply.str());\r
1695         return true;\r
1696 }\r
1697 \r
1698 bool DataCommand::DoExecuteRemove() \r
1699 { \r
1700         if (_parameters.size() < 2) \r
1701         {\r
1702                 SetReplyString(TEXT("402 DATA REMOVE ERROR\r\n"));\r
1703                 return false;\r
1704         }\r
1705 \r
1706         std::wstring filename = env::data_folder();\r
1707         filename.append(_parameters[1]);\r
1708         filename.append(TEXT(".ftd"));\r
1709 \r
1710         if (!boost::filesystem::exists(filename)) \r
1711         {\r
1712                 SetReplyString(TEXT("404 DATA REMOVE ERROR\r\n"));\r
1713                 return false;\r
1714         }\r
1715 \r
1716         if (!boost::filesystem::remove(filename))\r
1717         {\r
1718                 SetReplyString(TEXT("403 DATA REMOVE ERROR\r\n"));\r
1719                 return false;\r
1720         }\r
1721 \r
1722         SetReplyString(TEXT("201 DATA REMOVE OK\r\n"));\r
1723 \r
1724         return true;\r
1725 }\r
1726 \r
1727 bool DataCommand::DoExecuteList() \r
1728 {\r
1729         std::wstringstream replyString;\r
1730         replyString << TEXT("200 DATA LIST OK\r\n");\r
1731 \r
1732         for (boost::filesystem::wrecursive_directory_iterator itr(env::data_folder()), end; itr != end; ++itr)\r
1733         {                       \r
1734                 if(boost::filesystem::is_regular_file(itr->path()))\r
1735                 {\r
1736                         if(!boost::iequals(itr->path().extension(), L".ftd"))\r
1737                                 continue;\r
1738                         \r
1739                         auto relativePath = boost::filesystem::wpath(itr->path().file_string().substr(env::data_folder().size()-1, itr->path().file_string().size()));\r
1740                         \r
1741                         auto str = relativePath.replace_extension(TEXT("")).external_file_string();\r
1742                         if(str[0] == '\\' || str[0] == '/')\r
1743                                 str = std::wstring(str.begin() + 1, str.end());\r
1744 \r
1745                         replyString << str << TEXT("\r\n");     \r
1746                 }\r
1747         }\r
1748         \r
1749         replyString << TEXT("\r\n");\r
1750 \r
1751         SetReplyString(boost::to_upper_copy(replyString.str()));\r
1752         return true;\r
1753 }\r
1754 \r
1755 bool ThumbnailCommand::DoExecute()\r
1756 {\r
1757         std::wstring command = _parameters[0];\r
1758 \r
1759         if (command == TEXT("RETRIEVE"))\r
1760                 return DoExecuteRetrieve();\r
1761         else if (command == TEXT("LIST"))\r
1762                 return DoExecuteList();\r
1763         else if (command == TEXT("GENERATE"))\r
1764                 return DoExecuteGenerate();\r
1765         else if (command == TEXT("GENERATE_ALL"))\r
1766                 return DoExecuteGenerateAll();\r
1767 \r
1768         SetReplyString(TEXT("403 THUMBNAIL ERROR\r\n"));\r
1769         return false;\r
1770 }\r
1771 \r
1772 bool ThumbnailCommand::DoExecuteRetrieve() \r
1773 {\r
1774         if(_parameters.size() < 2) \r
1775         {\r
1776                 SetReplyString(TEXT("402 THUMBNAIL RETRIEVE ERROR\r\n"));\r
1777                 return false;\r
1778         }\r
1779 \r
1780         std::wstring filename = env::thumbnails_folder();\r
1781         filename.append(_parameters[1]);\r
1782         filename.append(TEXT(".png"));\r
1783 \r
1784         std::wstring file_contents = read_file_base64(boost::filesystem::wpath(filename));\r
1785 \r
1786         if (file_contents.empty())\r
1787         {\r
1788                 SetReplyString(TEXT("404 THUMBNAIL RETRIEVE ERROR\r\n"));\r
1789                 return false;\r
1790         }\r
1791 \r
1792         std::wstringstream reply;\r
1793 \r
1794         reply << L"201 THUMBNAIL RETRIEVE OK\r\n";\r
1795         reply << file_contents;\r
1796         reply << L"\r\n";\r
1797         SetReplyString(reply.str());\r
1798         return true;\r
1799 }\r
1800 \r
1801 bool ThumbnailCommand::DoExecuteList()\r
1802 {\r
1803         std::wstringstream replyString;\r
1804         replyString << TEXT("200 THUMBNAIL LIST OK\r\n");\r
1805 \r
1806         for (boost::filesystem::wrecursive_directory_iterator itr(env::thumbnails_folder()), end; itr != end; ++itr)\r
1807         {                       \r
1808                 if(boost::filesystem::is_regular_file(itr->path()))\r
1809                 {\r
1810                         if(!boost::iequals(itr->path().extension(), L".png"))\r
1811                                 continue;\r
1812                         \r
1813                         auto relativePath = boost::filesystem::wpath(itr->path().file_string().substr(env::thumbnails_folder().size()-1, itr->path().file_string().size()));\r
1814                         \r
1815                         auto str = relativePath.replace_extension(L"").external_file_string();\r
1816                         if(str[0] == '\\' || str[0] == '/')\r
1817                                 str = std::wstring(str.begin() + 1, str.end());\r
1818 \r
1819                         auto mtime = boost::filesystem::last_write_time(itr->path());\r
1820                         auto mtime_readable = boost::posix_time::to_iso_string(boost::posix_time::from_time_t(mtime));\r
1821                         auto file_size = boost::filesystem::file_size(itr->path());\r
1822 \r
1823                         replyString << L"\"" << str << L"\" " << widen(mtime_readable) << L" " << file_size << L"\r\n";\r
1824                 }\r
1825         }\r
1826         \r
1827         replyString << TEXT("\r\n");\r
1828 \r
1829         SetReplyString(boost::to_upper_copy(replyString.str()));\r
1830         return true;\r
1831 }\r
1832 \r
1833 bool ThumbnailCommand::DoExecuteGenerate()\r
1834 {\r
1835         if (_parameters.size() < 2) \r
1836         {\r
1837                 SetReplyString(L"402 THUMBNAIL GENERATE ERROR\r\n");\r
1838                 return false;\r
1839         }\r
1840 \r
1841         auto thumb_gen = GetThumbGenerator();\r
1842 \r
1843         if (thumb_gen)\r
1844         {\r
1845                 thumb_gen->generate(_parameters[1]);\r
1846                 SetReplyString(L"200 THUMBNAIL GENERATE OK\r\n");\r
1847                 return true;\r
1848         }\r
1849         else\r
1850         {\r
1851                 SetReplyString(L"501 THUMBNAIL GENERATE ERROR\r\n");\r
1852                 return false;\r
1853         }\r
1854 }\r
1855 \r
1856 bool ThumbnailCommand::DoExecuteGenerateAll()\r
1857 {\r
1858         auto thumb_gen = GetThumbGenerator();\r
1859 \r
1860         if (thumb_gen)\r
1861         {\r
1862                 thumb_gen->generate_all();\r
1863                 SetReplyString(L"200 THUMBNAIL GENERATE_ALL OK\r\n");\r
1864                 return true;\r
1865         }\r
1866         else\r
1867         {\r
1868                 SetReplyString(L"501 THUMBNAIL GENERATE_ALL ERROR\r\n");\r
1869                 return false;\r
1870         }\r
1871 }\r
1872 \r
1873 bool CinfCommand::DoExecute()\r
1874 {\r
1875         std::wstringstream replyString;\r
1876         \r
1877         try\r
1878         {\r
1879                 std::wstring info;\r
1880                 for (boost::filesystem::wrecursive_directory_iterator itr(env::media_folder()), end; itr != end; ++itr)\r
1881                 {\r
1882                         auto path = itr->path();\r
1883                         auto file = path.replace_extension(L"").filename();\r
1884                         if(boost::iequals(file, _parameters.at(0)))\r
1885                                 info += MediaInfo(itr->path(), GetMediaInfoRepo()) + L"\r\n";\r
1886                 }\r
1887 \r
1888                 if(info.empty())\r
1889                 {\r
1890                         SetReplyString(TEXT("404 CINF ERROR\r\n"));\r
1891                         return false;\r
1892                 }\r
1893                 replyString << TEXT("200 CINF OK\r\n");\r
1894                 replyString << info << "\r\n";\r
1895         }\r
1896         catch(...)\r
1897         {\r
1898                 SetReplyString(TEXT("404 CINF ERROR\r\n"));\r
1899                 return false;\r
1900         }\r
1901         \r
1902         SetReplyString(replyString.str());\r
1903         return true;\r
1904 }\r
1905 \r
1906 void GenerateChannelInfo(int index, const safe_ptr<core::video_channel>& pChannel, std::wstringstream& replyString)\r
1907 {\r
1908         replyString << index+1 << TEXT(" ") << pChannel->get_video_format_desc().name << TEXT(" PLAYING") << TEXT("\r\n");\r
1909 }\r
1910 \r
1911 bool InfoCommand::DoExecute()\r
1912 {\r
1913         std::wstringstream replyString;\r
1914         \r
1915         boost::property_tree::xml_writer_settings<wchar_t> w(' ', 3);\r
1916 \r
1917         try\r
1918         {\r
1919                 if(_parameters.size() >= 1 && _parameters[0] == L"TEMPLATE")\r
1920                 {               \r
1921                         replyString << L"201 INFO TEMPLATE OK\r\n";\r
1922 \r
1923                         // Needs to be extended for any file, not just flash.\r
1924 \r
1925                         auto filename = flash::find_template(env::template_folder() + _parameters.at(1));\r
1926                                                 \r
1927                         std::wstringstream str;\r
1928                         str << widen(flash::read_template_meta_info(filename));\r
1929                         boost::property_tree::wptree info;\r
1930                         boost::property_tree::xml_parser::read_xml(str, info, boost::property_tree::xml_parser::trim_whitespace | boost::property_tree::xml_parser::no_comments);\r
1931 \r
1932                         boost::property_tree::xml_parser::write_xml(replyString, info, w);\r
1933                 }\r
1934                 else if(_parameters.size() >= 1 && _parameters[0] == L"CONFIG")\r
1935                 {               \r
1936                         replyString << L"201 INFO CONFIG OK\r\n";\r
1937 \r
1938                         boost::property_tree::write_xml(replyString, caspar::env::properties(), w);\r
1939                 }\r
1940                 else if(_parameters.size() >= 1 && _parameters[0] == L"PATHS")\r
1941                 {\r
1942                         replyString << L"201 INFO PATHS OK\r\n";\r
1943 \r
1944                         boost::property_tree::wptree info;\r
1945                         info.add_child(L"paths", caspar::env::properties().get_child(L"configuration.paths"));\r
1946                         info.add(L"paths.initial-path", boost::filesystem2::initial_path<boost::filesystem2::wpath>().directory_string() + L"\\");\r
1947 \r
1948                         boost::property_tree::write_xml(replyString, info, w);\r
1949                 }\r
1950                 else if(_parameters.size() >= 1 && _parameters[0] == L"SYSTEM")\r
1951                 {\r
1952                         replyString << L"201 INFO SYSTEM OK\r\n";\r
1953                         \r
1954                         boost::property_tree::wptree info;\r
1955                         \r
1956                         info.add(L"system.name",                                        caspar::get_system_product_name());\r
1957                         info.add(L"system.windows.name",                        caspar::get_win_product_name());\r
1958                         info.add(L"system.windows.service-pack",        caspar::get_win_sp_version());\r
1959                         info.add(L"system.cpu",                                         caspar::get_cpu_info());\r
1960         \r
1961                         BOOST_FOREACH(auto device, caspar::decklink::get_device_list())\r
1962                                 info.add(L"system.caspar.decklink.device", device);\r
1963 \r
1964                         BOOST_FOREACH(auto device, caspar::bluefish::get_device_list())\r
1965                                 info.add(L"system.caspar.bluefish.device", device);\r
1966                                 \r
1967                         info.add(L"system.caspar.flash",                                        caspar::flash::get_version());\r
1968                         info.add(L"system.caspar.template-host",                        caspar::flash::get_cg_version());\r
1969                         info.add(L"system.caspar.free-image",                           caspar::image::get_version());\r
1970                         info.add(L"system.caspar.ffmpeg.avcodec",                       caspar::ffmpeg::get_avcodec_version());\r
1971                         info.add(L"system.caspar.ffmpeg.avformat",                      caspar::ffmpeg::get_avformat_version());\r
1972                         info.add(L"system.caspar.ffmpeg.avfilter",                      caspar::ffmpeg::get_avfilter_version());\r
1973                         info.add(L"system.caspar.ffmpeg.avutil",                        caspar::ffmpeg::get_avutil_version());\r
1974                         info.add(L"system.caspar.ffmpeg.swscale",                       caspar::ffmpeg::get_swscale_version());\r
1975                                                                         \r
1976                         boost::property_tree::write_xml(replyString, info, w);\r
1977                 }\r
1978                 else if(_parameters.size() >= 1 && _parameters[0] == L"SERVER")\r
1979                 {\r
1980                         replyString << L"201 INFO SERVER OK\r\n";\r
1981                         \r
1982                         boost::property_tree::wptree info;\r
1983 \r
1984                         int index = 0;\r
1985                         BOOST_FOREACH(auto channel, channels_)\r
1986                                 info.add_child(L"channels.channel", channel->info())\r
1987                                         .add(L"index", ++index);\r
1988                         \r
1989                         boost::property_tree::write_xml(replyString, info, w);\r
1990                 }\r
1991                 else if(_parameters.size() >= 2 && _parameters[1] == L"DELAY")\r
1992                 {\r
1993                         replyString << L"201 INFO DELAY OK\r\n";\r
1994                         boost::property_tree::wptree info;\r
1995 \r
1996                         std::vector<std::wstring> split;\r
1997                         boost::split(split, _parameters[0], boost::is_any_of("-"));\r
1998                                         \r
1999                         int layer = std::numeric_limits<int>::min();\r
2000                         int channel = boost::lexical_cast<int>(split[0]) - 1;\r
2001 \r
2002                         if(split.size() > 1)\r
2003                                 layer = boost::lexical_cast<int>(split[1]);\r
2004                                 \r
2005                         if(layer == std::numeric_limits<int>::min())\r
2006                         {       \r
2007                                 info.add_child(L"channel-delay", channels_.at(channel)->delay_info());\r
2008                         }\r
2009                         else\r
2010                         {\r
2011                                 info.add_child(L"layer-delay", channels_.at(channel)->stage()->delay_info(layer).get())\r
2012                                         .add(L"index", layer);\r
2013                         }\r
2014                         boost::property_tree::xml_parser::write_xml(replyString, info, w);\r
2015                 }\r
2016                 else // channel\r
2017                 {                       \r
2018                         if(_parameters.size() >= 1)\r
2019                         {\r
2020                                 replyString << TEXT("201 INFO OK\r\n");\r
2021                                 boost::property_tree::wptree info;\r
2022 \r
2023                                 std::vector<std::wstring> split;\r
2024                                 boost::split(split, _parameters[0], boost::is_any_of("-"));\r
2025                                         \r
2026                                 int layer = std::numeric_limits<int>::min();\r
2027                                 int channel = boost::lexical_cast<int>(split[0]) - 1;\r
2028 \r
2029                                 if(split.size() > 1)\r
2030                                         layer = boost::lexical_cast<int>(split[1]);\r
2031                                 \r
2032                                 if(layer == std::numeric_limits<int>::min())\r
2033                                 {       \r
2034                                         info.add_child(L"channel", channels_.at(channel)->info())\r
2035                                                         .add(L"index", channel);\r
2036                                 }\r
2037                                 else\r
2038                                 {\r
2039                                         if(_parameters.size() >= 2)\r
2040                                         {\r
2041                                                 if(_parameters[1] == L"B")\r
2042                                                         info.add_child(L"producer", channels_.at(channel)->stage()->background(layer).get()->info());\r
2043                                                 else\r
2044                                                         info.add_child(L"producer", channels_.at(channel)->stage()->foreground(layer).get()->info());\r
2045                                         }\r
2046                                         else\r
2047                                         {\r
2048                                                 info.add_child(L"layer", channels_.at(channel)->stage()->info(layer).get())\r
2049                                                         .add(L"index", layer);\r
2050                                         }\r
2051                                 }\r
2052                                 boost::property_tree::xml_parser::write_xml(replyString, info, w);\r
2053                         }\r
2054                         else\r
2055                         {\r
2056                                 // This is needed for backwards compatibility with old clients\r
2057                                 replyString << TEXT("200 INFO OK\r\n");\r
2058                                 for(size_t n = 0; n < channels_.size(); ++n)\r
2059                                         GenerateChannelInfo(n, channels_[n], replyString);\r
2060                         }\r
2061 \r
2062                 }\r
2063         }\r
2064         catch(...)\r
2065         {\r
2066                 SetReplyString(TEXT("403 INFO ERROR\r\n"));\r
2067                 return false;\r
2068         }\r
2069 \r
2070         replyString << TEXT("\r\n");\r
2071         SetReplyString(replyString.str());\r
2072         return true;\r
2073 }\r
2074 \r
2075 bool ClsCommand::DoExecute()\r
2076 {\r
2077 /*\r
2078                 wav = audio\r
2079                 mp3 = audio\r
2080                 swf     = movie\r
2081                 dv  = movie\r
2082                 tga = still\r
2083                 col = still\r
2084         */\r
2085         std::wstringstream replyString;\r
2086         replyString << TEXT("200 CLS OK\r\n");\r
2087         replyString << ListMedia(GetMediaInfoRepo());\r
2088         replyString << TEXT("\r\n");\r
2089         SetReplyString(boost::to_upper_copy(replyString.str()));\r
2090         return true;\r
2091 }\r
2092 \r
2093 bool TlsCommand::DoExecute()\r
2094 {\r
2095         std::wstringstream replyString;\r
2096         replyString << TEXT("200 TLS OK\r\n");\r
2097 \r
2098         replyString << ListTemplates();\r
2099         replyString << TEXT("\r\n");\r
2100 \r
2101         SetReplyString(replyString.str());\r
2102         return true;\r
2103 }\r
2104 \r
2105 bool VersionCommand::DoExecute()\r
2106 {\r
2107         std::wstring replyString = TEXT("201 VERSION OK\r\n") + env::version() + TEXT("\r\n");\r
2108 \r
2109         if(_parameters.size() > 0)\r
2110         {\r
2111                 if(_parameters[0] == L"FLASH")\r
2112                         replyString = TEXT("201 VERSION OK\r\n") + flash::get_version() + TEXT("\r\n");\r
2113                 else if(_parameters[0] == L"TEMPLATEHOST")\r
2114                         replyString = TEXT("201 VERSION OK\r\n") + flash::get_cg_version() + TEXT("\r\n");\r
2115                 else if(_parameters[0] != L"SERVER")\r
2116                         replyString = TEXT("403 VERSION ERROR\r\n");\r
2117         }\r
2118 \r
2119         SetReplyString(replyString);\r
2120         return true;\r
2121 }\r
2122 \r
2123 bool ByeCommand::DoExecute()\r
2124 {\r
2125         GetClientInfo()->Disconnect();\r
2126         return true;\r
2127 }\r
2128 \r
2129 bool SetCommand::DoExecute()\r
2130 {\r
2131         std::wstring name = _parameters[0];\r
2132         std::transform(name.begin(), name.end(), name.begin(), toupper);\r
2133 \r
2134         std::wstring value = _parameters[1];\r
2135         std::transform(value.begin(), value.end(), value.begin(), toupper);\r
2136 \r
2137         if(name == TEXT("MODE"))\r
2138         {\r
2139                 auto format_desc = core::video_format_desc::get(value);\r
2140                 if(format_desc.format != core::video_format::invalid)\r
2141                 {\r
2142                         GetChannel()->set_video_format_desc(format_desc);\r
2143                         SetReplyString(TEXT("202 SET MODE OK\r\n"));\r
2144                 }\r
2145                 else\r
2146                         SetReplyString(TEXT("501 SET MODE FAILED\r\n"));\r
2147         }\r
2148         else\r
2149         {\r
2150                 this->SetReplyString(TEXT("403 SET ERROR\r\n"));\r
2151         }\r
2152 \r
2153         return true;\r
2154 }\r
2155 \r
2156 bool KillCommand::DoExecute()\r
2157 {\r
2158         GetShutdownServerNow().set_value(false); // False for not attempting to restart.\r
2159         return true;\r
2160 }\r
2161 \r
2162 bool RestartCommand::DoExecute()\r
2163 {\r
2164         GetShutdownServerNow().set_value(true); // True for attempting to restart\r
2165         return true;\r
2166 }\r
2167 \r
2168 }       //namespace amcp\r
2169 }}      //namespace caspar\r