Project

General

Profile

Download (8.63 KB) Statistics
| Branch: | Tag: | Revision:
1
<?php
2
/* $Id$ */
3
/*
4
	firewall_shaper_queues.php
5
	Copyright (C) 2004, 2005 Scott Ullrich
6
	Copyright (C) 2008 Ermal Lu?i
7
	All rights reserved.
8

    
9
	Redistribution and use in source and binary forms, with or without
10
	modification, are permitted provided that the following conditions are met:
11

    
12
	1. Redistributions of source code must retain the above copyright notice,
13
	   this list of conditions and the following disclaimer.
14

    
15
	2. Redistributions in binary form must reproduce the above copyright
16
	   notice, this list of conditions and the following disclaimer in the
17
	   documentation and/or other materials provided with the distribution.
18

    
19
	THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES,
20
	INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY
21
	AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
22
	AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY,
23
	OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
24
	SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
25
	INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
26
	CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
27
	ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
28
	POSSIBILITY OF SUCH DAMAGE.
29
*/
30

    
31
##|+PRIV
32
##|*IDENT=page-firewall-trafficshaper-queues
33
##|*NAME=Firewall: Traffic Shaper: Queues page
34
##|*DESCR=Allow access to the 'Firewall: Traffic Shaper: Queues' page.
35
##|*MATCH=firewall_shaper_queues.php*
36
##|-PRIV
37

    
38

    
39
require("guiconfig.inc");
40

    
41
if($_GET['reset'] <> "") {
42
	mwexec("killall -9 pfctl php");
43
	exit;
44
}
45

    
46
$shaperIFlist = get_configured_interface_with_descr();
47
read_altq_config();
48
$qlist =& get_unique_queue_list();
49

    
50
if (!is_array($qlist)) 
51
	$qlist = array();
