annotate main.go @ 1:3e7247db5c6e

show index.html
author Atarwn Gard <a@qwa.su>
date Mon, 09 Mar 2026 01:04:16 +0500
parents 48bdab3eec8a
children d19133be91ba
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
0
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
1 package main
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
2
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
3 import (
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
4 "crypto/tls"
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
5 "fmt"
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
6 "log"
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
7 "net"
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
8 "net/http"
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
9 "net/http/httputil"
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
10 "net/url"
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
11 "os"
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
12 "path"
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
13 "path/filepath"
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
14 "regexp"
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
15 "runtime"
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
16 "strconv"
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
17 "strings"
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
18
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
19 "d2o/fcgi"
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
20 "d2o/icf"
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
21 )
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
22
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
23 func main() {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
24 cfgPath := "/etc/d2obase"
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
25 if len(os.Args) > 1 {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
26 cfgPath = os.Args[1]
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
27 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
28
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
29 f, err := os.Open(cfgPath)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
30 if err != nil {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
31 log.Fatalf("d2o: cannot open config: %v", err)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
32 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
33 cfg, err := icf.Parse(f)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
34 f.Close()
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
35 if err != nil {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
36 log.Fatalf("d2o: config error: %v", err)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
37 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
38
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
39 for _, d := range cfg.Abstract("d2o") {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
40 switch d.Key {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
41 case "threads":
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
42 n, err := strconv.Atoi(safeArg(d.Args, 0))
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
43 if err == nil && n > 0 {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
44 runtime.GOMAXPROCS(n)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
45 log.Printf("d2o: GOMAXPROCS = %d", n)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
46 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
47 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
48 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
49
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
50 ports := collectPorts(cfg)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
51 if len(ports) == 0 {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
52 log.Fatal("d2o: no port directives found in config")
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
53 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
54
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
55 h := &handler{cfg: cfg}
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
56 errCh := make(chan error, len(ports))
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
57
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
58 for _, pc := range ports {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
59 go func(pc portConfig) {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
60 errCh <- pc.listen(h)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
61 }(pc)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
62 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
63
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
64 log.Fatal(<-errCh)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
65 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
66
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
67 // --- Port collection --------------------------------------------------------
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
68
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
69 type portConfig struct {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
70 addr string
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
71 certFile string
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
72 keyFile string
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
73 isTLS bool
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
74 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
75
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
76 func (pc portConfig) listen(h http.Handler) error {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
77 if !pc.isTLS {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
78 log.Printf("d2o: listening on %s (http)", pc.addr)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
79 return http.ListenAndServe(pc.addr, h)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
80 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
81 cert, err := tls.LoadX509KeyPair(pc.certFile, pc.keyFile)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
82 if err != nil {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
83 return fmt.Errorf("d2o: tls: %w", err)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
84 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
85 ln, err := tls.Listen("tcp", pc.addr, &tls.Config{
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
86 Certificates: []tls.Certificate{cert},
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
87 MinVersion: tls.VersionTLS12,
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
88 })
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
89 if err != nil {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
90 return fmt.Errorf("d2o: listen %s: %w", pc.addr, err)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
91 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
92 log.Printf("d2o: listening on %s (https)", pc.addr)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
93 return http.Serve(ln, h)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
94 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
95
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
96 func collectPorts(cfg *icf.Config) []portConfig {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
97 seen := make(map[string]bool)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
98 var out []portConfig
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
99
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
100 for _, b := range cfg.Blocks {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
101 dirs := cfg.ResolveBlock(b, nil)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
102
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
103 var cert, key string
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
104 for _, d := range dirs {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
105 if d.Key == "tls" {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
106 cert = safeArg(d.Args, 0)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
107 key = safeArg(d.Args, 1)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
108 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
109 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
110
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
111 for _, d := range dirs {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
112 switch d.Key {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
113 case "port":
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
114 addr := ":" + safeArg(d.Args, 0)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
115 if !seen[addr] {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
116 seen[addr] = true
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
117 out = append(out, portConfig{addr: addr})
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
118 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
119 case "port+tls":
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
120 addr := ":" + safeArg(d.Args, 0)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
121 c := safeArg(d.Args, 1)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
122 k := safeArg(d.Args, 2)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
123 if c == "" {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
124 c = cert
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
125 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
126 if k == "" {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
127 k = key
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
128 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
129 if !seen[addr] {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
130 seen[addr] = true
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
131 out = append(out, portConfig{addr: addr, certFile: c, keyFile: k, isTLS: true})
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
132 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
133 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
134 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
135 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
136 return out
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
137 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
138
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
139 // --- HTTP Handler -----------------------------------------------------------
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
140
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
141 type handler struct {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
142 cfg *icf.Config
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
143 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
144
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
145 func (h *handler) ServeHTTP(w http.ResponseWriter, r *http.Request) {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
146 host := stripPort(r.Host)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
147 reqPath := path.Clean(r.URL.Path)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
148
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
149 dirs, caps := h.cfg.Match(host + reqPath)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
150 if dirs == nil {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
151 dirs, caps = h.cfg.Match(host)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
152 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
153 if dirs == nil {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
154 http.Error(w, "not found", http.StatusNotFound)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
155 return
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
156 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
157
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
158 h.serve(w, r, dirs, caps)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
159 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
160
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
161 func (h *handler) serve(w http.ResponseWriter, r *http.Request, dirs []icf.Directive, _ map[string]string) {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
162 var (
1
3e7247db5c6e show index.html
Atarwn Gard <a@qwa.su>
parents: 0
diff changeset
163 rootDir string
3e7247db5c6e show index.html
Atarwn Gard <a@qwa.su>
parents: 0
diff changeset
164 rootIndex []string
3e7247db5c6e show index.html
Atarwn Gard <a@qwa.su>
parents: 0
diff changeset
165 fcgiAddr string
3e7247db5c6e show index.html
Atarwn Gard <a@qwa.su>
parents: 0
diff changeset
166 fcgiPat string
3e7247db5c6e show index.html
Atarwn Gard <a@qwa.su>
parents: 0
diff changeset
167 rprxAddr string
0
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
168 )
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
169
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
170 for _, d := range dirs {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
171 switch d.Key {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
172 case "root":
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
173 rootDir = safeArg(d.Args, 0)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
174 switch safeArg(d.Args, 1) {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
175 case "show":
1
3e7247db5c6e show index.html
Atarwn Gard <a@qwa.su>
parents: 0
diff changeset
176 if len(d.Args) >= 3 {
3e7247db5c6e show index.html
Atarwn Gard <a@qwa.su>
parents: 0
diff changeset
177 rootIndex = d.Args[2:]
3e7247db5c6e show index.html
Atarwn Gard <a@qwa.su>
parents: 0
diff changeset
178 } else {
3e7247db5c6e show index.html
Atarwn Gard <a@qwa.su>
parents: 0
diff changeset
179 rootIndex = []string{"index.html"}
3e7247db5c6e show index.html
Atarwn Gard <a@qwa.su>
parents: 0
diff changeset
180 }
0
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
181 case "hide", "":
1
3e7247db5c6e show index.html
Atarwn Gard <a@qwa.su>
parents: 0
diff changeset
182 rootIndex = nil
0
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
183 default:
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
184 log.Printf("d2o: root: unknown mode %q (want show|hide)", safeArg(d.Args, 1))
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
185 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
186 case "fcgi":
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
187 fcgiAddr = safeArg(d.Args, 0)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
188 fcgiPat = safeArg(d.Args, 1)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
189 if fcgiPat == "" {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
190 fcgiPat = "*"
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
191 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
192 case "rprx":
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
193 rprxAddr = safeArg(d.Args, 0)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
194 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
195 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
196
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
197 if rprxAddr != "" {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
198 serveReverseProxy(w, r, rprxAddr)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
199 return
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
200 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
201 if fcgiAddr != "" && matchGlob(fcgiPat, r.URL.Path) {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
202 if err := serveFCGI(w, r, fcgiAddr, rootDir); err != nil {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
203 log.Printf("d2o: fcgi error: %v", err)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
204 http.Error(w, "gateway error", http.StatusBadGateway)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
205 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
206 return
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
207 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
208 if rootDir != "" {
1
3e7247db5c6e show index.html
Atarwn Gard <a@qwa.su>
parents: 0
diff changeset
209 serveStatic(w, r, rootDir, rootIndex)
0
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
210 return
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
211 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
212
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
213 http.Error(w, "not found", http.StatusNotFound)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
214 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
215
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
216 // --- Static -----------------------------------------------------------------
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
217
1
3e7247db5c6e show index.html
Atarwn Gard <a@qwa.su>
parents: 0
diff changeset
218 func serveStatic(w http.ResponseWriter, r *http.Request, rootDir string, rootIndex []string) {
0
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
219 fpath := filepath.Join(rootDir, filepath.FromSlash(path.Clean(r.URL.Path)))
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
220
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
221 info, err := os.Stat(fpath)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
222 if os.IsNotExist(err) {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
223 http.Error(w, "not found", http.StatusNotFound)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
224 return
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
225 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
226 if err != nil {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
227 http.Error(w, "internal error", http.StatusInternalServerError)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
228 return
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
229 }
1
3e7247db5c6e show index.html
Atarwn Gard <a@qwa.su>
parents: 0
diff changeset
230
0
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
231 if info.IsDir() {
1
3e7247db5c6e show index.html
Atarwn Gard <a@qwa.su>
parents: 0
diff changeset
232 if rootIndex == nil {
0
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
233 http.Error(w, "forbidden", http.StatusForbidden)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
234 return
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
235 }
1
3e7247db5c6e show index.html
Atarwn Gard <a@qwa.su>
parents: 0
diff changeset
236 for _, idx := range rootIndex {
3e7247db5c6e show index.html
Atarwn Gard <a@qwa.su>
parents: 0
diff changeset
237 idxPath := filepath.Join(fpath, idx)
3e7247db5c6e show index.html
Atarwn Gard <a@qwa.su>
parents: 0
diff changeset
238 if _, err := os.Stat(idxPath); err == nil {
3e7247db5c6e show index.html
Atarwn Gard <a@qwa.su>
parents: 0
diff changeset
239 http.ServeFile(w, r, idxPath)
3e7247db5c6e show index.html
Atarwn Gard <a@qwa.su>
parents: 0
diff changeset
240 return
3e7247db5c6e show index.html
Atarwn Gard <a@qwa.su>
parents: 0
diff changeset
241 }
3e7247db5c6e show index.html
Atarwn Gard <a@qwa.su>
parents: 0
diff changeset
242 }
0
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
243 listDir(w, r, fpath, r.URL.Path)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
244 return
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
245 }
1
3e7247db5c6e show index.html
Atarwn Gard <a@qwa.su>
parents: 0
diff changeset
246
0
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
247 http.ServeFile(w, r, fpath)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
248 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
249
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
250 func listDir(w http.ResponseWriter, r *http.Request, dir, urlPath string) {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
251 entries, err := os.ReadDir(dir)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
252 if err != nil {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
253 http.Error(w, "cannot read directory", http.StatusInternalServerError)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
254 return
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
255 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
256 w.Header().Set("Content-Type", "text/html; charset=utf-8")
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
257 fmt.Fprintf(w, "<html><head><title>Index of %s</title></head><body>\n", urlPath)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
258 fmt.Fprintf(w, "<h2>Index of %s</h2><hr><pre>\n", urlPath)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
259 if urlPath != "/" {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
260 fmt.Fprintf(w, "<a href=\"..\">..</a>\n")
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
261 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
262 for _, e := range entries {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
263 name := e.Name()
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
264 if e.IsDir() {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
265 name += "/"
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
266 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
267 fmt.Fprintf(w, "<a href=\"%s\">%s</a>\n", path.Join(urlPath, name), name)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
268 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
269 fmt.Fprintf(w, "</pre><hr><i>d2o webserver</i></body></html>")
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
270 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
271
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
272 // --- Reverse proxy ----------------------------------------------------------
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
273
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
274 func serveReverseProxy(w http.ResponseWriter, r *http.Request, target string) {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
275 if !strings.HasPrefix(target, "http://") && !strings.HasPrefix(target, "https://") {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
276 target = "http://" + target
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
277 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
278 u, err := url.Parse(target)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
279 if err != nil {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
280 http.Error(w, "bad gateway config", http.StatusInternalServerError)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
281 return
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
282 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
283 proxy := httputil.NewSingleHostReverseProxy(u)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
284 proxy.ErrorHandler = func(w http.ResponseWriter, r *http.Request, err error) {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
285 log.Printf("d2o: rprx error: %v", err)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
286 http.Error(w, "bad gateway", http.StatusBadGateway)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
287 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
288 proxy.ServeHTTP(w, r)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
289 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
290
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
291 // --- FastCGI ----------------------------------------------------------------
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
292
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
293 func serveFCGI(w http.ResponseWriter, r *http.Request, addr, docRoot string) error {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
294 network, address := parseFCGIAddr(addr)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
295 conn, err := net.Dial(network, address)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
296 if err != nil {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
297 return fmt.Errorf("connect %s: %w", addr, err)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
298 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
299 defer conn.Close()
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
300
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
301 scriptPath := r.URL.Path
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
302 if docRoot != "" {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
303 scriptPath = filepath.Join(docRoot, filepath.FromSlash(r.URL.Path))
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
304 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
305
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
306 params := map[string]string{
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
307 "REQUEST_METHOD": r.Method,
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
308 "SCRIPT_FILENAME": scriptPath,
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
309 "SCRIPT_NAME": r.URL.Path,
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
310 "REQUEST_URI": r.URL.RequestURI(),
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
311 "QUERY_STRING": r.URL.RawQuery,
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
312 "SERVER_PROTOCOL": r.Proto,
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
313 "SERVER_NAME": stripPort(r.Host),
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
314 "DOCUMENT_ROOT": docRoot,
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
315 "GATEWAY_INTERFACE": "CGI/1.1",
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
316 "SERVER_SOFTWARE": "d2o/1.0",
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
317 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
318 if r.TLS != nil {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
319 params["HTTPS"] = "on"
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
320 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
321 for k, vs := range r.Header {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
322 key := "HTTP_" + strings.ToUpper(strings.ReplaceAll(k, "-", "_"))
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
323 params[key] = strings.Join(vs, ", ")
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
324 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
325 if ct := r.Header.Get("Content-Type"); ct != "" {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
326 params["CONTENT_TYPE"] = ct
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
327 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
328 if r.ContentLength >= 0 {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
329 params["CONTENT_LENGTH"] = strconv.FormatInt(r.ContentLength, 10)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
330 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
331
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
332 return fcgi.Do(w, r, conn, params)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
333 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
334
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
335 func parseFCGIAddr(addr string) (network, address string) {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
336 if strings.HasPrefix(addr, "unix:") {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
337 return "unix", strings.TrimPrefix(addr, "unix:")
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
338 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
339 return "tcp", addr
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
340 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
341
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
342 // --- Helpers ----------------------------------------------------------------
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
343
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
344 func stripPort(host string) string {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
345 if h, _, err := net.SplitHostPort(host); err == nil {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
346 return h
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
347 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
348 return host
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
349 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
350
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
351 func safeArg(args []string, i int) string {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
352 if i < len(args) {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
353 return args[i]
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
354 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
355 return ""
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
356 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
357
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
358 func matchGlob(pattern, s string) bool {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
359 if pattern == "*" {
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
360 return true
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
361 }
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
362 regPat := "^" + strings.ReplaceAll(regexp.QuoteMeta(pattern), regexp.QuoteMeta("*"), ".*") + "$"
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
363 matched, err := regexp.MatchString(regPat, s)
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
364 return err == nil && matched
48bdab3eec8a Initial
Atarwn Gard <a@qwa.su>
parents:
diff changeset
365 }