Handle hostnames with upper-case letters
[webmin.git] / apache / mod_disk_cache.pl
1 # mod_disk_cache.pl
2 # Disk-caching related functions
3
4 sub mod_disk_cache_directives
5 {
6 local $rv;
7 $rv = [ [ 'CacheRoot', 0, 13.1, 'virtual', 2.0 ],
8         [ 'CacheSize', 0, 13.1, 'virtual', 2.0 ],
9         [ 'CacheGcInterval', 0, 13.1, 'virtual', 2.0 ],
10         [ 'CacheDirLevels', 0, 13.1, 'virtual', 2.0 ],
11         [ 'CacheDirLength', 0, 13.1, 'virtual', 2.0 ],
12         [ 'CacheMinFileSize', 0, 13.1, 'virtual', 2.0 ],
13         [ 'CacheMaxFileSize', 0, 13.1, 'virtual', 2.0 ] ];
14 return &make_directives($rv, $_[0], "mod_disk_cache");
15 }
16
17 require 'cache.pl';
18
19 sub edit_CacheMinFileSize
20 {
21 return (1, $text{'cache_minfs'},
22         &opt_input($_[0]->{'value'}, "CacheMinFileSize", $text{'default'}, 8));
23 }
24 sub save_CacheMinFileSize
25 {
26 return &parse_opt("CacheMinFileSize", '^\d+$', $text{'cache_eminfs'});
27 }
28
29 sub edit_CacheMaxFileSize
30 {
31 return (1, $text{'cache_maxfs'},
32         &opt_input($_[0]->{'value'}, "CacheMaxFileSize", $text{'default'}, 8));
33 }
34 sub save_CacheMaxFileSize
35 {
36 return &parse_opt("CacheMaxFileSize", '^\d+$', $text{'cache_emaxfs'});
37 }
38
39 # XXX new stuff in mod_proxy
40