annotate main.go @ 0:48bdab3eec8a

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