2009-01-25 15:22:17 +00:00
|
|
|
{pkgs, config, ...}:
|
2007-02-22 14:26:53 +00:00
|
|
|
|
2008-11-08 21:32:48 +00:00
|
|
|
###### interface
|
|
|
|
let
|
|
|
|
inherit (pkgs.lib) mkOption
|
|
|
|
mergeEnableOption mergeListOption;
|
|
|
|
|
|
|
|
options = {
|
|
|
|
networking = {
|
|
|
|
useDHCP = mkOption {
|
|
|
|
default = true;
|
|
|
|
merge = mergeEnableOption;
|
|
|
|
description = "
|
|
|
|
Whether to use DHCP to obtain an IP adress and other
|
|
|
|
configuration for all network interfaces that are not manually
|
|
|
|
configured.
|
|
|
|
";
|
|
|
|
};
|
|
|
|
|
|
|
|
interfaces = mkOption {
|
|
|
|
default = [];
|
|
|
|
merge = mergeListOption;
|
|
|
|
example = [
|
|
|
|
{ name = "eth0";
|
|
|
|
ipAddress = "131.211.84.78";
|
|
|
|
subnetMask = "255.255.255.128";
|
|
|
|
}
|
|
|
|
];
|
|
|
|
description = "
|
|
|
|
The configuration for each network interface. If
|
|
|
|
<option>networking.useDHCP</option> is true, then each interface
|
|
|
|
not listed here will be configured using DHCP.
|
|
|
|
";
|
|
|
|
};
|
|
|
|
};
|
|
|
|
};
|
|
|
|
in
|
|
|
|
|
|
|
|
###### implementation
|
|
|
|
let
|
|
|
|
ifEnable = arg:
|
|
|
|
if config.networking.useDHCP then arg
|
|
|
|
else if builtins.isList arg then []
|
|
|
|
else if builtins.isAttrs arg then {}
|
|
|
|
else null;
|
|
|
|
|
|
|
|
inherit (pkgs) nettools dhcp lib;
|
2007-02-22 14:26:53 +00:00
|
|
|
|
|
|
|
# Don't start dhclient on explicitly configured interfaces.
|
|
|
|
ignoredInterfaces = ["lo"] ++
|
2008-11-08 21:45:58 +00:00
|
|
|
map (i: i.name) (lib.filter (i: i ? ipAddress) config.networking.interfaces);
|
2007-02-22 14:26:53 +00:00
|
|
|
|
2007-03-20 11:04:45 +00:00
|
|
|
stateDir = "/var/lib/dhcp"; # Don't use /var/state/dhcp; not FHS-compliant.
|
2007-02-22 14:26:53 +00:00
|
|
|
in
|
2006-11-19 22:05:49 +00:00
|
|
|
|
|
|
|
{
|
2008-11-08 21:32:48 +00:00
|
|
|
require = [
|
|
|
|
# (import ../upstart-jobs/default.nix)
|
|
|
|
options
|
|
|
|
];
|
|
|
|
|
|
|
|
services = {
|
2008-11-08 21:45:58 +00:00
|
|
|
extraJobs = ifEnable [{
|
2008-11-08 21:32:48 +00:00
|
|
|
name = "dhclient";
|
2007-08-14 17:43:56 +01:00
|
|
|
|
2008-11-08 21:32:48 +00:00
|
|
|
extraPath = [dhcp];
|
2006-11-19 22:05:49 +00:00
|
|
|
|
2008-11-08 21:32:48 +00:00
|
|
|
job = "
|
2006-11-19 22:05:49 +00:00
|
|
|
description \"DHCP client\"
|
|
|
|
|
2006-11-20 17:28:08 +00:00
|
|
|
start on network-interfaces/started
|
2006-11-20 17:06:44 +00:00
|
|
|
stop on network-interfaces/stop
|
2006-11-19 22:05:49 +00:00
|
|
|
|
2007-02-20 14:20:33 +00:00
|
|
|
env PATH_DHCLIENT_SCRIPT=${dhcp}/sbin/dhclient-script
|
|
|
|
|
2006-11-19 22:05:49 +00:00
|
|
|
script
|
2007-02-20 14:59:29 +00:00
|
|
|
export PATH=${nettools}/sbin:$PATH
|
|
|
|
|
2006-11-24 16:31:01 +00:00
|
|
|
# Determine the interface on which to start dhclient.
|
2006-11-19 22:05:49 +00:00
|
|
|
interfaces=
|
2006-11-24 16:31:01 +00:00
|
|
|
|
2007-02-22 14:06:15 +00:00
|
|
|
for i in $(cd /sys/class/net && ls -d *); do
|
2007-02-22 14:26:53 +00:00
|
|
|
if ! for j in ${toString ignoredInterfaces}; do echo $j; done | grep -F -x -q \"$i\"; then
|
2007-02-22 14:06:15 +00:00
|
|
|
echo \"Running dhclient on $i\"
|
2006-11-19 22:05:49 +00:00
|
|
|
interfaces=\"$interfaces $i\"
|
|
|
|
fi
|
|
|
|
done
|
|
|
|
|
|
|
|
if test -z \"$interfaces\"; then
|
|
|
|
echo 'No interfaces on which to start dhclient!'
|
|
|
|
exit 1
|
|
|
|
fi
|
|
|
|
|
2007-03-20 11:04:45 +00:00
|
|
|
mkdir -m 755 -p ${stateDir}
|
2006-11-24 16:38:22 +00:00
|
|
|
|
2007-03-20 11:04:45 +00:00
|
|
|
exec ${dhcp}/sbin/dhclient -d $interfaces -e \"PATH=$PATH\" -lf ${stateDir}/dhclient.leases
|
2006-11-19 22:05:49 +00:00
|
|
|
end script
|
2008-11-08 21:32:48 +00:00
|
|
|
";
|
|
|
|
}];
|
|
|
|
};
|
2006-11-19 22:05:49 +00:00
|
|
|
}
|
2008-11-08 21:32:48 +00:00
|
|
|
|