networking.php 7.68 KB
Newer Older
1
2
<?php
/**
Francois Marier's avatar
Francois Marier committed
3
 * Mahara: Electronic portfolio, weblog, resume builder and social networking
4
 * Copyright (C) 2006-2008 Catalyst IT Ltd (http://www.catalyst.net.nz)
5
 *
Francois Marier's avatar
Francois Marier committed
6
7
8
9
 * This program is free software: you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation, either version 3 of the License, or
 * (at your option) any later version.
10
 *
Francois Marier's avatar
Francois Marier committed
11
12
13
14
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
15
 *
Francois Marier's avatar
Francois Marier committed
16
17
 * You should have received a copy of the GNU General Public License
 * along with this program.  If not, see <http://www.gnu.org/licenses/>.
18
19
20
 *
 * @package    mahara
 * @subpackage admin
21
 * @author     Catalyst IT Ltd
22
 * @license    http://www.gnu.org/copyleft/gpl.html GNU GPL
23
 * @copyright  (C) 2006-2008 Catalyst IT Ltd http://catalyst.net.nz
24
25
26
27
28
 *
 */

define('INTERNAL', 1);
define('ADMIN', 1);
29
define('MENUITEM', 'configsite/networking');
30
31

require(dirname(dirname(dirname(__FILE__))) . '/init.php');
32
require_once(get_config('docroot') . 'api/xmlrpc/lib.php');
33
34
35
36
require_once('pieforms/pieform.php');
require_once('searchlib.php');
define('TITLE', get_string('networking', 'admin'));

37
38
39
40
41
42
43
44
45
46
47
$opensslext = extension_loaded('openssl');
$curlext    = extension_loaded('curl');
$xmlrpcext  = extension_loaded('xmlrpc');

if (!$opensslext || !$curlext || !$xmlrpcext) {
    $smarty = smarty();
    $missingextensions = array();
    !$opensslext && $missingextensions[] = 'openssl';
    !$curlext    && $missingextensions[] = 'curl';
    !$xmlrpcext  && $missingextensions[] = 'xmlrpc';
    $smarty->assign('missingextensions', $missingextensions);
48
    $smarty->display('admin/site/networking.tpl');
49
50
51
    exit;
}

52
53
54
55
56
57
58
59
60
61
$openssl = OpenSslRepo::singleton();

$yesno = array(true  => get_string('yes'),
               false => get_string('no'));

$networkingform = pieform(
    array(
        'name'     => 'networkingform',
        'jsform'   => true,
        'elements' => array(
62
63
64
            'wwwroot' => array(
                'type'         => 'html',
                'title'        => get_string('wwwroot','admin'),
65
                'description'  => get_string('wwwrootdescription', 'admin'),
66
67
                'value'        => get_config('wwwroot')
            ),
68
69
70
            'pubkey' => array(
                'type'         => 'html',
                'title'        => get_string('publickey','admin'),
71
                'description'  => get_string('publickeydescription2', 'admin', 365),
72
73
74
75
76
                'value'        => '<pre style="font-size: 0.7em">'.$openssl->certificate.'</pre>'
            ),
            'expires' => array(
                'type'         => 'html',
                'title'        => get_string('publickeyexpires','admin'),
77
                'value'        => format_date($openssl->expires)
78
79
80
81
82
83
84
85
            ),
            'enablenetworking' => array(
                'type'         => 'select',
                'title'        => get_string('enablenetworking','admin'),
                'description'  => get_string('enablenetworkingdescription','admin'),
                'defaultvalue' => get_config('enablenetworking'),
                'options'      => $yesno,
            ),
86
87
88
89
90
91
92
            'promiscuousmode' => array(
                'type'         => 'select',
                'title'        => get_string('promiscuousmode','admin'),
                'description'  => get_string('promiscuousmodedescription','admin'),
                'defaultvalue' => get_config('promiscuousmode'),
                'options'      => $yesno,
            ),
93
94
            'proxyfieldset'    => array(
                'type'         => 'fieldset',
95
                'legend'       => get_string('proxysettings', 'admin'),
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
                'elements'     => array(
                    'proxyaddress' => array(
                        'type'          => 'text',
                        'title'         => get_string('proxyaddress', 'admin'),
                        'description'   => get_string('proxyaddressdescription', 'admin'),
                        'defaultvalue'  => get_config('proxyaddress'),
                    ),
                    'proxyauthmodel' => array(
                        'type'          => 'select',
                        'title'         => get_string('proxyauthmodel', 'admin'),
                        'description'   => get_string('proxyauthmodeldescription', 'admin'),
                        'defaultvalue'  => get_config('proxyauthmodel'),
                        'options'       => array(
                                            '' => 'None',
                                            'basic' => 'Basic (NCSA)',
                                        ),
                    ),
                    'proxyauthcredentials' => array(
                        'type'          => 'text',
                        'title'         => get_string('proxyauthcredentials', 'admin'),
                        'description'   => get_string('proxyauthcredentialsdescription', 'admin'),
                        'defaultvalue'  => get_config('proxyauthcredentials'),
                    ),
                ),
            ),
121
122
123
124
125
126
127
128
129
            'submit' => array(
                'type'  => 'submit',
                'value' => get_string('savechanges','admin')
            )
        )
    )
);

