Using Cuirass to build substitutions for pkgs in manifest

Using Cuirass to build substitutions for pkgs in manifest

[Jiří Špaček]

Hello,

I'm trying to setup cuirass configured as GuixSD  service but I'm getting stuck.

Basically, I'm trying to use cuirass for building substitutions for
packages from my manifest (ie. only those that I actively use on my
systems). My manifest contains package provided by standard Guix
distribution alongside with a few custom packages coming from my own
channel.

My Curiass config (modified version of example mentioned in the Guix
Reference Manual) can be seen below:

(define %cuirass-specs
  #~(list
     '((#:name . "my-manifest")
       (#:load-path-inputs . ("guix"))
       (#:package-path-inputs . ("personal"))
       (#:proc-input . "guix")
       (#:proc-file . "build-aux/cuirass/gnu-system.scm")
       (#:proc . cuirass-jobs)
       (#:proc-args . ((subset . "manifests")
                       (systems . ("x86_64-linux"))
                       (manifests . (("config" . "guix/manifest.scm")))))
       (#:inputs . (((#:name . "guix")
                     (#:url . "git://git.savannah.gnu.org/guix.git")
                     (#:load-path . ".")
                     (#:branch . "master")
                     (#:no-compile? . #t))
                    ((#:name . "config")
                     (#:url .
"https://github.com/geostarling/guix-manifest.git")
                     (#:load-path . ".")
                     (#:branch . "master")
                     (#:no-compile? . #t))
                    ((#:name . "personal")
                     (#:url .
"https://github.com/geostarling/guix-packages.git")
                     (#:load-path . ".")
                     (#:branch . "master")
                     (#:no-compile? . #t)))))))



When I try to start Cuirass service with `herd start cuirass` I get
following error in cuirass log:

error in finalization thread: Bad file descriptor
2019-05-15T18:36:18 running Fibers on 2 kernel threads
2019-05-15T18:36:18 marking stale builds as "scheduled"...
2019-05-15T18:36:18 retrieving list of pending builds...
2019-05-15T18:36:18 listening on 127.0.0.1:8081
2019-05-15T18:36:18 heap: 12.10 MiB; threads: 6; file descriptors: 33
2019-05-15T18:36:18 canceling 0 stale builds
2019-05-15T18:36:18 restarting 0 pending builds
2019-05-15T18:36:18 building 0 derivations in batches of 200
2019-05-15T18:36:18 done with 0 derivations
2019-05-15T18:36:18 done with restarted builds
2019-05-15T18:36:18 fetching input 'personal' of spec 'my-manifest'
2019-05-15T18:36:18 fetching input 'guix' of spec 'my-manifest'
2019-05-15T18:36:19 fetching input 'config' of spec 'my-manifest'
2019-05-15T18:36:19 fetched input 'personal' of spec 'my-manifest'
(commit "d379e02fa3052cb42481f2677b05033ebfd2e342")
2019-05-15T18:36:19 fetched input 'guix' of spec 'my-manifest' (commit
"247649d42e60b718f3f46b2bcf72d19bf799d503")
2019-05-15T18:36:19 fetched input 'config' of spec 'my-manifest'
(commit "ccfef170799a1a995c21e9275a320de2c731d3f3")
2019-05-15T18:36:19 next evaluation in 60 seconds
2019-05-15T18:36:19 evaluating spec 'my-manifest'
Backtrace:
          17 (apply-smob/1 #<catch-closure 1e9e2c0>)
In ice-9/boot-9.scm:
    705:2 16 (call-with-prompt _ _ #<procedure default-prompt-handle?>)
In ice-9/eval.scm:
    619:8 15 (_ #(#(#<directory (guile-user) 1f54140>)))
   293:34 14 (_ #(#(#(#(#(#(#(#(#(#(#(?) ?) ?) ?) ?) ?) ?) ?) ?) ?) ?))
    159:9 13 (_ _)
    619:8 12 (_ #(#(#(#<module (#{ g18}#) 1f77640>) #<store-co?> ?) ?))
   626:19 11 (_ #(#(#(#<module (#{ g18}#) 1f77640>) #<store-co?> ?) ?))
In guix/store.scm:
  1794:24 10 (run-with-store _ _ #:guile-for-build _ #:system _ # _)
In guix/channels.scm:
    498:2  9 (_ _)
    455:2  8 (_ _)
In guix/monads.scm:
    482:9  7 (_ _)
In guix/store.scm:
   1667:8  6 (_ _)
In guix/gexp.scm:
    708:2  5 (_ _)
In guix/monads.scm:
    482:9  4 (_ _)
In guix/gexp.scm:
   573:13  3 (_ _)
In guix/store.scm:
  1667:13  2 (_ _)
In guix/gexp.scm:
    210:2  1 (lower-object #f _ #:target _)
   189:36  0 (lookup-compiler #f)

guix/gexp.scm:189:36: In procedure lookup-compiler:
In procedure struct_vtable: Wrong type argument in position 1
(expecting struct): #f

Some deprecated features have been used.  Set the environment
variable GUILE_WARN_DEPRECATED to "detailed" and rerun the
program to get more information.  Set it to "no" to suppress
this message.
2019-05-15T18:36:21 failed to evaluate spec 'my-manifest'


The service itself won't crash, no packages will get built though.

I suspect the problem lies in `proc-args` definition or in improper
`(#:proc . cuirass-jobs)` use, but I was unable to find any more info
on these parameters.

Also, I would be very grateful if someone could share their Cuirass
config that does something similar.

Thank you.

Jiri

Re: Using Cuirass to build substitutions for pkgs in manifest

[Ludovic Courtès]

Hello Jiří,

Jiří Špaček <spacekj3@gmail.com> skribis:

> Also, I would be very grateful if someone could share their Cuirass
> config that does something similar.

I didn’t see any obvious mistake in your config, but for now you can
compare with the config we use for the build farm:

  https://git.savannah.gnu.org/cgit/guix/maintenance.git/tree/hydra/modules/sysadmin/services.scm#n80

A few users have custom Cuirass configs too, though I don’t have the
URLs at hand.

HTH!

Ludo’.