lib/medialib.php

   1 <?php
   2 // This file is part of Moodle - http://moodle.org/
   3 //
   4 // Moodle is free software: you can redistribute it and/or modify
   5 // it under the terms of the GNU General Public License as published by
   6 // the Free Software Foundation, either version 3 of the License, or
   7 // (at your option) any later version.
   8 //
   9 // Moodle is distributed in the hope that it will be useful,
  10 // but WITHOUT ANY WARRANTY; without even the implied warranty of
  11 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12 // GNU General Public License for more details.
  13 //
  14 // You should have received a copy of the GNU General Public License
  15 // along with Moodle.  If not, see <http://www.gnu.org/licenses/>.
  16
  17 /**
  18  * Classes for handling embedded media (mainly audio and video).
  19  *
  20  * These are used only from within the core media renderer.
  21  *
  22  * To embed media from Moodle code, do something like the following:
  23  *
  24  * $mediarenderer = $PAGE->get_renderer('core', 'media');
  25  * echo $mediarenderer->embed_url(new moodle_url('http://example.org/a.mp3'));
  26  *
  27  * You do not need to require this library file manually. Getting the renderer
  28  * (the first line above) requires this library file automatically.
  29  *
  30  * @package core_media
  31  * @copyright 2012 The Open University
  32  * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
  33  */
  34
  35 defined('MOODLE_INTERNAL') || die();
  36
  37 if (!defined('CORE_MEDIA_VIDEO_WIDTH')) {
  38     // Default video width if no width is specified; some players may do something
  39     // more intelligent such as use real video width.
  40     // May be defined in config.php if required.
  41     define('CORE_MEDIA_VIDEO_WIDTH', 400);
  42 }
  43 if (!defined('CORE_MEDIA_VIDEO_HEIGHT')) {
  44     // Default video height. May be defined in config.php if required.
  45     define('CORE_MEDIA_VIDEO_HEIGHT', 300);
  46 }
  47 if (!defined('CORE_MEDIA_AUDIO_WIDTH')) {
  48     // Default audio width if no width is specified.
  49     // May be defined in config.php if required.
  50     define('CORE_MEDIA_AUDIO_WIDTH', 300);
  51 }
  52
  53
  54 /**
  55  * Constants and static utility functions for use with core_media_renderer.
  56  *
  57  * @copyright 2011 The Open University
  58  * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
  59  */
  60 abstract class core_media {
  61     /**
  62      * Option: Disable text link fallback.
  63      *
  64      * Use this option if you are going to print a visible link anyway so it is
  65      * pointless to have one as fallback.
  66      *
  67      * To enable, set value to true.
  68      */
  69     const OPTION_NO_LINK = 'nolink';
  70
  71     /**
  72      * Option: When embedding, if there is no matching embed, do not use the
  73      * default link fallback player; instead return blank.
  74      *
  75      * This is different from OPTION_NO_LINK because this option still uses the
  76      * fallback link if there is some kind of embedding. Use this option if you
  77      * are going to check if the return value is blank and handle it specially.
  78      *
  79      * To enable, set value to true.
  80      */
  81     const OPTION_FALLBACK_TO_BLANK = 'embedorblank';
  82
  83     /**
  84      * Option: Enable players which are only suitable for use when we trust the
  85      * user who embedded the content.
  86      *
  87      * At present, this option enables the SWF player.
  88      *
  89      * To enable, set value to true.
  90      */
  91     const OPTION_TRUSTED = 'trusted';
  92
  93     /**
  94      * Option: Put a div around the output (if not blank) so that it displays
  95      * as a block using the 'resourcecontent' CSS class.
  96      *
  97      * To enable, set value to true.
  98      */
  99     const OPTION_BLOCK = 'block';
 100
 101     /**
 102      * Given a string containing multiple URLs separated by #, this will split
 103      * it into an array of moodle_url objects suitable for using when calling
 104      * embed_alternatives.
 105      *
 106      * Note that the input string should NOT be html-escaped (i.e. if it comes
 107      * from html, call html_entity_decode first).
 108      *
 109      * @param string $combinedurl String of 1 or more alternatives separated by #
 110      * @param int $width Output variable: width (will be set to 0 if not specified)
 111      * @param int $height Output variable: height (0 if not specified)
 112      * @return array Array of 1 or more moodle_url objects
 113      */
 114     public static function split_alternatives($combinedurl, &$width, &$height) {
 115         $urls = explode('#', $combinedurl);
 116         $width = 0;
 117         $height = 0;
 118         $returnurls = array();
 119
 120         foreach ($urls as $url) {
 121             $matches = null;
 122
 123             // You can specify the size as a separate part of the array like
 124             // #d=640x480 without actually including a url in it.
 125             if (preg_match('/^d=([\d]{1,4})x([\d]{1,4})$/i', $url, $matches)) {
 126                 $width  = $matches[1];
 127                 $height = $matches[2];
 128                 continue;
 129             }
 130
 131             // Can also include the ?d= as part of one of the URLs (if you use
 132             // more than one they will be ignored except the last).
 133             if (preg_match('/\?d=([\d]{1,4})x([\d]{1,4})$/i', $url, $matches)) {
 134                 $width  = $matches[1];
 135                 $height = $matches[2];
 136
 137                 // Trim from URL.
 138                 $url = str_replace($matches[0], '', $url);
 139             }
 140
 141             // Clean up url.
 142             $url = clean_param($url, PARAM_URL);
 143             if (empty($url)) {
 144                 continue;
 145             }
 146
 147             // Turn it into moodle_url object.
 148             $returnurls[] = new moodle_url($url);
 149         }
 150
 151         return $returnurls;
 152     }
 153
 154     /**
 155      * Returns the file extension for a URL.
 156      * @param moodle_url $url URL
 157      */
 158     public static function get_extension(moodle_url $url) {
 159         // Note: Does not use textlib (. is UTF8-safe).
 160         $filename = self::get_filename($url);
 161         $dot = strrpos($filename, '.');
 162         if ($dot === false) {
 163             return '';
 164         } else {
 165             return strtolower(substr($filename, $dot + 1));
 166         }
 167     }
 168
 169     /**
 170      * Obtains the filename from the moodle_url.
 171      * @param moodle_url $url URL
 172      * @return string Filename only (not escaped)
 173      */
 174     public static function get_filename(moodle_url $url) {
 175         global $CFG;
 176
 177         // Use the 'file' parameter if provided (for links created when
 178         // slasharguments was off). If not present, just use URL path.
 179         $path = $url->get_param('file');
 180         if (!$path) {
 181             $path = $url->get_path();
 182         }
 183
 184         // Remove everything before last / if present. Does not use textlib as / is UTF8-safe.
 185         $slash = strrpos($path, '/');
 186         if ($slash !== false) {
 187             $path = substr($path, $slash + 1);
 188         }
 189         return $path;
 190     }
 191
 192     /**
 193      * Guesses MIME type for a moodle_url based on file extension.
 194      * @param moodle_url $url URL
 195      * @return string MIME type
 196      */
 197     public static function get_mimetype(moodle_url $url) {
 198         return mimeinfo('type', self::get_filename($url));
 199     }
 200 }
 201
 202
 203 /**
 204  * Base class for media players.
 205  *
 206  * Media players return embed HTML for a particular way of playing back audio
 207  * or video (or another file type).
 208  *
 209  * In order to make the code more lightweight, this is not a plugin type
 210  * (players cannot have their own settings, database tables, capabilities, etc).
 211  * These classes are used only by core_media_renderer in outputrenderers.php.
 212  * If you add a new class here (in core code) you must modify the
 213  * get_players_raw function in that file to include it.
 214  *
 215  * If a Moodle installation wishes to add extra player objects they can do so
 216  * by overriding that renderer in theme, and overriding the get_players_raw
 217  * function. The new player class should then of course be defined within the
 218  * custom theme or other suitable location, not in this file.
 219  *
 220  * @copyright 2011 The Open University
 221  * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
 222  */
 223 abstract class core_media_player {
 224     /**
 225      * Placeholder text used to indicate where the fallback content is placed
 226      * within a result.
 227      */
 228     const PLACEHOLDER = '<!--FALLBACK-->';
 229
 230     /**
 231      * Generates code required to embed the player.
 232      *
 233      * The returned code contains a placeholder comment '<!--FALLBACK-->'
 234      * (constant core_media_player::PLACEHOLDER) which indicates the location
 235      * where fallback content should be placed in the event that this type of
 236      * player is not supported by user browser.
 237      *
 238      * The $urls parameter includes one or more alternative media formats that
 239      * are supported by this player. It does not include formats that aren't
 240      * supported (see list_supported_urls).
 241      *
 242      * The $options array contains key-value pairs. See OPTION_xx constants
 243      * for documentation of standard option(s).
 244      *
 245      * @param array $urls URLs of media files
 246      * @param string $name Display name; '' to use default
 247      * @param int $width Optional width; 0 to use default
 248      * @param int $height Optional height; 0 to use default
 249      * @param array $options Options array
 250      * @return string HTML code for embed
 251      */
 252     public abstract function embed($urls, $name, $width, $height, $options);
 253
 254     /**
 255      * Gets the list of file extensions supported by this media player.
 256      *
 257      * Note: This is only required for the default implementation of
 258      * list_supported_urls. If you override that function to determine
 259      * supported URLs in some way other than by extension, then this function
 260      * is not necessary.
 261      *
 262      * @return array Array of strings (extension not including dot e.g. 'mp3')
 263      */
 264     public function get_supported_extensions() {
 265         return array();
 266     }
 267
 268     /**
 269      * Lists keywords that must be included in a url that can be embedded with
 270      * this player. Any such keywords should be added to the array.
 271      *
 272      * For example if this player supports FLV and F4V files then it should add
 273      * '.flv' and '.f4v' to the array. (The check is not case-sensitive.)
 274      *
 275      * Default handling calls the get_supported_extensions function and adds
 276      * a dot to each of those values, so players only need to override this
 277      * if they don't implement get_supported_extensions.
 278      *
 279      * This is used to improve performance when matching links in the media filter.
 280      *
 281      * @return array Array of keywords to add to the embeddable markers list
 282      */
 283     public function get_embeddable_markers() {
 284         $markers = array();
 285         foreach ($this->get_supported_extensions() as $extension) {
 286             $markers[] = '.' . $extension;
 287         }
 288         return $markers;
 289     }
 290
 291     /**
 292      * Gets the ranking of this player. This is an integer used to decide which
 293      * player to use (after applying other considerations such as which ones
 294      * the user has disabled).
 295      *
 296      * Rank must be unique (no two players should have the same rank).
 297      *
 298      * Rank zero has a special meaning, indicating that this 'player' does not
 299      * really embed the video.
 300      *
 301      * Rank is not a user-configurable value because it needs to be defined
 302      * carefully in order to ensure that the embedding fallbacks actually work.
 303      * It might be possible to have some user options which affect rank, but
 304      * these would be best defined as e.g. checkboxes in settings that have
 305      * a particular effect on the rank of a couple of plugins, rather than
 306      * letting users generally alter rank.
 307      *
 308      * Note: Within medialib.php, players are listed in rank order (highest
 309      * rank first).
 310      *
 311      * @return int Rank (higher is better)
 312      */
 313     public abstract function get_rank();
 314
 315     /**
 316      * @return bool True if player is enabled
 317      */
 318     public function is_enabled() {
 319         global $CFG;
 320
 321         // With the class core_media_player_html5video it is enabled
 322         // based on $CFG->core_media_enable_html5video.
 323         $setting = str_replace('_player_', '_enable_', get_class($this));
 324         return !empty($CFG->{$setting});
 325     }
 326
 327     /**
 328      * Given a list of URLs, returns a reduced array containing only those URLs
 329      * which are supported by this player. (Empty if none.)
 330      * @param array $urls Array of moodle_url
 331      * @param array $options Options (same as will be passed to embed)
 332      * @return array Array of supported moodle_url
 333      */
 334     public function list_supported_urls(array $urls, array $options = array()) {
 335         $extensions = $this->get_supported_extensions();
 336         $result = array();
 337         foreach ($urls as $url) {
 338             if (in_array(core_media::get_extension($url), $extensions)) {
 339                 $result[] = $url;
 340             }
 341         }
 342         return $result;
 343     }
 344
 345     /**
 346      * Obtains suitable name for media. Uses specified name if there is one,
 347      * otherwise makes one up.
 348      * @param string $name User-specified name ('' if none)
 349      * @param array $urls Array of moodle_url used to make up name
 350      * @return string Name
 351      */
 352     protected function get_name($name, $urls) {
 353         // If there is a specified name, use that.
 354         if ($name) {
 355             return $name;
 356         }
 357
 358         // Get filename of first URL.
 359         $url = reset($urls);
 360         $name = core_media::get_filename($url);
 361
 362         // If there is more than one url, strip the extension as we could be
 363         // referring to a different one or several at once.
 364         if (count($urls) > 1) {
 365             $name = preg_replace('~\.[^.]*$~', '', $name);
 366         }
 367
 368         return $name;
 369     }
 370
 371     /**
 372      * Compares by rank order, highest first. Used for sort functions.
 373      * @param core_media_player $a Player A
 374      * @param core_media_player $b Player B
 375      * @return int Negative if A should go before B, positive for vice versa
 376      */
 377     public static function compare_by_rank(core_media_player $a, core_media_player $b) {
 378         return $b->get_rank() - $a->get_rank();
 379     }
 380
 381     /**
 382      * Utility function that sets width and height to defaults if not specified
 383      * as a parameter to the function (will be specified either if, (a) the calling
 384      * code passed it, or (b) the URL included it).
 385      * @param int $width Width passed to function (updated with final value)
 386      * @param int $height Height passed to function (updated with final value)
 387      */
 388     protected static function pick_video_size(&$width, &$height) {
 389         if (!$width) {
 390             $width = CORE_MEDIA_VIDEO_WIDTH;
 391             $height = CORE_MEDIA_VIDEO_HEIGHT;
 392         }
 393     }
 394 }
 395
 396
 397 /**
 398  * Base class for players which handle external links (YouTube etc).
 399  *
 400  * As opposed to media files.
 401  *
 402  * @copyright 2011 The Open University
 403  * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
 404  */
 405 abstract class core_media_player_external extends core_media_player {
 406     /**
 407      * Array of matches from regular expression - subclass can assume these
 408      * will be valid when the embed function is called, to save it rerunning
 409      * the regex.
 410      * @var array
 411      */
 412     protected $matches;
 413
 414     /**
 415      * Part of a regular expression, including ending ~ symbol (note: these
 416      * regexes use ~ instead of / because URLs and HTML code typically include
 417      * / symbol and makes harder to read if you have to escape it).
 418      * Matches the end part of a link after you have read the 'important' data
 419      * including optional #d=400x300 at end of url, plus content of <a> tag,
 420      * up to </a>.
 421      * @var string
 422      */
 423     const END_LINK_REGEX_PART = '[^#]*(#d=([\d]{1,4})x([\d]{1,4}))?~si';
 424
 425     public function embed($urls, $name, $width, $height, $options) {
 426         return $this->embed_external(reset($urls), $name, $width, $height, $options);
 427     }
 428
 429     /**
 430      * Obtains HTML code to embed the link.
 431      * @param moodle_url $url Single URL to embed
 432      * @param string $name Display name; '' to use default
 433      * @param int $width Optional width; 0 to use default
 434      * @param int $height Optional height; 0 to use default
 435      * @param array $options Options array
 436      * @return string HTML code for embed
 437      */
 438     protected abstract function embed_external(moodle_url $url, $name, $width, $height, $options);
 439
 440     public function list_supported_urls(array $urls, array $options = array()) {
 441         // These only work with a SINGLE url (there is no fallback).
 442         if (count($urls) != 1) {
 443             return array();
 444         }
 445         $url = reset($urls);
 446
 447         // Check against regex.
 448         if (preg_match($this->get_regex(), $url->out(false), $this->matches)) {
 449             return array($url);
 450         }
 451
 452         return array();
 453     }
 454
 455     /**
 456      * Returns regular expression used to match URLs that this player handles
 457      * @return string PHP regular expression e.g. '~^https?://example.org/~'
 458      */
 459     protected function get_regex() {
 460         return '~^unsupported~';
 461     }
 462
 463     /**
 464      * Annoyingly, preg_match $matches result does not always have the same
 465      * number of parameters - it leaves out optional ones at the end. WHAT.
 466      * Anyway, this function can be used to fix it.
 467      * @param array $matches Array that should be adjusted
 468      * @param int $count Number of capturing groups (=6 to make $matches[6] work)
 469      */
 470     protected static function fix_match_count(&$matches, $count) {
 471         for ($i = count($matches); $i <= $count; $i++) {
 472             $matches[$i] = false;
 473         }
 474     }
 475 }
 476
 477
 478 /**
 479  * Player that embeds Vimeo links.
 480  *
 481  * @copyright 2011 The Open University
 482  * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
 483  */
 484 class core_media_player_vimeo extends core_media_player_external {
 485     protected function embed_external(moodle_url $url, $name, $width, $height, $options) {
 486         $videoid = $this->matches[1];
 487         $info = s($name);
 488
 489         // Note: resizing via url is not supported, user can click the fullscreen
 490         // button instead. iframe embedding is not xhtml strict but it is the only
 491         // option that seems to work on most devices.
 492         self::pick_video_size($width, $height);
 493
 494         $output = <<<OET
 495 <span class="mediaplugin mediaplugin_vimeo">
 496 <iframe title="$info" src="https://player.vimeo.com/video/$videoid"
 497   width="$width" height="$height" frameborder="0"></iframe>
 498 </span>
 499 OET;
 500
 501         return $output;
 502     }
 503
 504     protected function get_regex() {
 505         // Initial part of link.
 506         $start = '~^https?://vimeo\.com/';
 507         // Middle bit: either watch?v= or v/.
 508         $middle = '([0-9]+)';
 509         return $start . $middle . core_media_player_external::END_LINK_REGEX_PART;
 510     }
 511
 512     public function get_rank() {
 513         return 1010;
 514     }
 515
 516     public function get_embeddable_markers() {
 517         return array('vimeo.com/');
 518     }
 519 }
 520
 521 /**
 522  * Player that creates YouTube embedding.
 523  *
 524  * @copyright 2011 The Open University
 525  * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
 526  */
 527 class core_media_player_youtube extends core_media_player_external {
 528     protected function embed_external(moodle_url $url, $name, $width, $height, $options) {
 529         global $CFG;
 530
 531         $site = 'www.youtube.com';
 532         $videoid = end($this->matches);
 533
 534         $info = trim($name);
 535         if (empty($info) or strpos($info, 'http') === 0) {
 536             $info = get_string('siteyoutube', 'core_media');
 537         }
 538         $info = s($info);
 539
 540         self::pick_video_size($width, $height);
 541
 542         if (empty($CFG->xmlstrictheaders)) {
 543             return <<<OET
 544 <span class="mediaplugin mediaplugin_youtube">
 545 <iframe title="$info" width="$width" height="$height" src="https://$site/embed/$videoid?rel=0&wmode=transparent" frameborder="0" allowfullscreen="1"></iframe>
 546 </span>
 547 OET;
 548         }
 549
 550         // NOTE: we can not use any link fallback because it breaks built-in
 551         // player on iOS devices.
 552         $output = <<<OET
 553 <span class="mediaplugin mediaplugin_youtube">
 554 <object title="$info" type="application/x-shockwave-flash"
 555   data="https://$site/v/$videoid&amp;fs=1&amp;rel=0" width="$width" height="$height">
 556  <param name="movie" value="$site/v/$videoid&amp;fs=1&amp;rel=0" />
 557  <param name="FlashVars" value="playerMode=embedded" />
 558  <param name="allowFullScreen" value="true" />
 559 </object>
 560 </span>
 561 OET;
 562
 563         return $output;
 564     }
 565
 566     protected function get_regex() {
 567         // Regex for standard youtube link
 568          $link = '(youtube(-nocookie)?\.com/(?:watch\?v=|v/))';
 569         // Regex for shortened youtube link
 570         $shortlink = '((youtu|y2u)\.be/)';
 571
 572         // Initial part of link.
 573          $start = '~^https?://(www\.)?(' . $link . '|' . $shortlink . ')';
 574         // Middle bit: Video key value
 575         $middle = '([a-z0-9\-_]+)';
 576         return $start . $middle . core_media_player_external::END_LINK_REGEX_PART;
 577     }
 578
 579     public function get_rank() {
 580         // I decided to make the link-embedding ones (that don't handle file
 581         // formats) have ranking in the 1000 range.
 582         return 1001;
 583     }
 584
 585     public function get_embeddable_markers() {
 586         return array('youtube.com', 'youtube-nocookie.com', 'youtu.be', 'y2u.be');
 587     }
 588 }
 589
 590
 591 /**
 592  * Player that creates YouTube playlist embedding.
 593  *
 594  * @copyright 2011 The Open University
 595  * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
 596  */
 597 class core_media_player_youtube_playlist extends core_media_player_external {
 598     public function is_enabled() {
 599         global $CFG;
 600         // Use the youtube on/off flag.
 601         return $CFG->core_media_enable_youtube;
 602     }
 603
 604     protected function embed_external(moodle_url $url, $name, $width, $height, $options) {
 605         $site = $this->matches[1];
 606         $playlist = $this->matches[3];
 607
 608         $info = trim($name);
 609         if (empty($info) or strpos($info, 'http') === 0) {
 610             $info = get_string('siteyoutube', 'core_media');
 611         }
 612         $info = s($info);
 613
 614         self::pick_video_size($width, $height);
 615
 616         return <<<OET
 617 <span class="mediaplugin mediaplugin_youtube">
 618 <iframe width="$width" height="$height" src="https://$site/embed/videoseries?list=$playlist" frameborder="0" allowfullscreen="1"></iframe>
 619 </span>
 620 OET;
 621     }
 622
 623     protected function get_regex() {
 624         // Initial part of link.
 625         $start = '~^https?://(www\.youtube(-nocookie)?\.com)/';
 626         // Middle bit: either view_play_list?p= or p/ (doesn't work on youtube) or playlist?list=.
 627         $middle = '(?:view_play_list\?p=|p/|playlist\?list=)([a-z0-9\-_]+)';
 628         return $start . $middle . core_media_player_external::END_LINK_REGEX_PART;
 629     }
 630
 631     public function get_rank() {
 632         // I decided to make the link-embedding ones (that don't handle file
 633         // formats) have ranking in the 1000 range.
 634         return 1000;
 635     }
 636
 637     public function get_embeddable_markers() {
 638         return array('youtube');
 639     }
 640 }
 641
 642
 643 /**
 644  * MP3 player inserted using JavaScript.
 645  *
 646  * @copyright 2011 The Open University
 647  * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
 648  */
 649 class core_media_player_mp3 extends core_media_player {
 650     public function embed($urls, $name, $width, $height, $options) {
 651         // Use first url (there can actually be only one unless some idiot
 652         // enters two mp3 files as alternatives).
 653         $url = reset($urls);
 654
 655         // Unique id even across different http requests made at the same time
 656         // (for AJAX, iframes).
 657         $id = 'core_media_mp3_' . md5(time() . '_' . rand());
 658
 659         // When Flash or JavaScript are not available only the fallback is displayed,
 660         // using span not div because players are inline elements.
 661         $spanparams = array('id' => $id, 'class' => 'mediaplugin mediaplugin_mp3');
 662         if ($width) {
 663             $spanparams['style'] = 'width: ' . $width . 'px';
 664         }
 665         $output = html_writer::tag('span', core_media_player::PLACEHOLDER, $spanparams);
 666         // We can not use standard JS init because this may be cached
 667         // note: use 'small' size unless embedding in block mode.
 668         $output .= html_writer::script(js_writer::function_call(
 669                 'M.util.add_audio_player', array($id, $url->out(false),
 670                 empty($options[core_media::OPTION_BLOCK]))));
 671
 672         return $output;
 673     }
 674
 675     public function get_supported_extensions() {
 676         return array('mp3');
 677     }
 678
 679     public function get_rank() {
 680         return 80;
 681     }
 682 }
 683
 684
 685 /**
 686  * Flash video player inserted using JavaScript.
 687  *
 688  * @copyright 2011 The Open University
 689  * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
 690  */
 691 class core_media_player_flv extends core_media_player {
 692     public function embed($urls, $name, $width, $height, $options) {
 693         // Use first url (there can actually be only one unless some idiot
 694         // enters two mp3 files as alternatives).
 695         $url = reset($urls);
 696
 697         // Unique id even across different http requests made at the same time
 698         // (for AJAX, iframes).
 699         $id = 'core_media_flv_' . md5(time() . '_' . rand());
 700
 701         // Compute width and height.
 702         $autosize = false;
 703         if (!$width && !$height) {
 704             $width = CORE_MEDIA_VIDEO_WIDTH;
 705             $height = CORE_MEDIA_VIDEO_HEIGHT;
 706             $autosize = true;
 707         }
 708
 709         // Fallback span (will normally contain link).
 710         $output = html_writer::tag('span', core_media_player::PLACEHOLDER,
 711                 array('id'=>$id, 'class'=>'mediaplugin mediaplugin_flv'));
 712         // We can not use standard JS init because this may be cached.
 713         $output .= html_writer::script(js_writer::function_call(
 714                 'M.util.add_video_player', array($id, addslashes_js($url->out(false)),
 715                 $width, $height, $autosize)));
 716         return $output;
 717     }
 718
 719     public function get_supported_extensions() {
 720         return array('flv', 'f4v');
 721     }
 722
 723     public function get_rank() {
 724         return 70;
 725     }
 726 }
 727
 728
 729 /**
 730  * Embeds Windows Media Player using object tag.
 731  *
 732  * @copyright 2011 The Open University
 733  * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
 734  */
 735 class core_media_player_wmp extends core_media_player {
 736     public function embed($urls, $name, $width, $height, $options) {
 737         // Get URL (we just use first, probably there is only one).
 738         $firsturl = reset($urls);
 739         $url = $firsturl->out(false);
 740
 741         // Work out width.
 742         if (!$width || !$height) {
 743             // Object tag has default size.
 744             $mpsize = '';
 745             $size = 'width="' . CORE_MEDIA_VIDEO_WIDTH .
 746                     '" height="' . (CORE_MEDIA_VIDEO_HEIGHT+64) . '"';
 747             $autosize = 'true';
 748         } else {
 749             $size = 'width="' . $width . '" height="' . ($height + 15) . '"';
 750             $mpsize = 'width="' . $width . '" height="' . ($height + 64) . '"';
 751             $autosize = 'false';
 752         }
 753
 754         // MIME type for object tag.
 755         $mimetype = core_media::get_mimetype($firsturl);
 756
 757         $fallback = core_media_player::PLACEHOLDER;
 758
 759         // Embed code.
 760         return <<<OET
 761 <span class="mediaplugin mediaplugin_wmp">
 762     <object classid="CLSID:6BF52A52-394A-11d3-B153-00C04F79FAA6" $mpsize
 763             standby="Loading Microsoft(R) Windows(R) Media Player components..."
 764             type="application/x-oleobject">
 765         <param name="Filename" value="$url" />
 766         <param name="src" value="$url" />
 767         <param name="url" value="$url" />
 768         <param name="ShowControls" value="true" />
 769         <param name="AutoRewind" value="true" />
 770         <param name="AutoStart" value="false" />
 771         <param name="Autosize" value="$autosize" />
 772         <param name="EnableContextMenu" value="true" />
 773         <param name="TransparentAtStart" value="false" />
 774         <param name="AnimationAtStart" value="false" />
 775         <param name="ShowGotoBar" value="false" />
 776         <param name="EnableFullScreenControls" value="true" />
 777         <param name="uimode" value="full" />
 778         <!--[if !IE]>-->
 779         <object data="$url" type="$mimetype" $size>
 780             <param name="src" value="$url" />
 781             <param name="controller" value="true" />
 782             <param name="autoplay" value="false" />
 783             <param name="autostart" value="false" />
 784             <param name="resize" value="scale" />
 785         <!--<![endif]-->
 786             $fallback
 787         <!--[if !IE]>-->
 788         </object>
 789         <!--<![endif]-->
 790     </object>
 791 </span>
 792 OET;
 793     }
 794
 795     public function get_supported_extensions() {
 796         return array('wmv', 'avi');
 797     }
 798
 799     public function get_rank() {
 800         return 60;
 801     }
 802 }
 803
 804
 805 /**
 806  * Media player using object tag and QuickTime player.
 807  *
 808  * @copyright 2011 The Open University
 809  * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
 810  */
 811 class core_media_player_qt extends core_media_player {
 812     public function embed($urls, $name, $width, $height, $options) {
 813         // Show first URL.
 814         $firsturl = reset($urls);
 815         $url = $firsturl->out(true);
 816
 817         // Work out size.
 818         if (!$width || !$height) {
 819             $size = 'width="' . CORE_MEDIA_VIDEO_WIDTH .
 820                     '" height="' . (CORE_MEDIA_VIDEO_HEIGHT + 15) . '"';
 821         } else {
 822             $size = 'width="' . $width . '" height="' . ($height + 15) . '"';
 823         }
 824
 825         // MIME type for object tag.
 826         $mimetype = core_media::get_mimetype($firsturl);
 827
 828         $fallback = core_media_player::PLACEHOLDER;
 829
 830         // Embed code.
 831         return <<<OET
 832 <span class="mediaplugin mediaplugin_qt">
 833     <object classid="clsid:02BF25D5-8C17-4B23-BC80-D3488ABDDC6B"
 834             codebase="http://www.apple.com/qtactivex/qtplugin.cab" $size>
 835         <param name="pluginspage" value="http://www.apple.com/quicktime/download/" />
 836         <param name="src" value="$url" />
 837         <param name="controller" value="true" />
 838         <param name="loop" value="true" />
 839         <param name="autoplay" value="false" />
 840         <param name="autostart" value="false" />
 841         <param name="scale" value="aspect" />
 842         <!--[if !IE]>-->
 843         <object data="$url" type="$mimetype" $size>
 844             <param name="src" value="$url" />
 845             <param name="pluginurl" value="http://www.apple.com/quicktime/download/" />
 846             <param name="controller" value="true" />
 847             <param name="loop" value="true" />
 848             <param name="autoplay" value="false" />
 849             <param name="autostart" value="false" />
 850             <param name="scale" value="aspect" />
 851         <!--<![endif]-->
 852             $fallback
 853         <!--[if !IE]>-->
 854         </object>
 855         <!--<![endif]-->
 856     </object>
 857 </span>
 858 OET;
 859     }
 860
 861     public function get_supported_extensions() {
 862         return array('mpg', 'mpeg', 'mov', 'mp4', 'm4v', 'm4a');
 863     }
 864
 865     public function get_rank() {
 866         return 50;
 867     }
 868 }
 869
 870
 871 /**
 872  * Media player using object tag and RealPlayer.
 873  *
 874  * Hopefully nobody is using this obsolete format any more!
 875  *
 876  * @copyright 2011 The Open University
 877  * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
 878  */
 879 class core_media_player_rm extends core_media_player {
 880     public function embed($urls, $name, $width, $height, $options) {
 881         // Show first URL.
 882         $firsturl = reset($urls);
 883         $url = $firsturl->out(true);
 884
 885         // Get name to use as title.
 886         $info = s($this->get_name($name, $urls));
 887
 888         // The previous version of this code has the following comment, which
 889         // I don't understand, but trust it is correct:
 890         // Note: the size is hardcoded intentionally because this does not work anyway!
 891         $width = CORE_MEDIA_VIDEO_WIDTH;
 892         $height = CORE_MEDIA_VIDEO_HEIGHT;
 893
 894         $fallback = core_media_player::PLACEHOLDER;
 895         return <<<OET
 896 <span class="mediaplugin mediaplugin_real">
 897     <object title="$info" classid="clsid:CFCDAA03-8BE4-11cf-B84B-0020AFBBCCFA"
 898             data="$url" width="$width" height="$height"">
 899         <param name="src" value="$url" />
 900         <param name="controls" value="All" />
 901         <!--[if !IE]>-->
 902         <object title="$info" type="audio/x-pn-realaudio-plugin"
 903                 data="$url" width="$width" height="$height">
 904             <param name="src" value="$url" />
 905             <param name="controls" value="All" />
 906         <!--<![endif]-->
 907             $fallback
 908         <!--[if !IE]>-->
 909         </object>
 910         <!--<![endif]-->
 911   </object>
 912 </span>
 913 OET;
 914     }
 915
 916     public function get_supported_extensions() {
 917         return array('ra', 'ram', 'rm', 'rv');
 918     }
 919
 920     public function get_rank() {
 921         return 40;
 922     }
 923 }
 924
 925
 926 /**
 927  * Media player for Flash SWF files.
 928  *
 929  * This player contains additional security restriction: it will only be used
 930  * if you add option core_media_player_swf::ALLOW = true.
 931  *
 932  * Code should only set this option if it has verified that the data was
 933  * embedded by a trusted user (e.g. in trust text).
 934  *
 935  * @copyright 2011 The Open University
 936  * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
 937  */
 938 class core_media_player_swf extends core_media_player {
 939     public function embed($urls, $name, $width, $height, $options) {
 940         self::pick_video_size($width, $height);
 941
 942         $firsturl = reset($urls);
 943         $url = $firsturl->out(true);
 944
 945         $fallback = core_media_player::PLACEHOLDER;
 946         $output = <<<OET
 947 <span class="mediaplugin mediaplugin_swf">
 948   <object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" width="$width" height="$height">
 949     <param name="movie" value="$url" />
 950     <param name="autoplay" value="true" />
 951     <param name="loop" value="true" />
 952     <param name="controller" value="true" />
 953     <param name="scale" value="aspect" />
 954     <param name="base" value="." />
 955     <param name="allowscriptaccess" value="never" />
 956 <!--[if !IE]>-->
 957     <object type="application/x-shockwave-flash" data="$url" width="$width" height="$height">
 958       <param name="controller" value="true" />
 959       <param name="autoplay" value="true" />
 960       <param name="loop" value="true" />
 961       <param name="scale" value="aspect" />
 962       <param name="base" value="." />
 963       <param name="allowscriptaccess" value="never" />
 964 <!--<![endif]-->
 965 $fallback
 966 <!--[if !IE]>-->
 967     </object>
 968 <!--<![endif]-->
 969   </object>
 970 </span>
 971 OET;
 972
 973         return $output;
 974     }
 975
 976     public function get_supported_extensions() {
 977         return array('swf');
 978     }
 979
 980     public function list_supported_urls(array $urls, array $options = array()) {
 981         // Not supported unless the creator is trusted.
 982         if (empty($options[core_media::OPTION_TRUSTED])) {
 983             return array();
 984         }
 985         return parent::list_supported_urls($urls, $options);
 986     }
 987
 988     public function get_rank() {
 989         return 30;
 990     }
 991 }
 992
 993
 994 /**
 995  * Player that creates HTML5 <video> tag.
 996  *
 997  * @copyright 2011 The Open University
 998  * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
 999  */
