106 lines
3.3 KiB
Nix
106 lines
3.3 KiB
Nix
{ lib, dag ? import ./dag.nix { inherit lib; }
|
|
, gvariant ? import ./gvariant.nix { inherit lib; } }:
|
|
|
|
with lib;
|
|
|
|
let
|
|
|
|
typesDag = import ./types-dag.nix { inherit dag lib; };
|
|
|
|
# Needed since the type is called gvariant and its merge attribute
|
|
# must refer back to the type.
|
|
gvar = gvariant;
|
|
|
|
in rec {
|
|
|
|
inherit (typesDag) dagOf listOrDagOf;
|
|
|
|
selectorFunction = mkOptionType {
|
|
name = "selectorFunction";
|
|
description = "Function that takes an attribute set and returns a list"
|
|
+ " containing a selection of the values of the input set";
|
|
check = isFunction;
|
|
merge = _loc: defs: as: concatMap (select: select as) (getValues defs);
|
|
};
|
|
|
|
overlayFunction = mkOptionType {
|
|
name = "overlayFunction";
|
|
description = "An overlay function, takes self and super and returns"
|
|
+ " an attribute set overriding the desired attributes.";
|
|
check = isFunction;
|
|
merge = _loc: defs: self: super:
|
|
foldl' (res: def: mergeAttrs res (def.value self super)) { } defs;
|
|
};
|
|
|
|
fontType = types.submodule {
|
|
options = {
|
|
package = mkOption {
|
|
type = types.nullOr types.package;
|
|
default = null;
|
|
example = literalExpression "pkgs.dejavu_fonts";
|
|
description = ''
|
|
Package providing the font. This package will be installed
|
|
to your profile. If <literal>null</literal> then the font
|
|
is assumed to already be available in your profile.
|
|
'';
|
|
};
|
|
|
|
name = mkOption {
|
|
type = types.str;
|
|
example = "DejaVu Sans";
|
|
description = ''
|
|
The family name of the font within the package.
|
|
'';
|
|
};
|
|
|
|
size = mkOption {
|
|
type = types.nullOr types.int;
|
|
default = null;
|
|
example = "8";
|
|
description = ''
|
|
The size of the font.
|
|
'';
|
|
};
|
|
};
|
|
};
|
|
|
|
gvariant = mkOptionType rec {
|
|
name = "gvariant";
|
|
description = "GVariant value";
|
|
check = v: gvar.mkValue v != null;
|
|
merge = loc: defs:
|
|
let
|
|
vdefs = map (d:
|
|
d // {
|
|
value =
|
|
if gvar.isGVariant d.value then d.value else gvar.mkValue d.value;
|
|
}) defs;
|
|
vals = map (d: d.value) vdefs;
|
|
defTypes = map (x: x.type) vals;
|
|
sameOrNull = x: y: if x == y then y else null;
|
|
# A bit naive to just check the first entry…
|
|
sharedDefType = foldl' sameOrNull (head defTypes) defTypes;
|
|
allChecked = all (x: check x) vals;
|
|
in if sharedDefType == null then
|
|
throw ("Cannot merge definitions of `${showOption loc}' with"
|
|
+ " mismatched GVariant types given in"
|
|
+ " ${showFiles (getFiles defs)}.")
|
|
else if gvar.isArray sharedDefType && allChecked then
|
|
gvar.mkValue ((types.listOf gvariant).merge loc
|
|
(map (d: d // { value = d.value.value; }) vdefs)) // {
|
|
type = sharedDefType;
|
|
}
|
|
else if gvar.isTuple sharedDefType && allChecked then
|
|
mergeOneOption loc defs
|
|
else if gvar.isMaybe sharedDefType && allChecked then
|
|
mergeOneOption loc defs
|
|
else if gvar.type.string == sharedDefType && allChecked then
|
|
types.str.merge loc defs
|
|
else if gvar.type.double == sharedDefType && allChecked then
|
|
types.float.merge loc defs
|
|
else
|
|
mergeDefaultOption loc defs;
|
|
};
|
|
|
|
}
|