2009-03-25 15:47:29 +00:00
|
|
|
{ stdenv, perl, cdrkit, nixpkgs
|
2006-11-02 17:56:50 +00:00
|
|
|
|
2008-08-08 18:07:04 +01:00
|
|
|
, # The file name of the resulting ISO image.
|
|
|
|
isoName ? "cd.iso"
|
2006-11-02 17:56:50 +00:00
|
|
|
|
|
|
|
, # The files and directories to be placed in the ISO file system.
|
|
|
|
# This is a list of attribute sets {source, target} where `source'
|
|
|
|
# is the file system object (regular file or directory) to be
|
|
|
|
# grafted in the file system at path `target'.
|
|
|
|
contents
|
|
|
|
|
2006-11-03 23:41:57 +00:00
|
|
|
, # In addition to `contents', the closure of the store paths listed
|
2007-01-23 13:44:41 +00:00
|
|
|
# in `packages' are also placed in the Nix store of the CD. This is
|
2009-03-18 18:10:38 +00:00
|
|
|
# a list of attribute sets {object, symlink} where `object' if a
|
|
|
|
# store path whose closure will be copied, and `symlink' is a
|
|
|
|
# symlink to `object' that will be added to the CD.
|
2007-01-23 13:44:41 +00:00
|
|
|
storeContents ? []
|
2006-11-03 23:41:57 +00:00
|
|
|
|
2008-08-08 18:07:04 +01:00
|
|
|
, # Whether this should be an El-Torito bootable CD.
|
|
|
|
bootable ? false
|
2006-11-02 17:56:50 +00:00
|
|
|
|
2008-08-08 18:07:04 +01:00
|
|
|
, # The path (in the ISO file system) of the boot image.
|
|
|
|
bootImage ? ""
|
2006-11-02 17:56:50 +00:00
|
|
|
|
2008-06-05 14:42:18 +01:00
|
|
|
, # Whether to compress the resulting ISO image with bzip2.
|
|
|
|
compressImage ? false
|
|
|
|
|
2008-08-08 18:07:04 +01:00
|
|
|
, # The volume ID.
|
|
|
|
volumeID ? ""
|
|
|
|
|
2006-11-02 17:56:50 +00:00
|
|
|
}:
|
|
|
|
|
|
|
|
assert bootable -> bootImage != "";
|
|
|
|
|
|
|
|
stdenv.mkDerivation {
|
|
|
|
name = "iso9660-image";
|
|
|
|
builder = ./make-iso9660-image.sh;
|
2008-01-04 15:17:54 +00:00
|
|
|
buildInputs = [perl cdrkit];
|
2008-08-08 18:07:04 +01:00
|
|
|
|
|
|
|
inherit isoName bootable bootImage compressImage volumeID;
|
2007-01-23 13:44:41 +00:00
|
|
|
|
|
|
|
# !!! should use XML.
|
|
|
|
sources = map (x: x.source) contents;
|
|
|
|
targets = map (x: x.target) contents;
|
|
|
|
|
|
|
|
# !!! should use XML.
|
|
|
|
objects = map (x: x.object) storeContents;
|
|
|
|
symlinks = map (x: x.symlink) storeContents;
|
|
|
|
|
|
|
|
# For obtaining the closure of `storeContents'.
|
|
|
|
exportReferencesGraph =
|
2007-01-23 14:34:44 +00:00
|
|
|
map (x: [("closure-" + baseNameOf x.object) x.object]) storeContents;
|
2009-03-25 15:47:29 +00:00
|
|
|
pathsFromGraph = "${nixpkgs}/pkgs/build-support/kernel/paths-from-graph.pl";
|
2006-11-02 17:56:50 +00:00
|
|
|
}
|