1000 class core_media_player_html5video extends core_media_player {
1001     public function embed($urls, $name, $width, $height, $options) {
1002         // Special handling to make videos play on Android devices pre 2.3.
1003         // Note: I tested and 2.3.3 (in emulator) works without, is 533.1 webkit.
1004         $oldandroid = check_browser_version('WebKit Android') &&
1005                 !check_browser_version('WebKit Android', '533.1');
1006
1007         // Build array of source tags.
1008         $sources = array();
1009         foreach ($urls as $url) {
1010             $mimetype = core_media::get_mimetype($url);
1011             $source = html_writer::tag('source', '', array('src' => $url, 'type' => $mimetype));
1012             if ($mimetype === 'video/mp4') {
1013                 if ($oldandroid) {
1014                     // Old Android fails if you specify the type param.
1015                     $source = html_writer::tag('source', '', array('src' => $url));
1016                 }
1017
1018                 // Better add m4v as first source, it might be a bit more
1019                 // compatible with problematic browsers.
1020                 array_unshift($sources, $source);
1021             } else {
1022                 $sources[] = $source;
1023             }
1024         }
1025
1026         $sources = implode("\n", $sources);
1027         $title = s($this->get_name($name, $urls));
1028
1029         if (!$width) {
1030             // No width specified, use system default.
1031             $width = CORE_MEDIA_VIDEO_WIDTH;
1032         }
1033
1034         if (!$height) {
1035             // Let browser choose height automatically.
1036             $size = "width=\"$width\"";
1037         } else {
1038             $size = "width=\"$width\" height=\"$height\"";
1039         }
1040
1041         $sillyscript = '';
1042         $idtag = '';
1043         if ($oldandroid) {
1044             // Old Android does not support 'controls' option.
1045             $id = 'core_media_html5v_' . md5(time() . '_' . rand());
1046             $idtag = 'id="' . $id . '"';
1047             $sillyscript = <<<OET
1048 <script type="text/javascript">
1049 document.getElementById('$id').addEventListener('click', function() {
1050     this.play();
1051 }, false);
1052 </script>
1053 OET;
1054         }
1055
1056         $fallback = core_media_player::PLACEHOLDER;
1057         return <<<OET
1058 <span class="mediaplugin mediaplugin_html5video">
1059 <video $idtag controls="true" $size preload="metadata" title="$title">
1060     $sources
1061     $fallback
1062 </video>
1063 $sillyscript
1064 </span>
1065 OET;
1066     }
1067
1068     public function get_supported_extensions() {
1069         return array('m4v', 'webm', 'ogv', 'mp4');
1070     }
1071
1072     public function list_supported_urls(array $urls, array $options = array()) {
1073         $extensions = $this->get_supported_extensions();
1074         $result = array();
1075         foreach ($urls as $url) {
1076             $ext = core_media::get_extension($url);
1077             if (in_array($ext, $extensions)) {
1078                 // Unfortunately html5 video does not handle fallback properly.
1079                 // https://www.w3.org/Bugs/Public/show_bug.cgi?id=10975
1080                 // That means we need to do browser detect and not use html5 on
1081                 // browsers which do not support the given type, otherwise users
1082                 // will not even see the fallback link.
1083                 // Based on http://en.wikipedia.org/wiki/HTML5_video#Table - this
1084                 // is a simplified version, does not take into account old browser
1085                 // versions or manual plugins.
1086                 if ($ext === 'ogv' || $ext === 'webm') {
1087                     // Formats .ogv and .webm are not supported in IE or Safari.
1088                     if (check_browser_version('MSIE') || check_browser_version('Safari')) {
1089                         continue;
1090                     }
1091                 } else {
1092                     // Formats .m4v and .mp4 are not supported in Firefox or Opera.
1093                     if (check_browser_version('Firefox') || check_browser_version('Opera')) {
1094                         continue;
1095                     }
1096                 }
1097
1098                 $result[] = $url;
1099             }
1100         }
1101         return $result;
1102     }
1103
1104     public function get_rank() {
1105         return 20;
1106     }
1107 }
1108
1109
1110 /**
1111  * Player that creates HTML5 <audio> tag.
1112  *
1113  * @copyright 2011 The Open University
1114  * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
1115  */
1116 class core_media_player_html5audio extends core_media_player {
1117     public function embed($urls, $name, $width, $height, $options) {
1118
1119         // Build array of source tags.
1120         $sources = array();
1121         foreach ($urls as $url) {
1122             $mimetype = core_media::get_mimetype($url);
1123             $sources[] = html_writer::tag('source', '', array('src' => $url, 'type' => $mimetype));
1124         }
1125
1126         $sources = implode("\n", $sources);
1127         $title = s($this->get_name($name, $urls));
1128
1129         // Default to not specify size (so it can be changed in css).
1130         $size = '';
1131         if ($width) {
1132             $size = 'width="' . $width . '"';
1133         }
1134
1135         $fallback = core_media_player::PLACEHOLDER;
1136
1137         return <<<OET
1138 <audio controls="true" $size class="mediaplugin mediaplugin_html5audio" preload="no" title="$title">
1139 $sources
1140 $fallback
1141 </audio>
1142 OET;
1143     }
1144
1145     public function get_supported_extensions() {
1146         return array('ogg', 'oga', 'aac', 'm4a', 'mp3');
1147     }
1148
1149     public function list_supported_urls(array $urls, array $options = array()) {
1150         $extensions = $this->get_supported_extensions();
1151         $result = array();
1152         foreach ($urls as $url) {
1153             $ext = core_media::get_extension($url);
1154             if (in_array($ext, $extensions)) {
1155                 if ($ext === 'ogg' || $ext === 'oga') {
1156                     // Formats .ogg and .oga are not supported in IE or Safari.
1157                     if (check_browser_version('MSIE') || check_browser_version('Safari')) {
1158                         continue;
1159                     }
1160                 } else {
1161                     // Formats .aac, .mp3, and .m4a are not supported in Firefox or Opera.
1162                     if (check_browser_version('Firefox') || check_browser_version('Opera')) {
1163                         continue;
1164                     }
1165                 }
1166                 // Old Android versions (pre 2.3.3) 'support' audio tag but no codecs.
1167                 if (check_browser_version('WebKit Android') &&
1168                         !check_browser_version('WebKit Android', '533.1')) {
1169                     continue;
1170                 }
1171
1172                 $result[] = $url;
1173             }
1174         }
1175         return $result;
1176     }
1177
1178     public function get_rank() {
1179         return 10;
1180     }
1181 }
1182
1183
1184 /**
1185  * Special media player class that just puts a link.
1186  *
1187  * Always enabled, used as the last fallback.
1188  *
1189  * @copyright 2011 The Open University
1190  * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
1191  */
1192 class core_media_player_link extends core_media_player {
1193     public function embed($urls, $name, $width, $height, $options) {
1194         // If link is turned off, return empty.
1195         if (!empty($options[core_media::OPTION_NO_LINK])) {
1196             return '';
1197         }
1198
1199         // Build up link content.
1200         $output = '';
1201         foreach ($urls as $url) {
1202             $title = core_media::get_filename($url);
1203             $printlink = html_writer::link($url, $title, array('class' => 'mediafallbacklink'));
1204             if ($output) {
1205                 // Where there are multiple available formats, there are fallback links
1206                 // for all formats, separated by /.
1207                 $output .= ' / ';
1208             }
1209             $output .= $printlink;
1210         }
1211         return $output;
1212     }
1213
1214     public function list_supported_urls(array $urls, array $options = array()) {
1215         // Supports all URLs.
1216         return $urls;
1217     }
1218
1219     public function is_enabled() {
1220         // Cannot be disabled.
1221         return true;
1222     }
1223
1224     public function get_rank() {
1225         return 0;
1226     }
1227 }