+
+sub execreal ($) {
+ my ($use_v0config) = @_;
+ exec $realservice, $use_v0config, '--',
+ (join ',', $local_addr->addr, $peer_addr->addr,
+ $mtu, $protocol, $ifname),
+ @rnets ? (join ",", map { "$_" } @rnets) : "-"
+ or die "exec $realservice: $!\n";
+}
+
+our $cfgpath;
+
+sub badcfg ($) {
+ my ($m) = @_;
+ die "bad configuration: $cfgpath:$.: $m\n";
+}
+