Project

General

Profile

Download (16.9 KB) Statistics
| Branch: | Tag: | Revision:
1 5b237745 Scott Ullrich
#!/usr/local/bin/php
2 9ae40f2b Scott Ullrich
<?php
3 b46bfcf5 Bill Marquette
/* $Id$ */
4 5b237745 Scott Ullrich
/*
5
	firewall_nat_edit.php
6
	part of m0n0wall (http://m0n0.ch/wall)
7 9ae40f2b Scott Ullrich
8 5b237745 Scott Ullrich
	Copyright (C) 2003-2004 Manuel Kasper <mk@neon1.net>.
9
	All rights reserved.
10 9ae40f2b Scott Ullrich
11 5b237745 Scott Ullrich
	Redistribution and use in source and binary forms, with or without
12
	modification, are permitted provided that the following conditions are met:
13 9ae40f2b Scott Ullrich
14 5b237745 Scott Ullrich
	1. Redistributions of source code must retain the above copyright notice,
15
	   this list of conditions and the following disclaimer.
16 9ae40f2b Scott Ullrich
17 5b237745 Scott Ullrich
	2. Redistributions in binary form must reproduce the above copyright
18
	   notice, this list of conditions and the following disclaimer in the
19
	   documentation and/or other materials provided with the distribution.
20 9ae40f2b Scott Ullrich
21 5b237745 Scott Ullrich
	THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES,
22
	INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY
23
	AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
24
	AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY,
25
	OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
26
	SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
27
	INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
28
	CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
29
	ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
30
	POSSIBILITY OF SUCH DAMAGE.
31
*/
32
33
require("guiconfig.inc");
34
35
if (!is_array($config['nat']['rule'])) {
36
	$config['nat']['rule'] = array();
37
}
38 e99989d8 Scott Ullrich
//nat_rules_sort();
39 5b237745 Scott Ullrich
$a_nat = &$config['nat']['rule'];
40
41
$id = $_GET['id'];
42
if (isset($_POST['id']))
43
	$id = $_POST['id'];
44
45 4a991889 Bill Marquette
if (isset($_GET['dup'])) {
46
        $id = $_GET['dup'];
47
        $after = $_GET['dup'];
48
}
49
50 5b237745 Scott Ullrich
if (isset($id) && $a_nat[$id]) {
51
	$pconfig['extaddr'] = $a_nat[$id]['external-address'];
52
	$pconfig['proto'] = $a_nat[$id]['protocol'];
53
	list($pconfig['beginport'],$pconfig['endport']) = explode("-", $a_nat[$id]['external-port']);
54
	$pconfig['localip'] = $a_nat[$id]['target'];
55
	$pconfig['localbeginport'] = $a_nat[$id]['local-port'];
56
	$pconfig['descr'] = $a_nat[$id]['descr'];
57
	$pconfig['interface'] = $a_nat[$id]['interface'];
58
	if (!$pconfig['interface'])
59
		$pconfig['interface'] = "wan";
60
} else {
61
	$pconfig['interface'] = "wan";
62
}
63
64 a6713b32 Bill Marquette
if (isset($_GET['dup']))
65
	unset($id);
