Proyectos de Subversion Moodle

Rev

| Ultima modificación | Ver Log |

Rev Autor Línea Nro. Línea
1 efrain 1
<?php
2
// This file is part of Moodle - http://moodle.org/
3
//
4
// Moodle is free software: you can redistribute it and/or modify
5
// it under the terms of the GNU General Public License as published by
6
// the Free Software Foundation, either version 3 of the License, or
7
// (at your option) any later version.
8
//
9
// Moodle is distributed in the hope that it will be useful,
10
// but WITHOUT ANY WARRANTY; without even the implied warranty of
11
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12
// GNU General Public License for more details.
13
//
14
// You should have received a copy of the GNU General Public License
15
// along with Moodle.  If not, see <http://www.gnu.org/licenses/>.
16
 
17
/**
18
 * Settings
19
 *
20
 * @package     factor_iprange
21
 * @author      Mikhail Golenkov <golenkovm@gmail.com>
22
 * @copyright   Catalyst IT
23
 * @license     http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
24
 */
25
 
26
defined('MOODLE_INTERNAL') || die();
27
 
28
global $OUTPUT;
29
 
30
$enabled = new admin_setting_configcheckbox('factor_iprange/enabled',
31
    new lang_string('settings:enablefactor', 'tool_mfa'),
32
    new lang_string('settings:enablefactor_help', 'tool_mfa'), 0);
33
$enabled->set_updatedcallback(function () {
34
    \tool_mfa\manager::do_factor_action('iprange', get_config('factor_iprange', 'enabled') ? 'enable' : 'disable');
35
});
36
$settings->add($enabled);
37
 
38
$settings->add(new admin_setting_configtext('factor_iprange/weight',
39
    new lang_string('settings:weight', 'tool_mfa'),
40
    new lang_string('settings:weight_help', 'tool_mfa'), 100, PARAM_INT));
41
 
42
 
43
// Current IP validation against list for description.
44
$allowedips = get_config('factor_iprange', 'safeips');
45
if (trim($allowedips) == '') {
46
    $message = 'allowedipsempty';
47
    $type = 'notifyerror';
48
} else if (remoteip_in_list($allowedips)) {
49
    $message = 'allowedipshasmyip';
50
    $type = 'notifysuccess';
51
} else {
52
    $message = 'allowedipshasntmyip';
53
    $type = 'notifyerror';
54
};
55
$info = $OUTPUT->notification(get_string($message, 'factor_iprange', ['ip' => getremoteaddr()]), $type);
56
 
57
$settings->add(new admin_setting_configiplist('factor_iprange/safeips',
58
    new lang_string('settings:safeips', 'factor_iprange'),
59
    new lang_string('settings:safeips_help', 'factor_iprange',
60
            ['info' => $info, 'syntax' => get_string('ipblockersyntax', 'admin')]), '', PARAM_TEXT));
61