1 // Copyright (C) The Arvados Authors. All rights reserved.
3 // SPDX-License-Identifier: AGPL-3.0
18 "git.arvados.org/arvados.git/lib/config"
19 "git.arvados.org/arvados.git/sdk/go/arvados"
20 "git.arvados.org/arvados.git/sdk/go/arvadostest"
21 "git.arvados.org/arvados.git/sdk/go/ctxlog"
22 "github.com/prometheus/client_golang/prometheus"
26 func Test(t *testing.T) {
30 var _ = check.Suite(&suite{})
34 crTooBig arvados.ContainerRequest
35 crPending arvados.ContainerRequest
36 crCUDARequest arvados.ContainerRequest
39 func (s *suite) TearDownTest(c *check.C) {
40 arvados.NewClientFromEnv().RequestAndDecode(nil, "POST", "database/reset", nil, nil)
43 func (s *suite) SetUpTest(c *check.C) {
44 cfg, err := config.NewLoader(nil, ctxlog.TestLogger(c)).Load()
45 c.Assert(err, check.IsNil)
46 cluster, err := cfg.GetCluster("")
47 c.Assert(err, check.IsNil)
48 cluster.Containers.CloudVMs.PollInterval = arvados.Duration(time.Second / 4)
49 cluster.Containers.MinRetryPeriod = arvados.Duration(time.Second / 4)
50 cluster.InstanceTypes = arvados.InstanceTypeMap{
51 "biggest_available_node": arvados.InstanceType{
52 RAM: 100 << 30, // 100 GiB
54 IncludedScratch: 100 << 30,
57 s.disp = newHandler(context.Background(), cluster, arvadostest.Dispatch1Token, prometheus.NewRegistry()).(*dispatcher)
58 s.disp.lsfcli.stubCommand = func(string, ...string) *exec.Cmd {
59 return exec.Command("bash", "-c", "echo >&2 unimplemented stub; false")
61 err = arvados.NewClientFromEnv().RequestAndDecode(&s.crTooBig, "POST", "arvados/v1/container_requests", nil, map[string]interface{}{
62 "container_request": map[string]interface{}{
63 "runtime_constraints": arvados.RuntimeConstraints{
67 "container_image": arvadostest.DockerImage112PDH,
68 "command": []string{"sleep", "1"},
69 "mounts": map[string]arvados.Mount{"/mnt/out": {Kind: "tmp", Capacity: 1000}},
70 "output_path": "/mnt/out",
71 "state": arvados.ContainerRequestStateCommitted,
73 "container_count_max": 1,
76 c.Assert(err, check.IsNil)
78 err = arvados.NewClientFromEnv().RequestAndDecode(&s.crPending, "POST", "arvados/v1/container_requests", nil, map[string]interface{}{
79 "container_request": map[string]interface{}{
80 "runtime_constraints": arvados.RuntimeConstraints{
84 "container_image": arvadostest.DockerImage112PDH,
85 "command": []string{"sleep", "1"},
86 "mounts": map[string]arvados.Mount{"/mnt/out": {Kind: "tmp", Capacity: 1000}},
87 "output_path": "/mnt/out",
88 "state": arvados.ContainerRequestStateCommitted,
90 "container_count_max": 1,
93 c.Assert(err, check.IsNil)
95 err = arvados.NewClientFromEnv().RequestAndDecode(&s.crCUDARequest, "POST", "arvados/v1/container_requests", nil, map[string]interface{}{
96 "container_request": map[string]interface{}{
97 "runtime_constraints": arvados.RuntimeConstraints{
100 CUDA: arvados.CUDARuntimeConstraints{
102 DriverVersion: "11.0",
103 HardwareCapability: "8.0",
106 "container_image": arvadostest.DockerImage112PDH,
107 "command": []string{"sleep", "1"},
108 "mounts": map[string]arvados.Mount{"/mnt/out": {Kind: "tmp", Capacity: 1000}},
109 "output_path": "/mnt/out",
110 "state": arvados.ContainerRequestStateCommitted,
112 "container_count_max": 1,
115 c.Assert(err, check.IsNil)
119 type lsfstub struct {
124 func (stub lsfstub) stubCommand(s *suite, c *check.C) func(prog string, args ...string) *exec.Cmd {
127 fakejobq := map[int]string{}
128 return func(prog string, args ...string) *exec.Cmd {
129 c.Logf("stubCommand: %q %q", prog, args)
130 if rand.Float64() < stub.errorRate {
131 return exec.Command("bash", "-c", "echo >&2 'stub random failure' && false")
133 if stub.sudoUser != "" && len(args) > 3 &&
137 args[2] == stub.sudoUser {
138 prog, args = args[3], args[4:]
142 defaultArgs := s.disp.Cluster.Containers.LSF.BsubArgumentsList
143 if args[5] == s.crCUDARequest.ContainerUUID {
144 c.Assert(len(args), check.Equals, len(defaultArgs)+len(s.disp.Cluster.Containers.LSF.BsubCUDAArguments))
146 c.Assert(len(args), check.Equals, len(defaultArgs))
148 // %%J must have been rewritten to %J
149 c.Check(args[1], check.Equals, "/tmp/crunch-run.%J.out")
152 case arvadostest.LockedContainerUUID:
153 c.Check(args, check.DeepEquals, []string{
154 "-J", arvadostest.LockedContainerUUID,
157 "-R", "rusage[mem=11701MB:tmp=0MB] span[hosts=1]",
158 "-R", "select[mem>=11701MB]",
159 "-R", "select[tmp>=0MB]",
160 "-R", "select[ncpus>=4]"})
162 fakejobq[nextjobid] = args[1]
165 case arvadostest.QueuedContainerUUID:
166 c.Check(args, check.DeepEquals, []string{
167 "-J", arvadostest.QueuedContainerUUID,
170 "-R", "rusage[mem=11701MB:tmp=45777MB] span[hosts=1]",
171 "-R", "select[mem>=11701MB]",
172 "-R", "select[tmp>=45777MB]",
173 "-R", "select[ncpus>=4]"})
175 fakejobq[nextjobid] = args[1]
178 case s.crPending.ContainerUUID:
179 c.Check(args, check.DeepEquals, []string{
180 "-J", s.crPending.ContainerUUID,
183 "-R", "rusage[mem=608MB:tmp=256MB] span[hosts=1]",
184 "-R", "select[mem>=608MB]",
185 "-R", "select[tmp>=256MB]",
186 "-R", "select[ncpus>=2]"})
188 fakejobq[nextjobid] = args[1]
191 case s.crCUDARequest.ContainerUUID:
192 c.Check(args, check.DeepEquals, []string{
193 "-J", s.crCUDARequest.ContainerUUID,
196 "-R", "rusage[mem=528MB:tmp=256MB] span[hosts=1]",
197 "-R", "select[mem>=528MB]",
198 "-R", "select[tmp>=256MB]",
199 "-R", "select[ncpus>=1]",
202 fakejobq[nextjobid] = args[1]
206 c.Errorf("unexpected uuid passed to bsub: args %q", args)
207 return exec.Command("false")
209 return exec.Command("echo", "submitted job")
211 c.Check(args, check.DeepEquals, []string{"-u", "all", "-o", "jobid stat job_name pend_reason", "-json"})
212 var records []map[string]interface{}
213 for jobid, uuid := range fakejobq {
214 stat, reason := "RUN", ""
215 if uuid == s.crPending.ContainerUUID {
216 // The real bjobs output includes a trailing ';' here:
217 stat, reason = "PEND", "There are no suitable hosts for the job;"
219 records = append(records, map[string]interface{}{
220 "JOBID": fmt.Sprintf("%d", jobid),
223 "PEND_REASON": reason,
226 out, err := json.Marshal(map[string]interface{}{
228 "JOBS": len(fakejobq),
234 c.Logf("bjobs out: %s", out)
235 return exec.Command("printf", string(out))
237 killid, _ := strconv.Atoi(args[0])
238 if uuid, ok := fakejobq[killid]; !ok {
239 return exec.Command("bash", "-c", fmt.Sprintf("printf >&2 'Job <%d>: No matching job found\n'", killid))
240 } else if uuid == "" {
241 return exec.Command("bash", "-c", fmt.Sprintf("printf >&2 'Job <%d>: Job has already finished\n'", killid))
244 time.Sleep(time.Millisecond)
246 delete(fakejobq, killid)
249 return exec.Command("bash", "-c", fmt.Sprintf("printf 'Job <%d> is being terminated\n'", killid))
252 return exec.Command("bash", "-c", fmt.Sprintf("echo >&2 'stub: command not found: %+q'", prog))
257 func (s *suite) TestSubmit(c *check.C) {
258 s.disp.lsfcli.stubCommand = lsfstub{
260 sudoUser: s.disp.Cluster.Containers.LSF.BsubSudoUser,
264 deadline := time.Now().Add(20 * time.Second)
265 for range time.NewTicker(time.Second).C {
266 if time.Now().After(deadline) {
270 // "crTooBig" should never be submitted to lsf because
271 // it is bigger than any configured instance type
272 if ent, ok := s.disp.lsfqueue.Lookup(s.crTooBig.ContainerUUID); ok {
273 c.Errorf("Lookup(crTooBig) == true, ent = %#v", ent)
276 // "queuedcontainer" should be running
277 if _, ok := s.disp.lsfqueue.Lookup(arvadostest.QueuedContainerUUID); !ok {
278 c.Log("Lookup(queuedcontainer) == false")
281 // "crPending" should be pending
282 if ent, ok := s.disp.lsfqueue.Lookup(s.crPending.ContainerUUID); !ok {
283 c.Logf("Lookup(crPending) == false", ent)
286 // "lockedcontainer" should be cancelled because it
287 // has priority 0 (no matching container requests)
288 if ent, ok := s.disp.lsfqueue.Lookup(arvadostest.LockedContainerUUID); ok {
289 c.Logf("Lookup(lockedcontainer) == true, ent = %#v", ent)
292 var ctr arvados.Container
293 if err := s.disp.arvDispatcher.Arv.Get("containers", arvadostest.LockedContainerUUID, nil, &ctr); err != nil {
294 c.Logf("error getting container state for %s: %s", arvadostest.LockedContainerUUID, err)
296 } else if ctr.State != arvados.ContainerStateQueued {
297 c.Logf("LockedContainer is not in the LSF queue but its arvados record has not been updated to state==Queued (state is %q)", ctr.State)
301 if err := s.disp.arvDispatcher.Arv.Get("containers", s.crTooBig.ContainerUUID, nil, &ctr); err != nil {
302 c.Logf("error getting container state for %s: %s", s.crTooBig.ContainerUUID, err)
304 } else if ctr.State != arvados.ContainerStateCancelled {
305 c.Logf("container %s is not in the LSF queue but its arvados record has not been updated to state==Cancelled (state is %q)", s.crTooBig.ContainerUUID, ctr.State)
308 c.Check(ctr.RuntimeStatus["error"], check.Equals, "constraints not satisfiable by any configured instance type")
310 c.Log("reached desired state")