[Summary view]

Differences Between: [Versions 310 and 403] [Versions 311 and 403] [Versions 39 and 403] [Versions 400 and 403] [Versions 401 and 403]

   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   * ODS data format writer
  19   *
  20   * @package    dataformat_ods
  21   * @copyright  2016 Brendan Heywood (brendan@catalyst-au.net)
  22   * @license    http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
  23   */
  24  
  25  namespace dataformat_ods;
  26  
  27  defined('MOODLE_INTERNAL') || die();
  28  
  29  /**
  30   * ODS data format writer
  31   *
  32   * @package    dataformat_ods
  33   * @copyright  2016 Brendan Heywood (brendan@catalyst-au.net)
  34   * @license    http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
  35   */
  36  class writer extends \core\dataformat\spout_base {
  37  
  38      /** @var $mimetype */
  39      protected $mimetype = "application/vnd.oasis.opendocument.spreadsheet";
  40  
  41      /** @var $extension */
  42      protected $extension = ".ods";
  43  
  44      /**
  45       * Set the title of the worksheet inside a spreadsheet
  46       *
  47       * For some formats this will be ignored.
  48       *
  49       * @param string $title
  50       */
  51      public function set_sheettitle($title) {
  52          if (!$title) {
  53              return;
  54          }
  55  
  56          // Replace any characters in the name that ODS cannot cope with.
  57          $title = strtr(trim($title, "'"), '[]*/\?:', '       ');
  58          // Shorten the title if necessary.
  59          $title = \core_text::substr($title, 0, 31);
  60          // After the substr, we might now have a single quote on the end.
  61          $title = trim($title, "'");
  62  
  63          $this->sheettitle = $title;
  64      }
  65  }
  66