--- lib/PXElator/httpd.pm	2009/08/11 15:55:26	200
+++ lib/PXElator/httpd.pm	2009/08/12 23:59:01	208
@@ -50,6 +50,7 @@
 use browser;
 use network;
 
+use CouchDB;
 
 sub static {
 	my ($client,$path) = @_;
@@ -61,7 +62,6 @@
 	if ( my $pid = fork ) {
 		# parent
 		close($client);
-		print "http static child $pid\n";
 		$static_pids->{$pid} = $path;
 		return 1;
 	}
@@ -81,7 +81,7 @@
 	my $buff;
 	my $pos = 0;
 
-	warn "static $path $type $size block: $block\n";
+	CouchDB::audit( 'static', { pid => $$, path => $path, type => $type, size => $size, block => $block, peerhost => $client->peerhost });
 
 	progress_bar::start;
 
@@ -96,8 +96,6 @@
 
 	print STDERR "\n";
 
-	warn "exit static child";
-
 	exit(0);
 }
 
@@ -116,7 +114,7 @@
 
 	server->refresh;
 
-	warn "get_request $path ", $param ? dump( $param ) : '', "\n";
+	CouchDB::audit( 'request', { path => $path, param => $param, peerhost => $client->peerhost } );
 
 	if ( my $found = static( $client,$path ) ) {
 		warn "static $found" if $debug;