]>
git.ipfire.org Git - people/pmueller/ipfire-2.x.git/blob - html/cgi-bin/tripwire.cgi
d33fa33add996267a1d3c023890c2a8152277e49
5 # This code is distributed under the terms of the GPL
10 # enable only the following on debugging purpose
12 use CGI
::Carp
'fatalsToBrowser';
14 require '/var/ipfire/general-functions.pl';
15 require "${General::swroot}/lang.pl";
16 require "${General::swroot}/header.pl";
18 my %tripwiresettings = ();
22 my $errormessage = "";
23 my @Logs = qx(ls
-r
/var/ipfire
/tripwire/report
/);
24 my $file = `ls -tr /var/ipfire/tripwire/report/ | tail -1`;
25 my @cronjobs = `ls /etc/fcron.daily/tripwire*`;
26 my $Log =$Lang::tr
{'no log selected'};
28 ############################################################################################################################
29 ################################################# Tripwire Default Variablen ################################################
31 $tripwiresettings{'ROOT'} = '/usr/sbin';
32 $tripwiresettings{'POLFILE'} = '/var/ipfire/tripwire/tw.pol';
33 $tripwiresettings{'DBFILE'} = '/var/ipfire/tripwire/$(HOSTNAME).twd';
34 $tripwiresettings{'REPORTFILE'} = '/var/ipfire/tripwire/report/$(DATE).twr';
35 $tripwiresettings{'SITEKEYFILE'} = '/var/ipfire/tripwire/site.key';
36 $tripwiresettings{'LOCALKEYFILE'} = '/var/ipfire/tripwire/local.key';
37 $tripwiresettings{'EDITOR'} = '/usr/bin/vi';
38 $tripwiresettings{'LATEPROMPTING'} = 'false';
39 $tripwiresettings{'LOOSEDIRECTORYCHECKING'} = 'false';
40 $tripwiresettings{'MAILNOVIOLATIONS'} = 'false';
41 $tripwiresettings{'EMAILREPORTLEVEL'} = '3';
42 $tripwiresettings{'REPORTLEVEL'} = '3';
43 $tripwiresettings{'MAILMETHOD'} = 'SENDMAIL';
44 $tripwiresettings{'SMTPHOST'} = 'ipfire.myipfire.de';
45 $tripwiresettings{'SMTPPORT'} = '25';
46 $tripwiresettings{'SYSLOGREPORTING'} = 'false';
47 $tripwiresettings{'MAILPROGRAM'} = '/usr/sbin/sendmail -oi -t';
48 $tripwiresettings{'SITEKEY'} = 'ipfire';
49 $tripwiresettings{'LOCALKEY'} = 'ipfire';
50 $tripwiresettings{'ACTION'} = '';
52 &General
::readhash
("${General::swroot}/tripwire/settings", \
%tripwiresettings);
54 ############################################################################################################################
55 ######################################################### Tripwire HTML Part ###############################################
57 &Header
::showhttpheaders
();
59 &Header
::getcgihash
(\
%tripwiresettings);
60 &Header
::openpage
('Tripwire', 1,);
61 &Header
::openbigbox
('100%', 'left', '', $errormessage);
63 ############################################################################################################################
64 ############################################### Tripwire Config Datei erstellen ############################################
66 if ($tripwiresettings{'ACTION'} eq $Lang::tr
{'save'})
68 system("/usr/local/bin/tripwirectrl readconfig >& /dev/null");
69 open (FILE
, ">${General::swroot}/tripwire/twcfg.txt") or die "Can't save tripwire config: $!";
74 ROOT =$tripwiresettings{'ROOT'}
75 POLFILE =$tripwiresettings{'POLFILE'}
76 DBFILE =$tripwiresettings{'DBFILE'}
77 REPORTFILE =$tripwiresettings{'REPORTFILE'}
78 SITEKEYFILE =$tripwiresettings{'SITEKEYFILE'}
79 LOCALKEYFILE =$tripwiresettings{'LOCALKEYFILE'}
80 EDITOR =$tripwiresettings{'EDITOR'}
81 LATEPROMPTING =$tripwiresettings{'LATEPROMPTING'}
82 LOOSEDIRECTORYCHECKING =$tripwiresettings{'LOOSEDIRECTORYCHECKING'}
83 MAILNOVIOLATIONS =$tripwiresettings{'MAILNOVIOLATIONS'}
84 EMAILREPORTLEVEL =$tripwiresettings{'EMAILREPORTLEVEL'}
85 REPORTLEVEL =$tripwiresettings{'REPORTLEVEL'}
86 MAILMETHOD =$tripwiresettings{'MAILMETHOD'}
87 SMTPHOST =$tripwiresettings{'SMTPHOST'}
88 SMTPPORT =$tripwiresettings{'SMTPPORT'}
89 SYSLOGREPORTING =$tripwiresettings{'SYSLOGREPORTING'}
90 MAILPROGRAM =$tripwiresettings{'MAILPROGRAM'}
96 &General
::writehash
("${General::swroot}/tripwire/settings", \
%tripwiresettings);
97 system("/usr/local/bin/tripwirectrl lockconfig >& /dev/null");
100 ############################################################################################################################
101 ################################################## Sicherheitsabfrage für CGI ##############################################
103 if ($tripwiresettings{'ACTION'} eq 'addcron')
107 <table width='95%' cellspacing='0'>
108 <tr><td bgcolor='${Header::table1colour}' colspan='2' align='center'><b>$Lang::tr{'add cron'}</b>
109 <form method='post' action='$ENV{'SCRIPT_NAME'}'>
110 <tr><td align='center' colspan='2'>HH<input type='text' size='2' name='HOUR' value='08'/>MM<input type='text' size='2' name='MINUTE' value='00'/><br /><br /></td></tr>
111 <tr><td align='right' width='50%'>
112 $Lang::tr{'ok'} <input type='image' alt='$Lang::tr{'ok'}' src='/images/edit-redo.png' />
113 <input type='hidden' name='ACTION' value='addcronyes' /></form></td>
114 <td align='left' width='50%'><form method='post' action='$ENV{'SCRIPT_NAME'}'>
115 <input type='image' alt='$Lang::tr{'cancel'}' src='/images/dialog-error.png' /> $Lang::tr{'cancel'}
116 <input type='hidden' name='ACTION' value='cancel' /></form></td>
123 if ($tripwiresettings{'ACTION'} eq 'globalreset')
127 <table width='95%' cellspacing='0'>
128 <tr><td bgcolor='${Header::table1colour}' colspan='2' align='center'><b>$Lang::tr{'resetglobals'}</b>
129 <tr><td colspan='2' align='center'><font color=red>$Lang::tr{'defaultwarning'}<br /><br /></font></td></tr>
130 <tr><td align='right' width='50%'><form method='post' action='$ENV{'SCRIPT_NAME'}'>
131 $Lang::tr{'ok'} <input type='image' alt='$Lang::tr{'ok'}' src='/images/edit-redo.png' />
132 <input type='hidden' name='ACTION' value='globalresetyes' /></form></td>
133 <td align='left' width='50%'><form method='post' action='$ENV{'SCRIPT_NAME'}'>
134 <input type='image' alt='$Lang::tr{'cancel'}' src='/images/dialog-error.png' /> $Lang::tr{'cancel'}
135 <input type='hidden' name='ACTION' value='cancel' /></form></td>
142 if ($tripwiresettings{'ACTION'} eq 'generatepolicypw')
146 <table width='95%' cellspacing='0'>
147 <tr><td bgcolor='${Header::table1colour}' colspan='2' align='center'><b>$Lang::tr{'generatepolicy'}</b>
148 <tr><td colspan='2' align='center'><font color=red>$Lang::tr{'tripwirewarningpolicy'}<br /><br /></font></td></tr>
149 <tr><td align='left' width='40%'><form method='post' action='$ENV{'SCRIPT_NAME'}'>$Lang::tr{'sitekey'}</td><td align='left'><input type='password' name='SITEKEY' value='$tripwiresettings{'SITEKEY'}' size="30" /></td></tr>
150 <tr><td align='left' width='40%'><form method='post' action='$ENV{'SCRIPT_NAME'}'>$Lang::tr{'localkey'}</td><td align='left'><input type='password' name='LOCALKEY' value='$tripwiresettings{'LOCALKEY'}' size="30" /><br /><br /></td></tr>
151 <tr><td align='right' width='50%'>
152 $Lang::tr{'ok'} <input type='image' alt='$Lang::tr{'ok'}' src='/images/edit-redo.png' />
153 <input type='hidden' name='ACTION' value='generatepolicyyes' /></form></td>
154 <td align='left' width='50%'><form method='post' action='$ENV{'SCRIPT_NAME'}'>
155 <input type='image' alt='$Lang::tr{'cancel'}' src='/images/dialog-error.png' /> $Lang::tr{'cancel'}
156 <input type='hidden' name='ACTION' value='cancel' /></form></td>
163 if ($tripwiresettings{'ACTION'} eq 'policyresetpw')
167 <table width='95%' cellspacing='0'>
168 <tr><td bgcolor='${Header::table1colour}' colspan='2' align='center'><b>$Lang::tr{'resetpolicy'}</b>
169 <tr><td colspan='2' align='center'><font color=red>$Lang::tr{'tripwirewarningpolicy'}<br /><br /></font></td></tr>
170 <tr><td align='left' width='40%'><form method='post' action='$ENV{'SCRIPT_NAME'}'>$Lang::tr{'sitekey'}</td><td align='left'><input type='password' name='SITEKEY' value='$tripwiresettings{'SITEKEY'}' size="30" /></td></tr>
171 <tr><td align='left' width='40%'><form method='post' action='$ENV{'SCRIPT_NAME'}'>$Lang::tr{'localkey'}</td><td align='left'><input type='password' name='LOCALKEY' value='$tripwiresettings{'LOCALKEY'}' size="30" /><br /><br /></td></tr>
172 <tr><td align='right' width='50%'>
173 $Lang::tr{'ok'} <input type='image' alt='$Lang::tr{'ok'}' src='/images/edit-redo.png' />
174 <input type='hidden' name='ACTION' value='resetpolicyyes' /></form></td>
175 <td align='left' width='50%'><form method='post' action='$ENV{'SCRIPT_NAME'}'>
176 <input type='image' alt='$Lang::tr{'cancel'}' src='/images/dialog-error.png' /> $Lang::tr{'cancel'}
177 <input type='hidden' name='ACTION' value='cancel' /></form></td>
184 if ($tripwiresettings{'ACTION'} eq 'updatedatabasepw')
188 <table width='95%' cellspacing='0'>
189 <tr><td bgcolor='${Header::table1colour}' colspan='2' align='center'><b>$Lang::tr{'updatedatabase'}</b>
190 <tr><td colspan='2' align='center'><font color=red>$Lang::tr{'tripwirewarningdatabase'}<br /><br /></font></td></tr>
191 <tr><td align='left' width='40%'><form method='post' action='$ENV{'SCRIPT_NAME'}'>$Lang::tr{'localkey'}</td><td align='left'><input type='password' name='LOCALKEY' value='$tripwiresettings{'LOCALKEY'}' size="30" /><br /><br /></td></tr>
192 <tr><td align='right' width='50%'><form method='post' action='$ENV{'SCRIPT_NAME'}'>
193 $Lang::tr{'ok'} <input type='image' alt='$Lang::tr{'ok'}' src='/images/edit-redo.png' />
194 <input type='hidden' name='ACTION' value='updatedatabaseyes' /></form></td>
195 <td align='left' width='50%'><form method='post' action='$ENV{'SCRIPT_NAME'}'>
196 <input type='image' alt='$Lang::tr{'cancel'}' src='/images/dialog-error.png' /> $Lang::tr{'cancel'}
197 <input type='hidden' name='ACTION' value='cancel' /></form></td>
203 if ($tripwiresettings{'ACTION'} eq 'keyreset')
207 <table width='95%' cellspacing='0'>
208 <tr><td bgcolor='${Header::table1colour}' colspan='2' align='center'><b>$Lang::tr{'keyreset'}</b>
209 <tr><td colspan='2' align='center'><font color=red>$Lang::tr{'tripwirewarningkeys'}<br /><br /></font></td></tr>
210 <tr><td align='right' width='50%'><form method='post' action='$ENV{'SCRIPT_NAME'}'>
211 $Lang::tr{'ok'} <input type='image' alt='$Lang::tr{'ok'}' src='/images/edit-redo.png' />
212 <input type='hidden' name='ACTION' value='keyresetyes' /></form></td>
213 <td align='left' width='50%'><form method='post' action='$ENV{'SCRIPT_NAME'}'>
214 <input type='image' alt='$Lang::tr{'cancel'}' src='/images/dialog-error.png' /> $Lang::tr{'cancel'}
215 <input type='hidden' name='ACTION' value='cancel' /></form></td>
222 if ($tripwiresettings{'ACTION'} eq 'generatekeys')
226 <table width='95%' cellspacing='0'>
227 <tr><td bgcolor='${Header::table1colour}' colspan='2' align='center'><b>$Lang::tr{'generatekeys'}</b>
228 <tr><td colspan='2' align='center'><font color=red>$Lang::tr{'tripwirewarningkeys'}<br /><br /></font></td></tr>
229 <tr><td align='right' width='50%'><form method='post' action='$ENV{'SCRIPT_NAME'}'>
230 $Lang::tr{'ok'} <input type='image' alt='$Lang::tr{'ok'}' src='/images/edit-redo.png' />
231 <input type='hidden' name='ACTION' value='generatekeysyes' /></form></td>
232 <td align='left' width='50%'><form method='post' action='$ENV{'SCRIPT_NAME'}'>
233 <input type='image' alt='$Lang::tr{'cancel'}' src='/images/dialog-error.png' /> $Lang::tr{'cancel'}
234 <input type='hidden' name='ACTION' value='cancel' /></form></td>
241 ############################################################################################################################
242 ######################################################## Tripwire Funktionen ###############################################
244 if ($tripwiresettings{'ACTION'} eq 'globalresetyes')
246 &Header
::openbox
( 'Waiting', 1, "<meta http-equiv='refresh' content='1;'>" );print "<center><img src='/images/clock.gif' alt='' /><br/><font color='red'>$Lang::tr{'tripwireoperating'}</font></center>";
247 $tripwiresettings{'ROOT'} = '/usr/sbin';
248 $tripwiresettings{'POLFILE'} = '/var/ipfire/tripwire/tw.pol';
249 $tripwiresettings{'DBFILE'} = '/var/ipfire/tripwire/$(HOSTNAME).twd';
250 $tripwiresettings{'REPORTFILE'} = '/var/ipfire/tripwire/report/$(DATE).twr';
251 $tripwiresettings{'SITEKEYFILE'} = '/var/ipfire/tripwire/site.key';
252 $tripwiresettings{'LOCALKEYFILE'} = '/var/ipfire/tripwire/local.key';
253 $tripwiresettings{'EDITOR'} = '/usr/bin/vi';
254 $tripwiresettings{'LATEPROMPTING'} = 'false';
255 $tripwiresettings{'LOOSEDIRECTORYCHECKING'} = 'false';
256 $tripwiresettings{'MAILNOVIOLATIONS'} = 'false';
257 $tripwiresettings{'EMAILREPORTLEVEL'} = '3';
258 $tripwiresettings{'REPORTLEVEL'} = '3';
259 $tripwiresettings{'MAILMETHOD'} = 'SENDMAIL';
260 $tripwiresettings{'SMTPHOST'} = 'ipfire.myipfire.de';
261 $tripwiresettings{'SMTPPORT'} = '25';
262 $tripwiresettings{'SYSLOGREPORTING'} = 'false';
263 $tripwiresettings{'MAILPROGRAM'} = '/usr/sbin/sendmail -oi -t';
264 $tripwiresettings{'SITEKEY'} = 'ipfire';
265 $tripwiresettings{'LOCALKEY'} = 'ipfire';
266 $tripwiresettings{'ACTION'} = '';
267 system("/usr/local/bin/tripwirectrl readconfig >& /dev/null");
268 open (FILE
, ">${General::swroot}/tripwire/twcfg.txt") or die "Can't save tripwire config: $!";
272 ROOT =$tripwiresettings{'ROOT'}
273 POLFILE =$tripwiresettings{'POLFILE'}
274 DBFILE =$tripwiresettings{'DBFILE'}
275 REPORTFILE =$tripwiresettings{'REPORTFILE'}
276 SITEKEYFILE =$tripwiresettings{'SITEKEYFILE'}
277 LOCALKEYFILE =$tripwiresettings{'LOCALKEYFILE'}
278 EDITOR =$tripwiresettings{'EDITOR'}
279 LATEPROMPTING =$tripwiresettings{'LATEPROMPTING'}
280 LOOSEDIRECTORYCHECKING =$tripwiresettings{'LOOSEDIRECTORYCHECKING'}
281 MAILNOVIOLATIONS =$tripwiresettings{'MAILNOVIOLATIONS'}
282 EMAILREPORTLEVEL =$tripwiresettings{'EMAILREPORTLEVEL'}
283 REPORTLEVEL =$tripwiresettings{'REPORTLEVEL'}
284 MAILMETHOD =$tripwiresettings{'MAILMETHOD'}
285 SMTPHOST =$tripwiresettings{'SMTPHOST'}
286 SMTPPORT =$tripwiresettings{'SMTPPORT'}
287 SYSLOGREPORTING =$tripwiresettings{'SYSLOGREPORTING'}
288 MAILPROGRAM =$tripwiresettings{'MAILPROGRAM'}
293 &General
::writehash
("${General::swroot}/tripwire/settings", \
%tripwiresettings);
294 system("/usr/local/bin/tripwirectrl lockconfig >& /dev/null");
295 system("/usr/local/bin/tripwirectrl keys ipfire ipfire >& /dev/null");$tripwiresettings{'SITEKEY'} = 'ipfire';$tripwiresettings{'LOCALKEY'} = 'ipfire';
297 if ($tripwiresettings{'ACTION'} eq 'generatekeysyes'){&Header
::openbox
( 'Waiting', 1, "<meta http-equiv='refresh' content='1;'>" );print "<center><img src='/images/clock.gif' alt='' /><br/><font color='red'>$Lang::tr{'tripwireoperating'}</font></center>";system("/usr/local/bin/tripwirectrl keys $tripwiresettings{'SITEKEY'} $tripwiresettings{'LOCALKEY'} >& /dev/null");$tripwiresettings{'SITEKEY'} = 'ipfire';$tripwiresettings{'LOCALKEY'} = 'ipfire';}
298 if ($tripwiresettings{'ACTION'} eq 'keyresetyes'){&Header
::openbox
( 'Waiting', 1, "<meta http-equiv='refresh' content='1;'>" );print "<center><img src='/images/clock.gif' alt='' /><br/><font color='red'>$Lang::tr{'tripwireoperating'}</font></center>";system("/usr/local/bin/tripwirectrl keys ipfire ipfire >& /dev/null");$tripwiresettings{'SITEKEY'} = 'ipfire';$tripwiresettings{'LOCALKEY'} = 'ipfire';}
299 if ($tripwiresettings{'ACTION'} eq 'resetpolicyyes'){&Header
::openbox
( 'Waiting', 1, "<meta http-equiv='refresh' content='1;'>" );print "<center><img src='/images/clock.gif' alt='' /><br/><font color='red'>$Lang::tr{'tripwireoperating'}</font></center>";system("/usr/local/bin/tripwirectrl resetpolicy tripwiresettings{'SITEKEY'} $tripwiresettings{'LOCALKEY'} >& /dev/null");$tripwiresettings{'SITEKEY'} = 'ipfire';$tripwiresettings{'LOCALKEY'} = 'ipfire';}
300 if ($tripwiresettings{'ACTION'} eq 'generatepolicyyes'){&Header
::openbox
( 'Waiting', 1, "<meta http-equiv='refresh' content='1;'>" );print "<center><img src='/images/clock.gif' alt='' /><br/><font color='red'>$Lang::tr{'tripwireoperating'}</font></center>";system("/usr/local/bin/tripwirectrl generatepolicy $tripwiresettings{'SITEKEY'} $tripwiresettings{'LOCALKEY'} >& /dev/null");$tripwiresettings{'SITEKEY'} = 'ipfire';$tripwiresettings{'LOCALKEY'} = 'ipfire';}
301 if ($tripwiresettings{'ACTION'} eq 'updatedatabaseyes'){&Header
::openbox
( 'Waiting', 1, "<meta http-equiv='refresh' content='1;'>" );print "<center><img src='/images/clock.gif' alt='' /><br/><font color='red'>$Lang::tr{'tripwireoperating'}</font></center>";system("/usr/local/bin/tripwirectrl updatedatabase $tripwiresettings{'LOCALKEY'} /var/ipfire/tripwire/report/$file >& /dev/null");$tripwiresettings{'LOCALKEY'} = 'ipfire';}
302 if ($tripwiresettings{'ACTION'} eq 'generatereport'){&Header
::openbox
( 'Waiting', 1, "<meta http-equiv='refresh' content='1;'>" );print "<center><img src='/images/clock.gif' alt='' /><br/><font color='red'>$Lang::tr{'tripwireoperating'}</font></center>";system("/usr/local/bin/tripwirectrl generatereport >& /dev/null");}
303 if ($tripwiresettings{'ACTION'} eq 'addcronyes'){system("/usr/local/bin/tripwirectrl addcron $tripwiresettings{'HOUR'} $tripwiresettings{'MINUTE'} >& /dev/null");}
304 if ($tripwiresettings{'ACTION'} eq 'deletecron'){system("/usr/local/bin/tripwirectrl disablecron $tripwiresettings{'CRON'} >& /dev/null");@cronjobs = `ls /etc/fcron.daily/tripwire*`;}
306 ############################################################################################################################
307 ##################################################### Tripwire globale Optionen ############################################
309 &Header
::openbox
('100%', 'center', 'Tripwire');
314 <form method='post' action='$ENV{'SCRIPT_NAME'}'>
315 <table width='95%' cellspacing='0'>
316 <tr bgcolor='${Header::table1colour}'><td colspan='2' align='left'><b>$Lang::tr{'basic options'}</b></td></tr>
317 <tr><td align='left' width='40%'>$Lang::tr{'emailreportlevel'}</td><td align='left'><input type='text' name='EMAILREPORTLEVEL' value='$tripwiresettings{'EMAILREPORTLEVEL'}' size="30" /></td></tr>
318 <tr><td align='left' width='40%'>$Lang::tr{'reportlevel'}</td><td align='left'><input type='text' name='REPORTLEVEL' value='$tripwiresettings{'REPORTLEVEL'}' size="30" /></td></tr>
319 <tr><td align='left' width='40%'>$Lang::tr{'mailmethod'}</td><td align='left'><input type='text' name='MAILMETHOD' value='$tripwiresettings{'MAILMETHOD'}' size="30" /></td></tr>
320 <tr><td align='left' width='40%'>$Lang::tr{'smtphost'}</td><td align='left'><input type='text' name='SMTPHOST' value='$tripwiresettings{'SMTPHOST'}' size="30" /></td></tr>
321 <tr><td align='left' width='40%'>$Lang::tr{'smtpport'}</td><td align='left'><input type='text' name='SMTPPORT' value='$tripwiresettings{'SMTPPORT'}' size="30" /></td></tr>
322 <tr><td align='left' width='40%'>$Lang::tr{'mailprogramm'}</td><td align='left'><input type='text' name='MAILPROGRAM' value='$tripwiresettings{'MAILPROGRAM'}' size="30" /></td></tr>
325 <table width='10%' cellspacing='0'>
326 <tr><td align='center'><form method='post' action='$ENV{'SCRIPT_NAME'}'>
327 <input type='hidden' name='ACTION' value=$Lang::tr{'save'} />
328 <input type='image' alt='$Lang::tr{'save'}' src='/images/media-floppy.png' /></form></td>
329 <td align='center'><form method='post' action='$ENV{'SCRIPT_NAME'}'>
330 <input type='hidden' name='ACTION' value='globalreset' />
331 <input type='image' alt='$Lang::tr{'reset'}' src='/images/reload.gif' /></form></td>
332 <td align='center'><form method='post' action='$ENV{'SCRIPT_NAME'}'>
333 <input type='hidden' name='ACTION' value='globalcaption' />
334 <input type='image' alt='$Lang::tr{'caption'}' src='/images/help-browser.png' /></form></td></tr>
339 if ($tripwiresettings{'ACTION'} eq 'globalcaption')
343 <table width='95%' cellspacing='0'>
344 <tr><td align='center' colspan='2'><b>$Lang::tr{'caption'}</b></td></tr>
345 <tr><td align='right' width='33%'><img src='/images/media-floppy.png' /></td><td align='left'>$Lang::tr{'save settings'}</td></tr>
346 <tr><td align='right' width='33%'><img src='/images/reload.gif' /></td><td align='left'>$Lang::tr{'restore settings'}</td></tr>
355 ############################################################################################################################
356 ################################################### Tripwire Init Policy and keygen ########################################
358 &Header
::openbox
('100%', 'center', $Lang::tr
{'generate tripwire keys and init'});
363 <form method='post' action='$ENV{'SCRIPT_NAME'}'>
364 <table width='95%' cellspacing='0'>
365 <tr bgcolor='${Header::table1colour}'><td colspan='2' align='left'><b>$Lang::tr{'keys'}</b></td></tr>
366 <tr><td align='left' width='40%'>$Lang::tr{'sitekey'}</td><td align='left'><input type='password' name='SITEKEY' value='$tripwiresettings{'SITEKEY'}' size="30" /></td></tr>
367 <tr><td align='left' width='40%'>$Lang::tr{'localkey'}</td><td align='left'><input type='password' name='LOCALKEY' value='$tripwiresettings{'LOCALKEY'}' size="30" /></td></tr>
370 <table width='10%' cellspacing='0'>
371 <tr><td align='center'><form method='post' action='$ENV{'SCRIPT_NAME'}'>
372 <input type='hidden' name='ACTION' value='generatekeys'/>
373 <input type='image' alt='$Lang::tr{'generatekeys'}' src='/images/system-lock-screen.png' /></form></td>
374 <td align='center'><form method='post' action='$ENV{'SCRIPT_NAME'}'>
375 <input type='hidden' name='ACTION' value='keyreset' />
376 <input type='image' alt='$Lang::tr{'reset'}' src='/images/reload.gif' /></form></td>
377 <td align='center'><form method='post' action='$ENV{'SCRIPT_NAME'}'>
378 <input type='hidden' name='ACTION' value='keycaption' />
379 <input type='image' alt='$Lang::tr{'caption'}' src='/images/help-browser.png' /></form></td></tr>
384 if ($tripwiresettings{'ACTION'} eq 'keycaption')
388 <table width='95%' cellspacing='0'>
389 <tr><td align='center' colspan='2'><b>$Lang::tr{'caption'}</b></td></tr>
390 <tr><td align='right' width='33%'><img src='/images/system-lock-screen.png' /></td><td align='left'>$Lang::tr{'generatekeys'}</td></tr>
391 <tr><td align='right' width='33%'><img src='/images/reload.gif' /></td><td align='left'>$Lang::tr{'keyreset'}</td></tr>
400 ############################################################################################################################
401 ################################################# Tripwire general functions ###############################################
403 &Header
::openbox
('100%', 'center', $Lang::tr
{'tripwire functions'});
408 <table width='95%' cellspacing='0'>
409 <tr><td align='center'><form method='post' action='$ENV{'SCRIPT_NAME'}'>
410 <input type='hidden' name='ACTION' value='generatepolicypw'/>
411 <input type='image' alt='$Lang::tr{'generatepolicy'}' src='/images/document-new.png' /></form></td>
412 <td align='center'><form method='post' action='$ENV{'SCRIPT_NAME'}'>
413 <input type='hidden' name='ACTION' value='policyresetpw' />
414 <input type='image' alt='$Lang::tr{'resetpolicy'}' src='/images/reload.gif' /></form></td>
415 <td align='center'><form method='post' action='$ENV{'SCRIPT_NAME'}'>
416 <input type='hidden' name='ACTION' value='generatereport' />
417 <input type='image' alt='$Lang::tr{'generatereport'}' src='/images/document-properties.png' /></form></td>
418 <td align='center'><form method='post' action='$ENV{'SCRIPT_NAME'}'>
419 <input type='hidden' name='ACTION' value='updatedatabasepw' />
420 <input type='image' alt='$Lang::tr{'updatedatabase'}' src='/images/network-server.png' /></form></td>
421 <td align='center'><form method='post' action='$ENV{'SCRIPT_NAME'}'>
422 <input type='hidden' name='ACTION' value='policycaption' />
423 <input type='image' alt='$Lang::tr{'caption'}' src='/images/help-browser.png' /></form></td></tr>
427 if ($tripwiresettings{'ACTION'} eq 'policycaption')
431 <table width='95%' cellspacing='0'>
432 <tr><td align='center' colspan='2'><b>$Lang::tr{'caption'}</b></td></tr>
433 <tr><td align='right' width='33%'><img src='/images/document-new.png' /></td><td align='left'>$Lang::tr{'generatepolicy'}</td></tr>
434 <tr><td align='right' width='33%'><img src='/images/reload.gif' /></td><td align='left'>$Lang::tr{'resetpolicy'}</td></tr>
435 <tr><td align='right' width='33%'><img src='/images/document-properties.png' /></td><td align='left'>$Lang::tr{'generatereport'}</td></tr>
436 <tr><td align='right' width='33%'><img src='/images/network-server.png' /></td><td align='left'>$Lang::tr{'updatedatabase'}</td></tr>
444 ############################################################################################################################
445 ####################################################### Tripwire Log View ##################################################
447 &Header
::openbox
('100%', 'center', $Lang::tr
{'tripwire reports'});
451 <form method='post' action='$ENV{'SCRIPT_NAME'}'>
452 <table width='95%' cellspacing='0'>
453 <tr><td bgcolor='${Header::table1colour}' colspan='3' align='left'><b>$Lang::tr{'log view'}</b></td></tr>
454 <tr><td colspan='3' align='left'><br /></td></tr>
455 <tr><td align='left'><select name='LOG' style="width: 500px">
458 foreach my $log (@Logs) {chomp $log;print"<option value='$log'>$log</option>";}
461 </select></td><td align='left'><input type='hidden' name='ACTION' value='showlog' /><input type='image' alt='view Log' src='/images/format-justify-fill.png' /></td></tr>
466 if ($tripwiresettings{'ACTION'} eq 'showlog')
468 $Log = qx(/usr/local/bin/tripwirectrl tripwirelog
$tripwiresettings{'LOG'});
469 $Log=~s/--cfgfile \/var\/ipfire\
/tripwire\/tw
.cfg
--polfile \
/var\/ipfire\
/tripwire\/tw
.pol
//g;
471 <table width='95%' cellspacing='0'>
472 <tr><td><br /></td></tr>
473 <tr><td><pre>$Log</pre></td></tr>
474 <tr><td><br /></td></tr>
475 <tr><td align=center>$tripwiresettings{'LOG'}</td></tr>
484 ############################################################################################################################
485 ####################################################### Tripwire Cronjob ##################################################
487 &Header
::openbox
('100%', 'center', $Lang::tr
{'tripwire cronjob'});
491 <table width='95%' cellspacing='0'>
492 <tr><td colspan='3' align='left'><br /></td></tr>
495 foreach my $cronjob (@cronjobs) {chomp $cronjob;my $time=$cronjob; $time=~s/\/etc\/fcron
.daily\
/tripwire//g;print"<form method='post' action='$ENV{'SCRIPT_NAME'}'><tr><td align='left' colspan='2'>$cronjob at $time daily</td
><td
><input type
='hidden' name
='ACTION' value
='deletecron' /><input type='hidden' name='CRON' value='$time' /><input type
='image' alt
='delete cron' src
='/images/user-trash.png' /></td
></tr></form
>";}
499 <table width='10%' cellspacing='0'>
500 <tr><td align='center'><form method='post' action='$ENV{'SCRIPT_NAME'}'>
501 <input type='hidden' name='ACTION' value='addcron'/>
502 <input type='image' alt='$Lang::tr{'add cron'}' src='/images/appointment-new.png' /></form></td>
503 <td align='center'><form method='post' action='$ENV{'SCRIPT_NAME'}'>
504 <input type='hidden' name='ACTION' value='croncaption' />
505 <input type='image' alt='$Lang::tr{'caption'}' src='/images/help-browser.png' /></form></td></tr>
510 if ($tripwiresettings{'ACTION'} eq 'croncaption')
514 <table width='95%' cellspacing='0'>
515 <tr><td align='center' colspan='2'><b>$Lang::tr{'caption'}</b></td></tr>
516 <tr><td align='right' width='33%'><img src='/images/appointment-new.png' /></td><td align='left'>$Lang::tr{'add cron'}</td></tr>
517 <tr><td align='right' width='33%'><img src='/images/user-trash.png' /></td><td align='left'>$Lang::tr{'delete cron'}</td></tr>
525 &Header
::closebigbox
();
526 &Header
::closepage
();