66
67 5b237745 Scott Ullrich
if ($_POST) {
68
69
	if ($_POST['beginport_cust'] && !$_POST['beginport'])
70
		$_POST['beginport'] = $_POST['beginport_cust'];
71
	if ($_POST['endport_cust'] && !$_POST['endport'])
72
		$_POST['endport'] = $_POST['endport_cust'];
73
	if ($_POST['localbeginport_cust'] && !$_POST['localbeginport'])
74
		$_POST['localbeginport'] = $_POST['localbeginport_cust'];
75 9ae40f2b Scott Ullrich
76 5b237745 Scott Ullrich
	if (!$_POST['endport'])
77
		$_POST['endport'] = $_POST['beginport'];
78 9ae40f2b Scott Ullrich
79 5b237745 Scott Ullrich
	unset($input_errors);
80
	$pconfig = $_POST;
81
82
	/* input validation */
83
	$reqdfields = explode(" ", "interface proto beginport localip localbeginport");
84
	$reqdfieldsn = explode(",", "Interface,Protocol,Start port,NAT IP,Local port");
85 9ae40f2b Scott Ullrich
86 5b237745 Scott Ullrich
	do_input_validation($_POST, $reqdfields, $reqdfieldsn, &$input_errors);
87 9ae40f2b Scott Ullrich
88 0e6998d1 Scott Ullrich
	if (($_POST['beginport'] && !is_ipaddroralias($_POST['beginport']) && !is_port($_POST['beginport']))) {
89 5b237745 Scott Ullrich
		$input_errors[] = "The start port must be an integer between 1 and 65535.";
90
	}
91 0e6998d1 Scott Ullrich
	if (($_POST['endport'] && !is_ipaddroralias($_POST['endport']) && !is_port($_POST['endport']))) {
92 5b237745 Scott Ullrich
		$input_errors[] = "The end port must be an integer between 1 and 65535.";
93
	}
94 0e6998d1 Scott Ullrich
	if (($_POST['localbeginport'] && !is_ipaddroralias($_POST['localbeginport']) && !is_port($_POST['localbeginport']))) {
95 5b237745 Scott Ullrich
		$input_errors[] = "The local port must be an integer between 1 and 65535.";
96
	}
97
	if (($_POST['localip'] && !is_ipaddroralias($_POST['localip']))) {
98
		$input_errors[] = "A valid NAT IP address or host alias must be specified.";
99
	}
100 9ae40f2b Scott Ullrich
101 5b237745 Scott Ullrich
	if ($_POST['beginport'] > $_POST['endport']) {
102
		/* swap */
103
		$tmp = $_POST['endport'];
104
		$_POST['endport'] = $_POST['beginport'];
105
		$_POST['beginport'] = $tmp;
106
	}
107 9ae40f2b Scott Ullrich
108 5b237745 Scott Ullrich
	if (!$input_errors) {
109
		if (($_POST['endport'] - $_POST['beginport'] + $_POST['localbeginport']) > 65535)
110 629dd875 Bill Marquette
			$input_errors[] = "The target port range must be an integer between 1 and 65535.";
111 5b237745 Scott Ullrich
	}
112 9ae40f2b Scott Ullrich
113 5b237745 Scott Ullrich
	/* check for overlaps */
114
	foreach ($a_nat as $natent) {
115
		if (isset($id) && ($a_nat[$id]) && ($a_nat[$id] === $natent))
116
			continue;
117
		if ($natent['interface'] != $_POST['interface'])
118
			continue;
119
		if ($natent['external-address'] != $_POST['extaddr'])
120
			continue;
121 9ae40f2b Scott Ullrich
122 5b237745 Scott Ullrich
		list($begp,$endp) = explode("-", $natent['external-port']);
123
		if (!$endp)
124
			$endp = $begp;
125 9ae40f2b Scott Ullrich
126 5b237745 Scott Ullrich
		if (!(   (($_POST['beginport'] < $begp) && ($_POST['endport'] < $begp))
127
		      || (($_POST['beginport'] > $endp) && ($_POST['endport'] > $endp)))) {
128 9ae40f2b Scott Ullrich
129 5b237745 Scott Ullrich
			$input_errors[] = "The external port range overlaps with an existing entry.";
130
			break;
131
		}
132
	}
133
134
	if (!$input_errors) {
135
		$natent = array();
136
		if ($_POST['extaddr'])
137
			$natent['external-address'] = $_POST['extaddr'];
138
		$natent['protocol'] = $_POST['proto'];
139 9ae40f2b Scott Ullrich
140 5b237745 Scott Ullrich
		if ($_POST['beginport'] == $_POST['endport'])
141
			$natent['external-port'] = $_POST['beginport'];
142
		else
143
			$natent['external-port'] = $_POST['beginport'] . "-" . $_POST['endport'];
144 9ae40f2b Scott Ullrich
145 5b237745 Scott Ullrich
		$natent['target'] = $_POST['localip'];
146
		$natent['local-port'] = $_POST['localbeginport'];
147
		$natent['interface'] = $_POST['interface'];
148
		$natent['descr'] = $_POST['descr'];
149 9ae40f2b Scott Ullrich
150 5b237745 Scott Ullrich
		if (isset($id) && $a_nat[$id])
151
			$a_nat[$id] = $natent;
152 4a991889 Bill Marquette
		else {
153
			if (is_numeric($after))
154
				array_splice($a_nat, $after+1, 0, array($natent));
155
			else
156
				$a_nat[] = $natent;
157
		}
158 9ae40f2b Scott Ullrich
159 5b237745 Scott Ullrich
		touch($d_natconfdirty_path);
160 9ae40f2b Scott Ullrich
161 5b237745 Scott Ullrich
		if ($_POST['autoadd']) {
162
			/* auto-generate a matching firewall rule */
163 9ae40f2b Scott Ullrich
			$filterent = array();
164 5b237745 Scott Ullrich
			$filterent['interface'] = $_POST['interface'];
165
			$filterent['protocol'] = $_POST['proto'];
166
			$filterent['source']['any'] = "";
167
			$filterent['destination']['address'] = $_POST['localip'];
168 9ae40f2b Scott Ullrich
169 5b237745 Scott Ullrich
			$dstpfrom = $_POST['localbeginport'];
170
			$dstpto = $dstpfrom + $_POST['endport'] - $_POST['beginport'];
171 9ae40f2b Scott Ullrich
172 5b237745 Scott Ullrich
			if ($dstpfrom == $dstpto)
173
				$filterent['destination']['port'] = $dstpfrom;
174
			else
175
				$filterent['destination']['port'] = $dstpfrom . "-" . $dstpto;
176 9ae40f2b Scott Ullrich
177 5b237745 Scott Ullrich
			$filterent['descr'] = "NAT " . $_POST['descr'];
178 9ae40f2b Scott Ullrich
179 5b237745 Scott Ullrich
			$config['filter']['rule'][] = $filterent;
180 9ae40f2b Scott Ullrich
181 5b237745 Scott Ullrich
			touch($d_filterconfdirty_path);
182
		}
183 9ae40f2b Scott Ullrich
184 5b237745 Scott Ullrich
		write_config();
185 9ae40f2b Scott Ullrich
186 5b237745 Scott Ullrich
		header("Location: firewall_nat.php");
187
		exit;
188
	}
189
}
190 da7ae7ef Bill Marquette
191
$pgtitle = "Firewall: NAT: Edit inbound";
192
include("head.inc");
193
194 5b237745 Scott Ullrich
?>
195 da7ae7ef Bill Marquette
196 5b237745 Scott Ullrich
<script language="JavaScript">
197
<!--
198
function ext_change() {
199
	if (document.iform.beginport.selectedIndex == 0) {
200
		document.iform.beginport_cust.disabled = 0;
201
	} else {
202
		document.iform.beginport_cust.value = "";
203
		document.iform.beginport_cust.disabled = 1;
204
	}
205
	if (document.iform.endport.selectedIndex == 0) {
206
		document.iform.endport_cust.disabled = 0;
207
	} else {
208
		document.iform.endport_cust.value = "";
209
		document.iform.endport_cust.disabled = 1;
210
	}
211
	if (document.iform.localbeginport.selectedIndex == 0) {
212
		document.iform.localbeginport_cust.disabled = 0;
213
	} else {
214
		document.iform.localbeginport_cust.value = "";
215
		document.iform.localbeginport_cust.disabled = 1;
216
	}
217
}
218
function ext_rep_change() {
219
	document.iform.endport.selectedIndex = document.iform.beginport.selectedIndex;
220
	document.iform.localbeginport.selectedIndex = document.iform.beginport.selectedIndex;
221
}
222
//-->
223
</script>
224
</head>
225
226
<body link="#0000CC" vlink="#0000CC" alink="#0000CC">
227
<?php include("fbegin.inc"); ?>
228 da7ae7ef Bill Marquette
<p class="pgtitle"><?=$pgtitle?></p>
229 5b237745 Scott Ullrich
<?php if ($input_errors) print_input_errors($input_errors); ?>
230
            <form action="firewall_nat_edit.php" method="post" name="iform" id="iform">
