technofab/disko
1
0
Fork 0
mirror of https://github.com/TECHNOFAB11/disko.git synced 2025-12-12 08:00:05 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

move disko.nix to example/ and add usage

Browse source
This commit is contained in:
tv 2018-07-13 13:52:22 +02:00
parent db6151ff06
commit c47d8972ad
2 changed files with 4 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

52
disko.nix
View file

@ -1,52 +0,0 @@
with import <nixpkgs/lib>;
with builtins;
let
fun.filesystem = q: x: ''
mkfs.${x.format} ${q.device}
'';
fun.lvm = q: x: ''
pvcreate ${q.device}
vgcreate ${x.name} ${q.device}
${concatStringsSep "\n" (mapAttrsToList (name: f (q // { inherit name; vgname = x.name; device = null; /* ??? */ })) x.lvs)}
'';
fun.luks = q: x: ''
cryptsetup -q luksFormat ${q.device} ${x.keyfile}
cryptsetup luksOpen ${q.device} ${x.name} --key-file ${x.keyfile}
${f (q // { device = "/dev/mapper/${x.name}"; }) x.content}
'';
fun.partition = q: x:
"(part ${toString (map (f q) (children x))})";
fun.table = q: x: ''
parted -s -a optimal ${q.device} mklabel ${x.format}
${concatStrings (imap (i: part: " \nparted -s -a optimal ${q.device} mkpart ${part.part-type} ${part.fs-type or ""} ${part.start} ${part.end} ${optionalString (part.bootable or false) "\nparted -s -a optimal ${q.device} set ${toString i} boot on "}") x.partitions)}
${concatStrings (imap (i: x: f (q // { device = q.device + toString i; }) x.content) x.partitions)}
'';
fun.lv = q: x: ''
lvcreate -L ${x.size} -n ${q.name} ${q.vgname}
${f (q // { device = "/dev/${q.vgname}/${q.name}"; }) x.content}
'';
children = x: {
lvm = attrValues x.lvs;
luks = [x.content];
partition = [x.content];
table = x.partitions;
lv = [x.content];
}.${x.type};
f = q: x: fun.${x.type} q x;
q0.device = "/dev/sda";
x0 = import ./example.nix;
in
f q0 x0