#!/usr/bin/perl
-#
-# SmoothWall CGIs
-#
-# This code is distributed under the terms of the GPL
-#
-# (c) The SmoothWall Team
-#
-# $Id: modem.cgi,v 1.4.2.7 2005/02/22 22:21:56 gespinasse Exp $
-#
+###############################################################################
+# #
+# IPFire.org - A linux based firewall #
+# Copyright (C) 2007 Michael Tremer & Christian Schmidt #
+# #
+# This program is free software: you can redistribute it and/or modify #
+# it under the terms of the GNU General Public License as published by #
+# the Free Software Foundation, either version 3 of the License, or #
+# (at your option) any later version. #
+# #
+# This program is distributed in the hope that it will be useful, #
+# but WITHOUT ANY WARRANTY; without even the implied warranty of #
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the #
+# GNU General Public License for more details. #
+# #
+# You should have received a copy of the GNU General Public License #
+# along with this program. If not, see <http://www.gnu.org/licenses/>. #
+# #
+###############################################################################
use strict;
print <<END
<table width='100%'>
<tr>
- <td width='25%' class='base'>$Lang::tr{'init string'} <img src='/blob.gif' alt='*' /></td>
+ <td width='25%' class='base'>$Lang::tr{'init string'}</td>
<td width='25%'><input type='text' name='INIT' value='$modemsettings{'INIT'}' /></td>
- <td width='25%' class='base'>$Lang::tr{'hangup string'} <img src='/blob.gif' alt='*' /></td>
+ <td width='25%' class='base'>$Lang::tr{'hangup string'}</td>
<td width='25%'><input type='text' name='HANGUP' value='$modemsettings{'HANGUP'}' /></td>
</tr>
<tr>
- <td class='base'>$Lang::tr{'speaker on'} <img src='/blob.gif' alt='*' /></td>
+ <td class='base'>$Lang::tr{'speaker on'}</td>
<td><input type='text' name='SPEAKER_ON' value='$modemsettings{'SPEAKER_ON'}' /></td>
- <td class='base'>$Lang::tr{'speaker off'} <img src='/blob.gif' alt='*' /></td>
+ <td class='base'>$Lang::tr{'speaker off'}</td>
<td><input type='text' name='SPEAKER_OFF' value='$modemsettings{'SPEAKER_OFF'}' /></td>
</tr>
<tr>
- <td class='base'>$Lang::tr{'tone dial'} <img src='/blob.gif' alt='*' /></td>
+ <td class='base'>$Lang::tr{'tone dial'}</td>
<td><input type='text' name='TONE_DIAL' value='$modemsettings{'TONE_DIAL'}' /></td>
- <td class='base'>$Lang::tr{'pulse dial'} <img src='/blob.gif' alt='*' /></td>
+ <td class='base'>$Lang::tr{'pulse dial'}</td>
<td><input type='text' name='PULSE_DIAL' value='$modemsettings{'PULSE_DIAL'}' /></td>
</tr>
<tr>
- <td class='base'>$Lang::tr{'connect timeout'}</td>
+ <td class='base'>$Lang::tr{'connect timeout'} <img src='/blob.gif' alt='*' /></td>
<td><input type='text' name='TIMEOUT' value='$modemsettings{'TIMEOUT'}' /></td>
<td class='base'> </td>
<td> </td>
<hr />
<tr>
<td width='33%'>
- <img src='/blob.gif' align='top' alt='*' />
- <font class='base'>$Lang::tr{'this field may be blank'}</font>
+ <img src='/blob.gif' align='top' alt='*' /> <font class='base'>$Lang::tr{'required field'}</font>
</td>
<td width='33%' align='center'>
<input type='submit' name='ACTION' value='$Lang::tr{'restore defaults'}' />