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

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