231
              <table width="100%" border="0" cellpadding="6" cellspacing="0">
232
			  	<tr>
233
                  <td width="22%" valign="top" class="vncellreq">Interface</td>
234
                  <td width="78%" class="vtable">
235
					<select name="interface" class="formfld">
236
						<?php
237 b1f66041 Scott Ullrich
						$interfaces = array('wan' => 'WAN', 'lan' => 'LAN', 'pptp' => 'PPTP');
238 5b237745 Scott Ullrich
						for ($i = 1; isset($config['interfaces']['opt' . $i]); $i++) {
239
							$interfaces['opt' . $i] = $config['interfaces']['opt' . $i]['descr'];
240
						}
241
						foreach ($interfaces as $iface => $ifacename): ?>
242
						<option value="<?=$iface;?>" <?php if ($iface == $pconfig['interface']) echo "selected"; ?>>
243
						<?=htmlspecialchars($ifacename);?>
244
						</option>
245
						<?php endforeach; ?>
246
					</select><br>
247
                     <span class="vexpl">Choose which interface this rule applies to.<br>
248
                     Hint: in most cases, you'll want to use WAN here.</span></td>
249
                </tr>
250 9ae40f2b Scott Ullrich
			    <tr>
251 5b237745 Scott Ullrich
                  <td width="22%" valign="top" class="vncellreq">External address</td>
