2008-03-17 11:40:47 +01:00
|
|
|
# Create an initial ramdisk containing the closure of the specified
|
|
|
|
# file system objects. An initial ramdisk is used during the initial
|
|
|
|
# stages of booting a Linux system. It is loaded by the boot loader
|
|
|
|
# along with the kernel image. It's supposed to contain everything
|
|
|
|
# (such as kernel modules) necessary to allow us to mount the root
|
|
|
|
# file system. Once the root file system is mounted, the `real' boot
|
|
|
|
# script can be called.
|
|
|
|
#
|
|
|
|
# An initrd is really just a gzipped cpio archive.
|
|
|
|
#
|
|
|
|
# Symlinks are created for each top-level file system object. E.g.,
|
|
|
|
# `contents = {object = ...; symlink = /init;}' is a typical
|
|
|
|
# argument.
|
|
|
|
|
2009-11-08 01:32:12 +01:00
|
|
|
{stdenv, perl, cpio, contents, uboot ? null}:
|
|
|
|
|
|
|
|
assert stdenv.system == "armv5tel-linux" -> uboot != null;
|
2008-03-17 11:40:47 +01:00
|
|
|
|
|
|
|
stdenv.mkDerivation {
|
|
|
|
name = "initrd";
|
|
|
|
builder = ./make-initrd.sh;
|
2009-11-08 01:32:12 +01:00
|
|
|
buildInputs = [perl cpio]
|
|
|
|
++ stdenv.lib.optional (stdenv.system == "armv5tel-linux") [ uboot ];
|
|
|
|
|
|
|
|
makeUInitrd = if (stdenv.system == "armv5tel-linux") then true else false;
|
2008-03-17 11:40:47 +01:00
|
|
|
|
|
|
|
# !!! should use XML.
|
|
|
|
objects = map (x: x.object) contents;
|
|
|
|
symlinks = map (x: x.symlink) contents;
|
|
|
|
suffices = map (x: if x ? suffix then x.suffix else "none") contents;
|
|
|
|
|
|
|
|
# For obtaining the closure of `contents'.
|
|
|
|
exportReferencesGraph =
|
|
|
|
map (x: [("closure-" + baseNameOf x.symlink) x.object]) contents;
|
|
|
|
pathsFromGraph = ./paths-from-graph.pl;
|
|
|
|
}
|