| blob | fc8e3af0eb9bb81d0d810102c5b6506a1abe9b8d |
1 <?php
3 /**
4 * adminlib.php - Contains functions that only administrators will ever need to use
5 *
6 * @author Martin Dougiamas and many others
7 * @version $Id$
8 * @license http://www.gnu.org/copyleft/gpl.html GNU Public License
9 * @package moodlecore
10 */
20 // something really wrong is going on in main upgrade script
22 }
26 }
27 }
30 //TODO
31 }
34 //TODO
35 }
38 //TODO
39 }
42 //TODO
43 }
45 /**
46 * Upgrade plugins
47 *
48 * @uses $db
49 * @uses $CFG
50 * @param string $type The type of plugins that should be updated (e.g. 'enrol', 'qtype')
51 * @param string $dir The directory where the plugins are located (e.g. 'question/questiontypes')
52 * @param string $return The url to prompt the user to continue to
53 */
57 /// Let's know if the header has been printed, so the funcion is being called embedded in an outer page
74 }
81 }
85 }
89 }
100 build_navigation(array(array('name' => $strpluginsetup, 'link' => null, 'type' => 'misc'))), '',
102 }
107 }
108 }
116 }
119 // do nothing
123 build_navigation(array(array('name' => $strpluginsetup, 'link' => null, 'type' => 'misc'))), '',
125 }
133 /// Both old .sql files and new install.xml are supported
134 /// but we priorize install.xml (XMLDB) if present
142 }
145 /// Continue with the instalation, roles and other stuff
147 /// OK so far, now update the plugins record
150 /// Install capabilities
153 }
154 /// Install events
157 /// Run local install function if there is one
164 }
165 }
166 }
171 }
173 /// Run de old and new upgrade functions for the module
177 /// First, the old function if exists
185 }
187 /// Then, the new function if exists and the old one was ok
195 }
198 /// Now analyze upgrade results
200 // OK so far, now update the plugins record
204 }
208 notify('Upgrading '. $plugin->name .' from '. $CFG->$pluginversion .' to '. $plugin->version .' FAILED!');
209 }
210 }
214 error('Version mismatch: '. $plugin->name .' can\'t downgrade '. $CFG->$pluginversion .' -> '. $plugin->version .' !');
215 }
216 }
224 }
225 }
227 /**
228 * Find and check all modules and load them up or upgrade them if necessary
229 *
230 * @uses $db
231 * @uses $CFG
232 * @param string $return The url to prompt the user to continue to
233 * @todo Finish documenting this function
234 */
241 }
250 }
261 }
268 }
272 }
276 }
287 build_navigation(array(array('name' => $strmodulesetup, 'link' => null, 'type' => 'misc'))), '',
289 }
294 }
295 }
303 // do nothing
305 /// If versions say that we need to upgrade but no upgrade files are available, notify and continue
310 }
313 build_navigation(array(array('name' => $strmodulesetup, 'link' => null, 'type' => 'misc'))), '',
315 }
319 /// Run de old and new upgrade functions for the module
323 /// First, the old function if exists
331 }
335 }
337 /// Then, the new function if exists and the old one was ok
345 }
348 /// Now analyze upgrade results
350 // OK so far, now update the modules record
354 }
359 notify('Upgrading '. $module->name .' from '. $currmodule->version .' to '. $module->version .' FAILED!');
360 }
362 /// Update the capabilities table?
365 }
372 error('Version mismatch: '. $module->name .' can\'t downgrade '. $currmodule->version .' -> '. $module->version .' !');
373 }
378 build_navigation(array(array('name' => $strmodulesetup, 'link' => null, 'type' => 'misc'))), '',
380 }
387 /// Both old .sql files and new install.xml are supported
388 /// but we priorize install.xml (XMLDB) if present
393 }
397 /// Continue with the installation, roles and other stuff
401 /// Capabilities
404 }
406 /// Events
409 /// Run local install function if there is one
414 }
415 }
421 }
424 }
425 }
427 /// Check submodules of this module if necessary
432 }
435 /// Run any defaults or final code that is necessary for this module
438 // Insert default values for any important configuration variables
445 }
446 }
447 }
448 }
449 }
457 }
458 }
460 /**
461 * Try to obtain or release the cron lock.
462 *
463 * @param string $name name of lock
464 * @param int $until timestamp when this lock considered stale, null means remove lock unconditionaly
465 * @param bool $ignorecurrent ignore current lock state, usually entend previous lock
466 * @return bool true if lock obtained
467 */
472 }
474 // remove lock by force == remove from config table
478 }
481 // read value from db - other processes might have changed it
485 //lock active
487 }
488 }
492 }
501 }
503 // Are we done?
510 }
512 }
519 echo '<div id="bar'.$thisbarid.'" style="border-style:solid;border-width:1px;width:500px;height:50px;">';
520 echo '<div id="slider'.$thisbarid.'" style="border-style:solid;border-width:1px;height:48px;width:10px;background-color:green;"></div>';
525 }
539 }
545 }
546 }
548 // Don't call this function directly, it's called from print_progress.
552 }
554 echo 'document.getElementById("text'.$thisbarid.'").innerHTML = "'.addslashes($donetext).'";'."\n";
557 }
563 $linktoscrolltoerrors = '<script type="text/javascript">var installautopilot = true;</script>'."\n";
565 $linktoscrolltoerrors = '<script type="text/javascript">var installautopilot = false;</script>'."\n";
566 }
567 $linktoscrolltoerrors .= '<script type="text/javascript" src="' . $CFG->wwwroot . '/lib/scroll_to_errors.js"></script>';
570 }
592 }
596 }
598 // Assign the default admin roles to the new user.
601 }
605 }
609 // Log the user in.
617 }
618 }
620 ////////////////////////////////////////////////
621 /// upgrade logging functions
622 ////////////////////////////////////////////////
626 // I did not find out how to use static variable in callback function,
627 // the problem was that I could not flush the static buffer :-(
630 /**
631 * Check if upgrade is already running.
632 *
633 * If anything goes wrong due to missing call to upgrade_log_finish()
634 * just restart the browser.
635 *
636 * @param string warning message indicating upgrade is already running
637 * @param int page reload timeout
638 */
643 }
644 }
646 /**
647 * Start logging of output into file (if not disabled) and
648 * prevent aborting and concurrent execution of upgrade script.
649 *
650 * Please note that you can not write into session variables after calling this function!
651 *
652 * This function may be called repeatedly.
653 */
659 }
665 }
667 ob_start('upgrade_log_callback', 2); // function for logging to disk; flush each line of text ASAP
669 }
671 /**
672 * Terminate logging of output, flush all data, allow script aborting
673 * and reopen session for writing. Function error() does terminate the logging too.
674 *
675 * Please make sure that each upgrade_log_start() is properly terminated by
676 * this function or error().
677 *
678 * This function may be called repeatedly.
679 */
685 }
687 @ob_end_flush();
691 }
695 }
698 }
702 }
704 }
706 /**
707 * Callback function for logging into files. Not more than one file is created per minute,
708 * upgrade session (terminated by upgrade_log_finish()) is always stored in one file.
709 *
710 * This function must not output any characters or throw warnigns and errors!
711 */
715 if (empty($CFG->disableupgradelogging) and ($string != '') and ($upgradeloghandle !== 'error')) {
716 if ($upgradeloghandle or ($upgradeloghandle = @fopen($CFG->dataroot.'/upgradelogs/upg_'.date('Ymd-Hi').'.html', 'a'))) {
721 }
724 }
725 }
727 }
729 /**
730 * Test if and critical warnings are present
731 * @return bool
732 */
738 }
746 }
747 }
750 }
752 /**
753 * Detects if float support at least 10 deciman digits
754 * and also if float-->string conversion works as expected.
755 * @return bool true if problem found
756 */
762 }
764 /**
765 * Try to verify that dataroot is not accessible from web.
766 * It is not 100% correct but might help to reduce number of vulnerable sites.
767 *
768 * Protection from httpd.conf and .htaccess is not detected properly.
769 * @param bool $fetchtest try to test public access by fetching file
770 * @return mixed empty means secure, INSECURE_DATAROOT_ERROR found a critical problem, INSECURE_DATAROOT_WARNING migth be problematic
771 */
785 }
786 }
793 }
797 }
799 // now try all methods to fetch a test file using http protocol
807 }
811 }
814 // hmm, strange
816 }
831 }
832 }
834 }
840 }
841 }
860 }
861 }
866 }
867 }
870 }
872 /// =============================================================================================================
873 /// administration tree classes and functions
876 // n.b. documentation is still in progress for this code
878 /// INTRODUCTION
880 /// This file performs the following tasks:
881 /// -it defines the necessary objects and interfaces to build the Moodle
882 /// admin hierarchy
883 /// -it defines the admin_externalpage_setup(), admin_externalpage_print_header(),
884 /// and admin_externalpage_print_footer() functions used on admin pages
886 /// ADMIN_SETTING OBJECTS
888 /// Moodle settings are represented by objects that inherit from the admin_setting
889 /// class. These objects encapsulate how to read a setting, how to write a new value
890 /// to a setting, and how to appropriately display the HTML to modify the setting.
892 /// ADMIN_SETTINGPAGE OBJECTS
894 /// The admin_setting objects are then grouped into admin_settingpages. The latter
895 /// appear in the Moodle admin tree block. All interaction with admin_settingpage
896 /// objects is handled by the admin/settings.php file.
898 /// ADMIN_EXTERNALPAGE OBJECTS
900 /// There are some settings in Moodle that are too complex to (efficiently) handle
901 /// with admin_settingpages. (Consider, for example, user management and displaying
902 /// lists of users.) In this case, we use the admin_externalpage object. This object
903 /// places a link to an external PHP file in the admin tree block.
905 /// If you're using an admin_externalpage object for some settings, you can take
906 /// advantage of the admin_externalpage_* functions. For example, suppose you wanted
907 /// to add a foo.php file into admin. First off, you add the following line to
908 /// admin/settings/first.php (at the end of the file) or to some other file in
909 /// admin/settings:
911 /// $ADMIN->add('userinterface', new admin_externalpage('foo', get_string('foo'),
912 /// $CFG->wwwdir . '/' . '$CFG->admin . '/foo.php', 'some_role_permission'));
914 /// Next, in foo.php, your file structure would resemble the following:
916 /// require_once('.../config.php');
917 /// require_once($CFG->libdir.'/adminlib.php');
918 /// admin_externalpage_setup('foo');
919 /// // functionality like processing form submissions goes here
920 /// admin_externalpage_print_header();
921 /// // your HTML goes here
922 /// admin_externalpage_print_footer();
924 /// The admin_externalpage_setup() function call ensures the user is logged in,
925 /// and makes sure that they have the proper role permission to access the page.
927 /// The admin_externalpage_print_header() function prints the header (it figures
928 /// out what category and subcategories the page is classified under) and ensures
929 /// that you're using the admin pagelib (which provides the admin tree block and
930 /// the admin bookmarks block).
932 /// The admin_externalpage_print_footer() function properly closes the tables
933 /// opened up by the admin_externalpage_print_header() function and prints the
934 /// standard Moodle footer.
936 /// ADMIN_CATEGORY OBJECTS
938 /// Above and beyond all this, we have admin_category objects. These objects
939 /// appear as folders in the admin tree block. They contain admin_settingpage's,
940 /// admin_externalpage's, and other admin_category's.
942 /// OTHER NOTES
944 /// admin_settingpage's, admin_externalpage's, and admin_category's all inherit
945 /// from part_of_admin_tree (a pseudointerface). This interface insists that
946 /// a class has a check_access method for access permissions, a locate method
947 /// used to find a specific node in the admin tree and find parent path.
949 /// admin_category's inherit from parentable_part_of_admin_tree. This pseudo-
950 /// interface ensures that the class implements a recursive add function which
951 /// accepts a part_of_admin_tree object and searches for the proper place to
952 /// put it. parentable_part_of_admin_tree implies part_of_admin_tree.
954 /// Please note that the $this->name field of any part_of_admin_tree must be
955 /// UNIQUE throughout the ENTIRE admin tree.
957 /// The $this->name field of an admin_setting object (which is *not* part_of_
958 /// admin_tree) must be unique on the respective admin_settingpage where it is
959 /// used.
962 /// CLASS DEFINITIONS /////////////////////////////////////////////////////////
964 /**
965 * Pseudointerface for anything appearing in the admin tree
966 *
967 * The pseudointerface that is implemented by anything that appears in the admin tree
968 * block. It forces inheriting classes to define a method for checking user permissions
969 * and methods for finding something in the admin tree.
970 *
971 * @author Vincenzo K. Marcovecchio
972 * @package admin
973 */
976 /**
977 * Finds a named part_of_admin_tree.
978 *
979 * Used to find a part_of_admin_tree. If a class only inherits part_of_admin_tree
980 * and not parentable_part_of_admin_tree, then this function should only check if
981 * $this->name matches $name. If it does, it should return a reference to $this,
982 * otherwise, it should return a reference to NULL.
983 *
984 * If a class inherits parentable_part_of_admin_tree, this method should be called
985 * recursively on all child objects (assuming, of course, the parent object's name
986 * doesn't match the search criterion).
987 *
988 * @param string $name The internal name of the part_of_admin_tree we're searching for.
989 * @return mixed An object reference or a NULL reference.
990 */
992 trigger_error('Admin class does not implement method <strong>locate()</strong>', E_USER_WARNING);
994 }
996 /**
997 * Removes named part_of_admin_tree.
998 *
999 * @param string $name The internal name of the part_of_admin_tree we want to remove.
1000 * @return bool success.
1001 */
1003 trigger_error('Admin class does not implement method <strong>prune()</strong>', E_USER_WARNING);
1005 }
1007 /**
1008 * Search using query
1009 * @param strin query
1010 * @return mixed array-object structure of found settings and pages
1011 */
1013 trigger_error('Admin class does not implement method <strong>search()</strong>', E_USER_WARNING);
1015 }
1017 /**
1018 * Verifies current user's access to this part_of_admin_tree.
1019 *
1020 * Used to check if the current user has access to this part of the admin tree or
1021 * not. If a class only inherits part_of_admin_tree and not parentable_part_of_admin_tree,
1022 * then this method is usually just a call to has_capability() in the site context.
1023 *
1024 * If a class inherits parentable_part_of_admin_tree, this method should return the
1025 * logical OR of the return of check_access() on all child objects.
1026 *
1027 * @return bool True if the user has access, false if she doesn't.
1028 */
1030 trigger_error('Admin class does not implement method <strong>check_access()</strong>', E_USER_WARNING);
1032 }
1034 /**
1035 * Mostly usefull for removing of some parts of the tree in admin tree block.
1036 *
1037 * @return True is hidden from normal list view
1038 */
1040 trigger_error('Admin class does not implement method <strong>is_hidden()</strong>', E_USER_WARNING);
1042 }
1043 }
1045 /**
1046 * Pseudointerface implemented by any part_of_admin_tree that has children.
1047 *
1048 * The pseudointerface implemented by any part_of_admin_tree that can be a parent
1049 * to other part_of_admin_tree's. (For now, this only includes admin_category.) Apart
1050 * from ensuring part_of_admin_tree compliancy, it also ensures inheriting methods
1051 * include an add method for adding other part_of_admin_tree objects as children.
1052 *
1053 * @author Vincenzo K. Marcovecchio
1054 * @package admin
1055 */
1058 /**
1059 * Adds a part_of_admin_tree object to the admin tree.
1060 *
1061 * Used to add a part_of_admin_tree object to this object or a child of this
1062 * object. $something should only be added if $destinationname matches
1063 * $this->name. If it doesn't, add should be called on child objects that are
1064 * also parentable_part_of_admin_tree's.
1065 *
1066 * @param string $destinationname The internal name of the new parent for $something.
1067 * @param part_of_admin_tree &$something The object to be added.
1068 * @return bool True on success, false on failure.
1069 */
1073 }
1075 }
1077 /**
1078 * The object used to represent folders (a.k.a. categories) in the admin tree block.
1079 *
1080 * Each admin_category object contains a number of part_of_admin_tree objects.
1081 *
1082 * @author Vincenzo K. Marcovecchio
1083 * @package admin
1084 */
1087 /**
1088 * @var mixed An array of part_of_admin_tree objects that are this object's children
1089 */
1092 /**
1093 * @var string An internal name for this category. Must be unique amongst ALL part_of_admin_tree objects
1094 */
1097 /**
1098 * @var string The displayed name for this category. Usually obtained through get_string()
1099 */
1102 /**
1103 * @var bool Should this category be hidden in admin tree block?
1104 */
1107 /**
1108 * paths
1109 */
1113 /**
1114 * Constructor for an empty admin category
1115 *
1116 * @param string $name The internal name for this category. Must be unique amongst ALL part_of_admin_tree objects
1117 * @param string $visiblename The displayed named for this category. Usually obtained through get_string()
1118 * @param bool $hidden hide category in admin tree block
1119 */
1125 }
1127 /**
1128 * Returns a reference to the part_of_admin_tree object with internal name $name.
1129 *
1130 * @param string $name The internal name of the object we want.
1131 * @param bool $findpath initialize path and visiblepath arrays
1132 * @return mixed A reference to the object with internal name $name if found, otherwise a reference to NULL.
1133 */
1139 }
1141 }
1147 }
1148 }
1153 }
1156 }
1158 /**
1159 * Search using query
1160 * @param strin query
1161 * @return mixed array-object structure of found settings and pages
1162 */
1170 }
1172 }
1174 }
1176 /**
1177 * Removes part_of_admin_tree object with internal name $name.
1178 *
1179 * @param string $name The internal name of the object we want to remove.
1180 * @return bool success
1181 */
1186 }
1190 // found it!
1193 }
1196 }
1197 }
1199 }
1201 /**
1202 * Adds a part_of_admin_tree to a child or grandchild (or great-grandchild, and so forth) of this object.
1203 *
1204 * @param string $destinationame The internal name of the immediate parent that we want for $something.
1205 * @param mixed $something A part_of_admin_tree or setting instanceto be added.
1206 * @return bool True if successfully added, false if $something can not be added.
1207 */
1213 }
1219 }
1226 }
1228 }
1230 /**
1231 * Checks if the user has access to anything in this category.
1232 *
1233 * @return bool True if the user has access to atleast one child in this category, false otherwise.
1234 */
1239 }
1240 }
1242 }
1244 /**
1245 * Is this category hidden in admin tree block?
1246 *
1247 * @return bool True if hidden
1248 */
1251 }
1252 }
1255 /**
1256 * list of errors
1257 */
1260 /**
1261 * search query
1262 */
1265 /**
1266 * full tree flag - true means all settings required, false onlypages required
1267 */
1276 }
1277 }
1279 /**
1280 * Links external PHP pages into the admin tree.
1281 *
1282 * See detailed usage example at the top of this document (adminlib.php)
1283 *
1284 * @author Vincenzo K. Marcovecchio
1285 * @package admin
1286 */
1289 /**
1290 * @var string An internal name for this external page. Must be unique amongst ALL part_of_admin_tree objects
1291 */
1294 /**
1295 * @var string The displayed name for this external page. Usually obtained through get_string().
1296 */
1299 /**
1300 * @var string The external URL that we should link to when someone requests this external page.
1301 */
1304 /**
1305 * @var string The role capability/permission a user must have to access this external page.
1306 */
1309 /**
1310 * @var object The context in which capability/permission should be checked, default is site context.
1311 */
1314 /**
1315 * @var bool hidden in admin tree block.
1316 */
1319 /**
1320 * visible path
1321 */
1325 /**
1326 * Constructor for adding an external page into the admin tree.
1327 *
1328 * @param string $name The internal name for this external page. Must be unique amongst ALL part_of_admin_tree objects.
1329 * @param string $visiblename The displayed name for this external page. Usually obtained through get_string().
1330 * @param string $url The external URL that we should link to when someone requests this external page.
1331 * @param mixed $req_capability The role capability/permission a user must have to access this external page. Defaults to 'moodle/site:config'.
1332 * @param boolean $hidden Is this external page hidden in admin tree block? Default false.
1333 * @param context $context The context the page relates to. Not sure what happens
1334 * if you specify something other than system or front page. Defaults to system.
1335 */
1336 function admin_externalpage($name, $visiblename, $url, $req_capability='moodle/site:config', $hidden=false, $context=NULL) {
1344 }
1347 }
1349 /**
1350 * Returns a reference to the part_of_admin_tree object with internal name $name.
1351 *
1352 * @param string $name The internal name of the object we want.
1353 * @return mixed A reference to the object with internal name $name if found, otherwise a reference to NULL.
1354 */
1360 }
1365 }
1366 }
1370 }
1372 /**
1373 * Search using query
1374 * @param strin query
1375 * @return mixed array-object structure of found settings and pages
1376 */
1385 }
1393 }
1394 }
1396 /**
1397 * Determines if the current user has access to this external page based on $this->req_capability.
1398 * @return bool True if user has access, false otherwise.
1399 */
1403 }
1408 }
1409 }
1411 }
1413 /**
1414 * Is this external page hidden in admin tree block?
1415 *
1416 * @return bool True if hidden
1417 */
1420 }
1422 }
1424 /**
1425 * Used to group a number of admin_setting objects into a page and add them to the admin tree.
1426 *
1427 * @author Vincenzo K. Marcovecchio
1428 * @package admin
1429 */
1432 /**
1433 * @var string An internal name for this external page. Must be unique amongst ALL part_of_admin_tree objects
1434 */
1437 /**
1438 * @var string The displayed name for this external page. Usually obtained through get_string().
1439 */
1441 /**
1442 * @var mixed An array of admin_setting objects that are part of this setting page.
1443 */
1446 /**
1447 * @var string The role capability/permission a user must have to access this external page.
1448 */
1451 /**
1452 * @var object The context in which capability/permission should be checked, default is site context.
1453 */
1456 /**
1457 * @var bool hidden in admin tree block.
1458 */
1461 /**
1462 * paths
1463 */
1467 // see admin_externalpage
1468 function admin_settingpage($name, $visiblename, $req_capability='moodle/site:config', $hidden=false, $context=NULL) {
1476 }
1479 }
1481 // see admin_category
1487 }
1492 }
1493 }
1501 }
1502 }
1509 }
1518 }
1526 }
1527 }
1531 }
1533 /**
1534 * not the same as add for admin_category. adds an admin_setting to this admin_settingpage. settings appear (on the settingpage) in the order in which they're added
1535 * n.b. each admin_setting in an admin_settingpage must have a unique internal name
1536 * @param object $setting is the admin_setting object you want to add
1537 * @return true if successful, false if not
1538 */
1543 }
1547 }
1549 // see admin_externalpage
1553 }
1558 }
1559 }
1561 }
1563 /**
1564 * outputs this page as html in a table (suitable for inclusion in an admin pagetype)
1565 * returns a string of the html
1566 */
1578 }
1579 }
1581 }
1584 }
1586 /**
1587 * Is this settigns page hidden in admin tree block?
1588 *
1589 * @return bool True if hidden
1590 */
1593 }
1595 }
1598 /**
1599 * Admin settings class. Only exists on setting pages.
1600 * Read & write happens at this level; no authentication.
1601 */
1611 /**
1612 * Constructor
1613 * @param $name string unique ascii name
1614 * @param $visiblename string localised name
1615 * @param strin $description localised long description
1616 * @param mixed $defaultsetting string or array depending on implementation
1617 */
1623 }
1625 /**
1626 * Set up $this->name and possibly $this->plugin based on whether $name looks
1627 * like 'settingname' or 'plugin/settingname'. Also, do some sanity checking
1628 * on the names, that is, output a developer debug warning if the name
1629 * contains anything other than [a-zA-Z0-9_]+.
1630 *
1631 * @param string $name the setting name passed in to the constructor.
1632 */
1637 }
1641 }
1648 }
1649 }
1650 }
1654 }
1658 }
1669 }
1680 }
1681 }
1682 }
1691 }
1692 }
1694 /**
1695 * Returns current value of this setting
1696 * @return mixed array or string depending on instance, NULL means not set yet
1697 */
1699 // has to be overridden
1701 }
1703 /**
1704 * Returns default setting if exists
1705 * @return mixed array or string depending on instance; NULL means no default, user must supply
1706 */
1709 }
1711 /**
1712 * Store new setting
1713 * @param mixed string or array, must not be NULL
1714 * @return '' if ok, string error message otherwise
1715 */
1717 // should be overridden
1719 }
1721 /**
1722 * Return part of form with setting
1723 * @param mixed data array or string depending on setting
1724 * @return string
1725 */
1727 // should be overridden
1729 }
1731 /**
1732 * function called if setting updated - cleanup, cache reset, etc.
1733 */
1736 }
1738 /**
1739 * Is setting related to query text - used when searching
1740 * @param string $query
1741 * @return bool
1742 */
1746 }
1750 }
1753 }
1759 }
1760 }
1761 }
1767 }
1768 }
1769 }
1771 }
1772 }
1774 /**
1775 * No setting - just heading and text.
1776 */
1778 /**
1779 * not a setting, just text
1780 * @param string $name of setting
1781 * @param string $heading heading
1782 * @param string $information text in box
1783 */
1786 }
1790 }
1794 }
1797 // do not write any setting
1799 }
1804 $return .= print_heading('<a name="'.$this->name.'">'.highlightfast($query, $this->visiblename).'</a>', '', 3, 'main', true);
1805 }
1807 $return .= print_box(highlight($query, $this->description), 'generalbox formsettingheading', '', true);
1808 }
1810 }
1811 }
1813 /**
1814 * The most flexibly setting, user is typing text
1815 */
1821 /**
1822 * config text contructor
1823 * @param string $name of setting
1824 * @param string $visiblename localised
1825 * @param string $description long localised info
1826 * @param string $defaultsetting
1827 * @param mixed $paramtype int means PARAM_XXX type, string is a allowed format in regex
1828 * @param int $size default field size
1829 */
1830 function admin_setting_configtext($name, $visiblename, $description, $defaultsetting, $paramtype=PARAM_RAW, $size=null) {
1836 }
1838 }
1842 }
1846 // do not complain if '' used instead of 0
1848 }
1849 // $data is a string
1853 }
1855 }
1857 /**
1858 * Validate data before storage
1859 * @param string data
1860 * @return mixed true if ok string if error found
1861 */
1868 }
1879 }
1880 }
1881 }
1887 '<div class="form-text defaultsnext"><input type="text" size="'.$this->size.'" id="'.$this->get_id().'" name="'.$this->get_full_name().'" value="'.s($data).'" /></div>',
1889 }
1890 }
1892 /**
1893 * General text area without html editor.
1894 */
1899 function admin_setting_configtextarea($name, $visiblename, $description, $defaultsetting, $paramtype=PARAM_RAW, $cols='60', $rows='8') {
1902 parent::admin_setting_configtext($name, $visiblename, $description, $defaultsetting, $paramtype);
1903 }
1911 }
1914 '<div class="form-textarea" ><textarea rows="'.$this->rows.'" cols="'.$this->cols.'" id="'.$this->get_id().'" name="'.$this->get_full_name().'">'.s($data).'</textarea></div>',
1916 }
1917 }
1919 /**
1920 * General text area with html editor.
1921 */
1924 function admin_setting_confightmltextarea($name, $visiblename, $description, $defaultsetting, $paramtype=PARAM_RAW) {
1925 parent::admin_setting_configtext($name, $visiblename, $description, $defaultsetting, $paramtype);
1926 }
1932 $return = '<div class="form-htmlarea">'.print_textarea($CFG->adminusehtmleditor, 15, 60, 0, 0, $this->get_full_name(), $data, 0, true).'</div>';
1934 return format_admin_setting($this, $this->visiblename, $return, $this->description, false, '', NULL, $query);
1935 }
1936 }
1938 /**
1939 * Password field, allows unmasking of password
1940 */
1942 /**
1943 * Constructor
1944 * @param string $name of setting
1945 * @param string $visiblename localised
1946 * @param string $description long localised info
1947 * @param string $defaultsetting default password
1948 */
1949 function admin_setting_configpasswordunmask($name, $visiblename, $description, $defaultsetting) {
1950 parent::admin_setting_configtext($name, $visiblename, $description, $defaultsetting, PARAM_RAW, 30);
1951 }
1957 //<![CDATA[
1958 document.write(\'<span class="unmask"><input id="'.$id.'unmask" value="1" type="checkbox" onclick="unmaskPassword(\\\''.$id.'\\\')"/><label for="'.$id.'unmask">'.addslashes_js($unmask).'<\/label><\/span>\');
1960 //]]>
1963 '<div class="form-password"><input type="password" size="'.$this->size.'" id="'.$this->get_id().'" name="'.$this->get_full_name().'" value="'.s($data).'" />'.$unmaskjs.'</div>',
1965 }
1966 }
1968 /**
1969 * Path to directory
1970 */
1972 /**
1973 * Constructor
1974 * @param string $name of setting
1975 * @param string $visiblename localised
1976 * @param string $description long localised info
1977 * @param string $defaultdirectory default directory location
1978 */
1980 parent::admin_setting_configtext($name, $visiblename, $description, $defaultdirectory, PARAM_RAW, 50);
1981 }
1991 }
1994 }
1997 '<div class="form-file defaultsnext"><input type="text" size="'.$this->size.'" id="'.$this->get_id().'" name="'.$this->get_full_name().'" value="'.s($data).'" />'.$executable.'</div>',
1999 }
2000 }
2002 /**
2003 * Path to executable file
2004 */
2015 }
2018 }
2021 '<div class="form-file defaultsnext"><input type="text" size="'.$this->size.'" id="'.$this->get_id().'" name="'.$this->get_full_name().'" value="'.s($data).'" />'.$executable.'</div>',
2023 }
2024 }
2026 /**
2027 * Path to directory
2028 */
2038 }
2041 }
2044 '<div class="form-file defaultsnext"><input type="text" size="'.$this->size.'" id="'.$this->get_id().'" name="'.$this->get_full_name().'" value="'.s($data).'" />'.$executable.'</div>',
2046 }
2047 }
2049 /**
2050 * Checkbox
2051 */
2056 /**
2057 * Constructor
2058 * @param string $name of setting
2059 * @param string $visiblename localised
2060 * @param string $description long localised info
2061 * @param string $defaultsetting
2062 * @param string $yes value used when checked
2063 * @param string $no value used when not checked
2064 */
2065 function admin_setting_configcheckbox($name, $visiblename, $description, $defaultsetting, $yes='1', $no='0') {
2069 }
2073 }
2080 }
2082 }
2092 }
2095 }
2101 }
2104 '<div class="form-checkbox defaultsnext" ><input type="hidden" name="'.$this->get_full_name().'" value="'.s($this->no).'" /> '
2105 .'<input type="checkbox" id="'.$this->get_id().'" name="'.$this->get_full_name().'" value="'.s($this->yes).'" '.$checked.' /></div>',
2107 }
2108 }
2110 /**
2111 * Multiple checkboxes, each represents different value, stored in csv format
2112 */
2116 /**
2117 * Constructor
2118 * @param string $name of setting
2119 * @param string $visiblename localised
2120 * @param string $description long localised info
2121 * @param array $defaultsetting array of selected
2122 * @param array $choices array of $value=>$label for each checkbox
2123 */
2124 function admin_setting_configmulticheckbox($name, $visiblename, $description, $defaultsetting, $choices) {
2127 }
2129 /**
2130 * This function may be used in ancestors for lazy loading of choices
2131 * @return true if loaded, false if error
2132 */
2134 /*
2135 if (is_array($this->choices)) {
2136 return true;
2137 }
2138 .... load choices here
2139 */
2141 }
2143 /**
2144 * Is setting related to query text - used when searching
2145 * @param string $query
2146 * @return bool
2147 */
2151 }
2154 }
2160 }
2161 }
2163 }
2169 }
2172 }
2174 }
2179 }
2182 }
2188 }
2189 }
2190 return $this->config_write($this->name, implode(',', $result)) ? '' : get_string('errorsetting', 'admin');
2191 }
2196 }
2200 }
2205 }
2206 }
2207 }
2216 }
2219 }
2221 $options[] = '<input type="checkbox" id="'.$this->get_id().'_'.$key.'" name="'.$this->get_full_name().'['.$key.']" value="1" '.$checked.' />'
2223 }
2231 }
2234 $return .= '<input type="hidden" name="'.$this->get_full_name().'[xxxxx]" value="1" />'; // something must be submitted even if nothing selected
2239 }
2241 }
2244 return format_admin_setting($this, $this->visiblename, $return, $this->description, false, '', $defaultinfo, $query);
2246 }
2247 }
2249 /**
2250 * Multiple checkboxes 2, value stored as string 00101011
2251 */
2257 }
2260 }
2268 }
2269 }
2271 }
2276 }
2279 }
2286 }
2287 }
2289 }
2290 }
2292 /**
2293 * Select one value from list
2294 */
2298 /**
2299 * Constructor
2300 * @param string $name of setting
2301 * @param string $visiblename localised
2302 * @param string $description long localised info
2303 * @param string $defaultsetting
2304 * @param array $choices array of $value=>$label for each selection
2305 */
2306 function admin_setting_configselect($name, $visiblename, $description, $defaultsetting, $choices) {
2309 }
2311 /**
2312 * This function may be used in ancestors for lazy loading of choices
2313 * @return true if loaded, false if error
2314 */
2316 /*
2317 if (is_array($this->choices)) {
2318 return true;
2319 }
2320 .... load choices here
2321 */
2323 }
2328 }
2331 }
2336 }
2339 }
2340 }
2342 }
2346 }
2351 }
2354 }
2357 }
2362 }
2369 }
2374 //first run
2375 } else if (empty($current) and (array_key_exists('', $this->choices) or array_key_exists(0, $this->choices))) {
2376 // no warning
2381 }
2382 }
2384 $return = '<div class="form-select defaultsnext"><select id="'.$this->get_id().'" name="'.$this->get_full_name().'">';
2386 // the string cast is needed because key may be integer - 0 is equal to most strings!
2387 $return .= '<option value="'.$key.'"'.((string)$key==$data ? ' selected="selected"' : '').'>'.$value.'</option>';
2388 }
2391 return format_admin_setting($this, $this->visiblename, $return, $this->description, true, $warning, $defaultinfo, $query);
2392 }
2394 }
2396 /**
2397 * Select multiple items from list
2398 */
2400 /**
2401 * Constructor
2402 * @param string $name of setting
2403 * @param string $visiblename localised
2404 * @param string $description long localised info
2405 * @param array $defaultsetting array of selected items
2406 * @param array $choices array of $value=>$label for each list item
2407 */
2408 function admin_setting_configmultiselect($name, $visiblename, $description, $defaultsetting, $choices) {
2409 parent::admin_setting_configselect($name, $visiblename, $description, $defaultsetting, $choices);
2410 }
2416 }
2419 }
2421 }
2426 }
2429 }
2437 }
2439 }
2441 return ($this->config_write($this->name, implode(',', $save)) ? '' : get_string('errorsetting', 'admin'));
2442 }
2444 /**
2445 * Is setting related to query text - used when searching
2446 * @param string $query
2447 * @return bool
2448 */
2452 }
2455 }
2461 }
2462 }
2464 }
2469 }
2474 }
2477 }
2481 $return = '<div class="form-select"><input type="hidden" name="'.$this->get_full_name().'[xxxxx]" value="1" />'; // something must be submitted even if nothing selected
2482 $return .= '<select id="'.$this->get_id().'" name="'.$this->get_full_name().'[]" size="'.$size.'" multiple="multiple">';
2488 }
2491 }
2494 }
2502 }
2505 return format_admin_setting($this, $this->visiblename, $return, $this->description, true, '', $defaultinfo, $query);
2506 }
2507 }
2509 /**
2510 * Time selector
2511 * this is a liiitle bit messy. we're using two selects, but we're returning
2512 * them as an array named after $name (so we only use $name2 internally for the setting)
2513 */
2517 /**
2518 * Constructor
2519 * @param string $hoursname setting for hours
2520 * @param string $minutesname setting for hours
2521 * @param string $visiblename localised
2522 * @param string $description long localised info
2523 * @param array $defaultsetting array representing default time 'h'=>hours, 'm'=>minutes
2524 */
2525 function admin_setting_configtime($hoursname, $minutesname, $visiblename, $description, $defaultsetting) {
2528 }
2535 }
2538 }
2543 }
2545 $result = $this->config_write($this->name, (int)$data['h']) && $this->config_write($this->name2, (int)$data['m']);
2547 }
2556 }
2561 $return .= '<option value="'.$i.'"'.($i == $data['h'] ? ' selected="selected"' : '').'>'.$i.'</option>';
2562 }
2563 $return .= '</select>:<select id="'.$this->get_id().'m" name="'.$this->get_full_name().'[m]">';
2565 $return .= '<option value="'.$i.'"'.($i == $data['m'] ? ' selected="selected"' : '').'>'.$i.'</option>';
2566 }
2568 return format_admin_setting($this, $this->visiblename, $return, $this->description, false, '', $defaultinfo, $query);
2569 }
2571 }
2573 /**
2574 * An admin setting for selecting one or more users, who have a particular capability
2575 * in the system context. Warning, make sure the list will never be too long. There is
2576 * no paging or searching of this list.
2577 *
2578 * To correctly get a list of users from this config setting, you need to call the
2579 * get_users_from_config($CFG->mysetting, $capability); function in moodlelib.php.
2580 */
2584 /**
2585 * Constructor.
2586 *
2587 * @param string $name unique ascii name, either 'mysetting' for settings that in config, or 'myplugin/mysetting' for ones in config_plugins.
2588 * @param string $visiblename localised name
2589 * @param string $description localised long description
2590 * @param array $defaultsetting array of usernames
2591 * @param string $capability string capability name.
2592 */
2593 function admin_setting_users_with_capability($name, $visiblename, $description, $defaultsetting, $capability) {
2595 parent::admin_setting_configmultiselect($name, $visiblename, $description, $defaultsetting, NULL);
2596 }
2601 }
2607 );
2610 }
2612 }
2622 }
2623 }
2629 }
2631 }
2634 // If all is selected, remove any explicit options.
2637 }
2638 // None never needs to be writted to the DB.
2641 }
2643 }
2644 }
2646 /**
2647 * Special checkbox for calendar - resets SESSION vars.
2648 */
2651 parent::admin_setting_configcheckbox('calendar_adminseesall', get_string('adminseesall', 'admin'),
2653 }
2659 }
2660 }
2662 /**
2663 * Special select for settings that are altered in setup.php and can not be altered on the fly
2664 */
2667 // read directly from db!
2669 }
2673 // do not change active CFG setting!
2678 }
2679 }
2681 /**
2682 * Special select for frontpage - stores data in course table
2683 */
2688 }
2694 }
2700 // update $SITE
2703 }
2704 }
2706 /**
2707 * Special select - lists on the frontpage - hacky
2708 */
2720 }
2725 }
2733 }
2735 }
2740 }
2743 }
2745 }
2750 }
2756 }
2758 }
2759 return ($this->config_write($this->name, implode(',', $save)) ? '' : get_string('errorsetting', 'admin'));
2760 }
2768 }
2769 }
2775 }
2776 $return .='<select class="form-select" id="'.$this->get_id().$i.'" name="'.$this->get_full_name().'[]">';
2778 $return .= '<option value="'.$key.'"'.("$key" == $currentsetting[$i] ? ' selected="selected"' : '').'>'.$value.'</option>';
2779 }
2783 }
2784 }
2787 return format_admin_setting($this, $this->visiblename, $return, $this->description, false, '', NULL, $query);
2788 }
2789 }
2791 /**
2792 * Special checkbox for frontpage - stores data in course table
2793 */
2798 }
2806 // update $SITE
2809 }
2810 }
2812 /**
2813 * Special text for frontpage - stores data in course table.
2814 * Empty string means not set here. Manual setting is required.
2815 */
2820 }
2826 }
2831 }
2832 }
2840 }
2846 // update $SITE
2849 }
2850 }
2852 /**
2853 * Special text editor for site description.
2854 */
2857 parent::admin_setting('summary', get_string('frontpagedescription'), get_string('frontpagedescriptionhelp'), NULL);
2858 }
2863 }
2873 }
2879 $return = '<div class="form-htmlarea">'.print_textarea($CFG->adminusehtmleditor, 15, 60, 0, 0, $this->get_full_name(), $data, 0, true).'</div>';
2881 return format_admin_setting($this, $this->visiblename, $return, $this->description, false, '', NULL, $query);
2882 }
2883 }
2913 }
2920 }
2929 }
2931 }
2935 // there miiight be an easier way to do this :)
2936 // if this is changed, make sure the $defaults array above is modified so that this
2937 // function processes it correctly
2947 }
2948 }
2954 }
2955 }
2957 return ($this->config_write($this->name, implode(';', $result)) ? '' : get_string('errorsetting', 'admin'));
2958 }
2964 $return .= '<input type="text" class="form-text" name="'.$fullname.'[k'.$i.']" value="'.$data['k'.$i].'" />';
2966 $return .= '<input type="text" class="form-text" name="'.$fullname.'[v'.$i.']" value="'.$data['v'.$i].'" /><br />';
2967 }
2970 $return .= '<input type="text" class="form-text" name="'.$fullname.'[v'.$i.']" value="" /><br />';
2971 $return .= '<input type="text" class="form-text" name="'.$fullname.'[k'.($i + 1).']" value="" />';
2973 $return .= '<input type="text" class="form-text" name="'.$fullname.'[v'.($i + 1).']" value="" />';
2976 return format_admin_setting($this, $this->visiblename, $return, $this->description, false, '', NULL, $query);
2977 }
2979 }
3047 }
3054 }
3063 }
3065 }
3069 // there miiight be an easier way to do this :)
3070 // if this is changed, make sure the $defaults array above is modified so that this
3071 // function processes it correctly
3081 }
3082 }
3088 }
3089 }
3091 return ($this->config_write($this->name, implode('{;}', $result)) ? '' : get_string('errorsetting', 'admin').$this->visiblename.'<br />');
3092 }
3098 $return .= '<input type="text" class="form-text" name="'.$fullname.'[k'.$i.']" value="'.$data['k'.$i].'" />';
3100 $return .= '<input type="text" class="form-text" name="'.$fullname.'[v'.$i.']" value="'.$data['v'.$i].'" /><br />';
3101 }
3104 $return .= '<input type="text" class="form-text" name="'.$fullname.'[v'.$i.']" value="" /><br />';
3105 $return .= '<input type="text" class="form-text" name="'.$fullname.'[k'.($i + 1).']" value="" />';
3107 $return .= '<input type="text" class="form-text" name="'.$fullname.'[v'.($i + 1).']" value="" />';
3110 return format_admin_setting($this, $this->visiblename, $return, $this->description, false, '', NULL, $query);
3111 }
3113 }
3115 /**
3116 * Setting for spellchecker language selection.
3117 */
3125 }
3128 // function borrowed from the old moodle/admin/editor.php, slightly modified
3129 // Get all installed dictionaries in the system
3132 }
3140 // If aspellpath isn't set don't even bother ;-)
3144 }
3146 // Do we have access to popen function?
3150 }
3158 }
3162 }
3169 }
3171 }
3175 }
3177 }
3178 }
3187 // weird array... buttonname => buttonimage (assume proper path appended). if you leave buttomimage blank, text will be printed instead
3227 }
3233 }
3236 }
3238 }
3243 }
3250 }
3253 }
3254 }
3255 return ($this->config_write($this->name, implode(' ', $result)) ? '' : get_string('errorsetting', 'admin'));
3256 }
3262 // checkboxes with input name="$this->name[$key]" value="1"
3263 // we do 15 fields per column
3267 $return .= '<input type="hidden" name="'.$this->get_full_name().'[xxxxx]" value="1" />'; // something must be submitted even if nothing selected
3274 }
3277 $return .= ($value == '' ? get_string($key,'editor') : '<img width="18" height="18" src="'.$CFG->wwwroot.'/lib/editor/htmlarea/images/'.$value.'" alt="'.get_string($key,'editor').'" title="'.get_string($key,'editor').'" />').' ';
3278 $return .= '<input type="checkbox" class="form-checkbox" value="1" id="'.$this->get_id().$key.'" name="'.$this->get_full_name().'['.$key.']"'.(in_array($key,$data) ? ' checked="checked"' : '').' /> ';
3283 }
3284 }
3290 return format_admin_setting($this, $this->visiblename, $return, $this->description, false, '', NULL, $query);
3291 }
3292 }
3294 /**
3295 * Special setting for limiting of the list of available languages.
3296 */
3299 parent::admin_setting_configtext('langlist', get_string('langlist', 'admin'), get_string('configlanglist', 'admin'), '', PARAM_NOTAGS);
3300 }
3306 }
3307 }
3309 /**
3310 * Course category selection
3311 */
3315 }
3322 }
3325 }
3326 }
3330 parent::admin_setting_configmulticheckbox2('backup_sche_weekdays', get_string('schedule'), get_string('backupschedulehelp'), array(), NULL);
3332 }
3337 }
3342 }
3344 }
3345 }
3347 /**
3348 * Special debug setting
3349 */
3352 parent::admin_setting_configselect('debug', get_string('debug', 'admin'), get_string('configdebug', 'admin'), DEBUG_NONE, NULL);
3353 }
3358 }
3365 }
3366 }
3376 }
3382 }
3385 }
3390 }
3391 }
3393 }
3398 }
3403 }
3405 }
3408 // The order matters very much because of the implied numeric keys
3411 $return .= '<input type="hidden" name="'.$this->get_full_name().'[xxxxx]" value="1" />'; // something must be submitted even if nothing selected
3413 $return .= '<td><label for="'.$this->get_id().$index.'">'.get_string($day, 'calendar').'</label></td>';
3414 }
3417 $return .= '<td><input type="checkbox" class="form-checkbox" id="'.$this->get_id().$index.'" name="'.$this->get_full_name().'[]" value="'.$index.'" '.(in_array("$index", $data) ? 'checked="checked"' : '').' /></td>';
3418 }
3421 return format_admin_setting($this, $this->visiblename, $return, $this->description, false, '', NULL, $query);
3423 }
3424 }
3427 /**
3428 * Graded roles in gradebook
3429 */
3432 parent::admin_setting_configmulticheckbox('gradebookroles', get_string('gradebookroles', 'admin'),
3434 }
3440 }
3443 }
3448 }
3452 }
3453 }
3459 }
3464 }
3465 }
3467 }
3468 }
3479 // force full regrading
3481 }
3484 }
3485 }
3487 /**
3488 * Which roles to show on course decription page
3489 */
3492 parent::admin_setting_configmulticheckbox('coursemanager', get_string('coursemanager', 'admin'),
3494 }
3499 }
3504 }
3506 }
3508 }
3514 }
3519 }
3520 }
3522 }
3523 }
3527 parent::admin_setting_configcheckbox('unlimitedgrades', get_string('unlimitedgrades', 'grades'),
3529 }
3535 }
3543 }
3547 }
3548 }
3550 }
3552 }
3554 /**
3555 * Primary grade export plugin - has state tracking.
3556 */
3561 }
3566 }
3572 }
3573 }
3575 }
3576 }
3578 /**
3579 * Grade category settings
3580 */
3585 function admin_setting_gradecat_combo($name, $visiblename, $description, $defaultsetting, $choices) {
3588 }
3598 }
3605 }
3617 }
3626 // force regrade if needed
3630 }
3636 }
3637 }
3649 }
3652 }
3655 }
3660 }
3664 $return .= '<select class="form-select" id="'.$this->get_id().'" name="'.$this->get_full_name().'[value]">';
3666 // the string cast is needed because key may be integer - 0 is equal to most strings!
3667 $return .= '<option value="'.$key.'"'.((string)$key==$value ? ' selected="selected"' : '').'>'.$val.'</option>';
3668 }
3670 $return .= '<input type="checkbox" class="form-checkbox" id="'.$this->get_id().'force" name="'.$this->get_full_name().'[forced]" value="1" '.($forced ? 'checked="checked"' : '').' />'
3672 $return .= '<input type="checkbox" class="form-checkbox" id="'.$this->get_id().'adv" name="'.$this->get_full_name().'[adv]" value="1" '.($adv ? 'checked="checked"' : '').' />'
3676 return format_admin_setting($this, $this->visiblename, $return, $this->description, true, '', $defaultinfo, $query);
3677 }
3678 }
3681 /**
3682 * Selection of grade report in user profiles
3683 */
3686 parent::admin_setting_configselect('grade_profilereport', get_string('profilereport', 'grades'), get_string('configprofilereport', 'grades'), 'user', null);
3687 }
3692 }
3703 $this->choices[$plugin] = get_string('modulename', 'gradereport_'.$plugin, NULL, $CFG->dirroot.'/grade/report/'.$plugin.'/lang/');
3704 }
3705 }
3706 }
3708 }
3709 }
3711 /**
3712 * Special class for register auth selection
3713 */
3716 parent::admin_setting_configselect('registerauth', get_string('selfregistration', 'auth'), get_string('selfregistration_help', 'auth'), '', null);
3717 }
3725 }
3726 }
3733 }
3743 }
3744 // Get the auth title (from core or own auth lang files)
3747 }
3749 }
3750 }
3752 /**
3753 * Module manage page
3754 */
3758 parent::admin_externalpage('managemodules', get_string('modsettings', 'admin'), "$CFG->wwwroot/$CFG->admin/modules.php");
3759 }
3764 }
3773 }
3778 }
3779 }
3780 }
3788 }
3789 }
3790 }
3792 /**
3793 * Enrolment manage page
3794 */
3798 parent::admin_externalpage('enrolment', get_string('enrolments'), $CFG->wwwroot . '/'.$CFG->admin.'/enrol.php');
3799 }
3804 }
3814 }
3819 }
3820 }
3821 }
3822 //ugly harcoded hacks
3825 } else if (strpos($textlib->strtolower(get_string('sendcoursewelcomemessage', 'admin')), $query) !== false) {
3827 } else if (strpos($textlib->strtolower(get_string('configsendcoursewelcomemessage', 'admin')), $query) !== false) {
3829 } else if (strpos($textlib->strtolower(get_string('configenrolmentplugins', 'admin')), $query) !== false) {
3831 }
3839 }
3840 }
3841 }
3843 /**
3844 * Blocks manage page
3845 */
3849 parent::admin_externalpage('manageblocks', get_string('blocksettings', 'admin'), "$CFG->wwwroot/$CFG->admin/blocks.php");
3850 }
3856 }
3865 }
3870 }
3871 }
3872 }
3880 }
3881 }
3882 }
3884 /**
3885 * Special class for authentication administration.
3886 */
3890 }
3894 }
3898 }
3901 // do not write any setting
3903 }
3908 }
3915 }
3920 }
3921 }
3923 }
3929 // display strings
3941 }
3943 // construct the display array, with enabled auth plugins at the top, in order
3949 /// Get the auth title (from core or own auth lang files)
3951 /// Apply titles
3955 }
3956 }
3961 }
3963 /// Get the auth title (from core or own auth lang files)
3965 /// Apply titles
3969 }
3970 }
3981 //add always enabled plugins first
3984 //$settings = "<a href=\"settings.php?section=authsettingmanual\">{$txt->settings}</a>";
3991 // iterate through auth plugins and add to the display table
3998 }
3999 // hide/show link
4003 // $hideshow = "<a href=\"$url&action=disable&auth=$auth\"><input type=\"checkbox\" checked /></a>";
4006 }
4010 // $hideshow = "<a href=\"$url&action=enable&auth=$auth\"><input type=\"checkbox\" /></a>";
4013 }
4015 // up/down link (only if auth is enabled)
4021 }
4024 }
4028 }
4031 }
4033 }
4035 // settings link
4040 }
4042 // add a row to the table
4044 }
4046 $return .= get_string('configauthenticationplugins', 'admin').'<br />'.get_string('tablenosave', 'filters');
4049 }
4050 }
4051 /**
4052 * Special class for filter administration.
4053 */
4057 }
4061 }
4065 }
4068 // do not write any setting
4070 }
4075 }
4084 }
4088 }
4089 }
4090 }
4092 }
4106 // get a list of possible filters (and translate name if possible)
4107 // note filters can be in the dedicated filters area OR in their
4108 // associated modules
4124 }
4130 }
4131 }
4132 }
4133 }
4135 // get all the currently selected filters
4141 }
4143 // take this opportunity to clean up filters
4148 }
4149 }
4151 // construct the display array with installed filters
4152 // at the top in the right order
4157 }
4161 }
4162 }
4176 // iterate through filters adding to display table
4181 // get hide/show link
4187 }
4193 }
4195 // get up/down link (only if not hidden)
4201 }
4204 }
4208 }
4211 }
4213 }
4215 // settings link (if defined)
4218 $settings = "<a href=\"settings.php?section=filtersetting".str_replace('/', '',$path)."\">$strsettings</a>";
4221 }
4223 // write data into the table object
4225 }
4230 }
4231 }
4233 /**
4234 * Initialise admin page - this function does require login and permission
4235 * checks specified in page definition.
4236 * This function must be called on each admin page before other code.
4237 * @param string $section name of page
4238 * @param string $extrabutton extra HTML that is added after the blocks editing on/off button.
4239 * @param string $extraurlparams an array paramname => paramvalue, or parameters that need to be
4240 * added to the turn blocks editing on/off form, so this page reloads correctly.
4241 * @param string $actualurl if the actual page being viewed is not the normal one for this
4242 * page (e.g. admin/roles/allowassin.php, instead of admin/roles/manage.php, you can pass the alternate URL here.
4243 */
4244 function admin_externalpage_setup($section, $extrabutton='', $extraurlparams=array(), $actualurl='') {
4255 }
4263 }
4265 // this eliminates our need to authenticate on the actual pages
4269 }
4281 }
4288 }
4289 }
4290 }
4292 /**
4293 * Print header for admin page
4294 * @param string $focus focus element
4295 */
4300 }
4311 BLOCK_L_MAX_WIDTH);
4314 BLOCK_R_MAX_WIDTH);
4323 }
4337 $THEME->open_header_containers++; // this is hacky workaround for the error()/notice() autoclosing problems on admin pages
4347 }
4349 }
4350 }
4353 }
4354 }
4356 /**
4357 * Print footer on admin page - please use normal print_footer() instead
4358 */
4369 BLOCK_L_MAX_WIDTH);
4372 BLOCK_R_MAX_WIDTH);
4380 }
4381 }
4394 $THEME->open_header_containers--; // this is hacky workaround for the error()/notice() autoclosing problems on admin pages
4405 }
4407 }
4408 }
4410 }
4412 }
4414 /**
4415 * Returns the reference to admin tree root
4416 * @return reference
4417 */
4431 }
4435 }
4438 // start the admin tree!
4440 // array of error messages and search query
4447 }
4449 // we process this file first to create categories first and in correct order
4452 // now we process all other files in admin/settings to build the admin tree
4456 }
4458 // plugins are loaded last - they may insert pages anywhere
4460 }
4462 }
4467 }
4468 }
4471 }
4473 /// settings utility functions
4475 /**
4476 * This function applies default settings.
4477 * @param object $node, NULL means complete tree
4478 * @param bool $uncoditional if true overrides all values with defaults
4479 * @return void
4480 */
4486 }
4492 }
4497 //do not override existing defaults
4499 }
4502 // no value yet - default maybe applied after admin user creation or in upgradesettings
4504 }
4506 }
4507 }
4508 }
4510 /**
4511 * Store changed settings, this function updates the errors variable in $ADMIN
4512 * @param object $formdata from form (without magic quotes)
4513 * @return int number of changed settings
4514 */
4525 }
4527 }
4541 }
4547 }
4548 }
4549 }
4553 }
4555 // now update $SITE - it might have been changed
4559 // now reload all settings - some of them might depend on the changed
4562 }
4564 /**
4565 * Internal recursive function - finds all settings from submitted form
4566 */
4572 }
4578 }
4585 }
4586 }
4588 }
4591 }
4593 /**
4594 * Internal function - prints the search results
4595 */
4602 }
4614 // hidden pages are not displayed in search results
4616 }
4618 $return .= print_heading(get_string('searchresults','admin').' - <a href="'.$page->url.'">'.highlight($query, $page->visiblename).'</a>', '', 2, 'main', true);
4620 $return .= print_heading(get_string('searchresults','admin').' - <a href="'.$CFG->wwwroot.'/'.$CFG->admin.'/settings.php?section='.$page->name.'">'.highlight($query, $page->visiblename).'</a>', '', 2, 'main', true);
4623 }
4636 }
4637 }
4639 }
4641 }
4642 }
4645 $return .= '<div class="form-buttons"><input class="form-submit" type="submit" value="'.get_string('savechanges','admin').'" /></div>';
4646 }
4649 }
4651 /**
4652 * Internal function - returns arrays of html pages with uninitialised settings
4653 */
4661 }
4668 }
4669 }
4672 $page = print_heading(get_string('upgradesettings','admin').' - '.$node->visiblename, '', 2, 'main', true);
4682 }
4683 }
4686 }
4689 }
4690 }
4693 }
4695 /**
4696 * Unconditionally applies default admin settings in main config table
4697 * @param array $defaults array of string values
4698 */
4702 }
4703 }
4705 /**
4706 * Format admin settings
4707 * @param string $object setting
4708 * @param string $title label element
4709 * @param string $form form fragment, html code - not highlighed automaticaly
4710 * @param string $description
4711 * @param bool $label link label to id
4712 * @param string $warning warning text
4713 * @param sting $defaultinfo defaults info, null means nothing, '' is converted to "Empty" string
4714 * @param string $query search query to be highlighted
4715 */
4716 function format_admin_setting($setting, $title='', $form='', $description='', $label=true, $warning='', $defaultinfo=NULL, $query='') {
4722 // sometimes the id is not id_s_name, but id_s_name_m or something, and this does not validate
4727 }
4733 }
4737 }
4744 }
4746 $defaultinfo = '<div class="form-defaultinfo">'.get_string('defaultsettinginfo', 'admin', $defaultinfo).'</div>';
4747 }
4752 <div class="form-label">
4753 <label '.$labelfor.'>'.highlightfast($query, $title).'<span class="form-shortname">'.highlightfast($query, $name).'</span>
4755 </label>
4756 </div>
4763 $str = '<fieldset class="error"><legend>'.$adminroot->errors[$fullname]->error.'</legend>'.$str.'</fieldset>';
4764 }
4767 }
4769 /**
4770 * Try to upgrade the given language pack (or current language)
4771 * If it doesn't work, fail silently and return false
4772 */
4778 }
4782 }
4786 @mkdir ($CFG->dataroot.'/temp/'); //make it in case it's a fresh install, it might not be there
4791 if ($cd = new component_installer('http://download.moodle.org', 'lang16', $lang.'.zip', 'languages.md5', 'lang')) {
4798 }
4799 }
4802 }
4804 /**
4805 * Based on find_new_settings{@link ()} in upgradesettings.php
4806 * Looks to find any admin settings that have not been initialized. Returns 1 if it finds any.
4807 *
4808 * @param string $node The node at which to start searching.
4809 * @return boolen true if any settings haven't been initialised, false if they all have
4810 */
4818 }
4819 }
4825 }
4826 }
4827 }
4830 }
4833 /**
4834 * Moved from admin/replace.php so that we can use this in cron
4835 * @param string $search - string to look for (with magic quotes)
4836 * @param string $replace - string to replace (with magic quotes)
4837 * @return bool - success or fail
4838 */
4843 /// Turn off time limits, sometimes upgrades can be slow.
4850 }
4855 }
4859 if (in_array($data->type, array('text','mediumtext','longtext','varchar'))) { // Text stuff only
4863 }
4864 }
4865 }
4866 }
4869 }
4871 /**
4872 * Prints tables of detected plugins, one table per plugin type,
4873 * and prints whether they are part of the standard Moodle
4874 * distribution or not.
4875 */
4945 }
4949 }
4963 $html .= '<table class="generaltable plugincheckwrapper" cellspacing="4" cellpadding="1"><tr valign="top">';
4971 }
4973 $html .= '<td><table class="plugincompattable generaltable boxaligncenter" cellspacing="1" cellpadding="5" '
4974 . 'id="' . $cat . 'compattable" summary="compatibility table"><caption>' . $strcaption . '</caption>' . "\n";
4989 }
4991 // Get real name and full path of plugin
4998 // Determine if the plugin is about to be installed
5002 }
5010 // If the plugin was both on disk and in the db, unset the value from the installed plugins list
5013 }
5014 }
5016 // If there are plugins left in the plugins_installed list, it means they are missing from disk
5018 // Make sure the plugin really is missing from disk
5025 }
5031 . "<td class=\"$standard $status cell c2\">" . ${'str' . $standard} . " $strmissingfromdisk</td>\n</tr>\n";
5033 }
5034 }
5037 }
5042 }
5044 ?>