252 9ae40f2b Scott Ullrich
                  <td width="78%" class="vtable">
253 5b237745 Scott Ullrich
                    <select name="extaddr" class="formfld">
254
					  <option value="" <?php if (!$pconfig['extaddr']) echo "selected"; ?>>Interface address</option>
255
                      <?php
256
					  if (is_array($config['nat']['servernat'])):
257
						  foreach ($config['nat']['servernat'] as $sn): ?>
258
                      <option value="<?=$sn['ipaddr'];?>" <?php if ($sn['ipaddr'] == $pconfig['extaddr']) echo "selected"; ?>><?=htmlspecialchars("{$sn['ipaddr']} ({$sn['descr']})");?></option>
259
                      <?php endforeach; endif; ?>
260 857d33cf Bill Marquette
		      <option value="any" <?php if($pconfig['extaddr'] == "any") echo "selected"; ?>>any</option>
261 5b237745 Scott Ullrich
                    </select><br>
262
                    <span class="vexpl">
263
					If you want this rule to apply to another IP address than the IP address of the interface chosen above,
264
					select it here (you need to define IP addresses on the
265 9559099b Scott Ullrich
					<a href="firewall_nat_server.php">Server NAT</a> page first).  Also note that if you are trying to redirect connections on the LAN select the "any" option.</span></td>
266 5b237745 Scott Ullrich
                </tr>
267 9ae40f2b Scott Ullrich
                <tr>
268 5b237745 Scott Ullrich
                  <td width="22%" valign="top" class="vncellreq">Protocol</td>
269 9ae40f2b Scott Ullrich
                  <td width="78%" class="vtable">
270 5b237745 Scott Ullrich
                    <select name="proto" class="formfld">
271
                      <?php $protocols = explode(" ", "TCP UDP TCP/UDP"); foreach ($protocols as $proto): ?>
272
                      <option value="<?=strtolower($proto);?>" <?php if (strtolower($proto) == $pconfig['proto']) echo "selected"; ?>><?=htmlspecialchars($proto);?></option>
273
                      <?php endforeach; ?>
274 9ae40f2b Scott Ullrich
                    </select> <br> <span class="vexpl">Choose which IP protocol
275 5b237745 Scott Ullrich
                    this rule should match.<br>
276
                    Hint: in most cases, you should specify <em>TCP</em> &nbsp;here.</span></td>
277
                </tr>
278 9ae40f2b Scott Ullrich
                <tr>
279
                  <td width="22%" valign="top" class="vncellreq">External port
280 5b237745 Scott Ullrich
                    range </td>
281 9ae40f2b Scott Ullrich
                  <td width="78%" class="vtable">
282 5b237745 Scott Ullrich
                    <table border="0" cellspacing="0" cellpadding="0">
283 9ae40f2b Scott Ullrich
                      <tr>
284 5b237745 Scott Ullrich
                        <td>from:&nbsp;&nbsp;</td>
285
                        <td><select name="beginport" class="formfld" onChange="ext_rep_change();ext_change()">
286
                            <option value="">(other)</option>
287
                            <?php $bfound = 0; foreach ($wkports as $wkport => $wkportdesc): ?>
