chiark / gitweb /
local.m4: Default addresses reach the IPv6 tunnel interface.
[firewall] / functions.m4
index 27bacc6de3fda6d59a82a68358ad7de12afc72ba..c3609a570a6b4ca23f46956edfa95f401a32b838 100644 (file)
@@ -513,14 +513,19 @@ host () {
 defhost () {
   host=$1
   addword allhosts $host
-  eval host_type_$host=endsys
+  eval host_type_$host=server
 }
 
-## router
+## hosttype TYPE
 ##
-## Declare the host to be a router, so it should forward packets and so on.
-router () {
-  eval host_type_$host=router
+## Declare the host to have the given type.
+hosttype () {
+  type=$1
+  case $type in
+    router | server | client) ;;
+     *) echo >&2 "$0: bad host type \`$type'"; exit 1 ;;
+  esac
+  eval host_type_$host=$type
 }
 
 ## iface IFACE NET ...