Merge branch 'MDL-31000-master-3' of git://git.luns.net.uk/moodle
[moodle.git] / repository / lib.php
1 <?php
3 // This file is part of Moodle - http://moodle.org/
4 //
5 // Moodle is free software: you can redistribute it and/or modify
6 // it under the terms of the GNU General Public License as published by
7 // the Free Software Foundation, either version 3 of the License, or
8 // (at your option) any later version.
9 //
10 // Moodle is distributed in the hope that it will be useful,
11 // but WITHOUT ANY WARRANTY; without even the implied warranty of
12 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13 // GNU General Public License for more details.
14 //
15 // You should have received a copy of the GNU General Public License
16 // along with Moodle.  If not, see <http://www.gnu.org/licenses/>.
19 /**
20  * This file contains classes used to manage the repository plugins in Moodle
21  * and was introduced as part of the changes occuring in Moodle 2.0
22  *
23  * @since 2.0
24  * @package    core
25  * @subpackage repository
26  * @copyright  2009 Dongsheng Cai <dongsheng@moodle.com>
27  * @license    http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
28  */
30 require_once(dirname(dirname(__FILE__)) . '/config.php');
31 require_once($CFG->libdir . '/filelib.php');
32 require_once($CFG->libdir . '/formslib.php');
34 define('FILE_EXTERNAL', 1);
35 define('FILE_INTERNAL', 2);
36 define('RENAME_SUFFIX', '_2');
38 /**
39  * This class is used to manage repository plugins
40  *
41  * A repository_type is a repository plug-in. It can be Box.net, Flick-r, ...
42  * A repository type can be edited, sorted and hidden. It is mandatory for an
43  * administrator to create a repository type in order to be able to create
44  * some instances of this type.
45  * Coding note:
46  * - a repository_type object is mapped to the "repository" database table
47  * - "typename" attibut maps the "type" database field. It is unique.
48  * - general "options" for a repository type are saved in the config_plugin table
49  * - when you delete a repository, all instances are deleted, and general
50  *   options are also deleted from database
51  * - When you create a type for a plugin that can't have multiple instances, a
52  *   instance is automatically created.
53  *
54  * @package moodlecore
55  * @subpackage repository
56  * @copyright 2009 Jerome Mouneyrac
57  * @license   http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
58  */
59 class repository_type {
62     /**
63      * Type name (no whitespace) - A type name is unique
64      * Note: for a user-friendly type name see get_readablename()
65      * @var String
66      */
67     private $_typename;
70     /**
71      * Options of this type
72      * They are general options that any instance of this type would share
73      * e.g. API key
74      * These options are saved in config_plugin table
75      * @var array
76      */
77     private $_options;
80     /**
81      * Is the repository type visible or hidden
82      * If false (hidden): no instances can be created, edited, deleted, showned , used...
83      * @var boolean
84      */
85     private $_visible;
88     /**
89      * 0 => not ordered, 1 => first position, 2 => second position...
90      * A not order type would appear in first position (should never happened)
91      * @var integer
92      */
93     private $_sortorder;
95      /**
96      * Return if the instance is visible in a context
97      * TODO: check if the context visibility has been overwritten by the plugin creator
98      *       (need to create special functions to be overvwritten in repository class)
99      * @param objet $context - context
100      * @return boolean
101      */
102     public function get_contextvisibility($context) {
103         global $USER;
105         if ($context->contextlevel == CONTEXT_COURSE) {
106             return $this->_options['enablecourseinstances'];
107         }
109         if ($context->contextlevel == CONTEXT_USER) {
110             return $this->_options['enableuserinstances'];
111         }
113         //the context is SITE
114         return true;
115     }
119     /**
120      * repository_type constructor
121      * @global object $CFG
122      * @param integer $typename
123      * @param array $typeoptions
124      * @param boolean $visible
125      * @param integer $sortorder (don't really need set, it will be during create() call)
126      */
127     public function __construct($typename = '', $typeoptions = array(), $visible = true, $sortorder = 0) {
128         global $CFG;
130         //set type attributs
131         $this->_typename = $typename;
132         $this->_visible = $visible;
133         $this->_sortorder = $sortorder;
135         //set options attribut
136         $this->_options = array();
137         $options = repository::static_function($typename, 'get_type_option_names');
138         //check that the type can be setup
139         if (!empty($options)) {
140             //set the type options
141             foreach ($options as $config) {
142                 if (array_key_exists($config, $typeoptions)) {
143                     $this->_options[$config] = $typeoptions[$config];
144                 }
145             }
146         }
148         //retrieve visibility from option
149         if (array_key_exists('enablecourseinstances',$typeoptions)) {
150             $this->_options['enablecourseinstances'] = $typeoptions['enablecourseinstances'];
151         } else {
152              $this->_options['enablecourseinstances'] = 0;
153         }
155         if (array_key_exists('enableuserinstances',$typeoptions)) {
156             $this->_options['enableuserinstances'] = $typeoptions['enableuserinstances'];
157         } else {
158              $this->_options['enableuserinstances'] = 0;
159         }
161     }
163     /**
164      * Get the type name (no whitespace)
165      * For a human readable name, use get_readablename()
166      * @return String the type name
167      */
168     public function get_typename() {
169         return $this->_typename;
170     }
172     /**
173      * Return a human readable and user-friendly type name
174      * @return string user-friendly type name
175      */
176     public function get_readablename() {
177         return get_string('pluginname','repository_'.$this->_typename);
178     }
180     /**
181      * Return general options
182      * @return array the general options
183      */
184     public function get_options() {
185         return $this->_options;
186     }
188     /**
189      * Return visibility
190      * @return boolean
191      */
192     public function get_visible() {
193         return $this->_visible;
194     }
196     /**
197      * Return order / position of display in the file picker
198      * @return integer
199      */
200     public function get_sortorder() {
201         return $this->_sortorder;
202     }
204     /**
205      * Create a repository type (the type name must not already exist)
206      * @param boolean throw exception?
207      * @return mixed return int if create successfully, return false if
208      *         any errors
209      * @global object $DB
210      */
211     public function create($silent = false) {
212         global $DB;
214         //check that $type has been set
215         $timmedtype = trim($this->_typename);
216         if (empty($timmedtype)) {
217             throw new repository_exception('emptytype', 'repository');
218         }
220         //set sortorder as the last position in the list
221         if (!isset($this->_sortorder) || $this->_sortorder == 0 ) {
222             $sql = "SELECT MAX(sortorder) FROM {repository}";
223             $this->_sortorder = 1 + $DB->get_field_sql($sql);
224         }
226         //only create a new type if it doesn't already exist
227         $existingtype = $DB->get_record('repository', array('type'=>$this->_typename));
228         if (!$existingtype) {
229             //create the type
230             $newtype = new stdClass();
231             $newtype->type = $this->_typename;
232             $newtype->visible = $this->_visible;
233             $newtype->sortorder = $this->_sortorder;
234             $plugin_id = $DB->insert_record('repository', $newtype);
235             //save the options in DB
236             $this->update_options();
238             $instanceoptionnames = repository::static_function($this->_typename, 'get_instance_option_names');
240             //if the plugin type has no multiple instance (e.g. has no instance option name) so it wont
241             //be possible for the administrator to create a instance
242             //in this case we need to create an instance
243             if (empty($instanceoptionnames)) {
244                 $instanceoptions = array();
245                 if (empty($this->_options['pluginname'])) {
246                     // when moodle trying to install some repo plugin automatically
247                     // this option will be empty, get it from language string when display
248                     $instanceoptions['name'] = '';
249                 } else {
250                     // when admin trying to add a plugin manually, he will type a name
251                     // for it
252                     $instanceoptions['name'] = $this->_options['pluginname'];
253                 }
254                 repository::static_function($this->_typename, 'create', $this->_typename, 0, get_system_context(), $instanceoptions);
255             }
256             //run plugin_init function
257             if (!repository::static_function($this->_typename, 'plugin_init')) {
258                 if (!$silent) {
259                     throw new repository_exception('cannotinitplugin', 'repository');
260                 }
261             }
263             if(!empty($plugin_id)) {
264                 // return plugin_id if create successfully
265                 return $plugin_id;
266             } else {
267                 return false;
268             }
270         } else {
271             if (!$silent) {
272                 throw new repository_exception('existingrepository', 'repository');
273             }
274             // If plugin existed, return false, tell caller no new plugins were created.
275             return false;
276         }
277     }
280     /**
281      * Update plugin options into the config_plugin table
282      * @param array $options
283      * @return boolean
284      */
285     public function update_options($options = null) {
286         global $DB;
287         $classname = 'repository_' . $this->_typename;
288         $instanceoptions = repository::static_function($this->_typename, 'get_instance_option_names');
289         if (empty($instanceoptions)) {
290             // update repository instance name if this plugin type doesn't have muliti instances
291             $params = array();
292             $params['type'] = $this->_typename;
293             $instances = repository::get_instances($params);
294             $instance = array_pop($instances);
295             if ($instance) {
296                 $DB->set_field('repository_instances', 'name', $options['pluginname'], array('id'=>$instance->id));
297             }
298             unset($options['pluginname']);
299         }
301         if (!empty($options)) {
302             $this->_options = $options;
303         }
305         foreach ($this->_options as $name => $value) {
306             set_config($name, $value, $this->_typename);
307         }
309         return true;
310     }
312     /**
313      * Update visible database field with the value given as parameter
314      * or with the visible value of this object
315      * This function is private.
316      * For public access, have a look to switch_and_update_visibility()
317      * @global object $DB
318      * @param boolean $visible
319      * @return boolean
320      */
321     private function update_visible($visible = null) {
322         global $DB;
324         if (!empty($visible)) {
325             $this->_visible = $visible;
326         }
327         else if (!isset($this->_visible)) {
328             throw new repository_exception('updateemptyvisible', 'repository');
329         }
331         return $DB->set_field('repository', 'visible', $this->_visible, array('type'=>$this->_typename));
332     }
334     /**
335      * Update database sortorder field with the value given as parameter
336      * or with the sortorder value of this object
337      * This function is private.
338      * For public access, have a look to move_order()
339      * @global object $DB
340      * @param integer $sortorder
341      * @return boolean
342      */
343     private function update_sortorder($sortorder = null) {
344         global $DB;
346         if (!empty($sortorder) && $sortorder!=0) {
347             $this->_sortorder = $sortorder;
348         }
349         //if sortorder is not set, we set it as the ;ast position in the list
350         else if (!isset($this->_sortorder) || $this->_sortorder == 0 ) {
351             $sql = "SELECT MAX(sortorder) FROM {repository}";
352             $this->_sortorder = 1 + $DB->get_field_sql($sql);
353         }
355         return $DB->set_field('repository', 'sortorder', $this->_sortorder, array('type'=>$this->_typename));
356     }
358     /**
359      * Change order of the type with its adjacent upper or downer type
360      * (database fields are updated)
361      * Algorithm details:
362      * 1. retrieve all types in an array. This array is sorted by sortorder,
363      * and the array keys start from 0 to X (incremented by 1)
364      * 2. switch sortorder values of this type and its adjacent type
365      * @global object $DB
366      * @param string $move "up" or "down"
367      */
368     public function move_order($move) {
369         global $DB;
371         $types = repository::get_types();    // retrieve all types
373     /// retrieve this type into the returned array
374         $i = 0;
375         while (!isset($indice) && $i<count($types)) {
376             if ($types[$i]->get_typename() == $this->_typename) {
377                 $indice = $i;
378             }
379             $i++;
380         }
382     /// retrieve adjacent indice
383         switch ($move) {
384             case "up":
385                 $adjacentindice = $indice - 1;
386             break;
387             case "down":
388                 $adjacentindice = $indice + 1;
389             break;
390             default:
391             throw new repository_exception('movenotdefined', 'repository');
392         }
394         //switch sortorder of this type and the adjacent type
395         //TODO: we could reset sortorder for all types. This is not as good in performance term, but
396         //that prevent from wrong behaviour on a screwed database. As performance are not important in this particular case
397         //it worth to change the algo.
398         if ($adjacentindice>=0 && !empty($types[$adjacentindice])) {
399             $DB->set_field('repository', 'sortorder', $this->_sortorder, array('type'=>$types[$adjacentindice]->get_typename()));
400             $this->update_sortorder($types[$adjacentindice]->get_sortorder());
401         }
402     }
404     /**
405      * 1. Change visibility to the value chosen
406      *
407      * 2. Update the type
408      * @return boolean
409      */
410     public function update_visibility($visible = null) {
411         if (is_bool($visible)) {
412             $this->_visible = $visible;
413         } else {
414             $this->_visible = !$this->_visible;
415         }
416         return $this->update_visible();
417     }
420     /**
421      * Delete a repository_type (general options are removed from config_plugin
422      * table, and all instances are deleted)
423      * @global object $DB
424      * @return boolean
425      */
426     public function delete() {
427         global $DB;
429         //delete all instances of this type
430         $params = array();
431         $params['context'] = array();
432         $params['onlyvisible'] = false;
433         $params['type'] = $this->_typename;
434         $instances = repository::get_instances($params);
435         foreach ($instances as $instance) {
436             $instance->delete();
437         }
439         //delete all general options
440         foreach ($this->_options as $name => $value) {
441             set_config($name, null, $this->_typename);
442         }
444         return $DB->delete_records('repository', array('type' => $this->_typename));
445     }
448 /**
449  * This is the base class of the repository class
450  *
451  * To use repository plugin, see:
452  * http://docs.moodle.org/dev/Repository_How_to_Create_Plugin
453  * class repository is an abstract class, some functions must be implemented in subclass.
454  * See an example: repository/boxnet/lib.php
455  *
456  * A few notes:
457  *   // for ajax file picker, this will print a json string to tell file picker
458  *   // how to build a login form
459  *   $repo->print_login();
460  *   // for ajax file picker, this will return a files list.
461  *   $repo->get_listing();
462  *   // this function will be used for non-javascript version.
463  *   $repo->print_listing();
464  *   // print a search box
465  *   $repo->print_search();
466  *
467  * @package moodlecore
468  * @subpackage repository
469  * @copyright 2009 Dongsheng Cai <dongsheng@moodle.com>
470  * @license   http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
471  */
472 abstract class repository {
473     // $disabled can be set to true to disable a plugin by force
474     // example: self::$disabled = true
475     public $disabled = false;
476     public $id;
477     /** @var object current context */
478     public $context;
479     public $options;
480     public $readonly;
481     public $returntypes;
482     /** @var object repository instance database record */
483     public $instance;
484     /**
485      * 1. Initialize context and options
486      * 2. Accept necessary parameters
487      *
488      * @param integer $repositoryid repository instance id
489      * @param integer|object a context id or context object
490      * @param array $options repository options
491      */
492     public function __construct($repositoryid, $context = SYSCONTEXTID, $options = array(), $readonly = 0) {
493         global $DB;
494         $this->id = $repositoryid;
495         if (is_object($context)) {
496             $this->context = $context;
497         } else {
498             $this->context = get_context_instance_by_id($context);
499         }
500         $this->instance = $DB->get_record('repository_instances', array('id'=>$this->id));
501         $this->readonly = $readonly;
502         $this->options = array();
504         if (is_array($options)) {
505             $options = array_merge($this->get_option(), $options);
506         } else {
507             $options = $this->get_option();
508         }
509         foreach ($options as $n => $v) {
510             $this->options[$n] = $v;
511         }
512         $this->name = $this->get_name();
513         $this->returntypes = $this->supported_returntypes();
514         $this->super_called = true;
515     }
517     /**
518      * Get a repository type object by a given type name.
519      * @global object $DB
520      * @param string $typename the repository type name
521      * @return repository_type|bool
522      */
523     public static function get_type_by_typename($typename) {
524         global $DB;
526         if (!$record = $DB->get_record('repository',array('type' => $typename))) {
527             return false;
528         }
530         return new repository_type($typename, (array)get_config($typename), $record->visible, $record->sortorder);
531     }
533     /**
534      * Get the repository type by a given repository type id.
535      * @global object $DB
536      * @param int $id the type id
537      * @return object
538      */
539     public static function get_type_by_id($id) {
540         global $DB;
542         if (!$record = $DB->get_record('repository',array('id' => $id))) {
543             return false;
544         }
546         return new repository_type($record->type, (array)get_config($record->type), $record->visible, $record->sortorder);
547     }
549     /**
550      * Return all repository types ordered by sortorder field
551      * first repository type in returnedarray[0], second repository type in returnedarray[1], ...
552      * @global object $DB
553      * @global object $CFG
554      * @param boolean $visible can return types by visiblity, return all types if null
555      * @return array Repository types
556      */
557     public static function get_types($visible=null) {
558         global $DB, $CFG;
560         $types = array();
561         $params = null;
562         if (!empty($visible)) {
563             $params = array('visible' => $visible);
564         }
565         if ($records = $DB->get_records('repository',$params,'sortorder')) {
566             foreach($records as $type) {
567                 if (file_exists($CFG->dirroot . '/repository/'. $type->type .'/lib.php')) {
568                     $types[] = new repository_type($type->type, (array)get_config($type->type), $type->visible, $type->sortorder);
569                 }
570             }
571         }
573         return $types;
574     }
576     /**
577      * To check if the context id is valid
578      * @global object $USER
579      * @param int $contextid
580      * @return boolean
581      */
582     public static function check_capability($contextid, $instance) {
583         $context = get_context_instance_by_id($contextid);
584         $capability = has_capability('repository/'.$instance->type.':view', $context);
585         if (!$capability) {
586             throw new repository_exception('nopermissiontoaccess', 'repository');
587         }
588     }
590     /**
591      * Check if file already exists in draft area
592      *
593      * @param int $itemid
594      * @param string $filepath
595      * @param string $filename
596      * @return boolean
597      */
598     public static function draftfile_exists($itemid, $filepath, $filename) {
599         global $USER;
600         $fs = get_file_storage();
601         $usercontext = get_context_instance(CONTEXT_USER, $USER->id);
602         if ($fs->get_file($usercontext->id, 'user', 'draft', $itemid, $filepath, $filename)) {
603             return true;
604         } else {
605             return false;
606         }
607     }
609     /**
610      * Does this repository used to browse moodle files?
611      *
612      * @return boolean
613      */
614     public function has_moodle_files() {
615         return false;
616     }
617     /**
618      * This function is used to copy a moodle file to draft area
619      *
620      * @global object $USER
621      * @global object $DB
622      * @param string $encoded The metainfo of file, it is base64 encoded php serialized data
623      * @param string $draftitemid itemid
624      * @param string $new_filename The intended name of file
625      * @param string $new_filepath the new path in draft area
626      * @return array The information of file
627      */
628     public function copy_to_area($encoded, $draftitemid, $new_filepath, $new_filename) {
629         global $USER, $DB;
631         if ($this->has_moodle_files() == false) {
632             throw new coding_exception('Only repository used to browse moodle files can use copy_to_area');
633         }
635         $browser = get_file_browser();
636         $params = unserialize(base64_decode($encoded));
637         $user_context = get_context_instance(CONTEXT_USER, $USER->id);
639         $contextid  = clean_param($params['contextid'], PARAM_INT);
640         $fileitemid = clean_param($params['itemid'],    PARAM_INT);
641         $filename   = clean_param($params['filename'],  PARAM_FILE);
642         $filepath   = clean_param($params['filepath'],  PARAM_PATH);;
643         $filearea   = clean_param($params['filearea'],  PARAM_AREA);
644         $component  = clean_param($params['component'], PARAM_COMPONENT);
646         $context    = get_context_instance_by_id($contextid);
647         // the file needs to copied to draft area
648         $file_info  = $browser->get_file_info($context, $component, $filearea, $fileitemid, $filepath, $filename);
650         if (repository::draftfile_exists($draftitemid, $new_filepath, $new_filename)) {
651             // create new file
652             $unused_filename = repository::get_unused_filename($draftitemid, $new_filepath, $new_filename);
653             $file_info->copy_to_storage($user_context->id, 'user', 'draft', $draftitemid, $new_filepath, $unused_filename);
654             $event = array();
655             $event['event'] = 'fileexists';
656             $event['newfile'] = new stdClass;
657             $event['newfile']->filepath = $new_filepath;
658             $event['newfile']->filename = $unused_filename;
659             $event['newfile']->url = moodle_url::make_draftfile_url($draftitemid, $new_filepath, $unused_filename)->out();
660             $event['existingfile'] = new stdClass;
661             $event['existingfile']->filepath = $new_filepath;
662             $event['existingfile']->filename = $new_filename;
663             $event['existingfile']->url      = moodle_url::make_draftfile_url($draftitemid, $filepath, $filename)->out();;
664             return $event;
665         } else {
666             $file_info->copy_to_storage($user_context->id, 'user', 'draft', $draftitemid, $new_filepath, $new_filename);
667             $info = array();
668             $info['itemid'] = $draftitemid;
669             $info['title']  = $new_filename;
670             $info['contextid'] = $user_context->id;
671             $info['url'] = moodle_url::make_draftfile_url($draftitemid, $new_filepath, $new_filename)->out();;
672             $info['filesize'] = $file_info->get_filesize();
673             return $info;
674         }
675     }
677     /**
678      * Get unused filename by appending suffix
679      *
680      * @param int $itemid
681      * @param string $filepath
682      * @param string $filename
683      * @return string
684      */
685     public static function get_unused_filename($itemid, $filepath, $filename) {
686         global $USER;
687         $fs = get_file_storage();
688         while (repository::draftfile_exists($itemid, $filepath, $filename)) {
689             $filename = repository::append_suffix($filename);
690         }
691         return $filename;
692     }
694     /**
695      * Append a suffix to filename
696      *
697      * @param string $filename
698      * @return string
699      */
700     function append_suffix($filename) {
701         $pathinfo = pathinfo($filename);
702         if (empty($pathinfo['extension'])) {
703             return $filename . RENAME_SUFFIX;
704         } else {
705             return $pathinfo['filename'] . RENAME_SUFFIX . '.' . $pathinfo['extension'];
706         }
707     }
709     /**
710      * Return all types that you a user can create/edit and which are also visible
711      * Note: Mostly used in order to know if at least one editable type can be set
712      * @param object $context the context for which we want the editable types
713      * @return array types
714      */
715     public static function get_editable_types($context = null) {
717         if (empty($context)) {
718             $context = get_system_context();
719         }
721         $types= repository::get_types(true);
722         $editabletypes = array();
723         foreach ($types as $type) {
724             $instanceoptionnames = repository::static_function($type->get_typename(), 'get_instance_option_names');
725             if (!empty($instanceoptionnames)) {
726                 if ($type->get_contextvisibility($context)) {
727                     $editabletypes[]=$type;
728                 }
729              }
730         }
731         return $editabletypes;
732     }
734     /**
735      * Return repository instances
736      * @global object $DB
737      * @global object $CFG
738      * @global object $USER
739      *
740      * @param array $args Array containing the following keys:
741      *           currentcontext
742      *           context
743      *           onlyvisible
744      *           type
745      *           accepted_types
746      *           return_types
747      *           userid
748      *
749      * @return array repository instances
750      */
751     public static function get_instances($args = array()) {
752         global $DB, $CFG, $USER;
754         if (isset($args['currentcontext'])) {
755             $current_context = $args['currentcontext'];
756         } else {
757             $current_context = null;
758         }
760         if (!empty($args['context'])) {
761             $contexts = $args['context'];
762         } else {
763             $contexts = array();
764         }
766         $onlyvisible = isset($args['onlyvisible']) ? $args['onlyvisible'] : true;
767         $returntypes = isset($args['return_types']) ? $args['return_types'] : 3;
768         $type        = isset($args['type']) ? $args['type'] : null;
770         $params = array();
771         $sql = "SELECT i.*, r.type AS repositorytype, r.sortorder, r.visible
772                   FROM {repository} r, {repository_instances} i
773                  WHERE i.typeid = r.id ";
775         if (!empty($args['disable_types']) && is_array($args['disable_types'])) {
776             list($types, $p) = $DB->get_in_or_equal($args['disable_types'], SQL_PARAMS_QM, 'param', false);
777             $sql .= " AND r.type $types";
778             $params = array_merge($params, $p);
779         }
781         if (!empty($args['userid']) && is_numeric($args['userid'])) {
782             $sql .= " AND (i.userid = 0 or i.userid = ?)";
783             $params[] = $args['userid'];
784         }
786         foreach ($contexts as $context) {
787             if (empty($firstcontext)) {
788                 $firstcontext = true;
789                 $sql .= " AND ((i.contextid = ?)";
790             } else {
791                 $sql .= " OR (i.contextid = ?)";
792             }
793             $params[] = $context->id;
794         }
796         if (!empty($firstcontext)) {
797            $sql .=')';
798         }
800         if ($onlyvisible == true) {
801             $sql .= " AND (r.visible = 1)";
802         }
804         if (isset($type)) {
805             $sql .= " AND (r.type = ?)";
806             $params[] = $type;
807         }
808         $sql .= " ORDER BY r.sortorder, i.name";
810         if (!$records = $DB->get_records_sql($sql, $params)) {
811             $records = array();
812         }
814         $repositories = array();
815         $ft = new filetype_parser();
816         if (isset($args['accepted_types'])) {
817             $accepted_types = $args['accepted_types'];
818         } else {
819             $accepted_types = '*';
820         }
821         foreach ($records as $record) {
822             if (!file_exists($CFG->dirroot . '/repository/'. $record->repositorytype.'/lib.php')) {
823                 continue;
824             }
825             require_once($CFG->dirroot . '/repository/'. $record->repositorytype.'/lib.php');
826             $options['visible'] = $record->visible;
827             $options['type']    = $record->repositorytype;
828             $options['typeid']  = $record->typeid;
829             $options['sortorder'] = $record->sortorder;
830             // tell instance what file types will be accepted by file picker
831             $classname = 'repository_' . $record->repositorytype;
833             $repository = new $classname($record->id, $record->contextid, $options, $record->readonly);
835             $is_supported = true;
837             if (empty($repository->super_called)) {
838                 // to make sure the super construct is called
839                 debugging('parent::__construct must be called by '.$record->repositorytype.' plugin.');
840             } else {
841                 // check mimetypes
842                 if ($accepted_types !== '*' and $repository->supported_filetypes() !== '*') {
843                     $accepted_types = $ft->get_extensions($accepted_types);
844                     $supported_filetypes = $ft->get_extensions($repository->supported_filetypes());
846                     $is_supported = false;
847                     foreach  ($supported_filetypes as $type) {
848                         if (in_array($type, $accepted_types)) {
849                             $is_supported = true;
850                         }
851                     }
853                 }
854                 // check return values
855                 if ($returntypes !== 3 and $repository->supported_returntypes() !== 3) {
856                     $type = $repository->supported_returntypes();
857                     if ($type & $returntypes) {
858                         //
859                     } else {
860                         $is_supported = false;
861                     }
862                 }
864                 if (!$onlyvisible || ($repository->is_visible() && !$repository->disabled)) {
865                     // check capability in current context
866                     if (!empty($current_context)) {
867                         $capability = has_capability('repository/'.$record->repositorytype.':view', $current_context);
868                     } else {
869                         $capability = has_capability('repository/'.$record->repositorytype.':view', get_system_context());
870                     }
871                     if ($record->repositorytype == 'coursefiles') {
872                         // coursefiles plugin needs managefiles permission
873                         if (!empty($current_context)) {
874                             $capability = $capability && has_capability('moodle/course:managefiles', $current_context);
875                         } else {
876                             $capability = $capability && has_capability('moodle/course:managefiles', get_system_context());
877                         }
878                     }
879                     if ($is_supported && $capability) {
880                         $repositories[$repository->id] = $repository;
881                     }
882                 }
883             }
884         }
885         return $repositories;
886     }
888     /**
889      * Get single repository instance
890      * @global object $DB
891      * @global object $CFG
892      * @param integer $id repository id
893      * @return object repository instance
894      */
895     public static function get_instance($id) {
896         global $DB, $CFG;
897         $sql = "SELECT i.*, r.type AS repositorytype, r.visible
898                   FROM {repository} r
899                   JOIN {repository_instances} i ON i.typeid = r.id
900                  WHERE i.id = ?";
902         if (!$instance = $DB->get_record_sql($sql, array($id))) {
903             return false;
904         }
905         require_once($CFG->dirroot . '/repository/'. $instance->repositorytype.'/lib.php');
906         $classname = 'repository_' . $instance->repositorytype;
907         $options['typeid'] = $instance->typeid;
908         $options['type']   = $instance->repositorytype;
909         $options['name']   = $instance->name;
910         $obj = new $classname($instance->id, $instance->contextid, $options, $instance->readonly);
911         if (empty($obj->super_called)) {
912             debugging('parent::__construct must be called by '.$classname.' plugin.');
913         }
914         return $obj;
915     }
917     /**
918      * Call a static function. Any additional arguments than plugin and function will be passed through.
919      * @global object $CFG
920      * @param string $plugin
921      * @param string $function
922      * @return mixed
923      */
924     public static function static_function($plugin, $function) {
925         global $CFG;
927         //check that the plugin exists
928         $typedirectory = $CFG->dirroot . '/repository/'. $plugin . '/lib.php';
929         if (!file_exists($typedirectory)) {
930             //throw new repository_exception('invalidplugin', 'repository');
931             return false;
932         }
934         $pname = null;
935         if (is_object($plugin) || is_array($plugin)) {
936             $plugin = (object)$plugin;
937             $pname = $plugin->name;
938         } else {
939             $pname = $plugin;
940         }
942         $args = func_get_args();
943         if (count($args) <= 2) {
944             $args = array();
945         } else {
946             array_shift($args);
947             array_shift($args);
948         }
950         require_once($typedirectory);
951         return call_user_func_array(array('repository_' . $plugin, $function), $args);
952     }
954     /**
955      * Scan file, throws exception in case of infected file.
956      *
957      * Please note that the scanning engine must be able to access the file,
958      * permissions of the file are not modified here!
959      *
960      * @static
961      * @param string $thefile
962      * @param string $filename name of the file
963      * @param bool $deleteinfected
964      * @return void
965      */
966     public static function antivir_scan_file($thefile, $filename, $deleteinfected) {
967         global $CFG;
969         if (!is_readable($thefile)) {
970             // this should not happen
971             return;
972         }
974         if (empty($CFG->runclamonupload) or empty($CFG->pathtoclam)) {
975             // clam not enabled
976             return;
977         }
979         $CFG->pathtoclam = trim($CFG->pathtoclam);
981         if (!file_exists($CFG->pathtoclam) or !is_executable($CFG->pathtoclam)) {
982             // misconfigured clam - use the old notification for now
983             require("$CFG->libdir/uploadlib.php");
984             $notice = get_string('clamlost', 'moodle', $CFG->pathtoclam);
985             clam_message_admins($notice);
986             return;
987         }
989         // do NOT mess with permissions here, the calling party is responsible for making
990         // sure the scanner engine can access the files!
992         // execute test
993         $cmd = escapeshellcmd($CFG->pathtoclam).' --stdout '.escapeshellarg($thefile);
994         exec($cmd, $output, $return);
996         if ($return == 0) {
997             // perfect, no problem found
998             return;
1000         } else if ($return == 1) {
1001             // infection found
1002             if ($deleteinfected) {
1003                 unlink($thefile);
1004             }
1005             throw new moodle_exception('virusfounduser', 'moodle', '', array('filename'=>$filename));
1007         } else {
1008             //unknown problem
1009             require("$CFG->libdir/uploadlib.php");
1010             $notice = get_string('clamfailed', 'moodle', get_clam_error_code($return));
1011             $notice .= "\n\n". implode("\n", $output);
1012             clam_message_admins($notice);
1013             if ($CFG->clamfailureonupload === 'actlikevirus') {
1014                 if ($deleteinfected) {
1015                     unlink($thefile);
1016                 }
1017                 throw new moodle_exception('virusfounduser', 'moodle', '', array('filename'=>$filename));
1018             } else {
1019                 return;
1020             }
1021         }
1022     }
1024     /**
1025      * Move file from download folder to file pool using FILE API
1026      * @global object $DB
1027      * @global object $CFG
1028      * @global object $USER
1029      * @global object $OUTPUT
1030      * @param string $thefile file path in download folder
1031      * @param object $record
1032      * @return array containing the following keys:
1033      *           icon
1034      *           file
1035      *           id
1036      *           url
1037      */
1038     public static function move_to_filepool($thefile, $record) {
1039         global $DB, $CFG, $USER, $OUTPUT;
1041         // scan for viruses if possible, throws exception if problem found
1042         self::antivir_scan_file($thefile, $record->filename, empty($CFG->repository_no_delete)); //TODO: MDL-28637 this repository_no_delete is a bloody hack!
1044         if ($record->filepath !== '/') {
1045             $record->filepath = trim($record->filepath, '/');
1046             $record->filepath = '/'.$record->filepath.'/';
1047         }
1048         $context = get_context_instance(CONTEXT_USER, $USER->id);
1049         $now = time();
1051         $record->contextid = $context->id;
1052         $record->component = 'user';
1053         $record->filearea  = 'draft';
1054         $record->timecreated  = $now;
1055         $record->timemodified = $now;
1056         $record->userid       = $USER->id;
1057         $record->mimetype     = mimeinfo('type', $thefile);
1058         if(!is_numeric($record->itemid)) {
1059             $record->itemid = 0;
1060         }
1061         $fs = get_file_storage();
1062         if ($existingfile = $fs->get_file($context->id, $record->component, $record->filearea, $record->itemid, $record->filepath, $record->filename)) {
1063             $draftitemid = $record->itemid;
1064             $new_filename = repository::get_unused_filename($draftitemid, $record->filepath, $record->filename);
1065             $old_filename = $record->filename;
1066             // create a tmp file
1067             $record->filename = $new_filename;
1068             $newfile = $fs->create_file_from_pathname($record, $thefile);
1069             $event = array();
1070             $event['event'] = 'fileexists';
1071             $event['newfile'] = new stdClass;
1072             $event['newfile']->filepath = $record->filepath;
1073             $event['newfile']->filename = $new_filename;
1074             $event['newfile']->url = moodle_url::make_draftfile_url($draftitemid, $record->filepath, $new_filename)->out();
1076             $event['existingfile'] = new stdClass;
1077             $event['existingfile']->filepath = $record->filepath;
1078             $event['existingfile']->filename = $old_filename;
1079             $event['existingfile']->url      = moodle_url::make_draftfile_url($draftitemid, $record->filepath, $old_filename)->out();;
1080             return $event;
1081         }
1082         if ($file = $fs->create_file_from_pathname($record, $thefile)) {
1083             if (empty($CFG->repository_no_delete)) {
1084                 $delete = unlink($thefile);
1085                 unset($CFG->repository_no_delete);
1086             }
1087             return array(
1088                 'url'=>moodle_url::make_draftfile_url($file->get_itemid(), $file->get_filepath(), $file->get_filename())->out(),
1089                 'id'=>$file->get_itemid(),
1090                 'file'=>$file->get_filename(),
1091                 'icon' => $OUTPUT->pix_url(file_extension_icon($thefile, 32))->out(),
1092             );
1093         } else {
1094             return null;
1095         }
1096     }
1098     /**
1099      * Builds a tree of files This function is
1100      * then called recursively.
1101      *
1102      * @param $fileinfo an object returned by file_browser::get_file_info()
1103      * @param $search searched string
1104      * @param $dynamicmode bool no recursive call is done when in dynamic mode
1105      * @param $list - the array containing the files under the passed $fileinfo
1106      * @returns int the number of files found
1107      *
1108      * todo: take $search into account, and respect a threshold for dynamic loading
1109      */
1110     public static function build_tree($fileinfo, $search, $dynamicmode, &$list) {
1111         global $CFG, $OUTPUT;
1113         $filecount = 0;
1114         $children = $fileinfo->get_children();
1116         foreach ($children as $child) {
1117             $filename = $child->get_visible_name();
1118             $filesize = $child->get_filesize();
1119             $filesize = $filesize ? display_size($filesize) : '';
1120             $filedate = $child->get_timemodified();
1121             $filedate = $filedate ? userdate($filedate) : '';
1122             $filetype = $child->get_mimetype();
1124             if ($child->is_directory()) {
1125                 $path = array();
1126                 $level = $child->get_parent();
1127                 while ($level) {
1128                     $params = $level->get_params();
1129                     $path[] = array($params['filepath'], $level->get_visible_name());
1130                     $level = $level->get_parent();
1131                 }
1133                 $tmp = array(
1134                     'title' => $child->get_visible_name(),
1135                     'size' => 0,
1136                     'date' => $filedate,
1137                     'path' => array_reverse($path),
1138                     'thumbnail' => $OUTPUT->pix_url('f/folder-32')
1139                 );
1141                 //if ($dynamicmode && $child->is_writable()) {
1142                 //    $tmp['children'] = array();
1143                 //} else {
1144                     // if folder name matches search, we send back all files contained.
1145                 $_search = $search;
1146                 if ($search && stristr($tmp['title'], $search) !== false) {
1147                     $_search = false;
1148                 }
1149                 $tmp['children'] = array();
1150                 $_filecount = repository::build_tree($child, $_search, $dynamicmode, $tmp['children']);
1151                 if ($search && $_filecount) {
1152                     $tmp['expanded'] = 1;
1153                 }
1155                 //}
1157                 if (!$search || $_filecount || (stristr($tmp['title'], $search) !== false)) {
1158                     $filecount += $_filecount;
1159                     $list[] = $tmp;
1160                 }
1162             } else { // not a directory
1163                 // skip the file, if we're in search mode and it's not a match
1164                 if ($search && (stristr($filename, $search) === false)) {
1165                     continue;
1166                 }
1167                 $params = $child->get_params();
1168                 $source = serialize(array($params['contextid'], $params['component'], $params['filearea'], $params['itemid'], $params['filepath'], $params['filename']));
1169                 $list[] = array(
1170                     'title' => $filename,
1171                     'size' => $filesize,
1172                     'date' => $filedate,
1173                     //'source' => $child->get_url(),
1174                     'source' => base64_encode($source),
1175                     'thumbnail'=>$OUTPUT->pix_url(file_extension_icon($filename, 32)),
1176                 );
1177                 $filecount++;
1178             }
1179         }
1181         return $filecount;
1182     }
1185     /**
1186      * Display a repository instance list (with edit/delete/create links)
1187      * @global object $CFG
1188      * @global object $USER
1189      * @global object $OUTPUT
1190      * @param object $context the context for which we display the instance
1191      * @param string $typename if set, we display only one type of instance
1192      */
1193     public static function display_instances_list($context, $typename = null) {
1194         global $CFG, $USER, $OUTPUT;
1196         $output = $OUTPUT->box_start('generalbox');
1197         //if the context is SYSTEM, so we call it from administration page
1198         $admin = ($context->id == SYSCONTEXTID) ? true : false;
1199         if ($admin) {
1200             $baseurl = new moodle_url('/'.$CFG->admin.'/repositoryinstance.php', array('sesskey'=>sesskey()));
1201             $output .= $OUTPUT->heading(get_string('siteinstances', 'repository'));
1202         } else {
1203             $baseurl = new moodle_url('/repository/manage_instances.php', array('contextid'=>$context->id, 'sesskey'=>sesskey()));
1204         }
1205         $url = $baseurl;
1207         $namestr = get_string('name');
1208         $pluginstr = get_string('plugin', 'repository');
1209         $settingsstr = get_string('settings');
1210         $deletestr = get_string('delete');
1211         //retrieve list of instances. In administration context we want to display all
1212         //instances of a type, even if this type is not visible. In course/user context we
1213         //want to display only visible instances, but for every type types. The repository::get_instances()
1214         //third parameter displays only visible type.
1215         $params = array();
1216         $params['context'] = array($context, get_system_context());
1217         $params['currentcontext'] = $context;
1218         $params['onlyvisible'] = !$admin;
1219         $params['type']        = $typename;
1220         $instances = repository::get_instances($params);
1221         $instancesnumber = count($instances);
1222         $alreadyplugins = array();
1224         $table = new html_table();
1225         $table->head = array($namestr, $pluginstr, $settingsstr, $deletestr);
1226         $table->align = array('left', 'left', 'center','center');
1227         $table->data = array();
1229         $updowncount = 1;
1231         foreach ($instances as $i) {
1232             $settings = '';
1233             $delete = '';
1235             $type = repository::get_type_by_id($i->options['typeid']);
1237             if ($type->get_contextvisibility($context)) {
1238                 if (!$i->readonly) {
1240                     $url->param('type', $i->options['type']);
1241                     $url->param('edit', $i->id);
1242                     $settings .= html_writer::link($url, $settingsstr);
1244                     $url->remove_params('edit');
1245                     $url->param('delete', $i->id);
1246                     $delete .= html_writer::link($url, $deletestr);
1248                     $url->remove_params('type');
1249                 }
1250             }
1252             $type = repository::get_type_by_id($i->options['typeid']);
1253             $table->data[] = array($i->name, $type->get_readablename(), $settings, $delete);
1255             //display a grey row if the type is defined as not visible
1256             if (isset($type) && !$type->get_visible()) {
1257                 $table->rowclasses[] = 'dimmed_text';
1258             } else {
1259                 $table->rowclasses[] = '';
1260             }
1262             if (!in_array($i->name, $alreadyplugins)) {
1263                 $alreadyplugins[] = $i->name;
1264             }
1265         }
1266         $output .= html_writer::table($table);
1267         $instancehtml = '<div>';
1268         $addable = 0;
1270         //if no type is set, we can create all type of instance
1271         if (!$typename) {
1272             $instancehtml .= '<h3>';
1273             $instancehtml .= get_string('createrepository', 'repository');
1274             $instancehtml .= '</h3><ul>';
1275             $types = repository::get_editable_types($context);
1276             foreach ($types as $type) {
1277                 if (!empty($type) && $type->get_visible()) {
1278                     $instanceoptionnames = repository::static_function($type->get_typename(), 'get_instance_option_names');
1279                     if (!empty($instanceoptionnames)) {
1280                         $baseurl->param('new', $type->get_typename());
1281                         $instancehtml .= '<li><a href="'.$baseurl->out().'">'.get_string('createxxinstance', 'repository', get_string('pluginname', 'repository_'.$type->get_typename())).  '</a></li>';
1282                         $baseurl->remove_params('new');
1283                         $addable++;
1284                     }
1285                 }
1286             }
1287             $instancehtml .= '</ul>';
1289         } else {
1290             $instanceoptionnames = repository::static_function($typename, 'get_instance_option_names');
1291             if (!empty($instanceoptionnames)) {   //create a unique type of instance
1292                 $addable = 1;
1293                 $baseurl->param('new', $typename);
1294                 $instancehtml .= "<form action='".$baseurl->out()."' method='post'>
1295                     <p><input type='submit' value='".get_string('createinstance', 'repository')."'/></p>
1296                     </form>";
1297                 $baseurl->remove_params('new');
1298             }
1299         }
1301         if ($addable) {
1302             $instancehtml .= '</div>';
1303             $output .= $instancehtml;
1304         }
1306         $output .= $OUTPUT->box_end();
1308         //print the list + creation links
1309         print($output);
1310     }
1312     /**
1313      * Decide where to save the file, can be overwriten by subclass
1314      * @param string filename
1315      */
1316     public function prepare_file($filename) {
1317         global $CFG;
1318         if (!file_exists($CFG->tempdir.'/download')) {
1319             mkdir($CFG->tempdir.'/download/', $CFG->directorypermissions, true);
1320         }
1321         if (is_dir($CFG->tempdir.'/download')) {
1322             $dir = $CFG->tempdir.'/download/';
1323         }
1324         if (empty($filename)) {
1325             $filename = uniqid('repo', true).'_'.time().'.tmp';
1326         }
1327         if (file_exists($dir.$filename)) {
1328             $filename = uniqid('m').$filename;
1329         }
1330         return $dir.$filename;
1331     }
1333     /**
1334      * Return file URL, for most plugins, the parameter is the original
1335      * url, but some plugins use a file id, so we need this function to
1336      * convert file id to original url.
1337      *
1338      * @param string $url the url of file
1339      * @return string
1340      */
1341     public function get_link($url) {
1342         return $url;
1343     }
1345     /**
1346      * Download a file, this function can be overridden by
1347      * subclass.
1348      *
1349      * @global object $CFG
1350      * @param string $url the url of file
1351      * @param string $filename save location
1352      * @return string the location of the file
1353      * @see curl package
1354      */
1355     public function get_file($url, $filename = '') {
1356         global $CFG;
1357         $path = $this->prepare_file($filename);
1358         $fp = fopen($path, 'w');
1359         $c = new curl;
1360         $c->download(array(array('url'=>$url, 'file'=>$fp)));
1361         return array('path'=>$path, 'url'=>$url);
1362     }
1364     /**
1365      * Return size of a file in bytes.
1366      *
1367      * @param string $source encoded and serialized data of file
1368      * @return integer file size in bytes
1369      */
1370     public function get_file_size($source) {
1371         $browser    = get_file_browser();
1372         $params     = unserialize(base64_decode($source));
1373         $contextid  = clean_param($params['contextid'], PARAM_INT);
1374         $fileitemid = clean_param($params['itemid'], PARAM_INT);
1375         $filename   = clean_param($params['filename'], PARAM_FILE);
1376         $filepath   = clean_param($params['filepath'], PARAM_PATH);
1377         $filearea   = clean_param($params['filearea'], PARAM_AREA);
1378         $component  = clean_param($params['component'], PARAM_COMPONENT);
1379         $context    = get_context_instance_by_id($contextid);
1380         $file_info  = $browser->get_file_info($context, $component, $filearea, $fileitemid, $filepath, $filename);
1381         if (!empty($file_info)) {
1382             $filesize = $file_info->get_filesize();
1383         } else {
1384             $filesize = null;
1385         }
1386         return $filesize;
1387     }
1389     /**
1390      * Return is the instance is visible
1391      * (is the type visible ? is the context enable ?)
1392      * @return boolean
1393      */
1394     public function is_visible() {
1395         $type = repository::get_type_by_id($this->options['typeid']);
1396         $instanceoptions = repository::static_function($type->get_typename(), 'get_instance_option_names');
1398         if ($type->get_visible()) {
1399             //if the instance is unique so it's visible, otherwise check if the instance has a enabled context
1400             if (empty($instanceoptions) || $type->get_contextvisibility($this->context)) {
1401                 return true;
1402             }
1403         }
1405         return false;
1406     }
1408     /**
1409      * Return the name of this instance, can be overridden.
1410      * @global object $DB
1411      * @return string
1412      */
1413     public function get_name() {
1414         global $DB;
1415         if ( $name = $this->instance->name ) {
1416             return $name;
1417         } else {
1418             return get_string('pluginname', 'repository_' . $this->options['type']);
1419         }
1420     }
1422     /**
1423      * what kind of files will be in this repository?
1424      * @return array return '*' means this repository support any files, otherwise
1425      *               return mimetypes of files, it can be an array
1426      */
1427     public function supported_filetypes() {
1428         // return array('text/plain', 'image/gif');
1429         return '*';
1430     }
1432     /**
1433      * does it return a file url or a item_id
1434      * @return string
1435      */
1436     public function supported_returntypes() {
1437         return (FILE_INTERNAL | FILE_EXTERNAL);
1438     }
1440     /**
1441      * Provide repository instance information for Ajax
1442      * @global object $CFG
1443      * @return object
1444      */
1445     final public function get_meta() {
1446         global $CFG, $OUTPUT;
1447         $ft = new filetype_parser;
1448         $meta = new stdClass();
1449         $meta->id   = $this->id;
1450         $meta->name = $this->get_name();
1451         $meta->type = $this->options['type'];
1452         $meta->icon = $OUTPUT->pix_url('icon', 'repository_'.$meta->type)->out(false);
1453         $meta->supported_types = $ft->get_extensions($this->supported_filetypes());
1454         $meta->return_types = $this->supported_returntypes();
1455         $meta->sortorder = $this->options['sortorder'];
1456         return $meta;
1457     }
1459     /**
1460      * Create an instance for this plug-in
1461      * @global object $CFG
1462      * @global object $DB
1463      * @param string $type the type of the repository
1464      * @param integer $userid the user id
1465      * @param object $context the context
1466      * @param array $params the options for this instance
1467      * @param integer $readonly whether to create it readonly or not (defaults to not)
1468      * @return mixed
1469      */
1470     public static function create($type, $userid, $context, $params, $readonly=0) {
1471         global $CFG, $DB;
1472         $params = (array)$params;
1473         require_once($CFG->dirroot . '/repository/'. $type . '/lib.php');
1474         $classname = 'repository_' . $type;
1475         if ($repo = $DB->get_record('repository', array('type'=>$type))) {
1476             $record = new stdClass();
1477             $record->name = $params['name'];
1478             $record->typeid = $repo->id;
1479             $record->timecreated  = time();
1480             $record->timemodified = time();
1481             $record->contextid = $context->id;
1482             $record->readonly = $readonly;
1483             $record->userid    = $userid;
1484             $id = $DB->insert_record('repository_instances', $record);
1485             $options = array();
1486             $configs = call_user_func($classname . '::get_instance_option_names');
1487             if (!empty($configs)) {
1488                 foreach ($configs as $config) {
1489                     if (isset($params[$config])) {
1490                         $options[$config] = $params[$config];
1491                     } else {
1492                         $options[$config] = null;
1493                     }
1494                 }
1495             }
1497             if (!empty($id)) {
1498                 unset($options['name']);
1499                 $instance = repository::get_instance($id);
1500                 $instance->set_option($options);
1501                 return $id;
1502             } else {
1503                 return null;
1504             }
1505         } else {
1506             return null;
1507         }
1508     }
1510     /**
1511      * delete a repository instance
1512      * @global object $DB
1513      * @return mixed
1514      */
1515     final public function delete() {
1516         global $DB;
1517         $DB->delete_records('repository_instances', array('id'=>$this->id));
1518         $DB->delete_records('repository_instance_config', array('instanceid'=>$this->id));
1519         return true;
1520     }
1522     /**
1523      * Hide/Show a repository
1524      * @global object $DB
1525      * @param string $hide
1526      * @return boolean
1527      */
1528     final public function hide($hide = 'toggle') {
1529         global $DB;
1530         if ($entry = $DB->get_record('repository', array('id'=>$this->id))) {
1531             if ($hide === 'toggle' ) {
1532                 if (!empty($entry->visible)) {
1533                     $entry->visible = 0;
1534                 } else {
1535                     $entry->visible = 1;
1536                 }
1537             } else {
1538                 if (!empty($hide)) {
1539                     $entry->visible = 0;
1540                 } else {
1541                     $entry->visible = 1;
1542                 }
1543             }
1544             return $DB->update_record('repository', $entry);
1545         }
1546         return false;
1547     }
1549     /**
1550      * Save settings for repository instance
1551      * $repo->set_option(array('api_key'=>'f2188bde132', 'name'=>'dongsheng'));
1552      * @global object $DB
1553      * @param array $options settings
1554      * @return int Id of the record
1555      */
1556     public function set_option($options = array()) {
1557         global $DB;
1559         if (!empty($options['name'])) {
1560             $r = new stdClass();
1561             $r->id   = $this->id;
1562             $r->name = $options['name'];
1563             $DB->update_record('repository_instances', $r);
1564             unset($options['name']);
1565         }
1566         foreach ($options as $name=>$value) {
1567             if ($id = $DB->get_field('repository_instance_config', 'id', array('name'=>$name, 'instanceid'=>$this->id))) {
1568                 $DB->set_field('repository_instance_config', 'value', $value, array('id'=>$id));
1569             } else {
1570                 $config = new stdClass();
1571                 $config->instanceid = $this->id;
1572                 $config->name   = $name;
1573                 $config->value  = $value;
1574                 $DB->insert_record('repository_instance_config', $config);
1575             }
1576         }
1577         return true;
1578     }
1580     /**
1581      * Get settings for repository instance
1582      * @global object $DB
1583      * @param string $config
1584      * @return array Settings
1585      */
1586     public function get_option($config = '') {
1587         global $DB;
1588         $entries = $DB->get_records('repository_instance_config', array('instanceid'=>$this->id));
1589         $ret = array();
1590         if (empty($entries)) {
1591             return $ret;
1592         }
1593         foreach($entries as $entry) {
1594             $ret[$entry->name] = $entry->value;
1595         }
1596         if (!empty($config)) {
1597             if (isset($ret[$config])) {
1598                 return $ret[$config];
1599             } else {
1600                 return null;
1601             }
1602         } else {
1603             return $ret;
1604         }
1605     }
1607     public function filter(&$value) {
1608         $pass = false;
1609         $accepted_types = optional_param_array('accepted_types', '', PARAM_RAW);
1610         $ft = new filetype_parser;
1611         //$ext = $ft->get_extensions($this->supported_filetypes());
1612         if (isset($value['children'])) {
1613             $pass = true;
1614             if (!empty($value['children'])) {
1615                 $value['children'] = array_filter($value['children'], array($this, 'filter'));
1616             }
1617         } else {
1618             if ($accepted_types == '*' or empty($accepted_types)
1619                 or (is_array($accepted_types) and in_array('*', $accepted_types))) {
1620                 $pass = true;
1621             } elseif (is_array($accepted_types)) {
1622                 foreach ($accepted_types as $type) {
1623                     $extensions = $ft->get_extensions($type);
1624                     if (!is_array($extensions)) {
1625                         $pass = true;
1626                     } else {
1627                         foreach ($extensions as $ext) {
1628                             if (preg_match('#'.$ext.'$#i', $value['title'])) {
1629                                 $pass = true;
1630                             }
1631                         }
1632                     }
1633                 }
1634             }
1635         }
1636         return $pass;
1637     }
1639     /**
1640      * Given a path, and perhaps a search, get a list of files.
1641      *
1642      * See details on http://docs.moodle.org/dev/Repository_plugins
1643      *
1644      * @param string $path, this parameter can
1645      * a folder name, or a identification of folder
1646      * @param string $page, the page number of file list
1647      * @return array the list of files, including meta infomation, containing the following keys
1648      *           manage, url to manage url
1649      *           client_id
1650      *           login, login form
1651      *           repo_id, active repository id
1652      *           login_btn_action, the login button action
1653      *           login_btn_label, the login button label
1654      *           total, number of results
1655      *           perpage, items per page
1656      *           page
1657      *           pages, total pages
1658      *           issearchresult, is it a search result?
1659      *           list, file list
1660      *           path, current path and parent path
1661      */
1662     public function get_listing($path = '', $page = '') {
1663     }
1665     /**
1666      * Search files in repository
1667      * When doing global search, $search_text will be used as
1668      * keyword.
1669      *
1670      * @return mixed, see get_listing()
1671      */
1672     public function search($search_text) {
1673         $list = array();
1674         $list['list'] = array();
1675         return false;
1676     }
1678     /**
1679      * Logout from repository instance
1680      * By default, this function will return a login form
1681      *
1682      * @return string
1683      */
1684     public function logout(){
1685         return $this->print_login();
1686     }
1688     /**
1689      * To check whether the user is logged in.
1690      *
1691      * @return boolean
1692      */
1693     public function check_login(){
1694         return true;
1695     }
1698     /**
1699      * Show the login screen, if required
1700      */
1701     public function print_login(){
1702         return $this->get_listing();
1703     }
1705     /**
1706      * Show the search screen, if required
1707      * @return null
1708      */
1709     public function print_search() {
1710         $str = '';
1711         $str .= '<input type="hidden" name="repo_id" value="'.$this->id.'" />';
1712         $str .= '<input type="hidden" name="ctx_id" value="'.$this->context->id.'" />';
1713         $str .= '<input type="hidden" name="seekey" value="'.sesskey().'" />';
1714         $str .= '<label>'.get_string('keyword', 'repository').': </label><br/><input name="s" value="" /><br/>';
1715         return $str;
1716     }
1718     /**
1719      * For oauth like external authentication, when external repository direct user back to moodle,
1720      * this funciton will be called to set up token and token_secret
1721      */
1722     public function callback() {
1723     }
1725     /**
1726      * is it possible to do glboal search?
1727      * @return boolean
1728      */
1729     public function global_search() {
1730         return false;
1731     }
1733     /**
1734      * Defines operations that happen occasionally on cron
1735      * @return boolean
1736      */
1737     public function cron() {
1738         return true;
1739     }
1741     /**
1742      * function which is run when the type is created (moodle administrator add the plugin)
1743      * @return boolean success or fail?
1744      */
1745     public static function plugin_init() {
1746         return true;
1747     }
1749     /**
1750      * Edit/Create Admin Settings Moodle form
1751      * @param object $mform Moodle form (passed by reference)
1752      * @param string $classname repository class name
1753      */
1754     public function type_config_form($mform, $classname = 'repository') {
1755         $instnaceoptions = call_user_func(array($classname, 'get_instance_option_names'), $mform, $classname);
1756         if (empty($instnaceoptions)) {
1757             // this plugin has only one instance
1758             // so we need to give it a name
1759             // it can be empty, then moodle will look for instance name from language string
1760             $mform->addElement('text', 'pluginname', get_string('pluginname', 'repository'), array('size' => '40'));
1761             $mform->addElement('static', 'pluginnamehelp', '', get_string('pluginnamehelp', 'repository'));
1762         }
1763     }
1765     /**
1766      * Validate Admin Settings Moodle form
1767      * @param object $mform Moodle form (passed by reference)
1768      * @param array array of ("fieldname"=>value) of submitted data
1769      * @param array array of ("fieldname"=>errormessage) of errors
1770      * @return array array of errors
1771      */
1772     public static function type_form_validation($mform, $data, $errors) {
1773         return $errors;
1774     }
1777     /**
1778      * Edit/Create Instance Settings Moodle form
1779      * @param object $mform Moodle form (passed by reference)
1780      */
1781     public function instance_config_form($mform) {
1782     }
1784     /**
1785      * Return names of the general options
1786      * By default: no general option name
1787      * @return array
1788      */
1789     public static function get_type_option_names() {
1790         return array('pluginname');
1791     }
1793     /**
1794      * Return names of the instance options
1795      * By default: no instance option name
1796      * @return array
1797      */
1798     public static function get_instance_option_names() {
1799         return array();
1800     }
1802     public static function instance_form_validation($mform, $data, $errors) {
1803         return $errors;
1804     }
1806     public function get_short_filename($str, $maxlength) {
1807         if (textlib::strlen($str) >= $maxlength) {
1808             return trim(textlib::substr($str, 0, $maxlength)).'...';
1809         } else {
1810             return $str;
1811         }
1812     }
1814     /**
1815      * Overwrite an existing file
1816      *
1817      * @param int $itemid
1818      * @param string $filepath
1819      * @param string $filename
1820      * @param string $newfilepath
1821      * @param string $newfilename
1822      * @return boolean
1823      */
1824     function overwrite_existing_draftfile($itemid, $filepath, $filename, $newfilepath, $newfilename) {
1825         global $USER;
1826         $fs = get_file_storage();
1827         $user_context = get_context_instance(CONTEXT_USER, $USER->id);
1828         if ($file = $fs->get_file($user_context->id, 'user', 'draft', $itemid, $filepath, $filename)) {
1829             if ($tempfile = $fs->get_file($user_context->id, 'user', 'draft', $itemid, $newfilepath, $newfilename)) {
1830                 // delete existing file to release filename
1831                 $file->delete();
1832                 // create new file
1833                 $newfile = $fs->create_file_from_storedfile(array('filepath'=>$filepath, 'filename'=>$filename), $tempfile);
1834                 // remove temp file
1835                 $tempfile->delete();
1836                 return true;
1837             }
1838         }
1839         return false;
1840     }
1842     /**
1843      * Delete a temp file from draft area
1844      *
1845      * @param int $draftitemid
1846      * @param string $filepath
1847      * @param string $filename
1848      * @return boolean
1849      */
1850     function delete_tempfile_from_draft($draftitemid, $filepath, $filename) {
1851         global $USER;
1852         $fs = get_file_storage();
1853         $user_context = get_context_instance(CONTEXT_USER, $USER->id);
1854         if ($file = $fs->get_file($user_context->id, 'user', 'draft', $draftitemid, $filepath, $filename)) {
1855             $file->delete();
1856             return true;
1857         } else {
1858             return false;
1859         }
1860     }
1863 /**
1864  * Exception class for repository api
1865  *
1866  * @since 2.0
1867  * @package moodlecore
1868  * @subpackage repository
1869  * @copyright 2009 Dongsheng Cai <dongsheng@moodle.com>
1870  * @license   http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
1871  */
1872 class repository_exception extends moodle_exception {
1875 /**
1876  * This is a class used to define a repository instance form
1877  *
1878  * @since 2.0
1879  * @package moodlecore
1880  * @subpackage repository
1881  * @copyright 2009 Dongsheng Cai <dongsheng@moodle.com>
1882  * @license   http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
1883  */
1884 final class repository_instance_form extends moodleform {
1885     protected $instance;
1886     protected $plugin;
1887     protected function add_defaults() {
1888         $mform =& $this->_form;
1889         $strrequired = get_string('required');
1891         $mform->addElement('hidden', 'edit',  ($this->instance) ? $this->instance->id : 0);
1892         $mform->setType('edit', PARAM_INT);
1893         $mform->addElement('hidden', 'new',   $this->plugin);
1894         $mform->setType('new', PARAM_FORMAT);
1895         $mform->addElement('hidden', 'plugin', $this->plugin);
1896         $mform->setType('plugin', PARAM_PLUGIN);
1897         $mform->addElement('hidden', 'typeid', $this->typeid);
1898         $mform->setType('typeid', PARAM_INT);
1899         $mform->addElement('hidden', 'contextid', $this->contextid);
1900         $mform->setType('contextid', PARAM_INT);
1902         $mform->addElement('text', 'name', get_string('name'), 'maxlength="100" size="30"');
1903         $mform->addRule('name', $strrequired, 'required', null, 'client');
1904     }
1906     public function definition() {
1907         global $CFG;
1908         // type of plugin, string
1909         $this->plugin = $this->_customdata['plugin'];
1910         $this->typeid = $this->_customdata['typeid'];
1911         $this->contextid = $this->_customdata['contextid'];
1912         $this->instance = (isset($this->_customdata['instance'])
1913                 && is_subclass_of($this->_customdata['instance'], 'repository'))
1914             ? $this->_customdata['instance'] : null;
1916         $mform =& $this->_form;
1918         $this->add_defaults();
1919         //add fields
1920         if (!$this->instance) {
1921             $result = repository::static_function($this->plugin, 'instance_config_form', $mform);
1922             if ($result === false) {
1923                 $mform->removeElement('name');
1924             }
1925         } else {
1926             $data = array();
1927             $data['name'] = $this->instance->name;
1928             if (!$this->instance->readonly) {
1929                 $result = $this->instance->instance_config_form($mform);
1930                 if ($result === false) {
1931                     $mform->removeElement('name');
1932                 }
1933                 // and set the data if we have some.
1934                 foreach ($this->instance->get_instance_option_names() as $config) {
1935                     if (!empty($this->instance->options[$config])) {
1936                         $data[$config] = $this->instance->options[$config];
1937                      } else {
1938                         $data[$config] = '';
1939                      }
1940                 }
1941             }
1942             $this->set_data($data);
1943         }
1945         if ($result === false) {
1946             $mform->addElement('cancel');
1947         } else {
1948             $this->add_action_buttons(true, get_string('save','repository'));
1949         }
1950     }
1952     public function validation($data) {
1953         global $DB;
1954         $errors = array();
1955         $plugin = $this->_customdata['plugin'];
1956         $instance = (isset($this->_customdata['instance'])
1957                 && is_subclass_of($this->_customdata['instance'], 'repository'))
1958             ? $this->_customdata['instance'] : null;
1959         if (!$instance) {
1960             $errors = repository::static_function($plugin, 'instance_form_validation', $this, $data, $errors);
1961         } else {
1962             $errors = $instance->instance_form_validation($this, $data, $errors);
1963         }
1965         $sql = "SELECT count('x')
1966                   FROM {repository_instances} i, {repository} r
1967                  WHERE r.type=:plugin AND r.id=i.typeid AND i.name=:name";
1968         if ($DB->count_records_sql($sql, array('name' => $data['name'], 'plugin' => $data['plugin'])) > 1) {
1969             $errors['name'] = get_string('erroruniquename', 'repository');
1970         }
1972         return $errors;
1973     }
1976 /**
1977  * This is a class used to define a repository type setting form
1978  *
1979  * @since 2.0
1980  * @package moodlecore
1981  * @subpackage repository
1982  * @copyright 2009 Dongsheng Cai <dongsheng@moodle.com>
1983  * @license   http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
1984  */
1985 final class repository_type_form extends moodleform {
1986     protected $instance;
1987     protected $plugin;
1988     protected $action;
1990     /**
1991      * Definition of the moodleform
1992      * @global object $CFG
1993      */
1994     public function definition() {
1995         global $CFG;
1996         // type of plugin, string
1997         $this->plugin = $this->_customdata['plugin'];
1998         $this->instance = (isset($this->_customdata['instance'])
1999                 && is_a($this->_customdata['instance'], 'repository_type'))
2000             ? $this->_customdata['instance'] : null;
2002         $this->action = $this->_customdata['action'];
2003         $this->pluginname = $this->_customdata['pluginname'];
2004         $mform =& $this->_form;
2005         $strrequired = get_string('required');
2007         $mform->addElement('hidden', 'action', $this->action);
2008         $mform->setType('action', PARAM_TEXT);
2009         $mform->addElement('hidden', 'repos', $this->plugin);
2010         $mform->setType('repos', PARAM_PLUGIN);
2012         // let the plugin add its specific fields
2013         $classname = 'repository_' . $this->plugin;
2014         require_once($CFG->dirroot . '/repository/' . $this->plugin . '/lib.php');
2015         //add "enable course/user instances" checkboxes if multiple instances are allowed
2016         $instanceoptionnames = repository::static_function($this->plugin, 'get_instance_option_names');
2018         $result = call_user_func(array($classname, 'type_config_form'), $mform, $classname);
2020         if (!empty($instanceoptionnames)) {
2021             $sm = get_string_manager();
2022             $component = 'repository';
2023             if ($sm->string_exists('enablecourseinstances', 'repository_' . $this->plugin)) {
2024                 $component .= ('_' . $this->plugin);
2025             }
2026             $mform->addElement('checkbox', 'enablecourseinstances', get_string('enablecourseinstances', $component));
2028             $component = 'repository';
2029             if ($sm->string_exists('enableuserinstances', 'repository_' . $this->plugin)) {
2030                 $component .= ('_' . $this->plugin);
2031             }
2032             $mform->addElement('checkbox', 'enableuserinstances', get_string('enableuserinstances', $component));
2033         }
2035         // set the data if we have some.
2036         if ($this->instance) {
2037             $data = array();
2038             $option_names = call_user_func(array($classname,'get_type_option_names'));
2039             if (!empty($instanceoptionnames)){
2040                 $option_names[] = 'enablecourseinstances';
2041                 $option_names[] = 'enableuserinstances';
2042             }
2044             $instanceoptions = $this->instance->get_options();
2045             foreach ($option_names as $config) {
2046                 if (!empty($instanceoptions[$config])) {
2047                     $data[$config] = $instanceoptions[$config];
2048                 } else {
2049                     $data[$config] = '';
2050                 }
2051             }
2052             // XXX: set plugin name for plugins which doesn't have muliti instances
2053             if (empty($instanceoptionnames)){
2054                 $data['pluginname'] = $this->pluginname;
2055             }
2056             $this->set_data($data);
2057         }
2059         $this->add_action_buttons(true, get_string('save','repository'));
2060     }
2062     public function validation($data) {
2063         $errors = array();
2064         $plugin = $this->_customdata['plugin'];
2065         $instance = (isset($this->_customdata['instance'])
2066                 && is_subclass_of($this->_customdata['instance'], 'repository'))
2067             ? $this->_customdata['instance'] : null;
2068         if (!$instance) {
2069             $errors = repository::static_function($plugin, 'type_form_validation', $this, $data, $errors);
2070         } else {
2071             $errors = $instance->type_form_validation($this, $data, $errors);
2072         }
2074         return $errors;
2075     }
2078 /**
2079  * Generate all options needed by filepicker
2080  *
2081  * @param array $args, including following keys
2082  *          context
2083  *          accepted_types
2084  *          return_types
2085  *
2086  * @return array the list of repository instances, including meta infomation, containing the following keys
2087  *          externallink
2088  *          repositories
2089  *          accepted_types
2090  */
2091 function initialise_filepicker($args) {
2092     global $CFG, $USER, $PAGE, $OUTPUT;
2093     require_once($CFG->libdir . '/licenselib.php');
2095     $return = new stdClass();
2096     $licenses = array();
2097     if (!empty($CFG->licenses)) {
2098         $array = explode(',', $CFG->licenses);
2099         foreach ($array as $license) {
2100             $l = new stdClass();
2101             $l->shortname = $license;
2102             $l->fullname = get_string($license, 'license');
2103             $licenses[] = $l;
2104         }
2105     }
2106     if (!empty($CFG->sitedefaultlicense)) {
2107         $return->defaultlicense = $CFG->sitedefaultlicense;
2108     }
2110     $return->licenses = $licenses;
2112     $return->author = fullname($USER);
2114     $ft = new filetype_parser();
2115     if (empty($args->context)) {
2116         $context = $PAGE->context;
2117     } else {
2118         $context = $args->context;
2119     }
2120     $disable_types = array();
2121     if (!empty($args->disable_types)) {
2122         $disable_types = $args->disable_types;
2123     }
2125     $user_context = get_context_instance(CONTEXT_USER, $USER->id);
2127     list($context, $course, $cm) = get_context_info_array($context->id);
2128     $contexts = array($user_context, get_system_context());
2129     if (!empty($course)) {
2130         // adding course context
2131         $contexts[] = get_context_instance(CONTEXT_COURSE, $course->id);
2132     }
2133     $externallink = (int)get_config(null, 'repositoryallowexternallinks');
2134     $repositories = repository::get_instances(array(
2135         'context'=>$contexts,
2136         'currentcontext'=> $context,
2137         'accepted_types'=>$args->accepted_types,
2138         'return_types'=>$args->return_types,
2139         'disable_types'=>$disable_types
2140     ));
2142     $return->repositories = array();
2144     if (empty($externallink)) {
2145         $return->externallink = false;
2146     } else {
2147         $return->externallink = true;
2148     }
2150     // provided by form element
2151     $return->accepted_types = $ft->get_extensions($args->accepted_types);
2152     $return->return_types = $args->return_types;
2153     foreach ($repositories as $repository) {
2154         $meta = $repository->get_meta();
2155         // Please note that the array keys for repositories are used within
2156         // JavaScript a lot, the key NEEDS to be the repository id.
2157         $return->repositories[$repository->id] = $meta;
2158     }
2159     return $return;
2161 /**
2162  * Small function to walk an array to attach repository ID
2163  * @param array $value
2164  * @param string $key
2165  * @param int $id
2166  */
2167 function repository_attach_id(&$value, $key, $id){
2168     $value['repo_id'] = $id;