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
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
|
// This is a roxen module. Copyright 1996 - 1998, Idonex AB.
// This module handles all normal extension to content type
// mapping. Given the file 'foo.html', it will per default
// set the contenttype to 'text/html'
constant cvs_version = "$Id: contenttypes.pike,v 1.12 1998/03/11 19:42:38 neotron Exp $";
constant thread_safe=1;
#include <module.h>
inherit "module";
mapping (string:string) extensions=([]), encodings=([]);
mapping (string:int) accessed=([]);
void create()
{
defvar("exts", "\n"
"# This will include the defaults from a file.\n"
"# Feel free to add to this, but do it after the #include line if\n"
"# you want to override any defaults\n"
"\n"
"#include <etc/extensions>\n\n", "Extensions",
TYPE_TEXT_FIELD,
"This is file extension "
"to content type mapping. The format is as follows:\n"
"<pre>extension type encoding\ngif image/gif\n"
"gz STRIP application/gnuzip\n</pre>"
"For a list of types, see <a href=ftp://ftp.isi.edu/in-"
"notes/iana/assignments/media-types/media-types>ftp://ftp"
".isi.edu/in-notes/iana/assignments/media-types/media-types</a>");
defvar("default", "application/octet-stream", "Default content type",
TYPE_STRING,
"This is the default content type which is used if a file lacks "
"extension or if the extension is unknown.\n");
}
string status()
{
string a,b;
b="<h2>Accesses per extension</h2>\n\n";
foreach(indices(accessed), a)
b += a+": "+accessed[ a ]+"<br>\n";
return b;
}
string comment()
{
return sizeof(extensions) + " extensions, " + sizeof(accessed)+" used.";
}
void parse_ext_string(string exts)
{
string line;
string *f;
foreach((exts-"\r")/"\n", line)
{
if(!strlen(line)) continue;
if(line[0]=='#')
{
string file;
if(sscanf(line, "#include <%s>", file))
{
string s;
if(s=Stdio.read_bytes(file)) parse_ext_string(s);
}
} else {
f = (replace(line, "\t", " ")/" "-({""}));
if(sizeof(f) >= 2)
{
if(sizeof(f) > 2) encodings[lower_case(f[0])] = lower_case(f[2]);
extensions[lower_case(f[0])] = lower_case(f[1]);
}
}
}
}
void start()
{
parse_ext_string(QUERY(exts));
}
array register_module()
{
return ({ MODULE_TYPES, "Content types",
("This module handles all normal extension to "+
"content type mapping. Given the file 'foo.html', it will "+
"normally set the content type to 'text/html'."), ({}), 1 });
}
array type_from_extension(string ext)
{
if(ext == "default") {
// roxen_perror("%O\n", ({ QUERY(default), 0 }));
accessed[ ext ] ++;
return ({ query("default"), 0 });
} else if(extensions[ ext ]) {
accessed[ ext ]++;
return ({ extensions[ ext ], encodings[ ext ] });
}
}
int may_disable()
{
return 0;
}
|
