1 // Copyright (C) The Arvados Authors. All rights reserved.
3 // SPDX-License-Identifier: AGPL-3.0
15 "git.curoverse.com/arvados.git/sdk/go/arvados"
19 ErrInstanceTypesNotConfigured = errors.New("site configuration does not list any instance types")
20 discountConfiguredRAMPercent = 5
23 // ConstraintsNotSatisfiableError includes a list of available instance types
24 // to be reported back to the user.
25 type ConstraintsNotSatisfiableError struct {
27 AvailableTypes []arvados.InstanceType
30 // ChooseInstanceType returns the cheapest available
31 // arvados.InstanceType big enough to run ctr.
32 func ChooseInstanceType(cc *arvados.Cluster, ctr *arvados.Container) (best arvados.InstanceType, err error) {
33 if len(cc.InstanceTypes) == 0 {
34 err = ErrInstanceTypesNotConfigured
38 needScratch := int64(0)
39 for _, m := range ctr.Mounts {
41 needScratch += m.Capacity
45 needVCPUs := ctr.RuntimeConstraints.VCPUs
47 needRAM := ctr.RuntimeConstraints.RAM + ctr.RuntimeConstraints.KeepCacheRAM
48 needRAM = (needRAM * 100) / int64(100-discountConfiguredRAMPercent)
51 for _, it := range cc.InstanceTypes {
53 case ok && it.Price > best.Price:
54 case it.Scratch < needScratch:
55 case it.RAM < needRAM:
56 case it.VCPUs < needVCPUs:
57 case it.Preemptible != ctr.SchedulingParameters.Preemptible:
58 case it.Price == best.Price && (it.RAM < best.RAM || it.VCPUs < best.VCPUs):
59 // Equal price, but worse specs
61 // Lower price || (same price && better specs)
67 availableTypes := make([]arvados.InstanceType, 0, len(cc.InstanceTypes))
68 for _, t := range cc.InstanceTypes {
69 availableTypes = append(availableTypes, t)
71 sort.Slice(availableTypes, func(a, b int) bool {
72 return availableTypes[a].Price < availableTypes[b].Price
74 err = ConstraintsNotSatisfiableError{
75 errors.New("constraints not satisfiable by any configured instance type"),
83 // SlurmNodeTypeFeatureKludge ensures SLURM accepts every instance
84 // type name as a valid feature name, even if no instances of that
85 // type have appeared yet.
87 // It takes advantage of some SLURM peculiarities:
89 // (1) A feature is valid after it has been offered by a node, even if
90 // it is no longer offered by any node. So, to make a feature name
91 // valid, we can add it to a dummy node ("compute0"), then remove it.
93 // (2) To test whether a set of feature names are valid without
94 // actually submitting a job, we can call srun --test-only with the
97 // SlurmNodeTypeFeatureKludge does a test-and-fix operation
98 // immediately, and then periodically, in case slurm restarts and
99 // forgets the list of valid features. It never returns (unless there
100 // are no node types configured, in which case it returns
101 // immediately), so it should generally be invoked with "go".
102 func SlurmNodeTypeFeatureKludge(cc *arvados.Cluster) {
103 if len(cc.InstanceTypes) == 0 {
106 var features []string
107 for _, it := range cc.InstanceTypes {
108 features = append(features, "instancetype="+it.Name)
111 slurmKludge(features)
112 time.Sleep(2 * time.Second)
116 const slurmDummyNode = "compute0"
118 func slurmKludge(features []string) {
119 allFeatures := strings.Join(features, ",")
121 cmd := exec.Command("sinfo", "--nodes="+slurmDummyNode, "--format=%f", "--noheader")
122 out, err := cmd.CombinedOutput()
124 log.Printf("running %q %q: %s (output was %q)", cmd.Path, cmd.Args, err, out)
127 if string(out) == allFeatures+"\n" {
128 // Already configured correctly, nothing to do.
132 log.Printf("configuring node %q with all node type features", slurmDummyNode)
133 cmd = exec.Command("scontrol", "update", "NodeName="+slurmDummyNode, "Features="+allFeatures)
134 log.Printf("running: %q %q", cmd.Path, cmd.Args)
135 out, err = cmd.CombinedOutput()
137 log.Printf("error: scontrol: %s (output was %q)", err, out)