urbit/pkg/arvo/gen/dns/auto.hoon
Jared Tobin b3901ab42f Add 'pkg/arvo/' from commit 'c20e2a185f131ff3f5d3961829bd7a3fe0f227f8'
git-subtree-dir: pkg/arvo
git-subtree-mainline: 9c8f40bf6c
git-subtree-split: c20e2a185f
2019-06-28 12:48:05 +08:00

27 lines
684 B
Plaintext

:: DNS: configure automatically
::
:::: /hoon/auto/dns/gen
::
/- *sole
/+ *generators
:- %ask
|= [[now=@da eny=@uvJ bec=beak] ~ ~]
^- (sole-result [%dns-auto ~])
=* our p.bec
=/ rac (clan:title our)
::
?: ?=(?(%earl %pawn) rac)
=/ msg1 "domain names are not provided for comets and moons"
=/ msg2 "see XX for BYOD"
%+ print leaf+msg2
(print leaf+msg1 no-product)
::
?. ?=(%czar rac)
=/ msg1 ":dns|auto is only supported for galaxies"
=/ msg2 "use :dns|request with your ship's public IP address"
=/ msg3 "see XX for more details, or to BYOD"
%+ print leaf+msg3
%+ print leaf+msg2
(print leaf+msg1 no-product)
(produce [%dns-auto ~])