From 5d98aeb1c8da7fb394275dc89402aa793e5e3acf Mon Sep 17 00:00:00 2001 From: Scott Ullrich Date: Sun, 5 Feb 2006 20:24:26 +0000 Subject: Correctly output PPTP logs Ticket #808 --- usr/local/www/diag_logs_vpn.php | 88 +++++++++++++++++++++++------------------ 1 file changed, 50 insertions(+), 38 deletions(-) (limited to 'usr/local/www/diag_logs_vpn.php') diff --git a/usr/local/www/diag_logs_vpn.php b/usr/local/www/diag_logs_vpn.php index 47805bc..a440585 100755 --- a/usr/local/www/diag_logs_vpn.php +++ b/usr/local/www/diag_logs_vpn.php @@ -1,24 +1,22 @@ -. + part of m0n0wall (http://m0n0.ch/wall) + + Copyright (C) 2003-2006 Manuel Kasper . All rights reserved. - + Redistribution and use in source and binary forms, with or without modification, are permitted provided that the following conditions are met: - + 1. Redistributions of source code must retain the above copyright notice, this list of conditions and the following disclaimer. - + 2. Redistributions in binary form must reproduce the above copyright notice, this list of conditions and the following disclaimer in the documentation and/or other materials provided with the distribution. - + THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE @@ -31,30 +29,53 @@ POSSIBILITY OF SUCH DAMAGE. */ +$pgtitle = "Diagnostics: Logs: VPN"; require("guiconfig.inc"); -$ipsec_logfile = "{$g['varlog_path']}/vpn.log"; - $nentries = $config['syslog']['nentries']; if (!$nentries) $nentries = 50; if ($_POST['clear']) { - exec("killall syslogd"); - exec("/usr/sbin/clog -i -s 262144 /var/log/vpn.log"); - system_syslogd_start(); + exec("/usr/sbin/clog -i -s 65536 /var/log/vpn.log"); + /* redirect to avoid reposting form data on refresh */ + header("Location: diag_logs_vpn.php"); + exit; +} + +function dump_clog_vpn($logfile, $tail) { + global $g, $config; + + $sor = isset($config['syslog']['reverse']) ? "-r" : ""; + + exec("/usr/sbin/clog " . $logfile . " | tail {$sor} -n " . $tail, $logarr); + + foreach ($logarr as $logent) { + $logent = preg_split("/\s+/", $logent, 6); + $llent = explode(",", $logent[5]); + + echo "\n"; + echo "" . htmlspecialchars(join(" ", array_slice($logent, 0, 3))) . "\n"; + + if ($llent[0] == "login") + echo "\n"; + else + echo "\n"; + + echo "" . htmlspecialchars($llent[3]) . "\n"; + echo "" . htmlspecialchars($llent[2]) . " \n"; + echo "\n"; + } } -$pgtitle = "Diagnostics: System logs: PPTP VPN"; include("head.inc"); ?> -

- -
+
-
- - +
- Last PPTP log entries + + @@ -81,21 +102,12 @@ include("head.inc"); - - - - -
+ Last PPTP VPN log entries
TimeUser IP address
-
-
- -
-
- + +
+
+ +
- - - -- cgit v1.1