1 | <?php
|
---|
2 |
|
---|
3 | die();
|
---|
4 |
|
---|
5 | //$SessionDisable = true;
|
---|
6 | include('../global.php');
|
---|
7 |
|
---|
8 | class Renumbering extends Page
|
---|
9 | {
|
---|
10 | var $FullTitle = 'Rozeslání mailů s heslem';
|
---|
11 | var $ShortTitle = 'Rozeslání mailů';
|
---|
12 |
|
---|
13 | var $SubnetTable = array(
|
---|
14 | 1 => array('AddressRange' => '10.145.64.0', 'Mask' => 25),
|
---|
15 | 2 => array('AddressRange' => '10.145.65.0', 'Mask' => 24),
|
---|
16 | 3 => array('AddressRange' => '10.145.64.128', 'Mask' => 25),
|
---|
17 | 4 => array('AddressRange' => '10.145.66.128', 'Mask' => 27),
|
---|
18 | 5 => array('AddressRange' => '10.145.66.192', 'Mask' => 27),
|
---|
19 | 6 => array('AddressRange' => '10.145.66.224', 'Mask' => 29),
|
---|
20 | 7 => array('AddressRange' => '10.145.64.232', 'Mask' => 29),
|
---|
21 | 8 => array('AddressRange' => '10.145.67.8', 'Mask' => 29),
|
---|
22 | 9 => array('AddressRange' => '10.145.67.0', 'Mask' => 29),
|
---|
23 | 10 => array('AddressRange' => '10.145.67.16', 'Mask' => 29),
|
---|
24 | 11 => array('AddressRange' => '10.145.67.24', 'Mask' => 29),
|
---|
25 | 12 => array('AddressRange' => '10.145.66.240', 'Mask' => 30),
|
---|
26 | 13 => array('AddressRange' => '10.145.66.244', 'Mask' => 30),
|
---|
27 | 14 => array('AddressRange' => '10.145.66.248', 'Mask' => 30),
|
---|
28 | 15 => array('AddressRange' => '10.145.66.0', 'Mask' => 30),
|
---|
29 | 16 => array('AddressRange' => '10.145.66.160', 'Mask' => 27),
|
---|
30 | );
|
---|
31 |
|
---|
32 | function Show()
|
---|
33 | {
|
---|
34 | global $Config;
|
---|
35 |
|
---|
36 | $Output = '';
|
---|
37 |
|
---|
38 | $DbResult = $this->Database->query('SELECT * FROM NetworkSubnet WHERE CompareNetworkPrefix(INET_ATON("192.168.0.0"), INET_ATON(AddressRange), 16)');
|
---|
39 | $Output .= 'UPDATE NetworkInterface SET CZFreeIP = LocalIP<br>';
|
---|
40 | while($Subnet = $DbResult->fetch_assoc())
|
---|
41 | {
|
---|
42 | $Output .= '-- Podsíť '.$Subnet['Name'].': '.$Subnet['AddressRange'].'/'.$Subnet['Mask'].' => '.$this->SubnetTable[$Subnet['Id']]['AddressRange'].'/'.$this->SubnetTable[$Subnet['Id']]['Mask'].'<br>';
|
---|
43 | $DbResult2 = $this->Database->query('SELECT NetworkInterface.Id, NetworkInterface.LocalIP, NetworkDevice.Name FROM NetworkInterface JOIN NetworkDevice ON NetworkDevice.Id = NetworkInterface.Device WHERE CompareNetworkPrefix(INET_ATON(NetworkInterface.LocalIP), INET_ATON("'.$Subnet['AddressRange'].'"), '.$Subnet['Mask'].') ORDER BY NetworkInterface.LocalIP');
|
---|
44 | $NextIP = IPv4ToInt32($this->SubnetTable[$Subnet['Id']]['AddressRange']) + 1;
|
---|
45 | while($Interface = $DbResult2->fetch_assoc())
|
---|
46 | {
|
---|
47 | $Output .= '-- '.$Interface['Name'].': '.$Interface['LocalIP'].' => '.Int32ToIPv4($NextIP).'<br>';
|
---|
48 | $Output .= 'UPDATE NetworkInterface SET LocalIP = "'.Int32ToIPv4($NextIP).'" WHERE Id='.$Interface['Id'].';<br>';
|
---|
49 | $NextIP++;
|
---|
50 | }
|
---|
51 | $Output .= '<hr>';
|
---|
52 | }
|
---|
53 | return($Output);
|
---|
54 | }
|
---|
55 | }
|
---|
56 |
|
---|
57 | $System->AddModule(new Renumbering($System));
|
---|
58 | $System->Modules['Renumbering']->GetOutput();
|
---|