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