head	1.2;
access;
symbols
	RELENG_7_4_0_RELEASE:1.1.1.1
	RELENG_7_4:1.1.1.1.0.14
	RELENG_7_4_BP:1.1.1.1
	RELENG_7_3_0_RELEASE:1.1.1.1
	RELENG_7_3:1.1.1.1.0.12
	RELENG_7_3_BP:1.1.1.1
	RELENG_7_2_0_RELEASE:1.1.1.1
	RELENG_7_2:1.1.1.1.0.10
	RELENG_7_2_BP:1.1.1.1
	RELENG_7_1_0_RELEASE:1.1.1.1
	RELENG_6_4_0_RELEASE:1.1.1.1.2.1
	RELENG_7_1:1.1.1.1.0.8
	RELENG_7_1_BP:1.1.1.1
	RELENG_6_4:1.1.1.1.2.1.0.8
	RELENG_6_4_BP:1.1.1.1.2.1
	v0_5_10:1.1.1.1
	RELENG_7_0_0_RELEASE:1.1.1.1
	RELENG_6_3_0_RELEASE:1.1.1.1.2.1
	RELENG_7_0:1.1.1.1.0.6
	RELENG_7_0_BP:1.1.1.1
	RELENG_6_3:1.1.1.1.2.1.0.6
	RELENG_6_3_BP:1.1.1.1.2.1
	RELENG_7:1.1.1.1.0.4
	RELENG_7_BP:1.1.1.1
	v0_5_8:1.1.1.1
	RELENG_6_2_0_RELEASE:1.1.1.1.2.1
	RELENG_6_2:1.1.1.1.2.1.0.4
	RELENG_6_2_BP:1.1.1.1.2.1
	RELENG_6_1_0_RELEASE:1.1.1.1.2.1
	RELENG_6_1:1.1.1.1.2.1.0.2
	RELENG_6_1_BP:1.1.1.1.2.1
	RELENG_6:1.1.1.1.0.2
	v0_4_8:1.1.1.1
	MALINEN:1.1.1;
locks; strict;
comment	@# @;


1.2
date	2009.03.02.02.29.17;	author sam;	state dead;
branches;
next	1.1;

1.1
date	2006.03.07.05.47.04;	author sam;	state Exp;
branches
	1.1.1.1;
next	;

1.1.1.1
date	2006.03.07.05.47.04;	author sam;	state Exp;
branches
	1.1.1.1.2.1;
next	;

1.1.1.1.2.1
date	2006.03.24.01.42.36;	author sam;	state Exp;
branches;
next	;


desc
@@


1.2
log
@SVN rev 189264 on 2009-03-02 02:29:17Z by sam

don't need these any more; we are now using a combined tree
@
text
@#!/usr/bin/perl -w
#
# Logwatch script for hostapd
#
# Copyright 2005 Henrik Brix Andersen <brix@@gentoo.org>
# Distributed under the terms of the GNU General Public License v2
# Alternatively, this file may be distributed under the terms of the BSD License

use strict;

my $debug = $ENV{'LOGWATCH_DEBUG'} || 0;
my $detail = $ENV{'LOGWATCH_DETAIL_LEVEL'} || 0;
my $debugcounter = 1;

my %hostapd;
my @@unmatched;

if ($debug >= 5) {
	print STDERR "\n\nDEBUG: Inside HOSTAPD Filter\n\n";
}

while (defined(my $line = <STDIN>)) {
	if ($debug >= 5) {
		print STDERR "DEBUG($debugcounter): $line";
		$debugcounter++;
	}
    chomp($line);

	if (my ($iface,$mac,$layer,$details) = ($line =~ /(.*?): STA (.*?) (.*?): (.*?)$/i)) {
		unless ($detail == 10) {
			# collapse association events
			$details =~ s/^(associated) .*$/$1/i;
		}
		$hostapd{$iface}->{$mac}->{$layer}->{$details}++;
	} else {
		push @@unmatched, "$line\n";
	}
}

if (keys %hostapd) {
	foreach my $iface (sort keys %hostapd) {
		print "Interface $iface:\n";
		foreach my $mac (sort keys %{$hostapd{$iface}}) {
			print "  Client MAC Address $mac:\n";
			foreach my $layer (sort keys %{$hostapd{$iface}->{$mac}}) {
				print "    $layer:\n";
				foreach my $details (sort keys %{$hostapd{$iface}->{$mac}->{$layer}}) {
					print "      $details";
					my $count = $hostapd{$iface}->{$mac}->{$layer}->{$details};
					if ($count > 1) {
						print ": " . $count . " Times";
					}
					print "\n";
				}
			}
		}
	}
}

if ($#unmatched >= 0) {
    print "\n**Unmatched Entries**\n";
    print @@unmatched;
}

exit(0);
@


1.1
log
@Initial revision
@
text
@@


1.1.1.1
log
@Import of hostapd 0.4.8
@
text
@@


1.1.1.1.2.1
log
@MFC v0.4.8 import of hostapd

Approved by:	re (hrs)
@
text
@@

