20187: Preserve CORS and other misc headers.
[arvados.git] / lib / controller / handler.go
1 // Copyright (C) The Arvados Authors. All rights reserved.
2 //
3 // SPDX-License-Identifier: AGPL-3.0
4
5 package controller
6
7 import (
8         "context"
9         "encoding/json"
10         "errors"
11         "fmt"
12         "io/ioutil"
13         "mime"
14         "net/http"
15         "net/http/httptest"
16         "net/url"
17         "strings"
18         "sync"
19         "time"
20
21         "git.arvados.org/arvados.git/lib/controller/api"
22         "git.arvados.org/arvados.git/lib/controller/federation"
23         "git.arvados.org/arvados.git/lib/controller/localdb"
24         "git.arvados.org/arvados.git/lib/controller/railsproxy"
25         "git.arvados.org/arvados.git/lib/controller/router"
26         "git.arvados.org/arvados.git/lib/ctrlctx"
27         "git.arvados.org/arvados.git/sdk/go/arvados"
28         "git.arvados.org/arvados.git/sdk/go/ctxlog"
29         "git.arvados.org/arvados.git/sdk/go/health"
30         "git.arvados.org/arvados.git/sdk/go/httpserver"
31
32         // sqlx needs lib/pq to talk to PostgreSQL
33         _ "github.com/lib/pq"
34 )
35
36 type Handler struct {
37         Cluster           *arvados.Cluster
38         BackgroundContext context.Context
39
40         setupOnce      sync.Once
41         federation     *federation.Conn
42         handlerStack   http.Handler
43         proxy          *proxy
44         secureClient   *http.Client
45         insecureClient *http.Client
46         dbConnector    ctrlctx.DBConnector
47         limitLogCreate chan struct{}
48
49         cache map[string]*cacheEnt
50 }
51
52 func (h *Handler) ServeHTTP(w http.ResponseWriter, req *http.Request) {
53         h.setupOnce.Do(h.setup)
54         if req.Method != "GET" && req.Method != "HEAD" {
55                 // http.ServeMux returns 301 with a cleaned path if
56                 // the incoming request has a double slash. Some
57                 // clients (including the Go standard library) change
58                 // the request method to GET when following a 301
59                 // redirect if the original method was not HEAD
60                 // (RFC7231 6.4.2 specifically allows this in the case
61                 // of POST). Thus "POST //foo" gets misdirected to
62                 // "GET /foo". To avoid this, eliminate double slashes
63                 // before passing the request to ServeMux.
64                 for strings.Contains(req.URL.Path, "//") {
65                         req.URL.Path = strings.Replace(req.URL.Path, "//", "/", -1)
66                 }
67         }
68         h.handlerStack.ServeHTTP(w, req)
69 }
70
71 func (h *Handler) CheckHealth() error {
72         h.setupOnce.Do(h.setup)
73         _, err := h.dbConnector.GetDB(context.TODO())
74         if err != nil {
75                 return err
76         }
77         _, _, err = railsproxy.FindRailsAPI(h.Cluster)
78         if err != nil {
79                 return err
80         }
81         if h.Cluster.API.VocabularyPath != "" {
82                 req, err := http.NewRequest("GET", "/arvados/v1/vocabulary", nil)
83                 if err != nil {
84                         return err
85                 }
86                 var resp httptest.ResponseRecorder
87                 h.handlerStack.ServeHTTP(&resp, req)
88                 if resp.Result().StatusCode != http.StatusOK {
89                         return fmt.Errorf("%d %s", resp.Result().StatusCode, resp.Result().Status)
90                 }
91         }
92         return nil
93 }
94
95 func (h *Handler) Done() <-chan struct{} {
96         return nil
97 }
98
99 func neverRedirect(*http.Request, []*http.Request) error { return http.ErrUseLastResponse }
100
101 func (h *Handler) setup() {
102         mux := http.NewServeMux()
103         healthFuncs := make(map[string]health.Func)
104
105         h.dbConnector = ctrlctx.DBConnector{PostgreSQL: h.Cluster.PostgreSQL}
106         go func() {
107                 <-h.BackgroundContext.Done()
108                 h.dbConnector.Close()
109         }()
110         oidcAuthorizer := localdb.OIDCAccessTokenAuthorizer(h.Cluster, h.dbConnector.GetDB)
111         h.federation = federation.New(h.BackgroundContext, h.Cluster, &healthFuncs, h.dbConnector.GetDB)
112         rtr := router.New(h.federation, router.Config{
113                 MaxRequestSize: h.Cluster.API.MaxRequestSize,
114                 WrapCalls: api.ComposeWrappers(
115                         ctrlctx.WrapCallsInTransactions(h.dbConnector.GetDB),
116                         oidcAuthorizer.WrapCalls,
117                         ctrlctx.WrapCallsWithAuth(h.Cluster)),
118         })
119
120         healthRoutes := health.Routes{"ping": func() error { _, err := h.dbConnector.GetDB(context.TODO()); return err }}
121         for name, f := range healthFuncs {
122                 healthRoutes[name] = f
123         }
124         mux.Handle("/_health/", &health.Handler{
125                 Token:  h.Cluster.ManagementToken,
126                 Prefix: "/_health/",
127                 Routes: healthRoutes,
128         })
129         mux.Handle("/arvados/v1/config", rtr)
130         mux.Handle("/arvados/v1/vocabulary", rtr)
131         mux.Handle("/"+arvados.EndpointUserAuthenticate.Path, rtr) // must come before .../users/
132         mux.Handle("/arvados/v1/collections", rtr)
133         mux.Handle("/arvados/v1/collections/", rtr)
134         mux.Handle("/arvados/v1/users", rtr)
135         mux.Handle("/arvados/v1/users/", rtr)
136         mux.Handle("/arvados/v1/connect/", rtr)
137         mux.Handle("/arvados/v1/container_requests", rtr)
138         mux.Handle("/arvados/v1/container_requests/", rtr)
139         mux.Handle("/arvados/v1/groups", rtr)
140         mux.Handle("/arvados/v1/groups/", rtr)
141         mux.Handle("/arvados/v1/links", rtr)
142         mux.Handle("/arvados/v1/links/", rtr)
143         mux.Handle("/login", rtr)
144         mux.Handle("/logout", rtr)
145         mux.Handle("/arvados/v1/api_client_authorizations", rtr)
146         mux.Handle("/arvados/v1/api_client_authorizations/", rtr)
147
148         hs := http.NotFoundHandler()
149         hs = prepend(hs, h.proxyRailsAPI)
150         hs = prepend(hs, h.limitLogCreateRequests)
151         hs = h.setupProxyRemoteCluster(hs)
152         hs = prepend(hs, oidcAuthorizer.Middleware)
153         mux.Handle("/", hs)
154         h.handlerStack = mux
155
156         sc := *arvados.DefaultSecureClient
157         sc.CheckRedirect = neverRedirect
158         h.secureClient = &sc
159
160         ic := *arvados.InsecureHTTPClient
161         ic.CheckRedirect = neverRedirect
162         h.insecureClient = &ic
163
164         logCreateLimit := int(float64(h.Cluster.API.MaxConcurrentRequests) * h.Cluster.API.LogCreateRequestFraction)
165         if logCreateLimit == 0 && h.Cluster.API.LogCreateRequestFraction > 0 {
166                 logCreateLimit = 1
167         }
168         h.limitLogCreate = make(chan struct{}, logCreateLimit)
169
170         h.proxy = &proxy{
171                 Name: "arvados-controller",
172         }
173         h.cache = map[string]*cacheEnt{
174                 "/discovery/v1/apis/arvados/v1/rest": &cacheEnt{},
175         }
176
177         go h.trashSweepWorker()
178         go h.containerLogSweepWorker()
179 }
180
181 type middlewareFunc func(http.ResponseWriter, *http.Request, http.Handler)
182
183 func prepend(next http.Handler, middleware middlewareFunc) http.Handler {
184         return http.HandlerFunc(func(w http.ResponseWriter, req *http.Request) {
185                 middleware(w, req, next)
186         })
187 }
188
189 func (h *Handler) localClusterRequest(req *http.Request) (*http.Response, error) {
190         urlOut, insecure, err := railsproxy.FindRailsAPI(h.Cluster)
191         if err != nil {
192                 return nil, err
193         }
194         urlOut = &url.URL{
195                 Scheme:   urlOut.Scheme,
196                 Host:     urlOut.Host,
197                 Path:     req.URL.Path,
198                 RawPath:  req.URL.RawPath,
199                 RawQuery: req.URL.RawQuery,
200         }
201         client := h.secureClient
202         if insecure {
203                 client = h.insecureClient
204         }
205         return h.proxy.Do(req, urlOut, client)
206 }
207
208 func (h *Handler) limitLogCreateRequests(w http.ResponseWriter, req *http.Request, next http.Handler) {
209         if cap(h.limitLogCreate) > 0 && req.Method == http.MethodPost && strings.HasPrefix(req.URL.Path, "/arvados/v1/logs") {
210                 select {
211                 case h.limitLogCreate <- struct{}{}:
212                         defer func() { <-h.limitLogCreate }()
213                         next.ServeHTTP(w, req)
214                 default:
215                         http.Error(w, "Excess log messages", http.StatusServiceUnavailable)
216                 }
217                 return
218         }
219         next.ServeHTTP(w, req)
220 }
221
222 // cacheEnt implements a basic stale-while-revalidate cache, suitable
223 // for the Arvados discovery document.
224 type cacheEnt struct {
225         mtx          sync.Mutex
226         header       http.Header
227         body         []byte
228         refreshAfter time.Time
229         refreshLock  sync.Mutex
230 }
231
232 const cacheTTL = 5 * time.Minute
233
234 func (ent *cacheEnt) refresh(path string, do func(*http.Request) (*http.Response, error)) (http.Header, []byte, error) {
235         ent.refreshLock.Lock()
236         defer ent.refreshLock.Unlock()
237         if header, body, needRefresh := ent.response(); !needRefresh {
238                 // another goroutine refreshed successfully while we
239                 // were waiting for refreshLock
240                 return header, body, nil
241         } else if body != nil {
242                 // Cache is present, but expired. We'll try to refresh
243                 // below. Meanwhile, other refresh() calls will queue
244                 // up for refreshLock -- and we don't want them to
245                 // turn into N upstream requests, even if upstream is
246                 // failing.  (If we succeed we'll update the expiry
247                 // time again below with the real cacheTTL -- this
248                 // just takes care of the error case.)
249                 ent.mtx.Lock()
250                 ent.refreshAfter = time.Now().Add(time.Second)
251                 ent.mtx.Unlock()
252         }
253
254         ctx, cancel := context.WithDeadline(context.Background(), time.Now().Add(time.Minute))
255         defer cancel()
256         // 0.0.0.0:0 is just a placeholder here -- do(), which is
257         // localClusterRequest(), will replace the scheme and host
258         // parts with the real proxy destination.
259         req, err := http.NewRequestWithContext(ctx, http.MethodGet, "http://0.0.0.0:0/"+path, nil)
260         if err != nil {
261                 return nil, nil, err
262         }
263         resp, err := do(req)
264         if err != nil {
265                 return nil, nil, err
266         }
267         if resp.StatusCode != http.StatusOK {
268                 return nil, nil, fmt.Errorf("HTTP status %d", resp.StatusCode)
269         }
270         body, err := ioutil.ReadAll(resp.Body)
271         if err != nil {
272                 return nil, nil, fmt.Errorf("Read error: %w", err)
273         }
274         header := http.Header{}
275         for k, v := range resp.Header {
276                 if !dropHeaders[k] && k != "X-Request-Id" {
277                         header[k] = v
278                 }
279         }
280         if mediatype, _, err := mime.ParseMediaType(header.Get("Content-Type")); err == nil && mediatype == "application/json" {
281                 if !json.Valid(body) {
282                         return nil, nil, errors.New("invalid JSON encoding in response")
283                 }
284         }
285         ent.mtx.Lock()
286         defer ent.mtx.Unlock()
287         ent.header = header
288         ent.body = body
289         ent.refreshAfter = time.Now().Add(cacheTTL)
290         return ent.header, ent.body, nil
291 }
292
293 func (ent *cacheEnt) response() (http.Header, []byte, bool) {
294         ent.mtx.Lock()
295         defer ent.mtx.Unlock()
296         return ent.header, ent.body, ent.refreshAfter.Before(time.Now())
297 }
298
299 func (ent *cacheEnt) ServeHTTP(ctx context.Context, w http.ResponseWriter, path string, do func(*http.Request) (*http.Response, error)) {
300         header, body, needRefresh := ent.response()
301         if body == nil {
302                 // need to fetch before we can return anything
303                 var err error
304                 header, body, err = ent.refresh(path, do)
305                 if err != nil {
306                         http.Error(w, err.Error(), http.StatusBadGateway)
307                         return
308                 }
309         } else if needRefresh {
310                 // re-fetch in background
311                 go func() {
312                         _, _, err := ent.refresh(path, do)
313                         if err != nil {
314                                 ctxlog.FromContext(ctx).WithError(err).WithField("path", path).Warn("error refreshing cache")
315                         }
316                 }()
317         }
318         for k, v := range header {
319                 w.Header()[k] = v
320         }
321         w.WriteHeader(http.StatusOK)
322         w.Write(body)
323 }
324
325 func (h *Handler) proxyRailsAPI(w http.ResponseWriter, req *http.Request, next http.Handler) {
326         if ent, ok := h.cache[req.URL.Path]; ok && req.Method == http.MethodGet {
327                 ent.ServeHTTP(req.Context(), w, req.URL.Path, h.localClusterRequest)
328                 return
329         }
330         resp, err := h.localClusterRequest(req)
331         n, err := h.proxy.ForwardResponse(w, resp, err)
332         if err != nil {
333                 httpserver.Logger(req).WithError(err).WithField("bytesCopied", n).Error("error copying response body")
334         }
335 }
336
337 // Use a localhost entry from Services.RailsAPI.InternalURLs if one is
338 // present, otherwise choose an arbitrary entry.
339 func findRailsAPI(cluster *arvados.Cluster) (*url.URL, bool, error) {
340         var best *url.URL
341         for target := range cluster.Services.RailsAPI.InternalURLs {
342                 target := url.URL(target)
343                 best = &target
344                 if strings.HasPrefix(target.Host, "localhost:") || strings.HasPrefix(target.Host, "127.0.0.1:") || strings.HasPrefix(target.Host, "[::1]:") {
345                         break
346                 }
347         }
348         if best == nil {
349                 return nil, false, fmt.Errorf("Services.RailsAPI.InternalURLs is empty")
350         }
351         return best, cluster.TLS.Insecure, nil
352 }