--- lib/PXElator/httpd.pm	2009/08/12 22:27:57	206
+++ lib/PXElator/httpd.pm	2009/08/12 22:56:45	207
@@ -50,6 +50,7 @@
 use browser;
 use network;
 
+use CouchDB;
 
 sub static {
 	my ($client,$path) = @_;
@@ -61,8 +62,8 @@
 	if ( my $pid = fork ) {
 		# parent
 		close($client);
-		print "http static child $pid\n";
 		$static_pids->{$pid} = $path;
+		CouchDB::audit('static', 'parent', { pid => $pid, path => $path });
 		return 1;
 	}
 
@@ -81,7 +82,7 @@
 	my $buff;
 	my $pos = 0;
 
-	warn "static $path $type $size block: $block\n";
+	CouchDB::audit( 'static', 'child', { pid => $$, path => $path, type => $type, size => $size, block => $block });
 
 	progress_bar::start;
 
@@ -96,7 +97,7 @@
 
 	print STDERR "\n";
 
-	warn "exit static child";
+	CouchDB::audit( 'static', 'child', 'exit', { pid => $$ } );
 
 	exit(0);
 }
@@ -116,7 +117,7 @@
 
 	server->refresh;
 
-	warn "get_request $path ", $param ? dump( $param ) : '', "\n";
+	CouchDB::audit( 'request', { path => $path, param => $param } );
 
 	if ( my $found = static( $client,$path ) ) {
 		warn "static $found" if $debug;