r2317 - indicate completed items on ChangeLog
[racktables] / inc / ophandlers.php
CommitLineData
b325120a 1<?php
e673ee24
DO
2/*
3*
4* This file is a library of operation handlers for RackTables.
5*
6*/
7
17c32f4c
DO
8// This function assures that specified argument was passed
9// and is a number greater than zero.
2c6c7645 10function assertUIntArg ($argname, $caller = 'N/A', $allow_zero = FALSE)
17c32f4c
DO
11{
12 if (!isset ($_REQUEST[$argname]))
13 {
2c6c7645 14 showError ("Parameter '${argname}' is missing (calling function is [${caller}]).", __FUNCTION__);
17c32f4c
DO
15 die();
16 }
17 if (!is_numeric ($_REQUEST[$argname]))
18 {
2c6c7645 19 showError ("Parameter '${argname}' is not a number (calling function is [${caller}]).", __FUNCTION__);
17c32f4c
DO
20 die();
21 }
22 if ($_REQUEST[$argname] < 0)
23 {
2c6c7645 24 showError ("Parameter '${argname}' is less than zero (calling function is [${caller}]).", __FUNCTION__);
17c32f4c
DO
25 die();
26 }
27 if (!$allow_zero and $_REQUEST[$argname] == 0)
28 {
2c6c7645 29 showError ("Parameter '${argname}' is equal to zero (calling function is [${caller}]).", __FUNCTION__);
17c32f4c
DO
30 die();
31 }
32}
33
34// This function assures that specified argument was passed
35// and is a non-empty string.
2c6c7645 36function assertStringArg ($argname, $caller = 'N/A', $ok_if_empty = FALSE)
17c32f4c
DO
37{
38 if (!isset ($_REQUEST[$argname]))
39 {
2c6c7645 40 showError ("Parameter '${argname}' is missing (calling function is [${caller}]).", __FUNCTION__);
17c32f4c
DO
41 die();
42 }
43 if (!is_string ($_REQUEST[$argname]))
44 {
2c6c7645 45 showError ("Parameter '${argname}' is not a string (calling function is [${caller}]).", __FUNCTION__);
17c32f4c
DO
46 die();
47 }
48 if (!$ok_if_empty and empty ($_REQUEST[$argname]))
49 {
2c6c7645 50 showError ("Parameter '${argname}' is an empty string (calling function is [${caller}]).", __FUNCTION__);
17c32f4c
DO
51 die();
52 }
53}
54
2c6c7645 55function assertBoolArg ($argname, $caller = 'N/A', $ok_if_empty = FALSE)
17c32f4c
DO
56{
57 if (!isset ($_REQUEST[$argname]))
58 {
2c6c7645 59 showError ("Parameter '${argname}' is missing (calling function is [${caller}]).", __FUNCTION__);
17c32f4c
DO
60 die();
61 }
62 if (!is_string ($_REQUEST[$argname]) or $_REQUEST[$argname] != 'on')
63 {
2c6c7645 64 showError ("Parameter '${argname}' is not a string (calling function is [${caller}]).", __FUNCTION__);
17c32f4c
DO
65 die();
66 }
67 if (!$ok_if_empty and empty ($_REQUEST[$argname]))
68 {
2c6c7645 69 showError ("Parameter '${argname}' is an empty string (calling function is [${caller}]).", __FUNCTION__);
17c32f4c
DO
70 die();
71 }
72}
73
2c6c7645 74function assertIPv4Arg ($argname, $caller = 'N/A', $ok_if_empty = FALSE)
17c32f4c 75{
2c6c7645 76 assertStringArg ($argname, $caller, $ok_if_empty);
17c32f4c
DO
77 if (!empty ($_REQUEST[$argname]) and long2ip (ip2long ($_REQUEST[$argname])) !== $_REQUEST[$argname])
78 {
2c6c7645 79 showError ("IPv4 address validation failed for value '" . $_REQUEST[$argname] . "' (calling function is [${caller}]).", __FUNCTION__);
17c32f4c
DO
80 die();
81 }
82}
83
e673ee24
DO
84function addPortForwarding ()
85{
2c6c7645
DO
86 assertUIntArg ('object_id', __FUNCTION__);
87 assertIPv4Arg ('localip', __FUNCTION__);
88 assertIPv4Arg ('remoteip', __FUNCTION__);
89 assertUIntArg ('localport', __FUNCTION__);
9bea3a8b 90 assertStringArg ('proto', __FUNCTION__);
2c6c7645 91 assertStringArg ('description', __FUNCTION__, TRUE);
103b1e1e 92 $remoteport = isset ($_REQUEST['remoteport']) ? $_REQUEST['remoteport'] : '';
31fc4157 93 if (empty ($remoteport))
f75eb878 94 $remoteport = $_REQUEST['localport'];
e673ee24 95
9bea3a8b
DO
96 $error = newPortForwarding
97 (
103b1e1e 98 $_REQUEST['object_id'],
9bea3a8b
DO
99 $_REQUEST['localip'],
100 $_REQUEST['localport'],
101 $_REQUEST['remoteip'],
102 $remoteport,
103 $_REQUEST['proto'],
104 $_REQUEST['description']
105 );
e673ee24
DO
106
107 if ($error == '')
ebb5441d 108 return buildRedirectURL ('OK');
e673ee24 109 else
ebb5441d 110 return buildRedirectURL ('ERR', array ($error));
e673ee24
DO
111}
112
113function delPortForwarding ()
114{
103b1e1e
DO
115 assertUIntArg ('object_id', __FUNCTION__);
116 assertIPv4Arg ('localip', __FUNCTION__);
117 assertIPv4Arg ('remoteip', __FUNCTION__);
118 assertUIntArg ('localport', __FUNCTION__);
119 assertUIntArg ('remoteport', __FUNCTION__);
120 assertStringArg ('proto', __FUNCTION__);
e673ee24 121
103b1e1e
DO
122 $error = deletePortForwarding
123 (
124 $_REQUEST['object_id'],
125 $_REQUEST['localip'],
126 $_REQUEST['localport'],
127 $_REQUEST['remoteip'],
128 $_REQUEST['remoteport'],
129 $_REQUEST['proto']
130 );
e673ee24 131 if ($error == '')
ebb5441d 132 return buildRedirectURL ('OK');
e673ee24 133 else
ebb5441d 134 return buildRedirectURL ('ERR', array ($error));
e673ee24
DO
135}
136
137function updPortForwarding ()
138{
103b1e1e
DO
139 assertUIntArg ('object_id', __FUNCTION__);
140 assertIPv4Arg ('localip', __FUNCTION__);
141 assertIPv4Arg ('remoteip', __FUNCTION__);
142 assertUIntArg ('localport', __FUNCTION__);
143 assertUIntArg ('remoteport', __FUNCTION__);
144 assertStringArg ('proto', __FUNCTION__);
145 assertStringArg ('description', __FUNCTION__);
e673ee24 146
103b1e1e
DO
147 $error = updatePortForwarding
148 (
149 $_REQUEST['object_id'],
150 $_REQUEST['localip'],
151 $_REQUEST['localport'],
152 $_REQUEST['remoteip'],
153 $_REQUEST['remoteport'],
154 $_REQUEST['proto'],
155 $_REQUEST['description']
156 );
e673ee24 157 if ($error == '')
ebb5441d 158 return buildRedirectURL ('OK');
e673ee24 159 else
ebb5441d 160 return buildRedirectURL ('ERR', array ($error));
e673ee24
DO
161}
162
e673ee24
DO
163function addPortForObject ()
164{
103b1e1e
DO
165 assertUIntArg ('object_id', __FUNCTION__);
166 assertStringArg ('port_name', __FUNCTION__, TRUE);
167 if (empty ($_REQUEST['port_name']))
ebb5441d 168 return buildRedirectURL ('ERR1');
103b1e1e
DO
169 $error = commitAddPort ($_REQUEST['object_id'], $_REQUEST['port_name'], $_REQUEST['port_type_id'], $_REQUEST['port_label'], $_REQUEST['port_l2address']);
170 if ($error != '')
ebb5441d 171 return buildRedirectURL ('ERR2', array ($error));
e673ee24 172 else
ebb5441d 173 return buildRedirectURL ('OK', array ($_REQUEST['port_name']));
e673ee24
DO
174}
175
176function editPortForObject ()
177{
2c6c7645 178 assertUIntArg ('port_id', __FUNCTION__);
611170af 179 assertUIntArg ('port_type_id', __FUNCTION__);
d0a69ce8 180 // tolerate empty value now to produce custom informative message later
103b1e1e
DO
181 assertStringArg ('name', __FUNCTION__, TRUE);
182 if (empty ($_REQUEST['name']))
ebb5441d 183 return buildRedirectURL ('ERR1');
103b1e1e 184
e673ee24
DO
185 if (isset ($_REQUEST['reservation_comment']) and !empty ($_REQUEST['reservation_comment']))
186 $port_rc = '"' . $_REQUEST['reservation_comment'] . '"';
187 else
188 $port_rc = 'NULL';
611170af 189 $error = commitUpdatePort ($_REQUEST['port_id'], $_REQUEST['name'], $_REQUEST['port_type_id'], $_REQUEST['label'], $_REQUEST['l2address'], $port_rc);
103b1e1e 190 if ($error != '')
ebb5441d 191 return buildRedirectURL ('ERR2', array ($error));
e673ee24 192 else
ebb5441d 193 return buildRedirectURL ('OK', array ($_REQUEST['name']));
e673ee24
DO
194}
195
196function delPortFromObject ()
197{
103b1e1e 198 assertUIntArg ('port_id', __FUNCTION__);
103b1e1e 199 $error = delObjectPort ($_REQUEST['port_id']);
e673ee24
DO
200
201 if ($error != '')
ebb5441d 202 return buildRedirectURL ('ERR', array ($error));
e673ee24 203 else
ebb5441d 204 return buildRedirectURL ('OK', array ($_REQUEST['port_name']));
e673ee24
DO
205}
206
207function linkPortForObject ()
208{
103b1e1e
DO
209 assertUIntArg ('port_id', __FUNCTION__);
210 assertUIntArg ('remote_port_id', __FUNCTION__);
baf37d01
DO
211 assertStringArg ('port_name', __FUNCTION__, TRUE);
212 assertStringArg ('remote_port_name', __FUNCTION__, TRUE);
213 assertStringArg ('remote_object_name', __FUNCTION__, TRUE);
e673ee24 214
103b1e1e 215 $error = linkPorts ($_REQUEST['port_id'], $_REQUEST['remote_port_id']);
e673ee24 216 if ($error != '')
ebb5441d 217 return buildRedirectURL ('ERR', array ($error));
e673ee24 218 else
ebb5441d 219 return buildRedirectURL ('OK', array ($_REQUEST['port_name'], $_REQUEST['remote_port_name'], $_REQUEST['remote_object_name']));
e673ee24
DO
220}
221
222function unlinkPortForObject ()
223{
103b1e1e 224 assertUIntArg ('port_id', __FUNCTION__);
baf37d01
DO
225 assertStringArg ('port_name', __FUNCTION__, TRUE);
226 assertStringArg ('remote_port_name', __FUNCTION__, TRUE);
227 assertStringArg ('remote_object_name', __FUNCTION__, TRUE);
e673ee24 228
103b1e1e 229 $error = unlinkPort ($_REQUEST['port_id']);
e673ee24 230 if ($error != '')
ebb5441d 231 return buildRedirectURL ('ERR', array ($error));
e673ee24 232 else
ebb5441d 233 return buildRedirectURL ('OK', array ($_REQUEST['port_name'], $_REQUEST['remote_port_name'], $_REQUEST['remote_object_name']));
e673ee24
DO
234}
235
236function addMultiPorts ()
237{
2c6c7645
DO
238 assertStringArg ('format', __FUNCTION__);
239 assertStringArg ('input', __FUNCTION__);
240 assertUIntArg ('port_type', __FUNCTION__);
241 assertUIntArg ('object_id', __FUNCTION__);
e673ee24
DO
242 $format = $_REQUEST['format'];
243 $port_type = $_REQUEST['port_type'];
244 $object_id = $_REQUEST['object_id'];
245 // Input lines are escaped, so we have to explode and to chop by 2-char
246 // \n and \r respectively.
247 $lines1 = explode ('\n', $_REQUEST['input']);
248 foreach ($lines1 as $line)
249 {
250 $parts = explode ('\r', $line);
251 reset ($parts);
252 if (empty ($parts[0]))
253 continue;
254 else
255 $lines2[] = rtrim ($parts[0]);
256 }
257 $ports = array();
258 foreach ($lines2 as $line)
259 {
260 switch ($format)
261 {
262 case 'fisxii':
263 $words = explode (' ', ereg_replace ('[[:space:]]+', ' ', $line));
264 list ($slot, $port) = explode ('/', $words[0]);
265 $ports[] = array
266 (
267 'name' => "e ${slot}/${port}",
268 'l2address' => $words[8],
269 'label' => "slot ${slot} port ${port}"
270 );
271 break;
272 case 'c3600asy':
273 $words = explode (' ', ereg_replace ('[[:space:]]+', ' ', trim (substr ($line, 3))));
274/*
275How Async Lines are Numbered in Cisco 3600 Series Routers
276http://www.cisco.com/en/US/products/hw/routers/ps274/products_tech_note09186a00801ca70b.shtml
277
278Understanding 16- and 32-Port Async Network Modules
279http://www.cisco.com/en/US/products/hw/routers/ps274/products_tech_note09186a00800a93f0.shtml
280*/
281 $async = $words[0];
282 $slot = floor (($async - 1) / 32);
283 $octalgroup = floor (($async - 1 - $slot * 32) / 8);
284 $cable = $async - $slot * 32 - $octalgroup * 8;
285 $og_label[0] = 'async 0-7';
286 $og_label[1] = 'async 8-15';
287 $og_label[2] = 'async 16-23';
288 $og_label[3] = 'async 24-31';
289 $ports[] = array
290 (
291 'name' => "async ${async}",
292 'l2address' => '',
293 'label' => "slot ${slot} " . $og_label[$octalgroup] . " cable ${cable}"
294 );
295 break;
296 case 'fiwg':
297 $words = explode (' ', ereg_replace ('[[:space:]]+', ' ', $line));
298 $ifnumber = $words[0] * 1;
299 $ports[] = array
300 (
301 'name' => "e ${ifnumber}",
302 'l2address' => "${words[8]}",
303 'label' => "${ifnumber}"
304 );
305 break;
351d4dbf 306 case 'ssv1':
5b585342 307 $words = explode (' ', $line);
351d4dbf
DO
308 if (empty ($words[0]) or empty ($words[1]))
309 continue;
310 $ports[] = array
311 (
312 'name' => $words[0],
313 'l2address' => $words[1],
314 'label' => ''
315 );
316 break;
e673ee24 317 default:
ebb5441d 318 return buildRedirectURL ('ERR');
e673ee24
DO
319 break;
320 }
321 }
322 // Create ports, if they don't exist.
323 $added_count = $updated_count = $error_count = 0;
324 foreach ($ports as $port)
325 {
326 $port_id = getPortID ($object_id, $port['name']);
327 if ($port_id === NULL)
328 {
329 $result = commitAddPort ($object_id, $port['name'], $port_type, $port['label'], $port['l2address']);
330 if ($result == '')
331 $added_count++;
332 else
333 $error_count++;
334 }
335 else
336 {
611170af 337 $result = commitUpdatePort ($port_id, $port['name'], $port_type, $port['label'], $port['l2address']);
e673ee24
DO
338 if ($result == '')
339 $updated_count++;
340 else
341 $error_count++;
342 }
343 }
ebb5441d 344 return buildRedirectURL ('OK', array ($added_count, $updated_count, $error_count));
e673ee24
DO
345}
346
b4c1ef87 347function updIPv4Allocation ()
e673ee24 348{
b4c1ef87
DO
349 assertIPv4Arg ('ip', __FUNCTION__);
350 assertUIntArg ('object_id', __FUNCTION__);
351 assertStringArg ('bond_name', __FUNCTION__, TRUE);
352 assertStringArg ('bond_type', __FUNCTION__);
e673ee24 353
b4c1ef87 354 $error = updateBond ($_REQUEST['ip'], $_REQUEST['object_id'], $_REQUEST['bond_name'], $_REQUEST['bond_type']);
e673ee24 355 if ($error != '')
ebb5441d 356 return buildRedirectURL ('ERR', array ($error));
e673ee24 357 else
ebb5441d 358 return buildRedirectURL ('OK');
e673ee24
DO
359}
360
b4c1ef87 361function delIPv4Allocation ()
e673ee24 362{
b4c1ef87
DO
363 assertIPv4Arg ('ip', __FUNCTION__);
364 assertUIntArg ('object_id', __FUNCTION__);
e673ee24 365
b4c1ef87 366 $error = unbindIpFromObject ($_REQUEST['ip'], $_REQUEST['object_id']);
e673ee24 367 if ($error != '')
ebb5441d 368 return buildRedirectURL ('ERR', array ($error));
e673ee24 369 else
ebb5441d 370 return buildRedirectURL ('OK');
e673ee24
DO
371}
372
b4c1ef87 373function addIPv4Allocation ()
e673ee24 374{
b4c1ef87
DO
375 assertIPv4Arg ('ip', __FUNCTION__);
376 assertUIntArg ('object_id', __FUNCTION__);
377 assertStringArg ('bond_name', __FUNCTION__, TRUE);
378 assertStringArg ('bond_type', __FUNCTION__);
da958e52 379
b4c1ef87
DO
380 // Strip masklen.
381 $ip = ereg_replace ('/[[:digit:]]+$', '', $_REQUEST['ip']);
2be3fd23 382 if (getConfigVar ('IPV4_JAYWALK') != 'yes' and NULL === getIPv4AddressNetworkId ($ip))
5222f192
DO
383 return buildRedirectURL ('ERR1', array ($ip));
384
b4c1ef87 385 $error = bindIpToObject ($ip, $_REQUEST['object_id'], $_REQUEST['bond_name'], $_REQUEST['bond_type']);
5222f192
DO
386 if ($error != '')
387 return buildRedirectURL ('ERR2', array ($error));
53ef3908
DO
388 $address = getIPv4Address ($ip);
389 if ($address['reserved'] == 'yes' or !empty ($address['name']))
b4c1ef87
DO
390 {
391 $release = getConfigVar ('IPV4_AUTO_RELEASE');
392 if ($release >= 1)
393 $address['reserved'] = 'no';
394 if ($release >= 2)
395 $address['name'] = '';
396 updateAddress ($ip, $address['name'], $address['reserved']);
397 }
5222f192 398 return buildRedirectURL ('OK');
e673ee24
DO
399}
400
42023f03 401function addIPv4Prefix ()
e673ee24 402{
2c6c7645 403 assertStringArg ('range', __FUNCTION__);
e4b9a099 404 assertStringArg ('name', __FUNCTION__, TRUE);
e673ee24 405
fa05e3de
DO
406 $is_bcast = isset ($_REQUEST['is_bcast']) ? $_REQUEST['is_bcast'] : 'off';
407 $taglist = isset ($_REQUEST['taglist']) ? $_REQUEST['taglist'] : array();
42023f03 408 $error = createIPv4Prefix ($_REQUEST['range'], $_REQUEST['name'], $is_bcast == 'on', $taglist);
e673ee24 409 if ($error != '')
33bcd1ce 410 return buildRedirectURL ('ERR', array ($error));
e673ee24 411 else
ebb5441d 412 return buildRedirectURL ('OK');
e673ee24
DO
413}
414
42023f03 415function delIPv4Prefix ()
e673ee24 416{
da958e52 417 assertUIntArg ('id', __FUNCTION__);
42023f03 418 $error = destroyIPv4Prefix ($_REQUEST['id']);
e673ee24 419 if ($error != '')
33bcd1ce 420 return buildRedirectURL ('ERR', array ($error));
e673ee24 421 else
ebb5441d 422 return buildRedirectURL ('OK');
e673ee24
DO
423}
424
04d619d0 425function updIPv4Prefix ()
e673ee24 426{
da958e52 427 assertUIntArg ('id', __FUNCTION__);
e4b9a099 428 assertStringArg ('name', __FUNCTION__, TRUE);
e673ee24 429
da958e52 430 $error = updateRange ($_REQUEST['id'], $_REQUEST['name']);
e673ee24 431 if ($error != '')
ebb5441d 432 return buildRedirectURL ('ERR', array ($error));
e673ee24 433 else
ebb5441d 434 return buildRedirectURL ('OK');
e673ee24
DO
435}
436
437function editAddress ()
438{
da958e52
DO
439 assertIPv4Arg ('ip', __FUNCTION__);
440 assertStringArg ('name', __FUNCTION__, TRUE);
e673ee24 441
e673ee24
DO
442 if (isset ($_REQUEST['reserved']))
443 $reserved = $_REQUEST['reserved'];
444 else
445 $reserved = 'off';
da958e52 446 $error = updateAddress ($_REQUEST['ip'], $_REQUEST['name'], $reserved == 'on' ? 'yes' : 'no');
e673ee24 447 if ($error != '')
ebb5441d 448 return buildRedirectURL ('ERR', array ($error));
e673ee24 449 else
ebb5441d 450 return buildRedirectURL ('OK');
e673ee24
DO
451}
452
cced6b7d 453function createUser ()
e673ee24 454{
2c6c7645
DO
455 assertStringArg ('username', __FUNCTION__);
456 assertStringArg ('realname', __FUNCTION__, TRUE);
457 assertStringArg ('password', __FUNCTION__);
e673ee24
DO
458 $username = $_REQUEST['username'];
459 $password = hash (PASSWORD_HASH, $_REQUEST['password']);
460 $result = commitCreateUserAccount ($username, $_REQUEST['realname'], $password);
461 if ($result == TRUE)
ebb5441d 462 return buildRedirectURL ('OK', array ($username));
e673ee24 463 else
ebb5441d 464 return buildRedirectURL ('ERR', array ($username));
e673ee24
DO
465}
466
cced6b7d 467function updateUser ()
e673ee24 468{
cced6b7d 469 assertUIntArg ('user_id', __FUNCTION__);
2c6c7645
DO
470 assertStringArg ('username', __FUNCTION__);
471 assertStringArg ('realname', __FUNCTION__, TRUE);
472 assertStringArg ('password', __FUNCTION__);
e673ee24
DO
473 $username = $_REQUEST['username'];
474 $new_password = $_REQUEST['password'];
103b1e1e 475 $old_hash = getHashByID ($_REQUEST['user_id']);
e673ee24 476 if ($old_hash == NULL)
ebb5441d 477 return buildRedirectURL ('ERR1');
e673ee24
DO
478 // Update user password only if provided password is not the same as current password hash.
479 if ($new_password != $old_hash)
480 $new_password = hash (PASSWORD_HASH, $new_password);
103b1e1e 481 $result = commitUpdateUserAccount ($_REQUEST['user_id'], $username, $_REQUEST['realname'], $new_password);
e673ee24 482 if ($result == TRUE)
ebb5441d 483 return buildRedirectURL ('OK', array ($username));
e673ee24 484 else
ebb5441d 485 return buildRedirectURL ('ERR2', array ($username));
e673ee24
DO
486}
487
cced6b7d 488function enableUser ()
e673ee24 489{
cced6b7d
DO
490 assertUIntArg ('user_id', __FUNCTION__);
491 if (commitEnableUserAccount ($_REQUEST['user_id'], 'yes') == TRUE)
ebb5441d 492 return buildRedirectURL ('OK');
e673ee24 493 else
ebb5441d 494 return buildRedirectURL ('ERR');
e673ee24
DO
495}
496
cced6b7d 497function disableUser ()
e673ee24 498{
cced6b7d 499 assertUIntArg ('user_id', __FUNCTION__);
103b1e1e 500 if ($_REQUEST['user_id'] == 1)
ebb5441d
DO
501 return buildRedirectURL ('ERR1');
502 if (commitEnableUserAccount ($_REQUEST['user_id'], 'no'))
503 return buildRedirectURL ('OK');
e673ee24 504 else
ebb5441d 505 return buildRedirectURL ('ERR2');
e673ee24
DO
506}
507
e673ee24
DO
508// This function find differences in users's submit and PortCompat table
509// and modifies database accordingly.
510function savePortMap ()
511{
e673ee24
DO
512 $ptlist = getPortTypes();
513 $oldCompat = getPortCompat();
514 $newCompat = array();
515 foreach (array_keys ($ptlist) as $leftKey)
516 foreach (array_keys ($ptlist) as $rightKey)
517 if (isset ($_REQUEST["atom_${leftKey}_${rightKey}"]))
518 $newCompat[] = array ('type1' => $leftKey, 'type2' => $rightKey);
519 // Build the new matrix from user's submit and compare it to
520 // the old matrix. Those pairs which appear on
521 // new matrix only, have to be stored in PortCompat table. Those who appear
522 // on the old matrix only, should be removed from PortCompat table.
523 // Those present in both matrices should be skipped.
524 $oldCompatTable = buildPortCompatMatrixFromList ($ptlist, $oldCompat);
525 $newCompatTable = buildPortCompatMatrixFromList ($ptlist, $newCompat);
526 $error_count = $success_count = 0;
527 foreach (array_keys ($ptlist) as $type1)
528 foreach (array_keys ($ptlist) as $type2)
529 if ($oldCompatTable[$type1][$type2] != $newCompatTable[$type1][$type2])
530 switch ($oldCompatTable[$type1][$type2])
531 {
532 case TRUE: // new value is FALSE
533 if (removePortCompat ($type1, $type2) === TRUE)
534 $success_count++;
535 else
536 $error_count++;
537 break;
538 case FALSE: // new value is TRUE
539 if (addPortCompat ($type1, $type2) === TRUE)
540 $success_count++;
541 else
542 $error_count++;
543 break;
544 default:
ebb5441d 545 showError ('Internal error: oldCompatTable is invalid', __FUNCTION__);
e673ee24
DO
546 break;
547 }
103b1e1e 548 if ($error_count == 0)
ebb5441d 549 return buildRedirectURL ('OK', array ($error_count, $success_count));
103b1e1e 550 else
ebb5441d 551 return buildRedirectURL ('ERR', array ($error_count, $success_count));
e673ee24
DO
552}
553
554function updateDictionary ()
555{
2c6c7645
DO
556 assertUIntArg ('chapter_no', __FUNCTION__);
557 assertUIntArg ('dict_key', __FUNCTION__);
558 assertStringArg ('dict_value', __FUNCTION__);
e673ee24 559 if (commitUpdateDictionary ($_REQUEST['chapter_no'], $_REQUEST['dict_key'], $_REQUEST['dict_value']) === TRUE)
ebb5441d 560 return buildRedirectURL ('OK');
e673ee24 561 else
ebb5441d 562 return buildRedirectURL ('ERR');
e673ee24
DO
563}
564
565function supplementDictionary ()
566{
2c6c7645
DO
567 assertUIntArg ('chapter_no', __FUNCTION__);
568 assertStringArg ('dict_value', __FUNCTION__);
e673ee24 569 if (commitSupplementDictionary ($_REQUEST['chapter_no'], $_REQUEST['dict_value']) === TRUE)
ebb5441d 570 return buildRedirectURL ('OK');
e673ee24 571 else
ebb5441d 572 return buildRedirectURL ('ERR');
e673ee24
DO
573}
574
575function reduceDictionary ()
576{
2c6c7645
DO
577 assertUIntArg ('chapter_no', __FUNCTION__);
578 assertUIntArg ('dict_key', __FUNCTION__);
e673ee24 579 if (commitReduceDictionary ($_REQUEST['chapter_no'], $_REQUEST['dict_key']) === TRUE)
ebb5441d 580 return buildRedirectURL ('OK');
e673ee24 581 else
ebb5441d 582 return buildRedirectURL ('ERR');
e673ee24
DO
583}
584
585function addChapter ()
586{
2c6c7645 587 assertStringArg ('chapter_name', __FUNCTION__);
e673ee24 588 if (commitAddChapter ($_REQUEST['chapter_name']) === TRUE)
ebb5441d 589 return buildRedirectURL ('OK');
e673ee24 590 else
ebb5441d 591 return buildRedirectURL ('ERR');
e673ee24
DO
592}
593
594function updateChapter ()
595{
2c6c7645
DO
596 assertUIntArg ('chapter_no', __FUNCTION__);
597 assertStringArg ('chapter_name', __FUNCTION__);
e673ee24 598 if (commitUpdateChapter ($_REQUEST['chapter_no'], $_REQUEST['chapter_name']) === TRUE)
ebb5441d 599 return buildRedirectURL ('OK');
e673ee24 600 else
ebb5441d 601 return buildRedirectURL ('ERR');
e673ee24
DO
602}
603
604function delChapter ()
605{
2c6c7645 606 assertUIntArg ('chapter_no', __FUNCTION__);
e673ee24 607 if (commitDeleteChapter ($_REQUEST['chapter_no']))
ebb5441d 608 return buildRedirectURL ('OK');
e673ee24 609 else
ebb5441d 610 return buildRedirectURL ('ERR');
e673ee24
DO
611}
612
613function changeAttribute ()
614{
2c6c7645
DO
615 assertUIntArg ('attr_id', __FUNCTION__);
616 assertStringArg ('attr_name', __FUNCTION__);
e673ee24 617 if (commitUpdateAttribute ($_REQUEST['attr_id'], $_REQUEST['attr_name']))
ebb5441d 618 return buildRedirectURL ('OK');
e673ee24 619 else
ebb5441d 620 return buildRedirectURL ('ERR');
e673ee24
DO
621}
622
623function createAttribute ()
624{
2c6c7645
DO
625 assertStringArg ('attr_name', __FUNCTION__);
626 assertStringArg ('attr_type', __FUNCTION__);
e673ee24 627 if (commitAddAttribute ($_REQUEST['attr_name'], $_REQUEST['attr_type']))
ebb5441d 628 return buildRedirectURL ('OK', array ($_REQUEST['attr_name']));
e673ee24 629 else
ebb5441d 630 return buildRedirectURL ('ERR');
e673ee24
DO
631}
632
633function deleteAttribute ()
634{
2c6c7645 635 assertUIntArg ('attr_id', __FUNCTION__);
e673ee24 636 if (commitDeleteAttribute ($_REQUEST['attr_id']))
ebb5441d 637 return buildRedirectURL ('OK');
e673ee24 638 else
ebb5441d 639 return buildRedirectURL ('ERR');
e673ee24
DO
640}
641
642function supplementAttrMap ()
643{
2c6c7645
DO
644 assertUIntArg ('attr_id', __FUNCTION__);
645 assertUIntArg ('objtype_id', __FUNCTION__);
646 assertUIntArg ('chapter_no', __FUNCTION__);
e673ee24 647 if (commitSupplementAttrMap ($_REQUEST['attr_id'], $_REQUEST['objtype_id'], $_REQUEST['chapter_no']) === TRUE)
ebb5441d 648 return buildRedirectURL ('OK');
e673ee24 649 else
ebb5441d 650 return buildRedirectURL ('ERR');
e673ee24
DO
651}
652
653function reduceAttrMap ()
654{
2c6c7645
DO
655 assertUIntArg ('attr_id', __FUNCTION__);
656 assertUIntArg ('objtype_id', __FUNCTION__);
e673ee24 657 if (commitReduceAttrMap ($_REQUEST['attr_id'], $_REQUEST['objtype_id']) === TRUE)
ebb5441d 658 return buildRedirectURL ('OK');
e673ee24 659 else
ebb5441d 660 return buildRedirectURL ('ERR');
e673ee24
DO
661}
662
22bb04da 663function clearSticker ()
e673ee24 664{
2c6c7645
DO
665 assertUIntArg ('attr_id', __FUNCTION__);
666 assertUIntArg ('object_id', __FUNCTION__);
22bb04da 667 if (commitResetAttrValue ($_REQUEST['object_id'], $_REQUEST['attr_id']) === TRUE)
ebb5441d 668 return buildRedirectURL ('OK');
e673ee24 669 else
ebb5441d 670 return buildRedirectURL ('ERR');
e673ee24
DO
671}
672
22bb04da
DO
673function updateObject ()
674{
cdd3efe9 675 assertUIntArg ('num_attrs', __FUNCTION__);
22bb04da
DO
676 assertUIntArg ('object_id', __FUNCTION__);
677 assertUIntArg ('object_type_id', __FUNCTION__);
678 assertStringArg ('object_name', __FUNCTION__, TRUE);
679 assertStringArg ('object_label', __FUNCTION__, TRUE);
680 assertStringArg ('object_barcode', __FUNCTION__, TRUE);
681 assertStringArg ('object_asset_no', __FUNCTION__, TRUE);
682 if (isset ($_REQUEST['object_has_problems']) and $_REQUEST['object_has_problems'] == 'on')
683 $has_problems = 'yes';
684 else
685 $has_problems = 'no';
686
687 if (commitUpdateObject (
688 $_REQUEST['object_id'],
689 $_REQUEST['object_name'],
690 $_REQUEST['object_label'],
691 $_REQUEST['object_barcode'],
692 $_REQUEST['object_type_id'],
693 $has_problems,
694 $_REQUEST['object_asset_no'],
695 $_REQUEST['object_comment']
696 ) !== TRUE)
ebb5441d 697 return buildRedirectURL ('ERR');
22bb04da 698
cdd3efe9 699 // Update optional attributes
f59e8cf5 700 $oldvalues = getAttrValues ($_REQUEST['object_id']);
0dfb8a2a 701 $result = array();
103b1e1e 702 for ($i = 0; $i < $_REQUEST['num_attrs']; $i++)
0dfb8a2a 703 {
2c6c7645 704 assertUIntArg ("${i}_attr_id", __FUNCTION__);
0dfb8a2a
DO
705 $attr_id = $_REQUEST["${i}_attr_id"];
706
707 // Field is empty, delete attribute and move on.
708 if (empty($_REQUEST["${i}_value"]))
709 {
103b1e1e 710 commitResetAttrValue ($_REQUEST['object_id'], $attr_id);
0dfb8a2a
DO
711 continue;
712 }
713
714 // The value could be uint/float, but we don't know ATM. Let SQL
715 // server check this and complain.
2c6c7645 716 assertStringArg ("${i}_value", __FUNCTION__);
0dfb8a2a
DO
717 $value = $_REQUEST["${i}_value"];
718 switch ($oldvalues[$attr_id]['type'])
719 {
720 case 'uint':
721 case 'float':
722 case 'string':
723 $oldvalue = $oldvalues[$attr_id]['value'];
724 break;
725 case 'dict':
726 $oldvalue = $oldvalues[$attr_id]['key'];
727 break;
728 default:
61e269b5 729 showError ('Internal structure error', __FUNCTION__);
0dfb8a2a
DO
730 die;
731 }
732 if ($value == $oldvalue)
733 continue;
734
735 // Note if the queries succeed or not, it determines which page they see.
103b1e1e 736 $result[] = commitUpdateAttrValue ($_REQUEST['object_id'], $attr_id, $value);
0dfb8a2a 737 }
103b1e1e 738 if (in_array (FALSE, $result))
ebb5441d 739 return buildRedirectURL ('ERR');
0dfb8a2a 740
cdd3efe9
AD
741 // Invalidate thumb cache of all racks objects could occupy.
742 foreach (getResidentRacksData ($_REQUEST['object_id'], FALSE) as $rack_id)
743 resetThumbCache ($rack_id);
744
ebb5441d 745 return buildRedirectURL ('OK');
e673ee24
DO
746}
747
748function useupPort ()
749{
2c6c7645 750 assertUIntArg ('port_id', __FUNCTION__);
e673ee24 751 if (commitUseupPort ($_REQUEST['port_id']) === TRUE)
ebb5441d 752 return buildRedirectURL ('OK');
e673ee24 753 else
ebb5441d 754 return buildRedirectURL ('ERR');
e673ee24
DO
755}
756
4fe32e78
DY
757function updateUI ()
758{
2c6c7645 759 assertUIntArg ('num_vars', __FUNCTION__);
c461c579 760 $error = '';
4fe32e78 761
103b1e1e 762 for ($i = 0; $i < $_REQUEST['num_vars']; $i++)
4fe32e78 763 {
2c6c7645
DO
764 assertStringArg ("${i}_varname", __FUNCTION__);
765 assertStringArg ("${i}_varvalue", __FUNCTION__, TRUE);
4fe32e78 766 $varname = $_REQUEST["${i}_varname"];
4fe32e78 767 $varvalue = $_REQUEST["${i}_varvalue"];
4fe32e78 768
c461c579
DO
769 // If form value = value in DB, don't bother updating DB
770 if ($varvalue == getConfigVar ($varname))
4fe32e78
DY
771 continue;
772
773 // Note if the queries succeed or not, it determines which page they see.
c461c579
DO
774 $error = setConfigVar ($varname, $varvalue, TRUE);
775 if (!empty ($error))
776 break;
4fe32e78
DY
777 }
778
c461c579 779 if ($error != '')
ebb5441d 780 return buildRedirectURL ('ERR', array ($error));
4fe32e78 781
ebb5441d 782 return buildRedirectURL ('OK');
4fe32e78
DY
783}
784
b07f617c
DO
785function resetUIConfig()
786{
1f86e996 787 setConfigVar ('default_port_type','24');
b07f617c
DO
788 setConfigVar ('MASSCOUNT','15');
789 setConfigVar ('MAXSELSIZE','30');
790 setConfigVar ('NAMEFUL_OBJTYPES','4,7,8');
791 setConfigVar ('ROW_SCALE','2');
792 setConfigVar ('PORTS_PER_ROW','12');
793 setConfigVar ('IPV4_ADDRS_PER_PAGE','256');
794 setConfigVar ('DEFAULT_RACK_HEIGHT','42');
a6305acc 795 setConfigVar ('REQUIRE_ASSET_TAG_FOR','4,7,8');
b5ce46aa
DO
796 setConfigVar ('USER_AUTH_SRC','database');
797 setConfigVar ('DEFAULT_SLB_VS_PORT','');
798 setConfigVar ('DEFAULT_SLB_RS_PORT','');
d48e0a20 799 setConfigVar ('IPV4_PERFORMERS','1,4,7,8,12,14,445,447');
b5ce46aa 800 setConfigVar ('NATV4_PERFORMERS','4,7,8');
72281138 801 setConfigVar ('DETECT_URLS','no');
4b8d413e 802 setConfigVar ('RACK_PRESELECT_THRESHOLD','1');
b108de49 803 setConfigVar ('DEFAULT_IPV4_RS_INSERVICE','no');
8dfb997c 804 setConfigVar ('AUTOPORTS_CONFIG','4 = 1*33*kvm + 2*24*eth%u;15 = 1*446*kvm');
194e3748
DO
805 setConfigVar ('SHOW_EXPLICIT_TAGS','yes');
806 setConfigVar ('SHOW_IMPLICIT_TAGS','yes');
807 setConfigVar ('SHOW_AUTOMATIC_TAGS','no');
a477e405 808 setConfigVar ('DEFAULT_OBJECT_TYPE','4');
2754cefc 809 setConfigVar ('IPV4_AUTO_RELEASE','1');
a53dc9df
DO
810 setConfigVar ('SHOW_LAST_TAB', 'no');
811 setConfigVar ('COOKIE_TTL', '1209600');
f0ed1181 812 setConfigVar ('EXT_IPV4_VIEW', 'yes');
efee2692 813 setConfigVar ('TREE_THRESHOLD', '25');
2be3fd23 814 setConfigVar ('IPV4_JAYWALK', 'no');
9318d2ef 815 setConfigVar ('ADDNEW_AT_TOP', 'yes');
64347dcf 816 setConfigVar ('IPV4_TREE_SHOW_USAGE', 'yes');
ebb5441d 817 return buildRedirectURL ('OK');
b07f617c
DO
818}
819
732e4578 820// Add single record.
ca461127
DO
821function addRealServer ()
822{
2c6c7645
DO
823 assertUIntArg ('pool_id', __FUNCTION__);
824 assertIPv4Arg ('remoteip', __FUNCTION__);
79a9edb4 825 assertStringArg ('rsport', __FUNCTION__, TRUE);
2c6c7645 826 assertStringArg ('rsconfig', __FUNCTION__, TRUE);
103b1e1e
DO
827 if (!addRStoRSPool (
828 $_REQUEST['pool_id'],
829 $_REQUEST['remoteip'],
830 $_REQUEST['rsport'],
831 getConfigVar ('DEFAULT_IPV4_RS_INSERVICE'),
832 $_REQUEST['rsconfig']
833 ))
ebb5441d 834 return buildRedirectURL ('ERR');
d6517a21 835 else
ebb5441d 836 return buildRedirectURL ('OK');
d6517a21
DO
837}
838
732e4578
DO
839// Parse textarea submitted and try adding a real server for each line.
840function addRealServers ()
841{
cbadbb38 842 assertUIntArg ('pool_id', __FUNCTION__);
2c6c7645
DO
843 assertStringArg ('format', __FUNCTION__);
844 assertStringArg ('rawtext', __FUNCTION__);
732e4578
DO
845 $rawtext = str_replace ('\r', '', $_REQUEST['rawtext']);
846 $ngood = $nbad = 0;
847 $rsconfig = '';
848 // Keep in mind, that the text will have HTML entities (namely '>') escaped.
849 foreach (explode ('\n', $rawtext) as $line)
850 {
851 if (empty ($line))
852 continue;
853 $match = array ();
854 switch ($_REQUEST['format'])
855 {
856 case 'ipvs_2': // address and port only
857 if (!preg_match ('/^ -&gt; ([0-9\.]+):([0-9]+) /', $line, $match))
858 continue;
103b1e1e 859 if (addRStoRSPool ($_REQUEST['pool_id'], $match[1], $match[2], getConfigVar ('DEFAULT_IPV4_RS_INSERVICE'), ''))
732e4578
DO
860 $ngood++;
861 else
862 $nbad++;
863 break;
864 case 'ipvs_3': // address, port and weight
865 if (!preg_match ('/^ -&gt; ([0-9\.]+):([0-9]+) +[a-zA-Z]+ +([0-9]+) /', $line, $match))
866 continue;
103b1e1e 867 if (addRStoRSPool ($_REQUEST['pool_id'], $match[1], $match[2], getConfigVar ('DEFAULT_IPV4_RS_INSERVICE'), 'weight ' . $match[3]))
732e4578
DO
868 $ngood++;
869 else
870 $nbad++;
871 break;
e69c2aa3
DO
872 case 'ssv_2': // IP address and port
873 if (!preg_match ('/^([0-9\.]+) ([0-9]+)$/', $line, $match))
874 continue;
103b1e1e 875 if (addRStoRSPool ($_REQUEST['pool_id'], $match[1], $match[2], getConfigVar ('DEFAULT_IPV4_RS_INSERVICE'), ''))
e69c2aa3
DO
876 $ngood++;
877 else
878 $nbad++;
879 break;
948c37e3
DO
880 case 'ssv_1': // IP address
881 if (!preg_match ('/^([0-9\.]+)$/', $line, $match))
882 continue;
883 if (addRStoRSPool ($_REQUEST['pool_id'], $match[1], 0, getConfigVar ('DEFAULT_IPV4_RS_INSERVICE'), ''))
884 $ngood++;
885 else
886 $nbad++;
887 break;
732e4578 888 default:
ebb5441d 889 return buildRedirectURL ('ERR1');
732e4578
DO
890 break;
891 }
892 }
893 if ($nbad == 0 and $ngood > 0)
ebb5441d 894 return buildRedirectURL ('OK', array ($ngood));
732e4578 895 else
ebb5441d 896 return buildRedirectURL ('ERR2', array ($ngood, $nbad));
732e4578
DO
897}
898
d6517a21
DO
899function addVService ()
900{
2c6c7645
DO
901 assertIPv4Arg ('vip', __FUNCTION__);
902 assertUIntArg ('vport', __FUNCTION__);
903 assertStringArg ('proto', __FUNCTION__);
103b1e1e 904 if ($_REQUEST['proto'] != 'TCP' and $_REQUEST['proto'] != 'UDP')
ebb5441d 905 return buildRedirectURL ('ERR1');
2c6c7645
DO
906 assertStringArg ('name', __FUNCTION__, TRUE);
907 assertStringArg ('vsconfig', __FUNCTION__, TRUE);
908 assertStringArg ('rsconfig', __FUNCTION__, TRUE);
c63a8d6e
DO
909 $error = commitCreateVS
910 (
103b1e1e
DO
911 $_REQUEST['vip'],
912 $_REQUEST['vport'],
7320b661 913 $_REQUEST['proto'],
103b1e1e
DO
914 $_REQUEST['name'],
915 $_REQUEST['vsconfig'],
c63a8d6e
DO
916 $_REQUEST['rsconfig'],
917 isset ($_REQUEST['taglist']) ? $_REQUEST['taglist'] : array()
918 );
919 if ($error != '')
ebb5441d 920 return buildRedirectURL ('ERR2', array ($error));
ca461127 921 else
ebb5441d 922 return buildRedirectURL ('OK');
fb1c4a54
DO
923}
924
925function deleteRealServer ()
926{
2c6c7645 927 assertUIntArg ('id', __FUNCTION__);
d6517a21 928 if (!commitDeleteRS ($_REQUEST['id']))
ebb5441d 929 return buildRedirectURL ('ERR');
fb1c4a54 930 else
ebb5441d 931 return buildRedirectURL ('OK');
fb1c4a54
DO
932}
933
3241551e
DO
934function deleteLoadBalancer ()
935{
2c6c7645
DO
936 assertUIntArg ('object_id', __FUNCTION__);
937 assertUIntArg ('pool_id', __FUNCTION__);
938 assertUIntArg ('vs_id', __FUNCTION__);
103b1e1e
DO
939 if (!commitDeleteLB (
940 $_REQUEST['object_id'],
941 $_REQUEST['pool_id'],
942 $_REQUEST['vs_id']
943 ))
ebb5441d 944 return buildRedirectURL ('ERR');
d6517a21 945 else
ebb5441d 946 return buildRedirectURL ('OK');
d6517a21
DO
947}
948
949function deleteVService ()
950{
e02e1941
DO
951 assertUIntArg ('vs_id', __FUNCTION__);
952 if (!commitDeleteVS ($_REQUEST['vs_id']))
ebb5441d 953 return buildRedirectURL ('ERR');
3241551e 954 else
ebb5441d 955 return buildRedirectURL ('OK');
3241551e
DO
956}
957
fb1c4a54
DO
958function updateRealServer ()
959{
2c6c7645
DO
960 assertUIntArg ('rs_id', __FUNCTION__);
961 assertIPv4Arg ('rsip', __FUNCTION__);
79a9edb4 962 assertStringArg ('rsport', __FUNCTION__, TRUE);
2c6c7645 963 assertStringArg ('rsconfig', __FUNCTION__, TRUE);
103b1e1e
DO
964 if (!commitUpdateRS (
965 $_REQUEST['rs_id'],
966 $_REQUEST['rsip'],
967 $_REQUEST['rsport'],
968 $_REQUEST['rsconfig']
969 ))
ebb5441d 970 return buildRedirectURL ('ERR');
fb1c4a54 971 else
ebb5441d 972 return buildRedirectURL ('OK');
ca461127
DO
973}
974
c1ca768c 975function updateLoadBalancer ()
3241551e 976{
2c6c7645
DO
977 assertUIntArg ('object_id', __FUNCTION__);
978 assertUIntArg ('pool_id', __FUNCTION__);
979 assertUIntArg ('vs_id', __FUNCTION__);
980 assertStringArg ('vsconfig', __FUNCTION__, TRUE);
981 assertStringArg ('rsconfig', __FUNCTION__, TRUE);
103b1e1e
DO
982 if (!commitUpdateLB (
983 $_REQUEST['object_id'],
984 $_REQUEST['pool_id'],
985 $_REQUEST['vs_id'],
986 $_REQUEST['vsconfig'],
987 $_REQUEST['rsconfig']
988 ))
ebb5441d 989 return buildRedirectURL ('ERR');
d6517a21 990 else
ebb5441d 991 return buildRedirectURL ('OK');
d6517a21
DO
992}
993
994function updateVService ()
995{
e02e1941 996 assertUIntArg ('vs_id', __FUNCTION__);
2c6c7645
DO
997 assertIPv4Arg ('vip', __FUNCTION__);
998 assertUIntArg ('vport', __FUNCTION__);
999 assertStringArg ('proto', __FUNCTION__);
1000 assertStringArg ('name', __FUNCTION__, TRUE);
1001 assertStringArg ('vsconfig', __FUNCTION__, TRUE);
1002 assertStringArg ('rsconfig', __FUNCTION__, TRUE);
103b1e1e
DO
1003 if (!commitUpdateVS (
1004 $_REQUEST['vs_id'],
1005 $_REQUEST['vip'],
1006 $_REQUEST['vport'],
1007 $_REQUEST['proto'],
1008 $_REQUEST['name'],
1009 $_REQUEST['vsconfig'],
1010 $_REQUEST['rsconfig']
1011 ))
ebb5441d 1012 return buildRedirectURL ('ERR');
3241551e 1013 else
ebb5441d 1014 return buildRedirectURL ('OK');
3241551e
DO
1015}
1016
1017function addLoadBalancer ()
1018{
2c6c7645
DO
1019 assertUIntArg ('pool_id', __FUNCTION__);
1020 assertUIntArg ('object_id', __FUNCTION__);
1021 assertUIntArg ('vs_id', __FUNCTION__);
1022 assertStringArg ('vsconfig', __FUNCTION__, TRUE);
1023 assertStringArg ('rsconfig', __FUNCTION__, TRUE);
103b1e1e
DO
1024 if (!addLBtoRSPool (
1025 $_REQUEST['pool_id'],
1026 $_REQUEST['object_id'],
1027 $_REQUEST['vs_id'],
1028 $_REQUEST['vsconfig'],
1029 $_REQUEST['rsconfig']
1030 ))
ebb5441d 1031 return buildRedirectURL ('ERR');
3241551e 1032 else
ebb5441d 1033 return buildRedirectURL ('OK');
3241551e
DO
1034}
1035
5ad76f01
DO
1036function addRSPool ()
1037{
2c6c7645
DO
1038 assertStringArg ('name', __FUNCTION__, TRUE);
1039 assertStringArg ('vsconfig', __FUNCTION__, TRUE);
1040 assertStringArg ('rsconfig', __FUNCTION__, TRUE);
c63a8d6e
DO
1041 $error = commitCreateRSPool
1042 (
103b1e1e
DO
1043 $_REQUEST['name'],
1044 $_REQUEST['vsconfig'],
c63a8d6e
DO
1045 $_REQUEST['rsconfig'],
1046 isset ($_REQUEST['taglist']) ? $_REQUEST['taglist'] : array()
1047 );
1048 if ($error != '')
ebb5441d 1049 return buildRedirectURL ('ERR', array ($error));
5ad76f01 1050 else
ebb5441d 1051 return buildRedirectURL ('OK');
5ad76f01
DO
1052}
1053
1054function deleteRSPool ()
1055{
2c6c7645 1056 assertUIntArg ('pool_id', __FUNCTION__);
841a7a7a 1057 if (!commitDeleteRSPool ($_REQUEST['pool_id']))
ebb5441d 1058 return buildRedirectURL ('ERR');
5ad76f01 1059 else
ebb5441d 1060 return buildRedirectURL ('OK');
5ad76f01
DO
1061}
1062
1063function updateRSPool ()
1064{
2c6c7645
DO
1065 assertUIntArg ('pool_id', __FUNCTION__);
1066 assertStringArg ('name', __FUNCTION__, TRUE);
1067 assertStringArg ('vsconfig', __FUNCTION__, TRUE);
1068 assertStringArg ('rsconfig', __FUNCTION__, TRUE);
841a7a7a 1069 if (!commitUpdateRSPool ($_REQUEST['pool_id'], $_REQUEST['name'], $_REQUEST['vsconfig'], $_REQUEST['rsconfig']))
ebb5441d 1070 return buildRedirectURL ('ERR');
5ad76f01 1071 else
ebb5441d 1072 return buildRedirectURL ('OK');
5ad76f01
DO
1073}
1074
1f7d18fa
DO
1075function updateRSInService ()
1076{
2c6c7645 1077 assertUIntArg ('rscount', __FUNCTION__);
841a7a7a 1078 $pool_id = $_REQUEST['pool_id'];
1f7d18fa
DO
1079 $orig = getRSPoolInfo ($pool_id);
1080 $nbad = $ngood = 0;
1081 for ($i = 1; $i <= $_REQUEST['rscount']; $i++)
1082 {
1083 $rs_id = $_REQUEST["rsid_${i}"];
1084 if (isset ($_REQUEST["inservice_${i}"]) and $_REQUEST["inservice_${i}"] == 'on')
1085 $newval = 'yes';
1086 else
1087 $newval = 'no';
1088 if ($newval != $orig['rslist'][$rs_id]['inservice'])
1089 {
1090 if (commitSetInService ($rs_id, $newval))
1091 $ngood++;
1092 else
1093 $nbad++;
1094 }
1095 }
1096 if (!$nbad)
ebb5441d 1097 return buildRedirectURL ('OK', array ($ngood));
1f7d18fa 1098 else
ebb5441d 1099 return buildRedirectURL ('ERR', array ($nbad, $ngood));
1f7d18fa
DO
1100}
1101
8d9c16e7
DO
1102// FIXME: check, that each submitted address belongs to the prefix we
1103// are operating on.
03eb5209
DO
1104function importPTRData ()
1105{
2c6c7645 1106 assertUIntArg ('addrcount', __FUNCTION__);
03eb5209 1107 $nbad = $ngood = 0;
03eb5209
DO
1108 for ($i = 0; $i < $_REQUEST['addrcount']; $i++)
1109 {
3f3bd41e 1110 $inputname = "import_${i}";
03eb5209
DO
1111 if (!isset ($_REQUEST[$inputname]) or $_REQUEST[$inputname] != 'on')
1112 continue;
2c6c7645
DO
1113 assertIPv4Arg ("addr_${i}", __FUNCTION__);
1114 assertStringArg ("descr_${i}", __FUNCTION__, TRUE);
1115 assertStringArg ("rsvd_${i}", __FUNCTION__);
3f3bd41e
DO
1116 // Non-existent addresses will not have this argument set in request.
1117 $rsvd = 'no';
03eb5209
DO
1118 if ($_REQUEST["rsvd_${i}"] == 'yes')
1119 $rsvd = 'yes';
3f3bd41e 1120 if (updateAddress ($_REQUEST["addr_${i}"], $_REQUEST["descr_${i}"], $rsvd) == '')
03eb5209
DO
1121 $ngood++;
1122 else
1123 $nbad++;
1124 }
1125 if (!$nbad)
ebb5441d 1126 return buildRedirectURL ('OK', array ($ngood));
03eb5209 1127 else
ebb5441d 1128 return buildRedirectURL ('ERR', array ($nbad, $ngood));
03eb5209
DO
1129}
1130
f3f0161f
DO
1131function generateAutoPorts ()
1132{
103b1e1e 1133 global $pageno;
2c6c7645 1134 assertUIntArg ('object_id', __FUNCTION__);
103b1e1e 1135 $info = getObjectInfo ($_REQUEST['object_id']);
f3f0161f 1136 // Navigate away in case of success, stay at the place otherwise.
103b1e1e 1137 if (executeAutoPorts ($_REQUEST['object_id'], $info['objtype_id']))
ebb5441d 1138 return buildRedirectURL ('OK', array(), $pageno, 'ports');
f3f0161f 1139 else
ebb5441d 1140 return buildRedirectURL ('ERR');
f3f0161f
DO
1141}
1142
24cbe8af 1143// Filter out implicit tags before storing the new tag set.
3355ca56 1144function saveEntityTags ()
24cbe8af 1145{
3355ca56
DO
1146 $page2realm = array
1147 (
e1ae3fb4
AD
1148 'file' => 'file',
1149 'ipv4net' => 'ipv4net',
3854af78 1150 'ipv4rspool' => 'ipv4rspool',
e1ae3fb4 1151 'ipv4vs' => 'ipv4vs',
3355ca56 1152 'object' => 'object',
3355ca56 1153 'rack' => 'rack',
3355ca56
DO
1154 'user' => 'user'
1155 );
1156 global $explicit_tags, $implicit_tags, $page, $pageno;
1157 if (!isset ($page2realm[$pageno]) or !isset ($page[$pageno]['bypass']))
1158 {
1159 showError ('Internal error', __FUNCTION__);
1160 die;
1161 }
1162 $realm = $page2realm[$pageno];
1163 $bypass = $page[$pageno]['bypass'];
2c6c7645 1164 assertUIntArg ($bypass, __FUNCTION__);
2034d968 1165 $entity_id = $_REQUEST[$bypass];
e04931c8 1166 $taglist = isset ($_REQUEST['taglist']) ? $_REQUEST['taglist'] : array();
6e49bd1f 1167 // Build a chain from the submitted data, minimize it,
ab379543 1168 // then wipe existing records and store the new set instead.
01b6b4d6 1169 destroyTagsForEntity ($realm, $entity_id);
6e49bd1f 1170 $newchain = getExplicitTagsOnly (buildTagChainFromIds ($taglist));
ab379543 1171 $n_succeeds = $n_errors = 0;
6e49bd1f 1172 foreach ($newchain as $taginfo)
eb6ea26f 1173 if (addTagForEntity ($realm, $entity_id, $taginfo['id']))
ab379543
DO
1174 $n_succeeds++;
1175 else
1176 $n_errors++;
ab379543 1177 if ($n_errors)
ebb5441d 1178 return buildRedirectURL ('ERR', array ($n_succeeds, $n_errors));
ab379543 1179 else
ebb5441d 1180 return buildRedirectURL ('OK', array ($n_succeeds));
2034d968
DO
1181}
1182
fe7044ad
DO
1183function destroyTag ()
1184{
49fb1027
DO
1185 assertUIntArg ('tag_id', __FUNCTION__);
1186 if (($ret = commitDestroyTag ($_REQUEST['tag_id'])) == '')
ebb5441d 1187 return buildRedirectURL ('OK');
fe7044ad 1188 else
ebb5441d 1189 return buildRedirectURL ('ERR');
fe7044ad
DO
1190}
1191
1192function createTag ()
1193{
49fb1027 1194 assertStringArg ('tag_name', __FUNCTION__);
2c6c7645 1195 assertUIntArg ('parent_id', __FUNCTION__, TRUE);
49fb1027 1196 $tagname = trim ($_REQUEST['tag_name']);
2eeeca80 1197 if (!validTagName ($tagname))
ebb5441d 1198 return buildRedirectURL ('ERR1', array ($tagname));
0f3c6639 1199 if (tagExistsInDatabase ($tagname))
ebb5441d 1200 return buildRedirectURL ('ERR2', array ($tagname));
fe7044ad
DO
1201 if (($parent_id = $_REQUEST['parent_id']) <= 0)
1202 $parent_id = 'NULL';
1203 if (($ret = commitCreateTag ($tagname, $parent_id)) == '')
ebb5441d 1204 return buildRedirectURL ('OK', array ($tagname));
fe7044ad 1205 else
33b76fd5 1206 return buildRedirectURL ('ERR3', array ($tagname, $ret));
fe7044ad
DO
1207}
1208
49fb1027
DO
1209function updateTag ()
1210{
49fb1027
DO
1211 assertUIntArg ('tag_id', __FUNCTION__);
1212 assertUIntArg ('parent_id', __FUNCTION__, TRUE);
1213 assertStringArg ('tag_name', __FUNCTION__);
1214 $tagname = trim ($_REQUEST['tag_name']);
2eeeca80 1215 if (!validTagName ($tagname))
33b76fd5 1216 return buildRedirectURL ('ERR1', array ($tagname));
49fb1027
DO
1217 if (($parent_id = $_REQUEST['parent_id']) <= 0)
1218 $parent_id = 'NULL';
1219 if (($ret = commitUpdateTag ($_REQUEST['tag_id'], $tagname, $parent_id)) == '')
ebb5441d 1220 return buildRedirectURL ('OK', array ($tagname));
49fb1027 1221 else
33b76fd5 1222 return buildRedirectURL ('ERR2', array ($tagname, $ret));
49fb1027
DO
1223}
1224
eb6ea26f
DO
1225function rollTags ()
1226{
eb6ea26f
DO
1227 assertUIntArg ('row_id', __FUNCTION__);
1228 assertStringArg ('sum', __FUNCTION__, TRUE);
1229 assertUIntArg ('realsum', __FUNCTION__);
eb6ea26f 1230 if ($_REQUEST['sum'] != $_REQUEST['realsum'])
ebb5441d 1231 return buildRedirectURL ('ERR');
abef7149
DO
1232 // Even if the user requested an empty tag list, don't bail out, but process existing
1233 // tag chains with "zero" extra. This will make sure, that the stuff processed will
1234 // have its chains refined to "normal" form.
1235 $extratags = isset ($_REQUEST['taglist']) ? $_REQUEST['taglist'] : array();
1236 $n_ok = 0;
1237 // Minimizing the extra chain early, so that tag rebuilder doesn't have to
1238 // filter out the same tag again and again. It will have own noise to cancel.
1239 $extrachain = getExplicitTagsOnly (buildTagChainFromIds ($extratags));
1240 foreach (getRacksForRow ($_REQUEST['row_id']) as $rackInfo)
1241 {
1242 if (rebuildTagChainForEntity ('rack', $rackInfo['id'], $extrachain))
1243 $n_ok++;
1244 foreach (stuffInRackspace (getRackData ($rackInfo['id'])) as $object_id)
1245 if (rebuildTagChainForEntity ('object', $object_id, $extrachain))
1246 $n_ok++;
1247 }
1248 return buildRedirectURL ('OK', array ($n_ok));
eb6ea26f
DO
1249}
1250
9457ca59 1251function changeMyPassword ()
cced6b7d 1252{
103b1e1e 1253 global $accounts, $remote_username;
9457ca59 1254 if (getConfigVar ('USER_AUTH_SRC') != 'database')
ebb5441d 1255 return buildRedirectURL ('ERR1');
0ac7e4b3
DO
1256 assertStringArg ('oldpassword', __FUNCTION__);
1257 assertStringArg ('newpassword1', __FUNCTION__);
1258 assertStringArg ('newpassword2', __FUNCTION__);
1259 if ($accounts[$remote_username]['user_password_hash'] != hash (PASSWORD_HASH, $_REQUEST['oldpassword']))
ebb5441d 1260 return buildRedirectURL ('ERR2');
cced6b7d 1261 if ($_REQUEST['newpassword1'] != $_REQUEST['newpassword2'])
ebb5441d 1262 return buildRedirectURL ('ERR3');
0ac7e4b3 1263 if (commitUpdateUserAccount ($accounts[$remote_username]['user_id'], $accounts[$remote_username]['user_name'], $accounts[$remote_username]['user_realname'], hash (PASSWORD_HASH, $_REQUEST['newpassword1'])))
ebb5441d 1264 return buildRedirectURL ('OK');
cced6b7d 1265 else
ebb5441d 1266 return buildRedirectURL ('ERR4');
cced6b7d
DO
1267}
1268
1269function saveRackCode ()
1270{
cced6b7d 1271 assertStringArg ('rackcode');
e6a4adb9
DO
1272 // For the test to succeed, unescape LFs, strip CRs.
1273 $newcode = str_replace ('\r', '', str_replace ('\n', "\n", $_REQUEST['rackcode']));
cf25e649
DO
1274 $parseTree = getRackCode ($newcode);
1275 if ($parseTree['result'] != 'ACK')
ebb5441d 1276 return buildRedirectURL ('ERR1', array ($parseTree['load']));
4a6a28f1 1277 saveScript ('RackCodeCache', '');
cf25e649 1278 if (saveScript ('RackCode', $newcode))
ebb5441d 1279 return buildRedirectURL ('OK');
cced6b7d 1280 else
ebb5441d 1281 return buildRedirectURL ('ERR2');
cced6b7d
DO
1282}
1283
46f92ff7
DO
1284// This handler's context is pre-built, but not authorized. It is assumed, that the
1285// handler will take existing context and before each commit check authorization
1286// on the base chain plus necessary context added.
1287function setPortVLAN ()
1288{
1289 assertUIntArg ('portcount', __FUNCTION__);
1290 $data = getSwitchVLANs ($_REQUEST['object_id']);
1291 if ($data === NULL)
ebb5441d 1292 return buildRedirectURL ('ERR1');
46f92ff7
DO
1293 list ($vlanlist, $portlist) = $data;
1294 // Here we just build up 1 set command for the gateway with all of the ports
1295 // included. The gateway is expected to filter unnecessary changes silently
1296 // and to provide a list of responses with either error or success message
1297 // for each of the rest.
1298 $nports = $_REQUEST['portcount'];
1299 $prefix = 'set ';
73067b6a 1300 $log = array ('v' => 2, 'm' => array());
46f92ff7
DO
1301 $setcmd = '';
1302 for ($i = 0; $i < $nports; $i++)
1303 if
1304 (
1305 !isset ($_REQUEST['portname_' . $i]) ||
1306 !isset ($_REQUEST['vlanid_' . $i]) ||
1307 $_REQUEST['portname_' . $i] != $portlist[$i]['portname']
1308 )
24dcb9d8 1309 $log['m'][] = array ('c' => 158, 'a' => array ($i));
46f92ff7
DO
1310 elseif
1311 (
1312 $_REQUEST['vlanid_' . $i] == $portlist[$i]['vlanid'] ||
1313 $portlist[$i]['vlaind'] == 'TRUNK'
1314 )
1315 continue;
1316 else
1317 {
1318 $portname = $_REQUEST['portname_' . $i];
1319 $oldvlanid = $portlist[$i]['vlanid'];
1320 $newvlanid = $_REQUEST['vlanid_' . $i];
1321 // Finish the security context and evaluate it.
1322 $annex = array();
1323 $annex[] = array ('tag' => '$fromvlan_' . $oldvlanid);
1324 $annex[] = array ('tag' => '$tovlan_' . $newvlanid);
1325 if (!permitted (NULL, NULL, NULL, $annex))
1326 {
24dcb9d8 1327 $log['m'][] = array ('c' => 159, 'a' => array ($portname, $oldvlanid, $newvlanid));
46f92ff7
DO
1328 continue;
1329 }
1330 $setcmd .= $prefix . $portname . '=' . $newvlanid;
1331 $prefix = ';';
1332 }
1333 // Feed the gateway and interpret its (non)response.
1334 if ($setcmd != '')
f0ff4930 1335 $log['m'] = array_merge ($log['m'], setSwitchVLANs ($_REQUEST['object_id'], $setcmd));
46f92ff7 1336 else
24dcb9d8 1337 $log['m'][] = array ('c' => 201);
46f92ff7
DO
1338 return buildWideRedirectURL ($log);
1339}
1340
2987fc1f
DO
1341function submitSLBConfig ()
1342{
1343 assertUIntArg ('object_id', __FUNCTION__);
1344 $newconfig = buildLVSConfig ($_REQUEST['object_id']);
3dd72e34 1345 $msglog = gwSendFile ($_REQUEST['object_id'], 'slbconfig', html_entity_decode ($newconfig, ENT_QUOTES, 'UTF-8'));
2987fc1f
DO
1346 return buildWideRedirectURL ($msglog);
1347}
1348
345fd640
AD
1349function addRow ()
1350{
1351 assertStringArg ('name', __FUNCTION__);
1352
1353 if (commitSupplementDictionary (3, $_REQUEST['name']) === TRUE)
1354 return buildRedirectURL ('OK', array ($_REQUEST['name']));
1355 else
1356 return buildRedirectURL ('ERR', array ($_REQUEST['name']));
1357}
1358
1359function updateRow ()
1360{
1361 assertUIntArg ('row_id', __FUNCTION__);
1362 assertStringArg ('name', __FUNCTION__);
1363
1364 if (TRUE === commitUpdateDictionary (3, $_REQUEST['row_id'], $_REQUEST['name']))
1365 return buildRedirectURL ('OK', array ($_REQUEST['name']));
1366 else
1367 return buildRedirectURL ('ERR', array ($_REQUEST['name']));
1368}
1369
f19c75d6
DO
1370function addRack ()
1371{
1372 assertUIntArg ('row_id', __FUNCTION__);
1373 $taglist = isset ($_REQUEST['taglist']) ? $_REQUEST['taglist'] : array();
1374 if (isset ($_REQUEST['got_data']))
1375 {
1376 assertStringArg ('rack_name', __FUNCTION__);
1377 assertUIntArg ('rack_height1', __FUNCTION__);
1378 assertStringArg ('rack_comment', __FUNCTION__, TRUE);
1379
1380 if (commitAddRack ($_REQUEST['rack_name'], $_REQUEST['rack_height1'], $_REQUEST['row_id'], $_REQUEST['rack_comment'], $taglist) === TRUE)
1381 return buildRedirectURL ('OK', array ($_REQUEST['rack_name']));
1382 else
1383 return buildRedirectURL ('ERR1', array ($_REQUEST['rack_name']));
1384 }
1385 elseif (isset ($_REQUEST['got_mdata']))
1386 {
1387 assertUIntArg ('rack_height2', __FUNCTION__);
1388 assertStringArg ('rack_names', __FUNCTION__, TRUE);
1389 $log = array ('v' => 2);
1390 // copy-and-paste from renderAddMultipleObjectsForm()
1391 $names1 = explode ('\n', $_REQUEST['rack_names']);
1392 $names2 = array();
1393 foreach ($names1 as $line)
1394 {
1395 $parts = explode ('\r', $line);
1396 reset ($parts);
1397 if (empty ($parts[0]))
1398 continue;
1399 else
1400 $names2[] = rtrim ($parts[0]);
1401 }
1402 foreach ($names2 as $cname)
1403 if (commitAddRack ($cname, $_REQUEST['rack_height2'], $_REQUEST['row_id'], '', $taglist) === TRUE)
1404 $log['m'][] = array ('c' => getMessageCode ('OK'), 'a' => array ($cname));
1405 else
1406 $log['m'][] = array ('c' => getMessageCode ('ERR1'), 'a' => array ($cname));
1407 return buildWideRedirectURL ($log);
1408 }
1409 else
1410 return buildRedirectURL ('ERR2');
f19c75d6
DO
1411}
1412
7056988c
DO
1413function updateRack ()
1414{
7056988c
DO
1415 assertUIntArg ('rack_id', __FUNCTION__);
1416 assertUIntArg ('rack_row_id', __FUNCTION__);
1417 assertUIntArg ('rack_height', __FUNCTION__);
1418 assertStringArg ('rack_name', __FUNCTION__);
1419 assertStringArg ('rack_comment', __FUNCTION__, TRUE);
7056988c 1420
7056988c 1421 resetThumbCache ($_REQUEST['rack_id']);
0c2b7c4a
DO
1422 if (TRUE === commitUpdateRack ($_REQUEST['rack_id'], $_REQUEST['rack_name'], $_REQUEST['rack_height'], $_REQUEST['rack_row_id'], $_REQUEST['rack_comment']))
1423 return buildRedirectURL ('OK', array ($_REQUEST['rack_name']));
1424 else
1425 return buildRedirectURL ('ERR');
7056988c
DO
1426}
1427
1428function querySNMPData ()
1429{
1430 assertUIntArg ('object_id', __FUNCTION__);
1431 assertStringArg ('community', __FUNCTION__);
83fdf85f 1432 return buildWideRedirectURL (doSNMPmining ($_REQUEST['object_id'], $_REQUEST['community']));
7056988c
DO
1433}
1434
e1ae3fb4
AD
1435// File-related functions
1436function addFileWithoutLink ()
1437{
1438 assertStringArg ('comment', __FUNCTION__, TRUE);
1439
1440 // Make sure the file can be uploaded
1441 if (get_cfg_var('file_uploads') != 1)
1442 return buildRedirectURL ('ERR', array ("file uploads not allowed, change 'file_uploads' parameter in php.ini"));
1443
1444 $fp = fopen($_FILES['file']['tmp_name'], 'rb');
1445 $error = commitAddFile ($_FILES['file']['name'], $_FILES['file']['type'], $_FILES['file']['size'], $fp, $_REQUEST['comment']);
1446
1447 if ($error != '')
1448 return buildRedirectURL ('ERR', array ($error));
1449
1450 return buildRedirectURL ('OK', array ($_FILES['file']['name']));
1451}
1452
1453function addFileToEntity ()
1454{
1455 assertStringArg ('entity_type', __FUNCTION__);
1456 assertUIntArg ('entity_id', __FUNCTION__);
1457 assertStringArg ('comment', __FUNCTION__, TRUE);
1458 if (empty ($_REQUEST['entity_type']) || empty ($_REQUEST['entity_id']))
1459 return buildRedirectURL ('ERR');
1460
1461 // Make sure the file can be uploaded
1462 if (get_cfg_var('file_uploads') != 1)
1463 return buildRedirectURL ('ERR', array ("file uploads not allowed, change 'file_uploads' parameter in php.ini"));
1464
1465 $fp = fopen($_FILES['file']['tmp_name'], 'rb');
1466 $error = commitAddFile ($_FILES['file']['name'], $_FILES['file']['type'], $_FILES['file']['size'], $fp, $_REQUEST['comment']);
1467 if ($error != '')
1468 return buildRedirectURL ('ERR', array ($error));
1469
1470 $file_id = lastInsertID();
1471 $error = commitLinkFile ($file_id, $_REQUEST['entity_type'], $_REQUEST['entity_id']);
1472 if ($error != '')
1473 return buildRedirectURL ('ERR', array ($error));
1474
1475 return buildRedirectURL ('OK', array ($_FILES['file']['name']));
1476}
1477
1478function linkFileToEntity ()
1479{
1480 assertUIntArg ('entity_id', __FUNCTION__);
1481 assertUIntArg ('file_id', __FUNCTION__);
1482 assertStringArg ('file_name', __FUNCTION__);
1483
1484 $error = commitLinkFile ($_REQUEST['file_id'], $_REQUEST['entity_type'], $_REQUEST['entity_id']);
1485 if ($error != '')
1486 return buildRedirectURL ('ERR', array ($error));
1487
1488 return buildRedirectURL ('OK', array ($_REQUEST['file_name']));
1489}
1490
1491function updateFile ()
1492{
1493 assertUIntArg ('file_id', __FUNCTION__);
1494 assertStringArg ('name', __FUNCTION__);
1495 assertStringArg ('comment', __FUNCTION__, TRUE);
1496 $error = commitUpdateFile ($_REQUEST['file_id'], $_REQUEST['comment']);
1497 if ($error != '')
1498 return buildRedirectURL ('ERR', array ($error));
1499
1500 return buildRedirectURL ('OK', array ($_REQUEST['name']));
1501}
1502
1503function unlinkFile ()
1504{
1505 assertUIntArg ('link_id', __FUNCTION__);
1506 $error = commitUnlinkFile ($_REQUEST['link_id']);
1507
1508 if ($error != '')
1509 return buildRedirectURL ('ERR', array ($error));
1510
1511 return buildRedirectURL ('OK', array ($_REQUEST['name']));
1512}
1513
1514function deleteFile ()
1515{
1516 assertUIntArg ('file_id', __FUNCTION__);
1517 $error = commitDeleteFile ($_REQUEST['file_id']);
1518
1519 if ($error != '')
1520 return buildRedirectURL ('ERR', array ($error));
1521
1522 return buildRedirectURL ('OK', array ($_REQUEST['name']));
1523}
1524
e673ee24 1525?>