services/keepproxy/keepproxy.go

   1 package main
   2
   3 import (
   4         "git.curoverse.com/arvados.git/sdk/go/keepclient"
   5         "git.curoverse.com/arvados.git/sdk/go/arvadosclient"
   6         "flag"
   7         "fmt"
   8         "github.com/gorilla/mux"
   9         "io"
  10         "io/ioutil"
  11         "log"
  12         "net"
  13         "net/http"
  14         "os"
  15         "os/signal"
  16         "sync"
  17         "syscall"
  18         "time"
  19 )
  20
  21 // Default TCP address on which to listen for requests.
  22 // Initialized by the -listen flag.
  23 const DEFAULT_ADDR = ":25107"
  24
  25 var listener net.Listener
  26
  27 func main() {
  28         var (
  29                 listen           string
  30                 no_get           bool
  31                 no_put           bool
  32                 default_replicas int
  33                 pidfile          string
  34         )
  35
  36         flagset := flag.NewFlagSet("default", flag.ExitOnError)
  37
  38         flagset.StringVar(
  39                 &listen,
  40                 "listen",
  41                 DEFAULT_ADDR,
  42                 "Interface on which to listen for requests, in the format "+
  43                         "ipaddr:port. e.g. -listen=10.0.1.24:8000. Use -listen=:port "+
  44                         "to listen on all network interfaces.")
  45
  46         flagset.BoolVar(
  47                 &no_get,
  48                 "no-get",
  49                 false,
  50                 "If set, disable GET operations")
  51
  52         flagset.BoolVar(
  53                 &no_put,
  54                 "no-put",
  55                 false,
  56                 "If set, disable PUT operations")
  57
  58         flagset.IntVar(
  59                 &default_replicas,
  60                 "default-replicas",
  61                 2,
  62                 "Default number of replicas to write if not specified by the client.")
  63
  64         flagset.StringVar(
  65                 &pidfile,
  66                 "pid",
  67                 "",
  68                 "Path to write pid file")
  69
  70         flagset.Parse(os.Args[1:])
  71
  72         arv, err := arvadosclient.MakeArvadosClient()
  73         if err != nil {
  74                 log.Fatalf("Error setting up arvados client %s", err.Error())
  75         }
  76
  77         kc, err := keepclient.MakeKeepClient(&arv)
  78         if err != nil {
  79                 log.Fatalf("Error setting up keep client %s", err.Error())
  80         }
  81
  82         if pidfile != "" {
  83                 f, err := os.Create(pidfile)
  84                 if err != nil {
  85                         log.Fatalf("Error writing pid file (%s): %s", pidfile, err.Error())
  86                 }
  87                 fmt.Fprint(f, os.Getpid())
  88                 f.Close()
  89                 defer os.Remove(pidfile)
  90         }
  91
  92         kc.Want_replicas = default_replicas
  93
  94         listener, err = net.Listen("tcp", listen)
  95         if err != nil {
  96                 log.Fatalf("Could not listen on %v", listen)
  97         }
  98
  99         go RefreshServicesList(&kc)
 100
 101         // Shut down the server gracefully (by closing the listener)
 102         // if SIGTERM is received.
 103         term := make(chan os.Signal, 1)
 104         go func(sig <-chan os.Signal) {
 105                 s := <-sig
 106                 log.Println("caught signal:", s)
 107                 listener.Close()
 108                 listener = nil
 109         }(term)
 110         signal.Notify(term, syscall.SIGTERM)
 111         signal.Notify(term, syscall.SIGINT)
 112
 113         log.Printf("Arvados Keep proxy started listening on %v with server list %v", listener.Addr(), kc.ServiceRoots())
 114
 115         // Start listening for requests.
 116         http.Serve(listener, MakeRESTRouter(!no_get, !no_put, &kc))
 117
 118         log.Println("shutting down")
 119 }
 120
 121 type ApiTokenCache struct {
 122         tokens     map[string]int64
 123         lock       sync.Mutex
 124         expireTime int64
 125 }
 126
 127 // Refresh the keep service list every five minutes.
 128 func RefreshServicesList(kc *keepclient.KeepClient) {
 129         for {
 130                 time.Sleep(300 * time.Second)
 131                 oldservices := kc.ServiceRoots()
 132                 kc.DiscoverKeepServers()
 133                 newservices := kc.ServiceRoots()
 134                 s1 := fmt.Sprint(oldservices)
 135                 s2 := fmt.Sprint(newservices)
 136                 if s1 != s2 {
 137                         log.Printf("Updated server list to %v", s2)
 138                 }
 139         }
 140 }
 141
 142 // Cache the token and set an expire time.  If we already have an expire time
 143 // on the token, it is not updated.
 144 func (this *ApiTokenCache) RememberToken(token string) {
 145         this.lock.Lock()
 146         defer this.lock.Unlock()
 147
 148         now := time.Now().Unix()
 149         if this.tokens[token] == 0 {
 150                 this.tokens[token] = now + this.expireTime
 151         }
 152 }
 153
 154 // Check if the cached token is known and still believed to be valid.
 155 func (this *ApiTokenCache) RecallToken(token string) bool {
 156         this.lock.Lock()
 157         defer this.lock.Unlock()
 158
 159         now := time.Now().Unix()
 160         if this.tokens[token] == 0 {
 161                 // Unknown token
 162                 return false
 163         } else if now < this.tokens[token] {
 164                 // Token is known and still valid
 165                 return true
 166         } else {
 167                 // Token is expired
 168                 this.tokens[token] = 0
 169                 return false
 170         }
 171 }
 172
 173 func GetRemoteAddress(req *http.Request) string {
 174         if realip := req.Header.Get("X-Real-IP"); realip != "" {
 175                 if forwarded := req.Header.Get("X-Forwarded-For"); forwarded != realip {
 176                         return fmt.Sprintf("%s (X-Forwarded-For %s)", realip, forwarded)
 177                 } else {
 178                         return realip
 179                 }
 180         }
 181         return req.RemoteAddr
 182 }
 183
 184 func CheckAuthorizationHeader(kc keepclient.KeepClient, cache *ApiTokenCache, req *http.Request) (pass bool, tok string) {
 185         var auth string
 186         if auth = req.Header.Get("Authorization"); auth == "" {
 187                 return false, ""
 188         }
 189
 190         _, err := fmt.Sscanf(auth, "OAuth2 %s", &tok)
 191         if err != nil {
 192                 // Scanning error
 193                 return false, ""
 194         }
 195
 196         if cache.RecallToken(tok) {
 197                 // Valid in the cache, short circut
 198                 return true, tok
 199         }
 200
 201         arv := *kc.Arvados
 202         arv.ApiToken = tok
 203         if err := arv.Call("HEAD", "users", "", "current", nil, nil); err != nil {
 204                 log.Printf("%s: CheckAuthorizationHeader error: %v", GetRemoteAddress(req), err)
 205                 return false, ""
 206         }
 207
 208         // Success!  Update cache
 209         cache.RememberToken(tok)
 210
 211         return true, tok
 212 }
 213
 214 type GetBlockHandler struct {
 215         *keepclient.KeepClient
 216         *ApiTokenCache
 217 }
 218
 219 type PutBlockHandler struct {
 220         *keepclient.KeepClient
 221         *ApiTokenCache
 222 }
 223
 224 type InvalidPathHandler struct{}
 225
 226 type OptionsHandler struct{}
 227
 228 // MakeRESTRouter
 229 //     Returns a mux.Router that passes GET and PUT requests to the
 230 //     appropriate handlers.
 231 //
 232 func MakeRESTRouter(
 233         enable_get bool,
 234         enable_put bool,
 235         kc *keepclient.KeepClient) *mux.Router {
 236
 237         t := &ApiTokenCache{tokens: make(map[string]int64), expireTime: 300}
 238
 239         rest := mux.NewRouter()
 240
 241         if enable_get {
 242                 rest.Handle(`/{hash:[0-9a-f]{32}}+{hints}`,
 243                         GetBlockHandler{kc, t}).Methods("GET", "HEAD")
 244                 rest.Handle(`/{hash:[0-9a-f]{32}}`, GetBlockHandler{kc, t}).Methods("GET", "HEAD")
 245         }
 246
 247         if enable_put {
 248                 rest.Handle(`/{hash:[0-9a-f]{32}}+{hints}`, PutBlockHandler{kc, t}).Methods("PUT")
 249                 rest.Handle(`/{hash:[0-9a-f]{32}}`, PutBlockHandler{kc, t}).Methods("PUT")
 250                 rest.Handle(`/`, PutBlockHandler{kc, t}).Methods("POST")
 251                 rest.Handle(`/`, OptionsHandler{}).Methods("OPTIONS")
 252         }
 253
 254         rest.NotFoundHandler = InvalidPathHandler{}
 255
 256         return rest
 257 }
 258
 259 func SetCorsHeaders(resp http.ResponseWriter) {
 260         resp.Header().Set("Access-Control-Allow-Methods", "GET, HEAD, POST, PUT, OPTIONS")
 261         resp.Header().Set("Access-Control-Allow-Origin", "*")
 262         resp.Header().Set("Access-Control-Allow-Headers", "Authorization, Content-Length, Content-Type, X-Keep-Desired-Replicas")
 263         resp.Header().Set("Access-Control-Max-Age", "86486400")
 264 }
 265
 266 func (this InvalidPathHandler) ServeHTTP(resp http.ResponseWriter, req *http.Request) {
 267         log.Printf("%s: %s %s unroutable", GetRemoteAddress(req), req.Method, req.URL.Path)
 268         http.Error(resp, "Bad request", http.StatusBadRequest)
 269 }
 270
 271 func (this OptionsHandler) ServeHTTP(resp http.ResponseWriter, req *http.Request) {
 272         log.Printf("%s: %s %s", GetRemoteAddress(req), req.Method, req.URL.Path)
 273         SetCorsHeaders(resp)
 274 }
 275
 276 func (this GetBlockHandler) ServeHTTP(resp http.ResponseWriter, req *http.Request) {
 277         SetCorsHeaders(resp)
 278
 279         kc := *this.KeepClient
 280
 281         hash := mux.Vars(req)["hash"]
 282         hints := mux.Vars(req)["hints"]
 283
 284         locator := keepclient.MakeLocator2(hash, hints)
 285
 286         log.Printf("%s: %s %s", GetRemoteAddress(req), req.Method, hash)
 287
 288         var pass bool
 289         var tok string
 290         if pass, tok = CheckAuthorizationHeader(kc, this.ApiTokenCache, req); !pass {
 291                 http.Error(resp, "Missing or invalid Authorization header", http.StatusForbidden)
 292                 return
 293         }
 294
 295         // Copy ArvadosClient struct and use the client's API token
 296         arvclient := *kc.Arvados
 297         arvclient.ApiToken = tok
 298         kc.Arvados = &arvclient
 299
 300         var reader io.ReadCloser
 301         var err error
 302         var blocklen int64
 303
 304         if req.Method == "GET" {
 305                 reader, blocklen, _, err = kc.AuthorizedGet(hash, locator.Signature, locator.Timestamp)
 306                 defer reader.Close()
 307         } else if req.Method == "HEAD" {
 308                 blocklen, _, err = kc.AuthorizedAsk(hash, locator.Signature, locator.Timestamp)
 309         }
 310
 311         if blocklen > 0 {
 312                 resp.Header().Set("Content-Length", fmt.Sprint(blocklen))
 313         }
 314
 315         switch err {
 316         case nil:
 317                 if reader != nil {
 318                         n, err2 := io.Copy(resp, reader)
 319                         if n != blocklen {
 320                                 log.Printf("%s: %s %s mismatched return %v with Content-Length %v error %v", GetRemoteAddress(req), req.Method, hash, n, blocklen, err2)
 321                         } else if err2 == nil {
 322                                 log.Printf("%s: %s %s success returned %v bytes", GetRemoteAddress(req), req.Method, hash, n)
 323                         } else {
 324                                 log.Printf("%s: %s %s returned %v bytes error %v", GetRemoteAddress(req), req.Method, hash, n, err.Error())
 325                         }
 326                 } else {
 327                         log.Printf("%s: %s %s success", GetRemoteAddress(req), req.Method, hash)
 328                 }
 329         case keepclient.BlockNotFound:
 330                 http.Error(resp, "Not found", http.StatusNotFound)
 331         default:
 332                 http.Error(resp, err.Error(), http.StatusBadGateway)
 333         }
 334
 335         if err != nil {
 336                 log.Printf("%s: %s %s error %s", GetRemoteAddress(req), req.Method, hash, err.Error())
 337         }
 338 }
 339
 340 func (this PutBlockHandler) ServeHTTP(resp http.ResponseWriter, req *http.Request) {
 341         SetCorsHeaders(resp)
 342
 343         kc := *this.KeepClient
 344
 345         hash := mux.Vars(req)["hash"]
 346         hints := mux.Vars(req)["hints"]
 347
 348         locator := keepclient.MakeLocator2(hash, hints)
 349
 350         var contentLength int64 = -1
 351         if req.Header.Get("Content-Length") != "" {
 352                 _, err := fmt.Sscanf(req.Header.Get("Content-Length"), "%d", &contentLength)
 353                 if err != nil {
 354                         resp.Header().Set("Content-Length", fmt.Sprintf("%d", contentLength))
 355                 }
 356
 357         }
 358
 359         log.Printf("%s: %s %s Content-Length %v", GetRemoteAddress(req), req.Method, hash, contentLength)
 360
 361         if contentLength < 1 {
 362                 http.Error(resp, "Must include Content-Length header", http.StatusLengthRequired)
 363                 return
 364         }
 365
 366         if locator.Size > 0 && int64(locator.Size) != contentLength {
 367                 http.Error(resp, "Locator size hint does not match Content-Length header", http.StatusBadRequest)
 368                 return
 369         }
 370
 371         var pass bool
 372         var tok string
 373         if pass, tok = CheckAuthorizationHeader(kc, this.ApiTokenCache, req); !pass {
 374                 http.Error(resp, "Missing or invalid Authorization header", http.StatusForbidden)
 375                 return
 376         }
 377
 378         // Copy ArvadosClient struct and use the client's API token
 379         arvclient := *kc.Arvados
 380         arvclient.ApiToken = tok
 381         kc.Arvados = &arvclient
 382
 383         // Check if the client specified the number of replicas
 384         if req.Header.Get("X-Keep-Desired-Replicas") != "" {
 385                 var r int
 386                 _, err := fmt.Sscanf(req.Header.Get(keepclient.X_Keep_Desired_Replicas), "%d", &r)
 387                 if err != nil {
 388                         kc.Want_replicas = r
 389                 }
 390         }
 391
 392         // Now try to put the block through
 393         var replicas int
 394         var put_err error
 395         if hash == "" {
 396                 if bytes, err := ioutil.ReadAll(req.Body); err != nil {
 397                         msg := fmt.Sprintf("Error reading request body: %s", err)
 398                         log.Printf(msg)
 399                         http.Error(resp, msg, http.StatusInternalServerError)
 400                         return
 401                 } else {
 402                         hash, replicas, put_err = kc.PutB(bytes)
 403                 }
 404         } else {
 405                 hash, replicas, put_err = kc.PutHR(hash, req.Body, contentLength)
 406         }
 407
 408         // Tell the client how many successful PUTs we accomplished
 409         resp.Header().Set(keepclient.X_Keep_Replicas_Stored, fmt.Sprintf("%d", replicas))
 410
 411         switch put_err {
 412         case nil:
 413                 // Default will return http.StatusOK
 414                 log.Printf("%s: %s %s finished, stored %v replicas (desired %v)", GetRemoteAddress(req), req.Method, hash, replicas, kc.Want_replicas)
 415                 n, err2 := io.WriteString(resp, hash)
 416                 if err2 != nil {
 417                         log.Printf("%s: wrote %v bytes to response body and got error %v", n, err2.Error())
 418                 }
 419
 420         case keepclient.OversizeBlockError:
 421                 // Too much data
 422                 http.Error(resp, fmt.Sprintf("Exceeded maximum blocksize %d", keepclient.BLOCKSIZE), http.StatusRequestEntityTooLarge)
 423
 424         case keepclient.InsufficientReplicasError:
 425                 if replicas > 0 {
 426                         // At least one write is considered success.  The
 427                         // client can decide if getting less than the number of
 428                         // replications it asked for is a fatal error.
 429                         // Default will return http.StatusOK
 430                         n, err2 := io.WriteString(resp, hash)
 431                         if err2 != nil {
 432                                 log.Printf("%s: wrote %v bytes to response body and got error %v", n, err2.Error())
 433                         }
 434                 } else {
 435                         http.Error(resp, put_err.Error(), http.StatusServiceUnavailable)
 436                 }
 437
 438         default:
 439                 http.Error(resp, put_err.Error(), http.StatusBadGateway)
 440         }
 441
 442         if put_err != nil {
 443                 log.Printf("%s: %s %s stored %v replicas (desired %v) got error %v", GetRemoteAddress(req), req.Method, hash, replicas, kc.Want_replicas, put_err.Error())
 444         }
 445
 446 }