- </select>
- <td width='20%' align='right'>Quell-IP-Adresse: <img src='/blob.gif'>
- <td width='30%' align='left'><input type='text' name='SIP' maxlength='15' value='$outfwsettings{'SIP'}'>
- <tr><td width='50%' colspan='2'>
- <td width='20%' align='right'>Quell-MAC-Adresse: <img src='/blob.gif'>
- <td width='30%' align='left'><input type='text' name='SMAC' maxlength='23' value='$outfwsettings{'SMAC'}'>
- <tr><td width='20%' align='right'>Ziel-IP-Adresse: <img src='/blob.gif'>
- <td width='30%' align='left'><input type='text' name='DIP' maxlength='15' value='$outfwsettings{'DIP'}'>
- <td width='20%' align='right'>Ziel-Port: <img src='/blob.gif'>
- <td width='30%' align='left'><input type='text' name='DPORT' maxlength='11' value='$outfwsettings{'DPORT'}'>
- <tr><td colspan='4'>
- <tr><td width='40%' align='right' colspan='2'><img src='/blob.gif'> $Lang::tr{'this field may be blank'}
- <td width='60%' align='left' colspan='2'><input type='submit' name='ACTION' value=$Lang::tr{'add'}>
+ </optgroup>
+ </select>
+ </td>
+ <td align='right' colspan='4'><font color='red'>$Lang::tr{'outgoing firewall warning'}</font></td>
+ </tr>
+ <tr>
+ <td align='right' colspan='4' >$Lang::tr{'source ip or net'}<img src='/blob.gif' /></td>
+ <td align='left' colspan='4' ><input type='text' name='SIP' value='$outfwsettings{'SIP'}' /></td>
+ </tr>
+ <tr>
+ <td align='right' colspan='4' >$Lang::tr{'source'} $Lang::tr{'mac address'}: <img src='/blob.gif' />
+ <td align='left' colspan='4' ><input type='text' name='SMAC' maxlength='23' value='$outfwsettings{'SMAC'}' />
+ </tr>
+ <tr>
+ <td width='20%' align='right'>$Lang::tr{'logging'}:</td>
+ <td width='30%' align='left'>
+ <select name='LOG'>
+ <option value='$Lang::tr{'active'}' $selected{'LOG'}{$Lang::tr{'active'}}>$Lang::tr{'active'}</option>
+ <option value='$Lang::tr{'inactive'}' $selected{'LOG'}{$Lang::tr{'inactive'}}>$Lang::tr{'inactive'}</option>
+ </select>
+ </td>
+ <td width='20%' align='right' colspan='2' />
+ <td width='30%' align='left' colspan='2' />
+ <tr>
+ <td width='20%' align='right'>$Lang::tr{'destination ip or net'}: <img src='/blob.gif' /></td>
+ <td width='30%' align='left'><input type='text' name='DIP' value='$outfwsettings{'DIP'}' /></td>
+ <td width='20%' align='right' colspan='2'>$Lang::tr{'destination port'}(s) <img src='/blob.gif' /></td>
+ <td width='30%' align='left' colspan='2'><input type='text' name='DPORT' value='$outfwsettings{'DPORT'}' /></td>
+ </tr>
+ <tr>
+ <td width='20%' align='right'>$Lang::tr{'time'}:</td>
+ <td width='30%' align='left'>$Lang::tr{'advproxy monday'} $Lang::tr{'advproxy tuesday'} $Lang::tr{'advproxy wednesday'} $Lang::tr{'advproxy thursday'} $Lang::tr{'advproxy friday'} $Lang::tr{'advproxy saturday'} $Lang::tr{'advproxy sunday'}</td>
+ <td width='20%' align='right' colspan='2' />
+ <td width='15%' align='left'>$Lang::tr{'advproxy from'}</td>
+ <td width='15%' align='left'>$Lang::tr{'advproxy to'}</td>
+ </tr>
+ <tr>
+ <td width='20%' align='right'></td>
+ <td width='30%' align='left'>
+ <input type='checkbox' name='TIME_MON' $checked{'TIME_MON'}{'on'} />
+ <input type='checkbox' name='TIME_TUE' $checked{'TIME_TUE'}{'on'} />
+ <input type='checkbox' name='TIME_WED' $checked{'TIME_WED'}{'on'} />
+ <input type='checkbox' name='TIME_THU' $checked{'TIME_THU'}{'on'} />
+ <input type='checkbox' name='TIME_FRI' $checked{'TIME_FRI'}{'on'} />
+ <input type='checkbox' name='TIME_SAT' $checked{'TIME_SAT'}{'on'} />
+ <input type='checkbox' name='TIME_SUN' $checked{'TIME_SUN'}{'on'} />
+ </td>
+ <td width='20%' align='right' colspan='2' />
+ <td width='15%' align='left'>
+ <select name='TIME_FROM'>
+END
+;
+for (my $i=0;$i<=23;$i++) {
+ $i = sprintf("%02s",$i);
+ for (my $j=0;$j<=45;$j+=15) {
+ $j = sprintf("%02s",$j);
+ my $time = $i.":".$j;
+ print "\t\t\t\t\t<option $selected{'TIME_FROM'}{$time}>$i:$j</option>\n";
+ }
+}
+print <<END
+ </select>
+ </td>
+ <td width='15%' align='left'><select name='TIME_TO'>
+END
+;
+for (my $i=0;$i<=23;$i++) {
+ $i = sprintf("%02s",$i);
+ for (my $j=0;$j<=45;$j+=15) {
+ $j = sprintf("%02s",$j);
+ my $time = $i.":".$j;
+ print "\t\t\t\t\t<option $selected{'TIME_TO'}{$time}>$i:$j</option>\n";
+ }
+}
+print <<END
+ </select>
+ </td>
+ </tr>
+ <tr>
+ <td colspan='6' />
+ <tr>
+ <tr>
+ <td width='40%' align='right' colspan='2'><img src='/blob.gif' />$Lang::tr{'this field may be blank'}</td>
+ <td width='60%' align='left' colspan='4'><input type='submit' name='ACTION' value=$Lang::tr{'add'} /></td>