2009-11-18 15:54:37 +01:00
|
|
|
# GNU Virtual Private Ethernet
|
|
|
|
|
|
|
|
{config, pkgs, ...}:
|
|
|
|
|
|
|
|
let
|
|
|
|
inherit (pkgs.lib) mkOption mkIf;
|
2009-11-18 16:11:54 +01:00
|
|
|
|
2009-11-18 15:54:37 +01:00
|
|
|
cfg = config.services.gvpe;
|
2009-11-18 16:11:54 +01:00
|
|
|
|
2009-11-18 15:54:37 +01:00
|
|
|
finalConfig = if cfg.configFile != null then
|
|
|
|
cfg.configFile
|
|
|
|
else if cfg.configText != null then
|
|
|
|
pkgs.writeTextFile {
|
|
|
|
name = "gvpe.conf";
|
|
|
|
text = cfg.configText;
|
|
|
|
}
|
|
|
|
else
|
|
|
|
throw "You must either specify contents of the config file or the config file itself for GVPE";
|
2009-11-18 16:11:54 +01:00
|
|
|
|
2009-11-18 15:54:37 +01:00
|
|
|
ifupScript = if cfg.ipAddress == null || cfg.subnet == null then
|
|
|
|
throw "Specify IP address and subnet (with mask) for GVPE"
|
|
|
|
else if cfg.nodename == null then
|
|
|
|
throw "You must set node name for GVPE"
|
|
|
|
else
|
|
|
|
(pkgs.writeTextFile {
|
|
|
|
name = "gvpe-if-up";
|
|
|
|
text = ''
|
|
|
|
#! /bin/sh
|
|
|
|
|
|
|
|
export PATH=$PATH:${pkgs.iproute}/sbin
|
|
|
|
|
|
|
|
ip link set $IFNAME up
|
|
|
|
ip address add ${cfg.ipAddress} dev $IFNAME
|
|
|
|
ip route add ${cfg.subnet} dev $IFNAME
|
|
|
|
|
|
|
|
${cfg.customIFSetup}
|
|
|
|
'';
|
|
|
|
executable = true;
|
|
|
|
});
|
2009-11-18 16:11:54 +01:00
|
|
|
|
2009-11-18 15:54:37 +01:00
|
|
|
exec = "${pkgs.gvpe}/sbin/gvpe -c /var/gvpe -D ${cfg.nodename} "
|
|
|
|
+ " ${cfg.nodename}.pid-file=/var/gvpe/gvpe.pid"
|
|
|
|
+ " ${cfg.nodename}.if-up=if-up"
|
|
|
|
+ " &> /var/log/gvpe";
|
2009-11-18 16:11:54 +01:00
|
|
|
|
2009-11-18 15:54:37 +01:00
|
|
|
inherit (cfg) startOn stopOn;
|
|
|
|
in
|
|
|
|
|
|
|
|
{
|
|
|
|
options = {
|
|
|
|
services.gvpe = {
|
|
|
|
enable = mkOption {
|
|
|
|
default = false;
|
|
|
|
description = ''
|
|
|
|
Whether to run gvpe
|
|
|
|
'';
|
|
|
|
};
|
|
|
|
startOn = mkOption {
|
2009-11-24 17:11:01 +01:00
|
|
|
default = "started network-interfaces";
|
2009-11-18 15:54:37 +01:00
|
|
|
description = ''
|
|
|
|
Condition to start GVPE
|
|
|
|
'';
|
|
|
|
};
|
|
|
|
stopOn = mkOption {
|
2009-11-24 17:11:01 +01:00
|
|
|
default = "stopping network-interfaces";
|
2009-11-18 15:54:37 +01:00
|
|
|
description = ''
|
|
|
|
Condition to stop GVPE
|
|
|
|
'';
|
|
|
|
};
|
|
|
|
nodename = mkOption {
|
|
|
|
default = null;
|
|
|
|
description =''
|
|
|
|
GVPE node name
|
|
|
|
'';
|
|
|
|
};
|
|
|
|
configText = mkOption {
|
|
|
|
default = null;
|
|
|
|
example = ''
|
|
|
|
tcp-port = 655
|
|
|
|
udp-port = 655
|
|
|
|
mtu = 1480
|
|
|
|
ifname = vpn0
|
|
|
|
|
|
|
|
node = alpha
|
|
|
|
hostname = alpha.example.org
|
|
|
|
connect = always
|
|
|
|
enable-udp = true
|
|
|
|
enable-tcp = true
|
|
|
|
on alpha if-up = if-up-0
|
|
|
|
on alpha pid-file = /var/gvpe/gvpe.pid
|
|
|
|
'';
|
|
|
|
description = ''
|
|
|
|
GVPE config contents
|
|
|
|
'';
|
|
|
|
};
|
|
|
|
configFile = mkOption {
|
|
|
|
default = null;
|
|
|
|
example = "/root/my-gvpe-conf";
|
|
|
|
description = ''
|
|
|
|
GVPE config file, if already present
|
|
|
|
'';
|
|
|
|
};
|
|
|
|
ipAddress = mkOption {
|
|
|
|
default = null;
|
|
|
|
description = ''
|
|
|
|
IP address to assign to GVPE interface
|
|
|
|
'';
|
|
|
|
};
|
|
|
|
subnet = mkOption {
|
|
|
|
default = null;
|
|
|
|
example = "10.0.0.0/8";
|
|
|
|
description = ''
|
|
|
|
IP subnet assigned to GVPE network
|
|
|
|
'';
|
|
|
|
};
|
|
|
|
customIFSetup = mkOption {
|
|
|
|
default = "";
|
|
|
|
description = ''
|
|
|
|
Additional commands to apply in ifup script
|
|
|
|
'';
|
|
|
|
};
|
|
|
|
};
|
|
|
|
};
|
2009-11-18 16:11:54 +01:00
|
|
|
config = mkIf cfg.enable {
|
2009-11-18 15:54:37 +01:00
|
|
|
jobs.gvpe = {
|
|
|
|
description = "GNU Virtual Private Ethernet node";
|
|
|
|
|
|
|
|
inherit startOn stopOn;
|
|
|
|
|
|
|
|
preStart = ''
|
|
|
|
mkdir -p /var/gvpe
|
|
|
|
mkdir -p /var/gvpe/pubkey
|
|
|
|
chown root /var/gvpe
|
|
|
|
chmod 700 /var/gvpe
|
|
|
|
cp ${finalConfig} /var/gvpe/gvpe.conf
|
2009-11-18 16:11:54 +01:00
|
|
|
cp ${ifupScript} /var/gvpe/if-up
|
2009-11-18 15:54:37 +01:00
|
|
|
'';
|
|
|
|
|
|
|
|
inherit exec;
|
|
|
|
|
|
|
|
respawn = true;
|
|
|
|
};
|
|
|
|
};
|
|
|
|
}
|