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         pClientInfo_->Send(replyString_);
 275 }
 276
 277 void AMCPCommand::Clear()
 278 {
 279         pChannel_->stage().clear();
 280         pClientInfo_.reset();
 281         channelIndex_ = 0;
 282         _parameters.clear();
 283 }
 284
 285 bool DiagnosticsCommand::DoExecute()
 286 {
 287         try
 288         {
 289                 diagnostics::show_graphs(true);
 290
 291                 SetReplyString(TEXT("202 DIAG OK\r\n"));
 292
 293                 return true;
 294         }
 295         catch(...)
 296         {
 297                 CASPAR_LOG_CURRENT_EXCEPTION();
 298                 SetReplyString(TEXT("502 DIAG FAILED\r\n"));
 299                 return false;
 300         }
 301 }
 302
 303 bool ChannelGridCommand::DoExecute()
 304 {
 305         CASPAR_THROW_EXCEPTION(not_implemented());
 306
 307         //int index = 1;
 308         //auto self = GetChannels().back();
 309         //
 310         //std::vector<std::wstring> params;
 311         //params.push_back(L"SCREEN");
 312         //params.push_back(L"NAME");
 313         //params.push_back(L"Channel Grid Window");
 314         //auto screen = create_consumer(params);
 315
 316         //self->output().add(screen);
 317
 318         //BOOST_FOREACH(auto channel, GetChannels())
 319         //{
 320         //      if(channel != self)
 321         //      {
 322         //              auto producer = reroute::create_producer(self->frame_factory(), *channel);
 323         //              self->stage().load(index, producer, false);
 324         //              self->stage().play(index);
 325         //              index++;
 326         //      }
 327         //}
 328
 329         //int n = GetChannels().size()-1;
 330         //double delta = 1.0/static_cast<double>(n);
 331         //for(int x = 0; x < n; ++x)
 332         //{
 333         //      for(int y = 0; y < n; ++y)
 334         //      {
 335         //              int index = x+y*n+1;
 336         //              auto transform = [=](frame_transform transform) -> frame_transform
 337         //              {
 338         //                      transform.image_transform.fill_translation[0]   = x*delta;
 339         //                      transform.image_transform.fill_translation[1]   = y*delta;
 340         //                      transform.image_transform.fill_scale[0]                 = delta;
 341         //                      transform.image_transform.fill_scale[1]                 = delta;
 342         //                      transform.image_transform.clip_translation[0]   = x*delta;
 343         //                      transform.image_transform.clip_translation[1]   = y*delta;
 344         //                      transform.image_transform.clip_scale[0]                 = delta;
 345         //                      transform.image_transform.clip_scale[1]                 = delta;
 346         //                      return transform;
 347         //              };
 348         //              self->stage().apply_transform(index, transform);
 349         //      }
 350         //}
 351
 352         //return true;
 353 }
 354
 355 bool CallCommand::DoExecute()
 356 {
 357         //Perform loading of the clip
 358         try
 359         {
 360                 auto what = _parameters.at(0);
 361
 362                 std::wstring param;
 363                 for(auto it = std::begin(_parameters2); it != std::end(_parameters2); ++it, param += L" ")
 364                         param += *it;
 365
 366                 auto result = GetChannel()->stage().call(GetLayerIndex(), boost::trim_copy(param));
 367
 368                 if(!result.timed_wait(boost::posix_time::seconds(2)))
 369                         CASPAR_THROW_EXCEPTION(timed_out());
 370
 371                 std::wstringstream replyString;
 372                 if(result.get().empty())
 373                         replyString << TEXT("202 CALL OK\r\n");
 374                 else
 375                         replyString << TEXT("201 CALL OK\r\n") << result.get() << L"\r\n";
 376
 377                 SetReplyString(replyString.str());
 378
 379                 return true;
 380         }
 381         catch(...)
 382         {
 383                 CASPAR_LOG_CURRENT_EXCEPTION();
 384                 SetReplyString(TEXT("502 CALL FAILED\r\n"));
 385                 return false;
 386         }
 387 }
 388
 389 tbb::concurrent_unordered_map<int, std::vector<stage::transform_tuple_t>> deferred_transforms;
 390
 391 bool MixerCommand::DoExecute()
 392 {
 393         //Perform loading of the clip
 394         try
 395         {
 396                 bool defer = _parameters.back() == L"DEFER";
 397                 if(defer)
 398                         _parameters.pop_back();
 399
 400                 std::vector<stage::transform_tuple_t> transforms;
 401
 402                 if(_parameters[0] == L"KEYER" || _parameters[0] == L"IS_KEY")
 403                 {
 404                         bool value = boost::lexical_cast<int>(_parameters.at(1));
 405                         transforms.push_back(stage::transform_tuple_t(GetLayerIndex(), [=](frame_transform transform) -> frame_transform
 406                         {
 407                                 transform.image_transform.is_key = value;
 408                                 return transform;
 409                         }, 0, L"linear"));
 410                 }
 411                 else if(_parameters[0] == L"OPACITY")
 412                 {
 413                         int duration = _parameters.size() > 2 ? boost::lexical_cast<int>(_parameters[2]) : 0;
 414                         std::wstring tween = _parameters.size() > 3 ? _parameters[3] : L"linear";
 415
 416                         double value = boost::lexical_cast<double>(_parameters.at(1));
 417
 418                         transforms.push_back(stage::transform_tuple_t(GetLayerIndex(), [=](frame_transform transform) -> frame_transform
 419                         {
 420                                 transform.image_transform.opacity = value;
 421                                 return transform;
 422                         }, duration, tween));
 423                 }
 424                 else if(_parameters[0] == L"FILL" || _parameters[0] == L"FILL_RECT")
 425                 {
 426                         int duration = _parameters.size() > 5 ? boost::lexical_cast<int>(_parameters[5]) : 0;
 427                         std::wstring tween = _parameters.size() > 6 ? _parameters[6] : L"linear";
 428                         double x        = boost::lexical_cast<double>(_parameters.at(1));
 429                         double y        = boost::lexical_cast<double>(_parameters.at(2));
 430                         double x_s      = boost::lexical_cast<double>(_parameters.at(3));
 431                         double y_s      = boost::lexical_cast<double>(_parameters.at(4));
 432
 433                         transforms.push_back(stage::transform_tuple_t(GetLayerIndex(), [=](frame_transform transform) mutable -> frame_transform
 434                         {
 435                                 transform.image_transform.fill_translation[0]   = x;
 436                                 transform.image_transform.fill_translation[1]   = y;
 437                                 transform.image_transform.fill_scale[0]                 = x_s;
 438                                 transform.image_transform.fill_scale[1]                 = y_s;
 439                                 transform.image_transform.clip_translation[0]   = x;
 440                                 transform.image_transform.clip_translation[1]   = y;
 441                                 transform.image_transform.clip_scale[0]                 = x_s;
 442                                 transform.image_transform.clip_scale[1]                 = y_s;
 443                                 return transform;
 444                         }, duration, tween));
 445                 }
 446                 else if(_parameters[0] == L"CLIP" || _parameters[0] == L"CLIP_RECT")
 447                 {
 448                         int duration = _parameters.size() > 5 ? boost::lexical_cast<int>(_parameters[5]) : 0;
 449                         std::wstring tween = _parameters.size() > 6 ? _parameters[6] : L"linear";
 450                         double x        = boost::lexical_cast<double>(_parameters.at(1));
 451                         double y        = boost::lexical_cast<double>(_parameters.at(2));
 452                         double x_s      = boost::lexical_cast<double>(_parameters.at(3));
 453                         double y_s      = boost::lexical_cast<double>(_parameters.at(4));
 454
 455                         transforms.push_back(stage::transform_tuple_t(GetLayerIndex(), [=](frame_transform transform) -> frame_transform
 456                         {
 457                                 transform.image_transform.clip_translation[0]   = x;
 458                                 transform.image_transform.clip_translation[1]   = y;
 459                                 transform.image_transform.clip_scale[0]                 = x_s;
 460                                 transform.image_transform.clip_scale[1]                 = y_s;
 461                                 return transform;
 462                         }, duration, tween));
 463                 }
 464                 else if(_parameters[0] == L"GRID")
 465                 {
 466                         int duration = _parameters.size() > 2 ? boost::lexical_cast<int>(_parameters[2]) : 0;
 467                         std::wstring tween = _parameters.size() > 3 ? _parameters[3] : L"linear";
 468                         int n = boost::lexical_cast<int>(_parameters.at(1));
 469                         double delta = 1.0/static_cast<double>(n);
 470                         for(int x = 0; x < n; ++x)
 471                         {
 472                                 for(int y = 0; y < n; ++y)
 473                                 {
 474                                         int index = x+y*n+1;
 475                                         transforms.push_back(stage::transform_tuple_t(index, [=](frame_transform transform) -> frame_transform
 476                                         {
 477                                                 transform.image_transform.fill_translation[0]   = x*delta;
 478                                                 transform.image_transform.fill_translation[1]   = y*delta;
 479                                                 transform.image_transform.fill_scale[0]                 = delta;
 480                                                 transform.image_transform.fill_scale[1]                 = delta;
 481                                                 transform.image_transform.clip_translation[0]   = x*delta;
 482                                                 transform.image_transform.clip_translation[1]   = y*delta;
 483                                                 transform.image_transform.clip_scale[0]                 = delta;
 484                                                 transform.image_transform.clip_scale[1]                 = delta;
 485                                                 return transform;
 486                                         }, duration, tween));
 487                                 }
 488                         }
 489                 }
 490                 else if(_parameters[0] == L"BLEND")
 491                 {
 492                         auto blend_str = _parameters.at(1);
 493                         int layer = GetLayerIndex();
 494                         GetChannel()->mixer().set_blend_mode(GetLayerIndex(), get_blend_mode(blend_str));
 495                 }
 496                 else if(_parameters[0] == L"BRIGHTNESS")
 497                 {
 498                         auto value = boost::lexical_cast<double>(_parameters.at(1));
 499                         int duration = _parameters.size() > 2 ? boost::lexical_cast<int>(_parameters[2]) : 0;
 500                         std::wstring tween = _parameters.size() > 3 ? _parameters[3] : L"linear";
 501                         transforms.push_back(stage::transform_tuple_t(GetLayerIndex(), [=](frame_transform transform) -> frame_transform
 502                         {
 503                                 transform.image_transform.brightness = value;
 504                                 return transform;
 505                         }, duration, tween));
 506                 }
 507                 else if(_parameters[0] == L"SATURATION")
 508                 {
 509                         auto value = boost::lexical_cast<double>(_parameters.at(1));
 510                         int duration = _parameters.size() > 2 ? boost::lexical_cast<int>(_parameters[2]) : 0;
 511                         std::wstring tween = _parameters.size() > 3 ? _parameters[3] : L"linear";
 512                         transforms.push_back(stage::transform_tuple_t(GetLayerIndex(), [=](frame_transform transform) -> frame_transform
 513                         {
 514                                 transform.image_transform.saturation = value;
 515                                 return transform;
 516                         }, duration, tween));
 517                 }
 518                 else if(_parameters[0] == L"CONTRAST")
 519                 {
 520                         auto value = boost::lexical_cast<double>(_parameters.at(1));
 521                         int duration = _parameters.size() > 2 ? boost::lexical_cast<int>(_parameters[2]) : 0;
 522                         std::wstring tween = _parameters.size() > 3 ? _parameters[3] : L"linear";
 523                         transforms.push_back(stage::transform_tuple_t(GetLayerIndex(), [=](frame_transform transform) -> frame_transform
 524                         {
 525                                 transform.image_transform.contrast = value;
 526                                 return transform;
 527                         }, duration, tween));
 528                 }
 529                 else if(_parameters[0] == L"LEVELS")
 530                 {
 531                         levels value;
 532                         value.min_input  = boost::lexical_cast<double>(_parameters.at(1));
 533                         value.max_input  = boost::lexical_cast<double>(_parameters.at(2));
 534                         value.gamma              = boost::lexical_cast<double>(_parameters.at(3));
 535                         value.min_output = boost::lexical_cast<double>(_parameters.at(4));
 536                         value.max_output = boost::lexical_cast<double>(_parameters.at(5));
 537                         int duration = _parameters.size() > 6 ? boost::lexical_cast<int>(_parameters[6]) : 0;
 538                         std::wstring tween = _parameters.size() > 7 ? _parameters[7] : L"linear";
 539
 540                         transforms.push_back(stage::transform_tuple_t(GetLayerIndex(), [=](frame_transform transform) -> frame_transform
 541                         {
 542                                 transform.image_transform.levels = value;
 543                                 return transform;
 544                         }, duration, tween));
 545                 }
 546                 else if(_parameters[0] == L"VOLUME")
 547                 {
 548                         int duration = _parameters.size() > 2 ? boost::lexical_cast<int>(_parameters[2]) : 0;
 549                         std::wstring tween = _parameters.size() > 3 ? _parameters[3] : L"linear";
 550                         double value = boost::lexical_cast<double>(_parameters[1]);
 551
 552                         transforms.push_back(stage::transform_tuple_t(GetLayerIndex(), [=](frame_transform transform) -> frame_transform
 553                         {
 554                                 transform.audio_transform.volume = value;
 555                                 return transform;
 556                         }, duration, tween));
 557                 }
 558                 else if(_parameters[0] == L"CLEAR")
 559                 {
 560                         int layer = GetLayerIndex(std::numeric_limits<int>::max());
 561                         if(layer ==     std::numeric_limits<int>::max())
 562                                 GetChannel()->stage().clear_transforms();
 563                         else
 564                                 GetChannel()->stage().clear_transforms(layer);
 565                 }
 566                 else if(_parameters[0] == L"COMMIT")
 567                 {
 568                         transforms = std::move(deferred_transforms[GetChannelIndex()]);
 569                 }
 570                 else
 571                 {
 572                         SetReplyString(TEXT("404 MIXER ERROR\r\n"));
 573                         return false;
 574                 }
 575
 576                 if(defer)
 577                 {
 578                         auto& defer_tranforms = deferred_transforms[GetChannelIndex()];
 579                         defer_tranforms.insert(defer_tranforms.end(), transforms.begin(), transforms.end());
 580                 }
 581                 else
 582                         GetChannel()->stage().apply_transforms(transforms);
 583
 584                 SetReplyString(TEXT("202 MIXER OK\r\n"));
 585
 586                 return true;
 587         }
 588         catch(file_not_found&)
 589         {
 590                 CASPAR_LOG_CURRENT_EXCEPTION();
 591                 SetReplyString(TEXT("404 MIXER ERROR\r\n"));
 592                 return false;
 593         }
 594         catch(...)
 595         {
 596                 CASPAR_LOG_CURRENT_EXCEPTION();
 597                 SetReplyString(TEXT("502 MIXER FAILED\r\n"));
 598                 return false;
 599         }
 600 }
 601
 602 bool SwapCommand::DoExecute()
 603 {
 604         //Perform loading of the clip
 605         try
 606         {
 607                 if(GetLayerIndex(-1) != -1)
 608                 {
 609                         std::vector<std::string> strs;
 610                         boost::split(strs, _parameters[0], boost::is_any_of("-"));
 611
 612                         auto ch1 = GetChannel();
 613                         auto ch2 = GetChannels().at(boost::lexical_cast<int>(strs.at(0))-1);
 614
 615                         int l1 = GetLayerIndex();
 616                         int l2 = boost::lexical_cast<int>(strs.at(1));
 617
 618                         ch1->stage().swap_layer(l1, l2, ch2->stage());
 619                 }
 620                 else
 621                 {
 622                         auto ch1 = GetChannel();
 623                         auto ch2 = GetChannels().at(boost::lexical_cast<int>(_parameters[0])-1);
 624                         ch1->stage().swap_layers(ch2->stage());
 625                 }
 626
 627                 SetReplyString(TEXT("202 SWAP OK\r\n"));
 628
 629                 return true;
 630         }
 631         catch(file_not_found&)
 632         {
 633                 CASPAR_LOG_CURRENT_EXCEPTION();
 634                 SetReplyString(TEXT("404 SWAP ERROR\r\n"));
 635                 return false;
 636         }
 637         catch(...)
 638         {
 639                 CASPAR_LOG_CURRENT_EXCEPTION();
 640                 SetReplyString(TEXT("502 SWAP FAILED\r\n"));
 641                 return false;
 642         }
 643 }
 644
 645 bool AddCommand::DoExecute()
 646 {
 647         //Perform loading of the clip
 648         try
 649         {
 650                 auto consumer = create_consumer(_parameters);
 651                 GetChannel()->output().add(GetLayerIndex(consumer->index()), consumer);
 652
 653                 SetReplyString(TEXT("202 ADD OK\r\n"));
 654
 655                 return true;
 656         }
 657         catch(file_not_found&)
 658         {
 659                 CASPAR_LOG_CURRENT_EXCEPTION();
 660                 SetReplyString(TEXT("404 ADD ERROR\r\n"));
 661                 return false;
 662         }
 663         catch(...)
 664         {
 665                 CASPAR_LOG_CURRENT_EXCEPTION();
 666                 SetReplyString(TEXT("502 ADD FAILED\r\n"));
 667                 return false;
 668         }
 669 }
 670
 671 bool RemoveCommand::DoExecute()
 672 {
 673         //Perform loading of the clip
 674         try
 675         {
 676                 auto index = GetLayerIndex(std::numeric_limits<int>::min());
 677                 if(index == std::numeric_limits<int>::min())
 678                         index = create_consumer(_parameters)->index();
 679
 680                 GetChannel()->output().remove(index);
 681
 682                 SetReplyString(TEXT("202 REMOVE OK\r\n"));
 683
 684                 return true;
 685         }
 686         catch(file_not_found&)
 687         {
 688                 CASPAR_LOG_CURRENT_EXCEPTION();
 689                 SetReplyString(TEXT("404 REMOVE ERROR\r\n"));
 690                 return false;
 691         }
 692         catch(...)
 693         {
 694                 CASPAR_LOG_CURRENT_EXCEPTION();
 695                 SetReplyString(TEXT("502 REMOVE FAILED\r\n"));
 696                 return false;
 697         }
 698 }
 699
 700 bool LoadCommand::DoExecute()
 701 {
 702         //Perform loading of the clip
 703         try
 704         {
 705                 _parameters[0] = _parameters[0];
 706                 auto pFP = create_producer(GetChannel()->frame_factory(), GetChannel()->video_format_desc(), _parameters);
 707                 GetChannel()->stage().load(GetLayerIndex(), pFP, true);
 708
 709                 SetReplyString(TEXT("202 LOAD OK\r\n"));
 710
 711                 return true;
 712         }
 713         catch(file_not_found&)
 714         {
 715                 CASPAR_LOG_CURRENT_EXCEPTION();
 716                 SetReplyString(TEXT("404 LOAD ERROR\r\n"));
 717                 return false;
 718         }
 719         catch(...)
 720         {
 721                 CASPAR_LOG_CURRENT_EXCEPTION();
 722                 SetReplyString(TEXT("502 LOAD FAILED\r\n"));
 723                 return false;
 724         }
 725 }
 726
 727
 728
 729 //std::function<std::wstring()> channel_cg_add_command::parse(const std::wstring& message, const std::vector<renderer::render_device_ptr>& channels)
 730 //{
 731 //      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>.*)?");
 732 //
 733 //      boost::wsmatch what;
 734 //      if(!boost::regex_match(message, what, expr))
 735 //              return nullptr;
 736 //
 737 //      auto info = channel_info::parse(what, channels);
 738 //
 739 //      int flash_layer_index = boost::lexical_cast<int>(what["FLASH_LAYER"].str());
 740 //
 741 //      std::wstring templatename = what["TEMPLATE"].str();
 742 //      bool play_on_load = what["PLAY_ON_LOAD"].matched ? what["PLAY_ON_LOAD"].str() != L"0" : 0;
 743 //      std::wstring start_label = what["START_LABEL"].str();
 744 //      std::wstring data = get_data(what["DATA"].str());
 745 //
 746 //      boost::replace_all(templatename, "\"", "");
 747 //
 748 //      return [=]() -> std::wstring
 749 //      {
 750 //              std::wstring fullFilename = flash::flash_producer::find_template(server::template_folder() + templatename);
 751 //              if(fullFilename.empty())
 752 //                      CASPAR_THROW_EXCEPTION(file_not_found());
 753 //
 754 //              std::wstring extension = boost::filesystem::wpath(fullFilename).extension();
 755 //              std::wstring filename = templatename;
 756 //              filename.append(extension);
 757 //
 758 //              flash::flash::create_cg_proxy(info.video_channel, std::max<int>(DEFAULT_CHANNEL_LAYER+1, info.layer_index))
 759 //                      ->add(flash_layer_index, filename, play_on_load, start_label, data);
 760 //
 761 //              CASPAR_LOG(info) << L"Executed [amcp_channel_cg_add]";
 762 //              return L"";
 763 //      };
 764
 765 bool LoadbgCommand::DoExecute()
 766 {
 767         transition_info transitionInfo;
 768
 769         bool bLoop = false;
 770
 771         // TRANSITION
 772
 773         std::wstring message;
 774         for(size_t n = 0; n < _parameters.size(); ++n)
 775                 message += _parameters[n] + L" ";
 776
 777         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)?.*");
 778         boost::wsmatch what;
 779         if(boost::regex_match(message, what, expr))
 780         {
 781                 auto transition = what["TRANSITION"].str();
 782                 transitionInfo.duration = boost::lexical_cast<size_t>(what["DURATION"].str());
 783                 auto direction = what["DIRECTION"].matched ? what["DIRECTION"].str() : L"";
 784                 auto tween = what["TWEEN"].matched ? what["TWEEN"].str() : L"";
 785                 transitionInfo.tweener = tween;
 786
 787                 if(transition == TEXT("CUT"))
 788                         transitionInfo.type = transition_type::cut;
 789                 else if(transition == TEXT("MIX"))
 790                         transitionInfo.type = transition_type::mix;
 791                 else if(transition == TEXT("PUSH"))
 792                         transitionInfo.type = transition_type::push;
 793                 else if(transition == TEXT("SLIDE"))
 794                         transitionInfo.type = transition_type::slide;
 795                 else if(transition == TEXT("WIPE"))
 796                         transitionInfo.type = transition_type::wipe;
 797
 798                 if(direction == TEXT("FROMLEFT"))
 799                         transitionInfo.direction = transition_direction::from_left;
 800                 else if(direction == TEXT("FROMRIGHT"))
 801                         transitionInfo.direction = transition_direction::from_right;
 802                 else if(direction == TEXT("LEFT"))
 803                         transitionInfo.direction = transition_direction::from_right;
 804                 else if(direction == TEXT("RIGHT"))
 805                         transitionInfo.direction = transition_direction::from_left;
 806         }
 807
 808         //Perform loading of the clip
 809         try
 810         {
 811                 std::shared_ptr<core::frame_producer> pFP;
 812
 813                 static boost::wregex expr(L"\\[(?<CHANNEL>\\d+)\\]", boost::regex::icase);
 814
 815                 boost::wsmatch what;
 816                 if(boost::regex_match(_parameters.at(0), what, expr))
 817                 {
 818                         auto channel_index = boost::lexical_cast<int>(what["CHANNEL"].str());
 819                         pFP = reroute::create_producer(*GetChannels().at(channel_index-1));
 820                 }
 821                 else
 822                         pFP = create_producer(GetChannel()->frame_factory(), GetChannel()->video_format_desc(), _parameters);
 823
 824                 if(pFP == frame_producer::empty())
 825                         CASPAR_THROW_EXCEPTION(file_not_found() << msg_info(_parameters.size() > 0 ? _parameters[0] : L""));
 826
 827                 bool auto_play = std::find(_parameters.begin(), _parameters.end(), L"AUTO") != _parameters.end();
 828
 829                 auto pFP2 = create_transition_producer(GetChannel()->video_format_desc().field_mode, spl::make_shared_ptr(pFP), transitionInfo);
 830                 if(auto_play)
 831                         GetChannel()->stage().load(GetLayerIndex(), pFP2, false, transitionInfo.duration); // TODO: LOOP
 832                 else
 833                         GetChannel()->stage().load(GetLayerIndex(), pFP2, false); // TODO: LOOP
 834
 835
 836                 SetReplyString(TEXT("202 LOADBG OK\r\n"));
 837
 838                 return true;
 839         }
 840         catch(file_not_found&)
 841         {
 842                 std::wstring params2;
 843                 for(auto it = _parameters.begin(); it != _parameters.end(); ++it)
 844                         params2 += L" " + *it;
 845                 CASPAR_LOG(error) << L"File not found. No match found for parameters. Check syntax:" << params2;
 846                 SetReplyString(TEXT("404 LOADBG ERROR\r\n"));
 847                 return false;
 848         }
 849         catch(...)
 850         {
 851                 CASPAR_LOG_CURRENT_EXCEPTION();
 852                 SetReplyString(TEXT("502 LOADBG FAILED\r\n"));
 853                 return false;
 854         }
 855 }
 856
 857 bool PauseCommand::DoExecute()
 858 {
 859         try
 860         {
 861                 GetChannel()->stage().pause(GetLayerIndex());
 862                 SetReplyString(TEXT("202 PAUSE OK\r\n"));
 863                 return true;
 864         }
 865         catch(...)
 866         {
 867                 SetReplyString(TEXT("501 PAUSE FAILED\r\n"));
 868         }
 869
 870         return false;
 871 }
 872
 873 bool PlayCommand::DoExecute()
 874 {
 875         try
 876         {
 877                 if(!_parameters.empty())
 878                 {
 879                         LoadbgCommand lbg;
 880                         lbg.SetChannel(GetChannel());
 881                         lbg.SetChannels(GetChannels());
 882                         lbg.SetChannelIndex(GetChannelIndex());
 883                         lbg.SetLayerIntex(GetLayerIndex());
 884                         lbg.SetClientInfo(GetClientInfo());
 885                         for(auto it = _parameters.begin(); it != _parameters.end(); ++it)
 886                                 lbg.AddParameter(*it);
 887                         if(!lbg.Execute())
 888                                 throw std::exception();
 889                 }
 890
 891                 GetChannel()->stage().play(GetLayerIndex());
 892
 893                 SetReplyString(TEXT("202 PLAY OK\r\n"));
 894                 return true;
 895         }
 896         catch(...)
 897         {
 898                 SetReplyString(TEXT("501 PLAY FAILED\r\n"));
 899         }
 900
 901         return false;
 902 }
 903
 904 bool StopCommand::DoExecute()
 905 {
 906         try
 907         {
 908                 GetChannel()->stage().stop(GetLayerIndex());
 909                 SetReplyString(TEXT("202 STOP OK\r\n"));
 910                 return true;
 911         }
 912         catch(...)
 913         {
 914                 SetReplyString(TEXT("501 STOP FAILED\r\n"));
 915         }
 916
 917         return false;
 918 }
 919
 920 bool ClearCommand::DoExecute()
 921 {
 922         int index = GetLayerIndex(std::numeric_limits<int>::min());
 923         if(index != std::numeric_limits<int>::min())
 924                 GetChannel()->stage().clear(index);
 925         else
 926                 GetChannel()->stage().clear();
 927
 928         SetReplyString(TEXT("202 CLEAR OK\r\n"));
 929
 930         return true;
 931 }
 932
 933 bool PrintCommand::DoExecute()
 934 {
 935         GetChannel()->output().add(create_consumer(boost::assign::list_of(L"IMAGE")));
 936
 937         SetReplyString(TEXT("202 PRINT OK\r\n"));
 938
 939         return true;
 940 }
 941
 942 bool LogCommand::DoExecute()
 943 {
 944         if(_parameters.at(0) == L"LEVEL")
 945                 log::set_log_level(_parameters.at(1));
 946
 947         SetReplyString(TEXT("202 LOG OK\r\n"));
 948
 949         return true;
 950 }
 951
 952 bool CGCommand::DoExecute()
 953 {
 954         try
 955         {
 956                 std::wstring command = _parameters[0];
 957                 if(command == TEXT("ADD"))
 958                         return DoExecuteAdd();
 959                 else if(command == TEXT("PLAY"))
 960                         return DoExecutePlay();
 961                 else if(command == TEXT("STOP"))
 962                         return DoExecuteStop();
 963                 else if(command == TEXT("NEXT"))
 964                         return DoExecuteNext();
 965                 else if(command == TEXT("REMOVE"))
 966                         return DoExecuteRemove();
 967                 else if(command == TEXT("CLEAR"))
 968                         return DoExecuteClear();
 969                 else if(command == TEXT("UPDATE"))
 970                         return DoExecuteUpdate();
 971                 else if(command == TEXT("INVOKE"))
 972                         return DoExecuteInvoke();
 973                 else if(command == TEXT("INFO"))
 974                         return DoExecuteInfo();
 975         }
 976         catch(...)
 977         {
 978                 CASPAR_LOG_CURRENT_EXCEPTION();
 979         }
 980
 981         SetReplyString(TEXT("403 CG ERROR\r\n"));
 982         return false;
 983 }
 984
 985 bool CGCommand::ValidateLayer(const std::wstring& layerstring) {
 986         int length = layerstring.length();
 987         for(int i = 0; i < length; ++i) {
 988                 if(!_istdigit(layerstring[i])) {
 989                         return false;
 990                 }
 991         }
 992
 993         return true;
 994 }
 995
 996 bool CGCommand::DoExecuteAdd() {
 997         //CG 1 ADD 0 "template_folder/templatename" [STARTLABEL] 0/1 [DATA]
 998
 999         int layer = 0;                          //_parameters[1]
1000 //      std::wstring templateName;      //_parameters[2]
1001         std::wstring label;             //_parameters[3]
1002         bool bDoStart = false;          //_parameters[3] alt. _parameters[4]
1003 //      std::wstring data;                      //_parameters[4] alt. _parameters[5]
1004
1005         if(_parameters.size() < 4)
1006         {
1007                 SetReplyString(TEXT("402 CG ERROR\r\n"));
1008                 return false;
1009         }
1010         unsigned int dataIndex = 4;
1011
1012         if(!ValidateLayer(_parameters[1]))
1013         {
1014                 SetReplyString(TEXT("403 CG ERROR\r\n"));
1015                 return false;
1016         }
1017
1018         layer = _ttoi(_parameters[1].c_str());
1019
1020         if(_parameters[3].length() > 1)
1021         {       //read label
1022                 label = _parameters2[3];
1023                 ++dataIndex;
1024
1025                 if(_parameters.size() > 4 && _parameters[4].length() > 0)       //read play-on-load-flag
1026                         bDoStart = (_parameters[4][0]==TEXT('1')) ? true : false;
1027                 else
1028                 {
1029                         SetReplyString(TEXT("402 CG ERROR\r\n"));
1030                         return false;
1031                 }
1032         }
1033         else if(_parameters[3].length() > 0) {  //read play-on-load-flag
1034                 bDoStart = (_parameters[3][0]==TEXT('1')) ? true : false;
1035         }
1036         else
1037         {
1038                 SetReplyString(TEXT("403 CG ERROR\r\n"));
1039                 return false;
1040         }
1041
1042         const TCHAR* pDataString = 0;
1043         std::wstringstream data;
1044         std::wstring dataFromFile;
1045         if(_parameters.size() > dataIndex)
1046         {       //read data
1047                 const std::wstring& dataString = _parameters2[dataIndex];
1048
1049                 if(dataString[0] == TEXT('<')) //the data is an XML-string
1050                         pDataString = dataString.c_str();
1051                 else
1052                 {
1053                         //The data is not an XML-string, it must be a filename
1054                         std::wstring filename = env::data_folder();
1055                         filename.append(dataString);
1056                         filename.append(TEXT(".ftd"));
1057
1058                         dataFromFile = read_file(boost::filesystem::wpath(filename));
1059                         pDataString = dataFromFile.c_str();
1060                 }
1061         }
1062
1063         std::wstring fullFilename = flash::find_template(env::template_folder() + _parameters[2]);
1064         if(!fullFilename.empty())
1065         {
1066                 std::wstring extension = boost::filesystem::path(fullFilename).extension().wstring();
1067                 std::wstring filename = _parameters[2];
1068                 filename.append(extension);
1069
1070                 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(""));
1071                 SetReplyString(TEXT("202 CG OK\r\n"));
1072         }
1073         else
1074         {
1075                 CASPAR_LOG(warning) << "Could not find template " << _parameters[2];
1076                 SetReplyString(TEXT("404 CG ERROR\r\n"));
1077         }
1078         return true;
1079 }
1080
1081 bool CGCommand::DoExecutePlay()
1082 {
1083         if(_parameters.size() > 1)
1084         {
1085                 if(!ValidateLayer(_parameters[1]))
1086                 {
1087                         SetReplyString(TEXT("403 CG ERROR\r\n"));
1088                         return false;
1089                 }
1090                 int layer = _ttoi(_parameters[1].c_str());
1091                 flash::create_cg_proxy(spl::shared_ptr<core::video_channel>(GetChannel()), GetLayerIndex(flash::cg_proxy::DEFAULT_LAYER)).play(layer);
1092         }
1093         else
1094         {
1095                 SetReplyString(TEXT("402 CG ERROR\r\n"));
1096                 return true;
1097         }
1098
1099         SetReplyString(TEXT("202 CG OK\r\n"));
1100         return true;
1101 }
1102
1103 bool CGCommand::DoExecuteStop()
1104 {
1105         if(_parameters.size() > 1)
1106         {
1107                 if(!ValidateLayer(_parameters[1]))
1108                 {
1109                         SetReplyString(TEXT("403 CG ERROR\r\n"));
1110                         return false;
1111                 }
1112                 int layer = _ttoi(_parameters[1].c_str());
1113                 flash::create_cg_proxy(spl::shared_ptr<core::video_channel>(GetChannel()), GetLayerIndex(flash::cg_proxy::DEFAULT_LAYER)).stop(layer, 0);
1114         }
1115         else
1116         {
1117                 SetReplyString(TEXT("402 CG ERROR\r\n"));
1118                 return true;
1119         }
1120
1121         SetReplyString(TEXT("202 CG OK\r\n"));
1122         return true;
1123 }
1124
1125 bool CGCommand::DoExecuteNext()
1126 {
1127         if(_parameters.size() > 1)
1128         {
1129                 if(!ValidateLayer(_parameters[1]))
1130                 {
1131                         SetReplyString(TEXT("403 CG ERROR\r\n"));
1132                         return false;
1133                 }
1134
1135                 int layer = _ttoi(_parameters[1].c_str());
1136                 flash::create_cg_proxy(spl::shared_ptr<core::video_channel>(GetChannel()), GetLayerIndex(flash::cg_proxy::DEFAULT_LAYER)).next(layer);
1137         }
1138         else
1139         {
1140                 SetReplyString(TEXT("402 CG ERROR\r\n"));
1141                 return true;
1142         }
1143
1144         SetReplyString(TEXT("202 CG OK\r\n"));
1145         return true;
1146 }
1147
1148 bool CGCommand::DoExecuteRemove()
1149 {
1150         if(_parameters.size() > 1)
1151         {
1152                 if(!ValidateLayer(_parameters[1]))
1153                 {
1154                         SetReplyString(TEXT("403 CG ERROR\r\n"));
1155                         return false;
1156                 }
1157
1158                 int layer = _ttoi(_parameters[1].c_str());
1159                 flash::create_cg_proxy(spl::shared_ptr<core::video_channel>(GetChannel()), GetLayerIndex(flash::cg_proxy::DEFAULT_LAYER)).remove(layer);
1160         }
1161         else
1162         {
1163                 SetReplyString(TEXT("402 CG ERROR\r\n"));
1164                 return true;
1165         }
1166
1167         SetReplyString(TEXT("202 CG OK\r\n"));
1168         return true;
1169 }
1170
1171 bool CGCommand::DoExecuteClear()
1172 {
1173         GetChannel()->stage().clear(GetLayerIndex(flash::cg_proxy::DEFAULT_LAYER));
1174         SetReplyString(TEXT("202 CG OK\r\n"));
1175         return true;
1176 }
1177
1178 bool CGCommand::DoExecuteUpdate()
1179 {
1180         try
1181         {
1182                 if(!ValidateLayer(_parameters.at(1)))
1183                 {
1184                         SetReplyString(TEXT("403 CG ERROR\r\n"));
1185                         return false;
1186                 }
1187
1188                 std::wstring dataString = _parameters2.at(2);
1189                 if(dataString.at(0) != TEXT('<'))
1190                 {
1191                         //The data is not an XML-string, it must be a filename
1192                         std::wstring filename = env::data_folder();
1193                         filename.append(dataString);
1194                         filename.append(TEXT(".ftd"));
1195
1196                         dataString = read_file(boost::filesystem::wpath(filename));
1197                 }
1198
1199                 int layer = _ttoi(_parameters.at(1).c_str());
1200                 flash::create_cg_proxy(spl::shared_ptr<core::video_channel>(GetChannel()), GetLayerIndex(flash::cg_proxy::DEFAULT_LAYER)).update(layer, dataString);
1201         }
1202         catch(...)
1203         {
1204                 SetReplyString(TEXT("402 CG ERROR\r\n"));
1205                 return true;
1206         }
1207
1208         SetReplyString(TEXT("202 CG OK\r\n"));
1209         return true;
1210 }
1211
1212 bool CGCommand::DoExecuteInvoke()
1213 {
1214         std::wstringstream replyString;
1215         replyString << TEXT("201 CG OK\r\n");
1216
1217         if(_parameters.size() > 2)
1218         {
1219                 if(!ValidateLayer(_parameters[1]))
1220                 {
1221                         SetReplyString(TEXT("403 CG ERROR\r\n"));
1222                         return false;
1223                 }
1224                 int layer = _ttoi(_parameters[1].c_str());
1225                 auto result = flash::create_cg_proxy(spl::shared_ptr<core::video_channel>(GetChannel()), GetLayerIndex(flash::cg_proxy::DEFAULT_LAYER)).invoke(layer, _parameters2[2]);
1226                 replyString << result << TEXT("\r\n");
1227         }
1228         else
1229         {
1230                 SetReplyString(TEXT("402 CG ERROR\r\n"));
1231                 return true;
1232         }
1233
1234         SetReplyString(replyString.str());
1235         return true;
1236 }
1237
1238 bool CGCommand::DoExecuteInfo()
1239 {
1240         std::wstringstream replyString;
1241         replyString << TEXT("201 CG OK\r\n");
1242
1243         if(_parameters.size() > 1)
1244         {
1245                 if(!ValidateLayer(_parameters[1]))
1246                 {
1247                         SetReplyString(TEXT("403 CG ERROR\r\n"));
1248                         return false;
1249                 }
1250
1251                 int layer = _ttoi(_parameters[1].c_str());
1252                 auto desc = flash::create_cg_proxy(spl::shared_ptr<core::video_channel>(GetChannel()), GetLayerIndex(flash::cg_proxy::DEFAULT_LAYER)).description(layer);
1253
1254                 replyString << desc << TEXT("\r\n");
1255         }
1256         else
1257         {
1258                 auto info = flash::create_cg_proxy(spl::shared_ptr<core::video_channel>(GetChannel()), GetLayerIndex(flash::cg_proxy::DEFAULT_LAYER)).template_host_info();
1259                 replyString << info << TEXT("\r\n");
1260         }
1261
1262         SetReplyString(replyString.str());
1263         return true;
1264 }
1265
1266 bool DataCommand::DoExecute()
1267 {
1268         std::wstring command = _parameters[0];
1269         if(command == TEXT("STORE"))
1270                 return DoExecuteStore();
1271         else if(command == TEXT("RETRIEVE"))
1272                 return DoExecuteRetrieve();
1273         else if(command == TEXT("LIST"))
1274                 return DoExecuteList();
1275
1276         SetReplyString(TEXT("403 DATA ERROR\r\n"));
1277         return false;
1278 }
1279
1280 bool DataCommand::DoExecuteStore()
1281 {
1282         if(_parameters.size() < 3)
1283         {
1284                 SetReplyString(TEXT("402 DATA STORE ERROR\r\n"));
1285                 return false;
1286         }
1287
1288         std::wstring filename = env::data_folder();
1289         filename.append(_parameters[1]);
1290         filename.append(TEXT(".ftd"));
1291
1292         std::wofstream datafile(filename.c_str());
1293         if(!datafile)
1294         {
1295                 SetReplyString(TEXT("501 DATA STORE FAILED\r\n"));
1296                 return false;
1297         }
1298
1299         datafile << static_cast<wchar_t>(65279); // UTF-8 BOM character
1300         datafile << _parameters2[2] << std::flush;
1301         datafile.close();
1302
1303         std::wstring replyString = TEXT("202 DATA STORE OK\r\n");
1304         SetReplyString(replyString);
1305         return true;
1306 }
1307
1308 bool DataCommand::DoExecuteRetrieve()
1309 {
1310         if(_parameters.size() < 2)
1311         {
1312                 SetReplyString(TEXT("402 DATA RETRIEVE ERROR\r\n"));
1313                 return false;
1314         }
1315
1316         std::wstring filename = env::data_folder();
1317         filename.append(_parameters[1]);
1318         filename.append(TEXT(".ftd"));
1319
1320         std::wstring file_contents = read_file(boost::filesystem::wpath(filename));
1321
1322         if (file_contents.empty())
1323         {
1324                 SetReplyString(TEXT("404 DATA RETRIEVE ERROR\r\n"));
1325                 return false;
1326         }
1327
1328         std::wstringstream reply(TEXT("201 DATA RETRIEVE OK\r\n"));
1329
1330         reply << file_contents;
1331         reply << "\r\n";
1332         SetReplyString(reply.str());
1333         return true;
1334 }
1335
1336 bool DataCommand::DoExecuteList()
1337 {
1338         std::wstringstream replyString;
1339         replyString << TEXT("200 DATA LIST OK\r\n");
1340
1341         for (boost::filesystem::recursive_directory_iterator itr(env::data_folder()), end; itr != end; ++itr)
1342         {
1343                 if(boost::filesystem::is_regular_file(itr->path()))
1344                 {
1345                         if(!boost::iequals(itr->path().extension().wstring(), L".ftd"))
1346                                 continue;
1347
1348                         auto relativePath = boost::filesystem::wpath(itr->path().wstring().substr(env::data_folder().size()-1, itr->path().wstring().size()));
1349
1350                         auto str = relativePath.replace_extension(TEXT("")).native();
1351                         if(str[0] == '\\' || str[0] == '/')
1352                                 str = std::wstring(str.begin() + 1, str.end());
1353
1354                         replyString << str << TEXT("\r\n");
1355                 }
1356         }
1357
1358         replyString << TEXT("\r\n");
1359
1360         SetReplyString(boost::to_upper_copy(replyString.str()));
1361         return true;
1362 }
1363
1364 bool CinfCommand::DoExecute()
1365 {
1366         std::wstringstream replyString;
1367
1368         try
1369         {
1370                 std::wstring info;
1371                 for (boost::filesystem::recursive_directory_iterator itr(env::media_folder()), end; itr != end && info.empty(); ++itr)
1372                 {
1373                         auto path = itr->path();
1374                         auto file = path.replace_extension(L"").filename();
1375                         if(boost::iequals(file.wstring(), _parameters.at(0)))
1376                                 info += MediaInfo(itr->path()) + L"\r\n";
1377                 }
1378
1379                 if(info.empty())
1380                 {
1381                         SetReplyString(TEXT("404 CINF ERROR\r\n"));
1382                         return false;
1383                 }
1384                 replyString << TEXT("200 CINF OK\r\n");
1385                 replyString << info << "\r\n";
1386         }
1387         catch(...)
1388         {
1389                 CASPAR_LOG_CURRENT_EXCEPTION();
1390                 SetReplyString(TEXT("404 CINF ERROR\r\n"));
1391                 return false;
1392         }
1393
1394         SetReplyString(replyString.str());
1395         return true;
1396 }
1397
1398 void GenerateChannelInfo(int index, const spl::shared_ptr<core::video_channel>& pChannel, std::wstringstream& replyString)
1399 {
1400         replyString << index+1 << TEXT(" ") << pChannel->video_format_desc().name << TEXT(" PLAYING") << TEXT("\r\n");
1401 }
1402
1403 bool InfoCommand::DoExecute()
1404 {
1405         std::wstringstream replyString;
1406
1407         boost::property_tree::xml_writer_settings<wchar_t> w(' ', 3);
1408
1409         try
1410         {
1411                 if(_parameters.size() >= 1 && _parameters[0] == L"TEMPLATE")
1412                 {
1413                         replyString << L"201 INFO TEMPLATE OK\r\n";
1414
1415                         // Needs to be extended for any file, not just flash.
1416
1417                         auto filename = flash::find_template(env::template_folder() + _parameters.at(1));
1418
1419                         std::wstringstream str;
1420                         str << u16(flash::read_template_meta_info(filename));
1421                         boost::property_tree::wptree info;
1422                         boost::property_tree::xml_parser::read_xml(str, info, boost::property_tree::xml_parser::trim_whitespace | boost::property_tree::xml_parser::no_comments);
1423
1424                         boost::property_tree::xml_parser::write_xml(replyString, info, w);
1425                 }
1426                 else if(_parameters.size() >= 1 && _parameters[0] == L"CONFIG")
1427                 {
1428                         replyString << L"201 INFO CONFIG OK\r\n";
1429
1430                         boost::property_tree::write_xml(replyString, caspar::env::properties(), w);
1431                 }
1432                 else if(_parameters.size() >= 1 && _parameters[0] == L"PATHS")
1433                 {
1434                         replyString << L"201 INFO PATHS OK\r\n";
1435
1436                         boost::property_tree::wptree info;
1437                         info.add_child(L"paths", caspar::env::properties().get_child(L"configuration.paths"));
1438                         info.add(L"paths.initial-path", boost::filesystem3::initial_path().wstring() + L"\\");
1439
1440                         boost::property_tree::write_xml(replyString, info, w);
1441                 }
1442                 else if(_parameters.size() >= 1 && _parameters[0] == L"SYSTEM")
1443                 {
1444                         replyString << L"201 INFO SYSTEM OK\r\n";
1445
1446                         boost::property_tree::wptree info;
1447
1448                         info.add(L"system.name",                                        caspar::system_product_name());
1449                         info.add(L"system.windows.name",                        caspar::win_product_name());
1450                         info.add(L"system.windows.service-pack",        caspar::win_sp_version());
1451                         info.add(L"system.cpu",                                         caspar::cpu_info());
1452
1453                         BOOST_FOREACH(auto device, caspar::decklink::device_list())
1454                                 info.add(L"system.decklink.device", device);
1455
1456                         BOOST_FOREACH(auto device, caspar::bluefish::device_list())
1457                                 info.add(L"system.bluefish.device", device);
1458
1459                         info.add(L"system.flash",                                       caspar::flash::version());
1460                         //info.add(L"system.free-image",                                caspar::image::version());
1461                         info.add(L"system.ffmpeg.avcodec",                      caspar::ffmpeg::avcodec_version());
1462                         info.add(L"system.ffmpeg.avformat",                     caspar::ffmpeg::avformat_version());
1463                         info.add(L"system.ffmpeg.avfilter",                     caspar::ffmpeg::avfilter_version());
1464                         info.add(L"system.ffmpeg.avutil",                       caspar::ffmpeg::avutil_version());
1465                         info.add(L"system.ffmpeg.swscale",                      caspar::ffmpeg::swscale_version());
1466
1467                         boost::property_tree::write_xml(replyString, info, w);
1468                 }
1469                 else if(_parameters.size() >= 1 && _parameters[0] == L"SERVER")
1470                 {
1471                         replyString << L"201 INFO SERVER OK\r\n";
1472
1473                         boost::property_tree::wptree info;
1474
1475                         int index = 0;
1476                         BOOST_FOREACH(auto channel, channels_)
1477                                 info.add_child(L"channels.channel", channel->info())
1478                                         .add(L"index", ++index);
1479
1480                         boost::property_tree::write_xml(replyString, info, w);
1481                 }
1482                 else // channel
1483                 {
1484                         if(_parameters.size() >= 1)
1485                         {
1486                                 replyString << TEXT("201 INFO OK\r\n");
1487                                 boost::property_tree::wptree info;
1488
1489                                 std::vector<std::wstring> split;
1490                                 boost::split(split, _parameters[0], boost::is_any_of("-"));
1491
1492                                 int layer = std::numeric_limits<int>::min();
1493                                 int channel = boost::lexical_cast<int>(split[0]) - 1;
1494
1495                                 if(split.size() > 1)
1496                                         layer = boost::lexical_cast<int>(split[1]);
1497
1498                                 if(layer == std::numeric_limits<int>::min())
1499                                 {
1500                                         info.add_child(L"channel", channels_.at(channel)->info())
1501                                                         .add(L"index", channel);
1502                                 }
1503                                 else
1504                                 {
1505                                         if(_parameters.size() >= 2)
1506                                         {
1507                                                 if(_parameters[1] == L"B")
1508                                                         info.add_child(L"producer", channels_.at(channel)->stage().background(layer).get()->info());
1509                                                 else
1510                                                         info.add_child(L"producer", channels_.at(channel)->stage().foreground(layer).get()->info());
1511                                         }
1512                                         else
1513                                         {
1514                                                 info.add_child(L"layer", channels_.at(channel)->stage().info(layer).get())
1515                                                         .add(L"index", layer);
1516                                         }
1517                                 }
1518                                 boost::property_tree::xml_parser::write_xml(replyString, info, w);
1519                         }
1520                         else
1521                         {
1522                                 // This is needed for backwards compatibility with old clients
1523                                 replyString << TEXT("200 INFO OK\r\n");
1524                                 for(size_t n = 0; n < channels_.size(); ++n)
1525                                         GenerateChannelInfo(n, channels_[n], replyString);
1526                         }
1527
1528                 }
1529         }
1530         catch(...)
1531         {
1532                 CASPAR_LOG_CURRENT_EXCEPTION();
1533                 SetReplyString(TEXT("403 INFO ERROR\r\n"));
1534                 return false;
1535         }
1536
1537         replyString << TEXT("\r\n");
1538         SetReplyString(replyString.str());
1539         return true;
1540 }
1541
1542 bool ClsCommand::DoExecute()
1543 {
1544 /*
1545                 wav = audio
1546                 mp3 = audio
1547                 swf     = movie
1548                 dv  = movie
1549                 tga = still
1550                 col = still
1551         */
1552         try
1553         {
1554                 std::wstringstream replyString;
1555                 replyString << TEXT("200 CLS OK\r\n");
1556                 replyString << ListMedia();
1557                 replyString << TEXT("\r\n");
1558                 SetReplyString(boost::to_upper_copy(replyString.str()));
1559         }
1560         catch(...)
1561         {
1562                 CASPAR_LOG_CURRENT_EXCEPTION();
1563                 SetReplyString(TEXT("501 CLS FAILED\r\n"));
1564                 return false;
1565         }
1566
1567         return true;
1568 }
1569
1570 bool TlsCommand::DoExecute()
1571 {
1572         try
1573         {
1574                 std::wstringstream replyString;
1575                 replyString << TEXT("200 TLS OK\r\n");
1576
1577                 replyString << ListTemplates();
1578                 replyString << TEXT("\r\n");
1579
1580                 SetReplyString(replyString.str());
1581         }
1582         catch(...)
1583         {
1584                 CASPAR_LOG_CURRENT_EXCEPTION();
1585                 SetReplyString(TEXT("501 TLS FAILED\r\n"));
1586                 return false;
1587         }
1588         return true;
1589 }
1590
1591 bool VersionCommand::DoExecute()
1592 {
1593         std::wstring replyString = TEXT("201 VERSION OK\r\n") + env::version() + TEXT("\r\n");
1594
1595         if(_parameters.size() > 0)
1596         {
1597                 if(_parameters[0] == L"FLASH")
1598                         replyString = TEXT("201 VERSION OK\r\n") + flash::version() + TEXT("\r\n");
1599                 else if(_parameters[0] == L"TEMPLATEHOST")
1600                         replyString = TEXT("201 VERSION OK\r\n") + flash::cg_version() + TEXT("\r\n");
1601                 else if(_parameters[0] != L"SERVER")
1602                         replyString = TEXT("403 VERSION ERROR\r\n");
1603         }
1604
1605         SetReplyString(replyString);
1606         return true;
1607 }
1608
1609 bool ByeCommand::DoExecute()
1610 {
1611         GetClientInfo()->Disconnect();
1612         return true;
1613 }
1614
1615 bool SetCommand::DoExecute()
1616 {
1617         try
1618         {
1619                 std::wstring name = _parameters[0];
1620                 std::transform(name.begin(), name.end(), name.begin(), toupper);
1621
1622                 std::wstring value = _parameters[1];
1623                 std::transform(value.begin(), value.end(), value.begin(), toupper);
1624
1625                 if(name == TEXT("MODE"))
1626                 {
1627                         auto format_desc = core::video_format_desc(value);
1628                         if(format_desc.format != core::video_format::invalid)
1629                         {
1630                                 GetChannel()->video_format_desc(format_desc);
1631                                 SetReplyString(TEXT("202 SET MODE OK\r\n"));
1632                         }
1633                         else
1634                                 SetReplyString(TEXT("501 SET MODE FAILED\r\n"));
1635                 }
1636                 else
1637                 {
1638                         this->SetReplyString(TEXT("403 SET ERROR\r\n"));
1639                 }
1640         }
1641         catch(...)
1642         {
1643                 CASPAR_LOG_CURRENT_EXCEPTION();
1644                 SetReplyString(TEXT("501 SET FAILED\r\n"));
1645                 return false;
1646         }
1647
1648         return true;
1649 }
1650
1651
1652 }       //namespace amcp
1653 }}      //namespace caspar