22124: Trim trailing slashes in ARVADOS_KEEP_SERVICES env var.
[arvados.git] / sdk / go / keepclient / keepclient.go
1 // Copyright (C) The Arvados Authors. All rights reserved.
2 //
3 // SPDX-License-Identifier: Apache-2.0
4
5 // Package keepclient provides low-level Get/Put primitives for accessing
6 // Arvados Keep blocks.
7 package keepclient
8
9 import (
10         "bufio"
11         "bytes"
12         "context"
13         "crypto/md5"
14         "errors"
15         "fmt"
16         "io"
17         "io/ioutil"
18         "net"
19         "net/http"
20         "os"
21         "path/filepath"
22         "regexp"
23         "strconv"
24         "strings"
25         "sync"
26         "time"
27
28         "git.arvados.org/arvados.git/sdk/go/arvados"
29         "git.arvados.org/arvados.git/sdk/go/arvadosclient"
30         "git.arvados.org/arvados.git/sdk/go/httpserver"
31 )
32
33 // BLOCKSIZE defines the length of a Keep "block", which is 64MB.
34 const BLOCKSIZE = 64 * 1024 * 1024
35
36 var (
37         DefaultRequestTimeout      = 20 * time.Second
38         DefaultConnectTimeout      = 2 * time.Second
39         DefaultTLSHandshakeTimeout = 4 * time.Second
40         DefaultKeepAlive           = 180 * time.Second
41
42         DefaultProxyRequestTimeout      = 300 * time.Second
43         DefaultProxyConnectTimeout      = 30 * time.Second
44         DefaultProxyTLSHandshakeTimeout = 10 * time.Second
45         DefaultProxyKeepAlive           = 120 * time.Second
46
47         DefaultRetryDelay = 2 * time.Second // see KeepClient.RetryDelay
48         MinimumRetryDelay = time.Millisecond
49
50         rootCacheDir = "/var/cache/arvados/keep"
51         userCacheDir = ".cache/arvados/keep" // relative to HOME
52 )
53
54 // Error interface with an error and boolean indicating whether the error is temporary
55 type Error interface {
56         error
57         Temporary() bool
58 }
59
60 // multipleResponseError is of type Error
61 type multipleResponseError struct {
62         error
63         isTemp bool
64 }
65
66 func (e *multipleResponseError) Temporary() bool {
67         return e.isTemp
68 }
69
70 // BlockNotFound is a multipleResponseError where isTemp is false
71 var BlockNotFound = &ErrNotFound{multipleResponseError{
72         error:  errors.New("Block not found"),
73         isTemp: false,
74 }}
75
76 // ErrNotFound is a multipleResponseError where isTemp can be true or false
77 type ErrNotFound struct {
78         multipleResponseError
79 }
80
81 func (*ErrNotFound) HTTPStatus() int { return http.StatusNotFound }
82
83 type InsufficientReplicasError struct{ error }
84
85 type OversizeBlockError struct{ error }
86
87 var ErrOversizeBlock = OversizeBlockError{error: errors.New("Exceeded maximum block size (" + strconv.Itoa(BLOCKSIZE) + ")")}
88 var MissingArvadosApiHost = errors.New("Missing required environment variable ARVADOS_API_HOST")
89 var MissingArvadosApiToken = errors.New("Missing required environment variable ARVADOS_API_TOKEN")
90 var InvalidLocatorError = errors.New("Invalid locator")
91
92 // ErrNoSuchKeepServer is returned when GetIndex is invoked with a UUID with no matching keep server
93 var ErrNoSuchKeepServer = errors.New("No keep server matching the given UUID is found")
94
95 // ErrIncompleteIndex is returned when the Index response does not end with a new empty line
96 var ErrIncompleteIndex = errors.New("Got incomplete index")
97
98 const (
99         XKeepDesiredReplicas         = "X-Keep-Desired-Replicas"
100         XKeepReplicasStored          = "X-Keep-Replicas-Stored"
101         XKeepStorageClasses          = "X-Keep-Storage-Classes"
102         XKeepStorageClassesConfirmed = "X-Keep-Storage-Classes-Confirmed"
103         XKeepSignature               = "X-Keep-Signature"
104         XKeepLocator                 = "X-Keep-Locator"
105 )
106
107 type HTTPClient interface {
108         Do(*http.Request) (*http.Response, error)
109 }
110
111 const DiskCacheDisabled = arvados.ByteSizeOrPercent(1)
112
113 // KeepClient holds information about Arvados and Keep servers.
114 type KeepClient struct {
115         Arvados            *arvadosclient.ArvadosClient
116         Want_replicas      int
117         localRoots         map[string]string
118         writableLocalRoots map[string]string
119         gatewayRoots       map[string]string
120         lock               sync.RWMutex
121         HTTPClient         HTTPClient
122
123         // Number of times to automatically retry a read/write
124         // operation after a transient failure.
125         Retries int
126
127         // Initial maximum delay for automatic retry. If zero,
128         // DefaultRetryDelay is used.  The delay after attempt N
129         // (0-based) will be a random duration between
130         // MinimumRetryDelay and RetryDelay * 2^N, not to exceed a cap
131         // of RetryDelay * 10.
132         RetryDelay time.Duration
133
134         RequestID             string
135         StorageClasses        []string
136         DefaultStorageClasses []string                  // Set by cluster's exported config
137         DiskCacheSize         arvados.ByteSizeOrPercent // See also DiskCacheDisabled
138
139         // set to 1 if all writable services are of disk type, otherwise 0
140         replicasPerService int
141
142         // Any non-disk typed services found in the list of keepservers?
143         foundNonDiskSvc bool
144
145         // Disable automatic discovery of keep services
146         disableDiscovery bool
147
148         gatewayStack arvados.KeepGateway
149 }
150
151 func (kc *KeepClient) Clone() *KeepClient {
152         kc.lock.Lock()
153         defer kc.lock.Unlock()
154         return &KeepClient{
155                 Arvados:               kc.Arvados,
156                 Want_replicas:         kc.Want_replicas,
157                 localRoots:            kc.localRoots,
158                 writableLocalRoots:    kc.writableLocalRoots,
159                 gatewayRoots:          kc.gatewayRoots,
160                 HTTPClient:            kc.HTTPClient,
161                 Retries:               kc.Retries,
162                 RetryDelay:            kc.RetryDelay,
163                 RequestID:             kc.RequestID,
164                 StorageClasses:        kc.StorageClasses,
165                 DefaultStorageClasses: kc.DefaultStorageClasses,
166                 DiskCacheSize:         kc.DiskCacheSize,
167                 replicasPerService:    kc.replicasPerService,
168                 foundNonDiskSvc:       kc.foundNonDiskSvc,
169                 disableDiscovery:      kc.disableDiscovery,
170         }
171 }
172
173 func (kc *KeepClient) loadDefaultClasses() error {
174         scData, err := kc.Arvados.ClusterConfig("StorageClasses")
175         if err != nil {
176                 return err
177         }
178         classes := scData.(map[string]interface{})
179         for scName := range classes {
180                 scConf, _ := classes[scName].(map[string]interface{})
181                 isDefault, ok := scConf["Default"].(bool)
182                 if ok && isDefault {
183                         kc.DefaultStorageClasses = append(kc.DefaultStorageClasses, scName)
184                 }
185         }
186         return nil
187 }
188
189 // MakeKeepClient creates a new KeepClient, loads default storage
190 // classes, calls discoverServices(), and returns when the client is
191 // ready to use.
192 func MakeKeepClient(arv *arvadosclient.ArvadosClient) (*KeepClient, error) {
193         kc := New(arv)
194         return kc, kc.discoverServices()
195 }
196
197 // New creates a new KeepClient. Service discovery will occur on the
198 // next read/write operation.
199 func New(arv *arvadosclient.ArvadosClient) *KeepClient {
200         defaultReplicationLevel := 2
201         value, err := arv.Discovery("defaultCollectionReplication")
202         if err == nil {
203                 v, ok := value.(float64)
204                 if ok && v > 0 {
205                         defaultReplicationLevel = int(v)
206                 }
207         }
208         kc := &KeepClient{
209                 Arvados:       arv,
210                 Want_replicas: defaultReplicationLevel,
211                 Retries:       2,
212         }
213         err = kc.loadDefaultClasses()
214         if err != nil && arv.Logger != nil {
215                 arv.Logger.WithError(err).Debug("unable to load the default storage classes cluster config")
216         }
217         return kc
218 }
219
220 // PutHR puts a block given the block hash, a reader, and the number of bytes
221 // to read from the reader (which must be between 0 and BLOCKSIZE).
222 //
223 // Returns the locator for the written block, the number of replicas
224 // written, and an error.
225 //
226 // Returns an InsufficientReplicasError if 0 <= replicas <
227 // kc.Wants_replicas.
228 func (kc *KeepClient) PutHR(hash string, r io.Reader, dataBytes int64) (string, int, error) {
229         resp, err := kc.BlockWrite(context.Background(), arvados.BlockWriteOptions{
230                 Hash:     hash,
231                 Reader:   r,
232                 DataSize: int(dataBytes),
233         })
234         return resp.Locator, resp.Replicas, err
235 }
236
237 // PutHB writes a block to Keep. The hash of the bytes is given in
238 // hash, and the data is given in buf.
239 //
240 // Return values are the same as for PutHR.
241 func (kc *KeepClient) PutHB(hash string, buf []byte) (string, int, error) {
242         resp, err := kc.BlockWrite(context.Background(), arvados.BlockWriteOptions{
243                 Hash: hash,
244                 Data: buf,
245         })
246         return resp.Locator, resp.Replicas, err
247 }
248
249 // PutB writes a block to Keep. It computes the hash itself.
250 //
251 // Return values are the same as for PutHR.
252 func (kc *KeepClient) PutB(buffer []byte) (string, int, error) {
253         resp, err := kc.BlockWrite(context.Background(), arvados.BlockWriteOptions{
254                 Data: buffer,
255         })
256         return resp.Locator, resp.Replicas, err
257 }
258
259 // PutR writes a block to Keep. It first reads all data from r into a buffer
260 // in order to compute the hash.
261 //
262 // Return values are the same as for PutHR.
263 //
264 // If the block hash and data size are known, PutHR is more efficient.
265 func (kc *KeepClient) PutR(r io.Reader) (locator string, replicas int, err error) {
266         buffer, err := ioutil.ReadAll(r)
267         if err != nil {
268                 return "", 0, err
269         }
270         return kc.PutB(buffer)
271 }
272
273 func (kc *KeepClient) getOrHead(method string, locator string, header http.Header) (io.ReadCloser, int64, string, http.Header, error) {
274         if strings.HasPrefix(locator, "d41d8cd98f00b204e9800998ecf8427e+0") {
275                 return ioutil.NopCloser(bytes.NewReader(nil)), 0, "", nil, nil
276         }
277
278         reqid := kc.getRequestID()
279
280         var expectLength int64
281         if parts := strings.SplitN(locator, "+", 3); len(parts) < 2 {
282                 expectLength = -1
283         } else if n, err := strconv.ParseInt(parts[1], 10, 64); err != nil {
284                 expectLength = -1
285         } else {
286                 expectLength = n
287         }
288
289         var errs []string
290
291         delay := delayCalculator{InitialMaxDelay: kc.RetryDelay}
292         triesRemaining := 1 + kc.Retries
293
294         serversToTry := kc.getSortedRoots(locator)
295
296         numServers := len(serversToTry)
297         count404 := 0
298
299         var retryList []string
300
301         for triesRemaining > 0 {
302                 triesRemaining--
303                 retryList = nil
304
305                 for _, host := range serversToTry {
306                         url := host + "/" + locator
307
308                         req, err := http.NewRequest(method, url, nil)
309                         if err != nil {
310                                 errs = append(errs, fmt.Sprintf("%s: %v", url, err))
311                                 continue
312                         }
313                         for k, v := range header {
314                                 req.Header[k] = append([]string(nil), v...)
315                         }
316                         if req.Header.Get("Authorization") == "" {
317                                 req.Header.Set("Authorization", "Bearer "+kc.Arvados.ApiToken)
318                         }
319                         if req.Header.Get("X-Request-Id") == "" {
320                                 req.Header.Set("X-Request-Id", reqid)
321                         }
322                         resp, err := kc.httpClient().Do(req)
323                         if err != nil {
324                                 // Probably a network error, may be transient,
325                                 // can try again.
326                                 errs = append(errs, fmt.Sprintf("%s: %v", url, err))
327                                 retryList = append(retryList, host)
328                                 continue
329                         }
330                         if resp.StatusCode != http.StatusOK {
331                                 var respbody []byte
332                                 respbody, _ = ioutil.ReadAll(&io.LimitedReader{R: resp.Body, N: 4096})
333                                 resp.Body.Close()
334                                 errs = append(errs, fmt.Sprintf("%s: HTTP %d %q",
335                                         url, resp.StatusCode, bytes.TrimSpace(respbody)))
336
337                                 if resp.StatusCode == 408 ||
338                                         resp.StatusCode == 429 ||
339                                         resp.StatusCode >= 500 {
340                                         // Timeout, too many requests, or other
341                                         // server side failure, transient
342                                         // error, can try again.
343                                         retryList = append(retryList, host)
344                                 } else if resp.StatusCode == 404 {
345                                         count404++
346                                 }
347                                 continue
348                         }
349                         if expectLength < 0 {
350                                 if resp.ContentLength < 0 {
351                                         resp.Body.Close()
352                                         return nil, 0, "", nil, fmt.Errorf("error reading %q: no size hint, no Content-Length header in response", locator)
353                                 }
354                                 expectLength = resp.ContentLength
355                         } else if resp.ContentLength >= 0 && expectLength != resp.ContentLength {
356                                 resp.Body.Close()
357                                 return nil, 0, "", nil, fmt.Errorf("error reading %q: size hint %d != Content-Length %d", locator, expectLength, resp.ContentLength)
358                         }
359                         // Success
360                         if method == "GET" {
361                                 return HashCheckingReader{
362                                         Reader: resp.Body,
363                                         Hash:   md5.New(),
364                                         Check:  locator[0:32],
365                                 }, expectLength, url, resp.Header, nil
366                         }
367                         resp.Body.Close()
368                         return nil, expectLength, url, resp.Header, nil
369                 }
370                 serversToTry = retryList
371                 if len(serversToTry) > 0 && triesRemaining > 0 {
372                         time.Sleep(delay.Next())
373                 }
374         }
375         if kc.Arvados.Logger != nil {
376                 kc.Arvados.Logger.Debugf("DEBUG: %s %s failed: %v", method, locator, errs)
377         }
378
379         var err error
380         if count404 == numServers {
381                 err = BlockNotFound
382         } else {
383                 err = &ErrNotFound{multipleResponseError{
384                         error:  fmt.Errorf("%s %s failed: %v", method, locator, errs),
385                         isTemp: len(serversToTry) > 0,
386                 }}
387         }
388         return nil, 0, "", nil, err
389 }
390
391 // attempt to create dir/subdir/ and its parents, up to but not
392 // including dir itself, using mode 0700.
393 func makedirs(dir, subdir string) {
394         for _, part := range strings.Split(subdir, string(os.PathSeparator)) {
395                 dir = filepath.Join(dir, part)
396                 os.Mkdir(dir, 0700)
397         }
398 }
399
400 // upstreamGateway creates/returns the KeepGateway stack used to read
401 // and write data: a disk-backed cache on top of an http backend.
402 func (kc *KeepClient) upstreamGateway() arvados.KeepGateway {
403         kc.lock.Lock()
404         defer kc.lock.Unlock()
405         if kc.gatewayStack != nil {
406                 return kc.gatewayStack
407         }
408         var cachedir string
409         if os.Geteuid() == 0 {
410                 cachedir = rootCacheDir
411                 makedirs("/", cachedir)
412         } else {
413                 home := "/" + os.Getenv("HOME")
414                 makedirs(home, userCacheDir)
415                 cachedir = filepath.Join(home, userCacheDir)
416         }
417         backend := &keepViaHTTP{kc}
418         if kc.DiskCacheSize == DiskCacheDisabled {
419                 kc.gatewayStack = backend
420         } else {
421                 kc.gatewayStack = &arvados.DiskCache{
422                         Dir:         cachedir,
423                         MaxSize:     kc.DiskCacheSize,
424                         KeepGateway: backend,
425                         Logger:      kc.Arvados.Logger,
426                 }
427         }
428         return kc.gatewayStack
429 }
430
431 // LocalLocator returns a locator equivalent to the one supplied, but
432 // with a valid signature from the local cluster. If the given locator
433 // already has a local signature, it is returned unchanged.
434 func (kc *KeepClient) LocalLocator(locator string) (string, error) {
435         return kc.upstreamGateway().LocalLocator(locator)
436 }
437
438 // Get retrieves the specified block from the local cache or a backend
439 // server. Returns a reader, the expected data length (or -1 if not
440 // known), and an error.
441 //
442 // The third return value (formerly a source URL in previous versions)
443 // is an empty string.
444 //
445 // If the block checksum does not match, the final Read() on the
446 // reader returned by this method will return a BadChecksum error
447 // instead of EOF.
448 //
449 // New code should use BlockRead and/or ReadAt instead of Get.
450 func (kc *KeepClient) Get(locator string) (io.ReadCloser, int64, string, error) {
451         loc, err := MakeLocator(locator)
452         if err != nil {
453                 return nil, 0, "", err
454         }
455         pr, pw := io.Pipe()
456         go func() {
457                 n, err := kc.BlockRead(context.Background(), arvados.BlockReadOptions{
458                         Locator: locator,
459                         WriteTo: pw,
460                 })
461                 if err != nil {
462                         pw.CloseWithError(err)
463                 } else if loc.Size >= 0 && n != loc.Size {
464                         pw.CloseWithError(fmt.Errorf("expected block size %d but read %d bytes", loc.Size, n))
465                 } else {
466                         pw.Close()
467                 }
468         }()
469         // Wait for the first byte to arrive, so that, if there's an
470         // error before we receive any data, we can return the error
471         // directly, instead of indirectly via a reader that returns
472         // an error.
473         bufr := bufio.NewReader(pr)
474         _, err = bufr.Peek(1)
475         if err != nil && err != io.EOF {
476                 pr.CloseWithError(err)
477                 return nil, 0, "", err
478         }
479         if err == io.EOF && (loc.Size == 0 || loc.Hash == "d41d8cd98f00b204e9800998ecf8427e") {
480                 // In the special case of the zero-length block, EOF
481                 // error from Peek() is normal.
482                 return pr, 0, "", nil
483         }
484         return struct {
485                 io.Reader
486                 io.Closer
487         }{
488                 Reader: bufr,
489                 Closer: pr,
490         }, int64(loc.Size), "", err
491 }
492
493 // BlockRead retrieves a block from the cache if it's present, otherwise
494 // from the network.
495 func (kc *KeepClient) BlockRead(ctx context.Context, opts arvados.BlockReadOptions) (int, error) {
496         return kc.upstreamGateway().BlockRead(ctx, opts)
497 }
498
499 // ReadAt retrieves a portion of block from the cache if it's
500 // present, otherwise from the network.
501 func (kc *KeepClient) ReadAt(locator string, p []byte, off int) (int, error) {
502         return kc.upstreamGateway().ReadAt(locator, p, off)
503 }
504
505 // BlockWrite writes a full block to upstream servers and saves a copy
506 // in the local cache.
507 func (kc *KeepClient) BlockWrite(ctx context.Context, req arvados.BlockWriteOptions) (arvados.BlockWriteResponse, error) {
508         return kc.upstreamGateway().BlockWrite(ctx, req)
509 }
510
511 // Ask verifies that a block with the given hash is available and
512 // readable, according to at least one Keep service. Unlike Get, it
513 // does not retrieve the data or verify that the data content matches
514 // the hash specified by the locator.
515 //
516 // Returns the data size (content length) reported by the Keep service
517 // and the URI reporting the data size.
518 func (kc *KeepClient) Ask(locator string) (int64, string, error) {
519         _, size, url, _, err := kc.getOrHead("HEAD", locator, nil)
520         return size, url, err
521 }
522
523 // GetIndex retrieves a list of blocks stored on the given server whose hashes
524 // begin with the given prefix. The returned reader will return an error (other
525 // than EOF) if the complete index cannot be retrieved.
526 //
527 // This is meant to be used only by system components and admin tools.
528 // It will return an error unless the client is using a "data manager token"
529 // recognized by the Keep services.
530 func (kc *KeepClient) GetIndex(keepServiceUUID, prefix string) (io.Reader, error) {
531         url := kc.LocalRoots()[keepServiceUUID]
532         if url == "" {
533                 return nil, ErrNoSuchKeepServer
534         }
535
536         url += "/index"
537         if prefix != "" {
538                 url += "/" + prefix
539         }
540
541         req, err := http.NewRequest("GET", url, nil)
542         if err != nil {
543                 return nil, err
544         }
545
546         req.Header.Add("Authorization", "Bearer "+kc.Arvados.ApiToken)
547         req.Header.Set("X-Request-Id", kc.getRequestID())
548         resp, err := kc.httpClient().Do(req)
549         if err != nil {
550                 return nil, err
551         }
552
553         defer resp.Body.Close()
554
555         if resp.StatusCode != http.StatusOK {
556                 return nil, fmt.Errorf("Got http status code: %d", resp.StatusCode)
557         }
558
559         var respBody []byte
560         respBody, err = ioutil.ReadAll(resp.Body)
561         if err != nil {
562                 return nil, err
563         }
564
565         // Got index; verify that it is complete
566         // The response should be "\n" if no locators matched the prefix
567         // Else, it should be a list of locators followed by a blank line
568         if !bytes.Equal(respBody, []byte("\n")) && !bytes.HasSuffix(respBody, []byte("\n\n")) {
569                 return nil, ErrIncompleteIndex
570         }
571
572         // Got complete index; strip the trailing newline and send
573         return bytes.NewReader(respBody[0 : len(respBody)-1]), nil
574 }
575
576 // LocalRoots returns the map of local (i.e., disk and proxy) Keep
577 // services: uuid -> baseURI.
578 func (kc *KeepClient) LocalRoots() map[string]string {
579         kc.discoverServices()
580         kc.lock.RLock()
581         defer kc.lock.RUnlock()
582         return kc.localRoots
583 }
584
585 // GatewayRoots returns the map of Keep remote gateway services:
586 // uuid -> baseURI.
587 func (kc *KeepClient) GatewayRoots() map[string]string {
588         kc.discoverServices()
589         kc.lock.RLock()
590         defer kc.lock.RUnlock()
591         return kc.gatewayRoots
592 }
593
594 // WritableLocalRoots returns the map of writable local Keep services:
595 // uuid -> baseURI.
596 func (kc *KeepClient) WritableLocalRoots() map[string]string {
597         kc.discoverServices()
598         kc.lock.RLock()
599         defer kc.lock.RUnlock()
600         return kc.writableLocalRoots
601 }
602
603 // SetServiceRoots disables service discovery and updates the
604 // localRoots and gatewayRoots maps, without disrupting operations
605 // that are already in progress.
606 //
607 // The supplied maps must not be modified after calling
608 // SetServiceRoots.
609 func (kc *KeepClient) SetServiceRoots(locals, writables, gateways map[string]string) {
610         kc.disableDiscovery = true
611         kc.setServiceRoots(locals, writables, gateways)
612 }
613
614 func (kc *KeepClient) setServiceRoots(locals, writables, gateways map[string]string) {
615         kc.lock.Lock()
616         defer kc.lock.Unlock()
617         kc.localRoots = locals
618         kc.writableLocalRoots = writables
619         kc.gatewayRoots = gateways
620 }
621
622 // getSortedRoots returns a list of base URIs of Keep services, in the
623 // order they should be attempted in order to retrieve content for the
624 // given locator.
625 func (kc *KeepClient) getSortedRoots(locator string) []string {
626         var found []string
627         for _, hint := range strings.Split(locator, "+") {
628                 if len(hint) < 7 || hint[0:2] != "K@" {
629                         // Not a service hint.
630                         continue
631                 }
632                 if len(hint) == 7 {
633                         // +K@abcde means fetch from proxy at
634                         // keep.abcde.arvadosapi.com
635                         found = append(found, "https://keep."+hint[2:]+".arvadosapi.com")
636                 } else if len(hint) == 29 {
637                         // +K@abcde-abcde-abcdeabcdeabcde means fetch
638                         // from gateway with given uuid
639                         if gwURI, ok := kc.GatewayRoots()[hint[2:]]; ok {
640                                 found = append(found, gwURI)
641                         }
642                         // else this hint is no use to us; carry on.
643                 }
644         }
645         // After trying all usable service hints, fall back to local roots.
646         found = append(found, NewRootSorter(kc.LocalRoots(), locator[0:32]).GetSortedRoots()...)
647         return found
648 }
649
650 func (kc *KeepClient) SetStorageClasses(sc []string) {
651         // make a copy so the caller can't mess with it.
652         kc.StorageClasses = append([]string{}, sc...)
653 }
654
655 var (
656         // There are four global http.Client objects for the four
657         // possible permutations of TLS behavior (verify/skip-verify)
658         // and timeout settings (proxy/non-proxy).
659         defaultClient = map[bool]map[bool]HTTPClient{
660                 // defaultClient[false] is used for verified TLS reqs
661                 false: {},
662                 // defaultClient[true] is used for unverified
663                 // (insecure) TLS reqs
664                 true: {},
665         }
666         defaultClientMtx sync.Mutex
667 )
668
669 // httpClient returns the HTTPClient field if it's not nil, otherwise
670 // whichever of the four global http.Client objects is suitable for
671 // the current environment (i.e., TLS verification on/off, keep
672 // services are/aren't proxies).
673 func (kc *KeepClient) httpClient() HTTPClient {
674         if kc.HTTPClient != nil {
675                 return kc.HTTPClient
676         }
677         defaultClientMtx.Lock()
678         defer defaultClientMtx.Unlock()
679         if c, ok := defaultClient[kc.Arvados.ApiInsecure][kc.foundNonDiskSvc]; ok {
680                 return c
681         }
682
683         var requestTimeout, connectTimeout, keepAlive, tlsTimeout time.Duration
684         if kc.foundNonDiskSvc {
685                 // Use longer timeouts when connecting to a proxy,
686                 // because this usually means the intervening network
687                 // is slower.
688                 requestTimeout = DefaultProxyRequestTimeout
689                 connectTimeout = DefaultProxyConnectTimeout
690                 tlsTimeout = DefaultProxyTLSHandshakeTimeout
691                 keepAlive = DefaultProxyKeepAlive
692         } else {
693                 requestTimeout = DefaultRequestTimeout
694                 connectTimeout = DefaultConnectTimeout
695                 tlsTimeout = DefaultTLSHandshakeTimeout
696                 keepAlive = DefaultKeepAlive
697         }
698
699         c := &http.Client{
700                 Timeout: requestTimeout,
701                 // It's not safe to copy *http.DefaultTransport
702                 // because it has a mutex (which might be locked)
703                 // protecting a private map (which might not be nil).
704                 // So we build our own, using the Go 1.12 default
705                 // values, ignoring any changes the application has
706                 // made to http.DefaultTransport.
707                 Transport: &http.Transport{
708                         DialContext: (&net.Dialer{
709                                 Timeout:   connectTimeout,
710                                 KeepAlive: keepAlive,
711                                 DualStack: true,
712                         }).DialContext,
713                         MaxIdleConns:          100,
714                         IdleConnTimeout:       90 * time.Second,
715                         TLSHandshakeTimeout:   tlsTimeout,
716                         ExpectContinueTimeout: 1 * time.Second,
717                         TLSClientConfig:       arvadosclient.MakeTLSConfig(kc.Arvados.ApiInsecure),
718                 },
719         }
720         defaultClient[kc.Arvados.ApiInsecure][kc.foundNonDiskSvc] = c
721         return c
722 }
723
724 var reqIDGen = httpserver.IDGenerator{Prefix: "req-"}
725
726 func (kc *KeepClient) getRequestID() string {
727         if kc.RequestID != "" {
728                 return kc.RequestID
729         }
730         return reqIDGen.Next()
731 }
732
733 func (kc *KeepClient) debugf(format string, args ...interface{}) {
734         if kc.Arvados.Logger == nil {
735                 return
736         }
737         kc.Arvados.Logger.Debugf(format, args...)
738 }
739
740 type Locator struct {
741         Hash  string
742         Size  int      // -1 if data size is not known
743         Hints []string // Including the size hint, if any
744 }
745
746 func (loc *Locator) String() string {
747         s := loc.Hash
748         if len(loc.Hints) > 0 {
749                 s = s + "+" + strings.Join(loc.Hints, "+")
750         }
751         return s
752 }
753
754 var locatorMatcher = regexp.MustCompile("^([0-9a-f]{32})([+](.*))?$")
755
756 func MakeLocator(path string) (*Locator, error) {
757         sm := locatorMatcher.FindStringSubmatch(path)
758         if sm == nil {
759                 return nil, InvalidLocatorError
760         }
761         loc := Locator{Hash: sm[1], Size: -1}
762         if sm[2] != "" {
763                 loc.Hints = strings.Split(sm[3], "+")
764         } else {
765                 loc.Hints = []string{}
766         }
767         if len(loc.Hints) > 0 {
768                 if size, err := strconv.Atoi(loc.Hints[0]); err == nil {
769                         loc.Size = size
770                 }
771         }
772         return &loc, nil
773 }