52

    
53
$tree = "<ul class=\"tree\" >";
54
foreach ($qlist as $queue => $qkey) {
55
	$tree .= "<li><a href=\"firewall_shaper_queues.php?queue={$queue}&action=show\" >";
56
	if (isset($shaperIFlist[$queue]))
57
		$tree .= $shaperIFlist[$queue] . "</a></li>";
58
	else	
59
		$tree .= $queue . "</a></li>";
60
}
61
$tree .= "</ul>";
62

    
63
if ($_GET) {
64
	if ($_GET['queue'])
65
        	$qname = trim($_GET['queue']);
66
        if ($_GET['interface'])
67
                $interface = trim($_GET['interface']);
68
        if ($_GET['action'])
69
                $action = $_GET['action'];
70

    
71
	switch ($action) {
72
	case "delete":
73
			$altq =& $altq_list_queues[$interface];
74
			$qtmp =& $altq->find_queue("", $qname);
75
			if ($qtmp) {
76
				$qtmp->delete_queue(); 
77
				write_config();
78
				touch($d_shaperconfdirty_path);
79
			}
80
			header("Location: firewall_shaper_queues.php");
81
			exit;
82
		break;
83
	case "add":
84
			/* 
85
			 * XXX: WARNING: This returns the first it finds.
86
			 * Maybe the user expects something else?!
87
			 */
88
                        foreach ($altq_list_queues as $altq) {
89
                                $qtmp =& $altq->find_queue("", $qname);
90
                                if ($qtmp) {
91
                                        $copycfg = array();
92
                                        $qtmp->copy_queue($interface, &$copycfg);
93
                                        $aq =& $altq_list_queues[$interface];
94
					if ($qname == $qtmp->GetInterface()) {
95
                                                $config['shaper']['queue'][] = $copycfg;
96
                                        } else if ($aq) {
97
                                                $tmp1 =& $qtmp->find_parentqueue($interface, $qname);
98
                                                if ($tmp1) 
99
                                                        $tmp =& $aq->find_queue($interface, $tmp1->GetQname());
100

    
101
                                                if ($tmp)
102
                                                        $link =& get_reference_to_me_in_config($tmp->GetLink());
103
                                                else
104
                                                        $link =& get_reference_to_me_in_config($aq->GetLink());
105
                                                $link['queue'][] = $copycfg;
106
                                        } else {
107
                                                $newroot = array();
108
                                                $newroot['name'] = $interface;
109
                                                $newroot['interface'] = $interface;
110
                                                $newroot['scheduler'] = $altq->GetScheduler();
111
                                                $newroot['queue'] = array();
112
                                                $newroot['queue'][] = $copycfg;
113
                                                $config['shaper']['queue'][] = $newroot;
114
                                        }
115
                                        write_config();
116
                                        touch($d_shaperconfdirty_path);
117
                                        break;
118
                                }
119
                        }
120

    
121
			header("Location: firewall_shaper_queues.php?queue=".$qname."&action=show");
122
			exit;
123
		break;
124
	case "show":
125
                        foreach ($config['interfaces'] as $if => $ifdesc) {
126
                                $altq = $altq_list_queues[$if];
127
                                if ($altq) {
128
                                        $qtmp =& $altq->find_queue("", $qname);
129
                                        if ($qtmp)
130
                                                $output .= $qtmp->build_shortform();
131
                                        else
132
                                                $output .= build_iface_without_this_queue($if, $qname);
133
                                } else {
134
                                        if (!is_altq_capable($ifdesc['if']))
135
                                                continue;
136
                                        if (!isset($ifdesc['enable']) && $if != "lan" && $if != "wan")
137
                                                continue;
138
                                        $output .= build_iface_without_this_queue($if, $qname);
139
                                }
140
                        }
141
		break;
142
	}
143
}
144

    
145
if ($_POST['apply']) {
146
          write_config();
147

    
148
          $retval = 0;
149
         $savemsg = get_std_save_message($retval);
150
        /* Setup pf rules since the user may have changed the optimization value */
151

    
152
                        config_lock();
153
                        $retval = filter_configure();
154
                        config_unlock();
155
                        if (stristr($retval, "error") <> true)
156
                                $savemsg = get_std_save_message($retval);
157
                        else
158
                                $savemsg = $retval;
159

    
160
 		/* reset rrd queues */
161
                system("rm -f /var/db/rrd/*queuedrops.rrd");
162
                system("rm -f /var/db/rrd/*queues.rrd");
163
			enable_rrd_graphing();
164

    
165
            unlink($d_shaperconfdirty_path);
166
}
167

    
168
$pgtitle = "Firewall: Shaper: By Queues View";
169

    
170
include("head.inc");
171
?>
172
<link rel="stylesheet" type="text/css" media="all" href="./tree/tree.css" />
173
<script type="text/javascript" src="./tree/tree.js"></script>
174

    
175
<body link="#0000CC" vlink="#0000CC" alink="#0000CC">
176
<?php include("fbegin.inc"); ?>
177
<div id="inputerrors"></div>
178
<?php if ($input_errors) print_input_errors($input_errors); ?>
179
<form action="firewall_shaper_queues.php" method="post" name="iform" id="iform">
180
<?php if ($savemsg) print_info_box($savemsg); ?>
181
<?php if (file_exists($d_shaperconfdirty_path)): ?><p>
182
<?php print_info_box_np("The traffic shaper configuration has been changed.<br>You must apply the changes in order for them to take effect.");?><br>
183
<?php endif; ?>
184
<table width="100%" border="0" cellpadding="0" cellspacing="0">
185
  <tr><td>
186
<?php
187
	$tab_array = array();
188
	$tab_array[0] = array("By Interface", false, "firewall_shaper.php");
189
	$tab_array[1] = array("By Queue", true, "firewall_shaper_queues.php");
190
	$tab_array[2] = array("Limiter", false, "firewall_shaper_vinterface.php");
191
	$tab_array[3] = array("Layer7", false, "firewall_shaper_layer7.php");
192
	$tab_array[4] = array("Wizards", false, "firewall_shaper_wizards.php");
193
	display_top_tabs($tab_array);
194
?>
195
  </td></tr>
196
  <tr> 
197
    <td valign="top">
198
	<div id="mainarea">
199
		<table class="tabcont" width="100%" border="0" cellpadding="0" cellspacing="0">
200
		<tr>
201
		<td width="30%" valign="top" algin="left">
202
                <?      echo $tree; ?>
203
		</td>
204
		<td width="70%" valign="top" align="center">
205
			<? 
206
				if ($qname)
207
        				echo "<pr class=\"pgtitle\">" . $qname . "</pr><br />";
208
				echo "<table align=\"center\" class=\"tabcont\" width=\"80%\" border=\"0\" cellpadding=\"4\" cellspacing=\"0\">";
209
				echo $output;
210
				echo "</table>";
211
			?>	
212
			</td></tr>
213
			</table>
214

    
215
		      </td></tr>
216
		</div>
217
	  </td>
218
	</tr>
219
</table>
220
            </form>
221
<?php include("fend.inc"); 
222
?>
223
</body>
224
</html>
(61-61/214)