288
                            <option value="<?=$wkport;?>" <?php if ($wkport == $pconfig['beginport']) {
289 0e6998d1 Scott Ullrich
								echo "selected";
290
								$bfound = 1;
291
							}?>>
292 5b237745 Scott Ullrich
							<?=htmlspecialchars($wkportdesc);?>
293
							</option>
294
                            <?php endforeach; ?>
295 2a757c24 Scott Ullrich
                          </select> <input autocomplete='off' onblur='actb_removedisp()' onkeypress='return (event.keyCode!=13);' onkeydown='actb_checkkey(event, this)' onkeyup='actb_tocomplete(this,event,addressarray);'  class="formfldalias" name="beginport_cust" type="text" size="5" value="<?php if (!$bfound) echo $pconfig['beginport']; ?>"></td>
296 5b237745 Scott Ullrich
                      </tr>
297 9ae40f2b Scott Ullrich
                      <tr>
298 5b237745 Scott Ullrich
                        <td>to:</td>
299
                        <td><select name="endport" class="formfld" onChange="ext_change()">
300
                            <option value="">(other)</option>
301
                            <?php $bfound = 0; foreach ($wkports as $wkport => $wkportdesc): ?>
302
                            <option value="<?=$wkport;?>" <?php if ($wkport == $pconfig['endport']) {
303 0e6998d1 Scott Ullrich
								echo "selected";
304
								$bfound = 1;
305
							}?>>
306 5b237745 Scott Ullrich
							<?=htmlspecialchars($wkportdesc);?>
307
							</option>
308
							<?php endforeach; ?>
309 2a757c24 Scott Ullrich
                          </select> <input class="formfldalias"  autocomplete='off' onblur='actb_removedisp()' onkeypress='return (event.keyCode!=13);' onkeydown='actb_checkkey(event, this)' onkeyup='actb_tocomplete(this,event,addressarray);' name="endport_cust" type="text" size="5" value="<?php if (!$bfound) echo $pconfig['endport']; ?>"></td>
310 5b237745 Scott Ullrich
                      </tr>
311
                    </table>
312 9ae40f2b Scott Ullrich
                    <br> <span class="vexpl">Specify the port or port range on
313 5b237745 Scott Ullrich
                    the firewall's external address for this mapping.<br>
314 9ae40f2b Scott Ullrich
                    Hint: you can leave the <em>'to'</em> field empty if you only
315 5b237745 Scott Ullrich
                    want to map a single port</span></td>
316
                </tr>
317 9ae40f2b Scott Ullrich
                <tr>
318 5b237745 Scott Ullrich
                  <td width="22%" valign="top" class="vncellreq">NAT IP</td>
319 9ae40f2b Scott Ullrich
                  <td width="78%" class="vtable">
320
                    <input autocomplete='off' onblur='actb_removedisp()' onkeypress='return (event.keyCode!=13);' onkeydown='actb_checkkey(event, this)' onkeyup='actb_tocomplete(this,event,addressarray);' name="localip" type="text" class="formfldalias" id="localip" size="20" value="<?=htmlspecialchars($pconfig['localip']);?>">
321
                    <br> <span class="vexpl">Enter the internal IP address of
322 5b237745 Scott Ullrich
                    the server on which you want to map the ports.<br>
323
                    e.g. <em>192.168.1.12</em></span></td>
324
                </tr>
325 9ae40f2b Scott Ullrich
                <tr>
326 5b237745 Scott Ullrich
                  <td width="22%" valign="top" class="vncellreq">Local port</td>
327 9ae40f2b Scott Ullrich
                  <td width="78%" class="vtable">
328 5b237745 Scott Ullrich
                    <select name="localbeginport" class="formfld" onChange="ext_change()">
329
                      <option value="">(other)</option>
330
                      <?php $bfound = 0; foreach ($wkports as $wkport => $wkportdesc): ?>
331
                      <option value="<?=$wkport;?>" <?php if ($wkport == $pconfig['localbeginport']) {
332 0e6998d1 Scott Ullrich
							echo "selected";
333
							$bfound = 1;
334
						}?>>
335 5b237745 Scott Ullrich
					  <?=htmlspecialchars($wkportdesc);?>
336
					  </option>
337
                      <?php endforeach; ?>