function networkingform_fail(Pieform $form) {
130
131
132
133
    $form->reply(PIEFORM_ERR, array(
        'message' => get_string('enablenetworkingfailed','admin'),
        'goto'    => '/admin/site/networking.php',
    ));
134
135
136
}

function networkingform_submit(Pieform $form, $values) {
137
    $reply = '';
Donal McMullan's avatar
WIP    
Donal McMullan committed
138

139
140
141
    if (get_config('enablenetworking') != $values['enablenetworking']) {
        if (!set_config('enablenetworking', $values['enablenetworking'])) {
            networkingform_fail($form);
142
143
        }
        else {
144
            if (empty($values['enablenetworking'])) {
145
                $reply .= get_string('networkingdisabled','admin');
146
147
            }
            else {
148
                $reply .= get_string('networkingenabled','admin');
149
150
            }
        }
151
152
    }

153
154
155
    if (get_config('promiscuousmode') != $values['promiscuousmode']) {
        if (!set_config('promiscuousmode', $values['promiscuousmode'])) {
            networkingform_fail($form);
156
157
        }
        else {
158
            if (empty($values['promiscuousmode'])) {
159
                $reply .= get_string('promiscuousmodedisabled','admin');
160
161
            }
            else {
162
                $reply .= get_string('promiscuousmodeenabled','admin');
163
164
            }
        }
165
    }
166

167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
    if(get_config('proxyaddress') != $values['proxyaddress']) {
        if(!set_config('proxyaddress', $values['proxyaddress'])) {
            networkingform_fail($form);
        }
        else {
            $reply .= get_string('proxyaddressset', 'admin');
        }
    }

    if(get_config('proxyauthmodel') != $values['proxyauthmodel']) {
        if(!set_config('proxyauthmodel', $values['proxyauthmodel'])) {
            networkingform_fail($form);
        }
        else {
            $reply .= get_string('proxyauthmodelset', 'admin');
        }
    }

    if(get_config('proxyauthcredentials') != $values['proxyauthcredentials']) {
        if(!set_config('proxyauthcredentials', $values['proxyauthcredentials'])) {
            networkingform_fail($form);
        }
        else {
            $reply .= get_string('proxyauthcredntialsset', 'admin');
        }
    }

194
195
196
197
    $form->reply(PIEFORM_OK, array(
        'message' => ($reply == '') ? get_string('networkingunchanged','admin') : $reply,
        'goto'    => '/admin/site/networking.php',
    ));
198
199
200
}

$smarty = smarty();
201
202
$smarty->assign('networkingform', $networkingform);
$smarty->display('admin/site/networking.tpl');
203
204

?>