1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
|
// This is a roxen module. Copyright 1996 - 1998, Idonex AB.
// Logs the User-agent fields in a separate log.
constant cvs_version = "$Id: client_logger.pike,v 1.6 1998/03/11 19:42:37 neotron Exp $";
constant thread_safe=1;
#include <module.h>
inherit "module";
array register_module()
{
return ({ MODULE_LOGGER,
"Client logger",
"This is a client logger. It simply logs the 'user-agent'"
" field in a log somewhere, the format should be compatible "
"with other client loggers out there, making it somewhat useful"
". It is also possible to add the clientname to the normal log,"
" this saves a file descriptor, but breaks some log analyzers. "
});
}
void create()
{
defvar("logfile", GLOBVAR(logdirprefix)+"/Clients", "Client log file",
TYPE_STRING,
"This is the file into which all client names will be put.\n");
}
// This is a pointer to the method 'log' in the file object. For speed.
function logf;
void start()
{
object c;
logf=0; // Reset the old value, if any..
if(!(c=open(query("logfile"), "wca")))
report_error("Clientlogger: Cannot open logfile.\n");
else
logf = c->write;
}
void log(object id, mapping file)
{
logf && logf(id->client*" " + "\n");
}
|