338 0e6998d1 Scott Ullrich
                    </select> <input  autocomplete='off' onblur='actb_removedisp()' onkeypress='return (event.keyCode!=13);' onkeydown='actb_checkkey(event, this)' onkeyup='actb_tocomplete(this,event,addressarray);' class="formfldalias" name="localbeginport_cust" type="text" size="5" value="<?php if (!$bfound) echo $pconfig['localbeginport']; ?>">
339 5b237745 Scott Ullrich
                    <br>
340 9ae40f2b Scott Ullrich
                    <span class="vexpl">Specify the port on the machine with the
341
                    IP address entered above. In case of a port range, specify
342
                    the beginning port of the range (the end port will be calculated
343 5b237745 Scott Ullrich
                    automatically).<br>
344
                    Hint: this is usually identical to the 'from' port above</span></td>
345
                </tr>
346 9ae40f2b Scott Ullrich
                <tr>
347 5b237745 Scott Ullrich
                  <td width="22%" valign="top" class="vncell">Description</td>
348 9ae40f2b Scott Ullrich
                  <td width="78%" class="vtable">
349
                    <input name="descr" type="text" class="formfld" id="descr" size="40" value="<?=htmlspecialchars($pconfig['descr']);?>">
350
                    <br> <span class="vexpl">You may enter a description here
351 5b237745 Scott Ullrich
                    for your reference (not parsed).</span></td>
352 4a991889 Bill Marquette
                </tr><?php if ((!(isset($id) && $a_nat[$id])) || (isset($_GET['dup']))): ?>
353 9ae40f2b Scott Ullrich
                <tr>
354 5b237745 Scott Ullrich
                  <td width="22%" valign="top">&nbsp;</td>
355 9ae40f2b Scott Ullrich
                  <td width="78%">
356 5b237745 Scott Ullrich
                    <input name="autoadd" type="checkbox" id="autoadd" value="yes">
357 9ae40f2b Scott Ullrich
                    <strong>Auto-add a firewall rule to permit traffic through
358 5b237745 Scott Ullrich
                    this NAT rule</strong></td>
359
                </tr><?php endif; ?>
360 9ae40f2b Scott Ullrich
                <tr>
361 5b237745 Scott Ullrich
                  <td width="22%" valign="top">&nbsp;</td>
362 9ae40f2b Scott Ullrich
                  <td width="78%">
363 fc01e414 Scott Ullrich
                    <input name="Submit" type="submit" class="formbtn" value="Save"> <input type="button" class="formbtn" value="Cancel" onclick="history.back()">
364 5b237745 Scott Ullrich
                    <?php if (isset($id) && $a_nat[$id]): ?>
365 9ae40f2b Scott Ullrich
                    <input name="id" type="hidden" value="<?=$id;?>">
366 5b237745 Scott Ullrich
                    <?php endif; ?>
367
                  </td>
368
                </tr>
369
              </table>
370
</form>
371
<script language="JavaScript">
372
<!--
373
ext_change();
374
//-->
375
</script>
376 9ae40f2b Scott Ullrich
<?php
377
$isfirst = 0;
378
$aliases = "";
379
$addrisfirst = 0;
380
$aliasesaddr = "";
381 b964717d Scott Ullrich
if($config['aliases']['alias'] <> "")
382
	foreach($config['aliases']['alias'] as $alias_name) {
383
		if(!stristr($alias_name['address'], ".")) {
384
			if($isfirst == 1) $aliases .= ",";
385
			$aliases .= "'" . $alias_name['name'] . "'";
386
			$isfirst = 1;
387
		} else {
388
			if($addrisfirst == 1) $aliasesaddr .= ",";
389
			$aliasesaddr .= "'" . $alias_name['name'] . "'";
390
			$addrisfirst = 1;
391
		}
392 9ae40f2b Scott Ullrich
	}
393
?>
394
<script language="JavaScript">
395
<!--
396
var addressarray=new Array(<?php echo $aliasesaddr; ?>);
397
var customarray=new Array(<?php echo $aliases; ?>);
398
//-->
399
</script>
400
<script type="text/javascript" language="javascript" src="auto_complete_helper.js">
401
</script>
402 5b237745 Scott Ullrich
<?php include("fend.inc"); ?>
403
</body>
404
</html>