projects
/
icelog.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (from parent 1:
e886e6f
)
identd & authname
author
ivan
<ivan>
Thu, 24 Jan 2002 16:10:02 +0000
(16:10 +0000)
committer
ivan
<ivan>
Thu, 24 Jan 2002 16:10:02 +0000
(16:10 +0000)
iceaccessd
patch
|
blob
|
history
diff --git
a/iceaccessd
b/iceaccessd
index
b47e3db
..
4fd4e1f
100644
(file)
--- a/
iceaccessd
+++ b/
iceaccessd
@@
-32,7
+32,9
@@
while (1) {
next if /^$/;
#rootwood.haze.st - - [24/Dec/2001:15:33:50 -0800] "GET / HTTP/1.0" 200 1388544 "-" "xmms/1.2.5" 89
/^
next if /^$/;
#rootwood.haze.st - - [24/Dec/2001:15:33:50 -0800] "GET / HTTP/1.0" 200 1388544 "-" "xmms/1.2.5" 89
/^
- ([\w\-\.]+)\ -\ -\ #hostname
+ ([\w\-\.]+)\ #hostname
+ ([\w\-]+)\ #identd!!
+ ([\w\-]+)\ #authname
\[(\d{2})\/(\w{3})\/(\d{4}):(\d{2}):(\d{2}):(\d{2})\ -(\d{4})\]\ #date
"GET\ ([\/\w\-\.]+)\ HTTP\/\d\.\d"\ # request string
(\d{3})\ #staus resonse
\[(\d{2})\/(\w{3})\/(\d{4}):(\d{2}):(\d{2}):(\d{2})\ -(\d{4})\]\ #date
"GET\ ([\/\w\-\.]+)\ HTTP\/\d\.\d"\ # request string
(\d{3})\ #staus resonse
@@
-49,14
+51,14
@@
while (1) {
my $hostname = $1;
my( $mday, $mon, $year, $hours, $min, $sec, $zone ) =
my $hostname = $1;
my( $mday, $mon, $year, $hours, $min, $sec, $zone ) =
- ( $
2, $3, $4, $5, $6, $7, $8
);
+ ( $
4, $5, $6, $7, $8, $9, $10
);
- my $mountpoint = $
9
;
- my $status = $1
0
;
- my $bytes = $1
1
;
- my $referer = $1
2
;
- my $useragent = $1
3
;
- my $seconds = $1
4
;
+ my $mountpoint = $
11
;
+ my $status = $1
2
;
+ my $bytes = $1
3
;
+ my $referer = $1
4
;
+ my $useragent = $1
5
;
+ my $seconds = $1
6
;
$SIG{HUP} = sub { $eof=1 };
print join("\t",
$SIG{HUP} = sub { $eof=1 };
print join("\t",