d68ab27c |
1 | structure Apache :> APACHE_CONFIG = struct |
2 | |
3410e495 |
3 | open ConfigTypes |
4 | |
a7bcd59c |
5 | val reload = "/usr/bin/sudo /usr/local/sbin/domtool-publish apache" |
8bd6a399 |
6 | val down = "/usr/bin/sudo /usr/local/sbin/domtool-publish apache-down" |
7 | val undown = "/usr/bin/sudo /usr/local/sbin/domtool-publish apache-undown" |
d68ab27c |
8 | |
c829302a |
9 | val reload1 = "/usr/bin/sudo /usr/local/sbin/domtool-publish apache1.3" |
10 | val down1 = "/usr/bin/sudo /usr/local/sbin/domtool-publish apache1.3-down" |
11 | val undown1 = "/usr/bin/sudo /usr/local/sbin/domtool-publish apache1.3-undown" |
12 | |
c342e144 |
13 | val confDir = "/var/domtool/vhosts" |
d68ab27c |
14 | |
d29832ae |
15 | val webNodes_all = [("mire", {version = APACHE_2, auth = MOD_WAKLOG})] |
a71b2f2b |
16 | val webNodes_admin = [("deleuze", {version = APACHE_2, auth = MOD_WAKLOG})] |
4cb2e7e7 |
17 | |
18 | val webNodes_default = ["mire"] |
d68ab27c |
19 | |
169731e9 |
20 | val proxyTargets = ["http://hcoop.net/cgi-bin/mailman", |
21 | "http://hcoop.net/pipermail"] |
22 | |
73e665f1 |
23 | val public_html = "public_html" |
ab5d2803 |
24 | |
c83d76f4 |
25 | fun logDirOf version1 user = |
244a93c6 |
26 | if size user < 2 then |
27 | "/bad_username" |
28 | else |
c83d76f4 |
29 | String.concat [if version1 then |
30 | "/var/log/apache/user/" |
31 | else |
32 | "/var/log/apache2/user/", |
244a93c6 |
33 | String.substring (user, 0, 1), |
34 | "/", |
35 | String.substring (user, 0, 2), |
36 | "/", |
37 | user, |
38 | "/apache/log"] |
39 | |
d68ab27c |
40 | end |