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

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