shrub/gen/dns-bind/authority.hoon

::  DNS: configure zone authority
::
::::  /hoon/authority/dns/gen
  ::
/-  *dns-bind, *sole
/+  *generators
:-  %ask
|=  $:  [now=@da eny=@uvJ bec=beak]
        [arg=$@(~ [dom=turf ~])]
        ~
    ==
^-  (sole-result [%dns-authority authority])
=-  ?~  arg  -
    (fun.q.q [%& dom.arg])
%+  prompt
  [%& %dns-domain "dns domain: "]
%+  parse  thos:de-purl:html
|=  hot=host:eyre
?:  ?=(%| -.hot)
  ~|(%ips-unsupported !!)
%+  prompt
  [%& %project "gcloud project: "]
%+  parse  urs:ab
|=  project=@ta
%+  prompt
  [%& %zone "dns zone: "]
%+  parse  urs:ab
|=  zone=@ta
%-  produce
[%dns-authority [p.hot %gcloud project zone ~]]
auto-starts :dns, adds generator to configure authority 2018-06-20 23:06:00 +03:00			`:: DNS: configure zone authority`
			`::`
			`:::: /hoon/authority/dns/gen`
			`::`
rewrites :dns-bind to use lib/async 2019-06-26 04:41:08 +03:00			`/- dns-bind, sole`
simplifies :dns, removing dependence on %ames routing 2018-10-30 22:05:42 +03:00			`/+ *generators`
auto-starts :dns, adds generator to configure authority 2018-06-20 23:06:00 +03:00			`:- %ask`
			`\|= $: [now=@da eny=@uvJ bec=beak]`
simplifies :dns, removing dependence on %ames routing 2018-10-30 22:05:42 +03:00			`[arg=$@(~ [dom=turf ~])]`
auto-starts :dns, adds generator to configure authority 2018-06-20 23:06:00 +03:00			`~`
			`==`
rewrites :dns-bind to use lib/async 2019-06-26 04:41:08 +03:00			`^- (sole-result [%dns-authority authority])`
auto-starts :dns, adds generator to configure authority 2018-06-20 23:06:00 +03:00			`=- ?~ arg -`
			`(fun.q.q [%& dom.arg])`
Issue #61 Extracted %ask generator methods from sur/sole and put them in a core under lib/sole Fixed names in existing generators 2018-10-02 22:26:16 +03:00			`%+ prompt`
auto-starts :dns, adds generator to configure authority 2018-06-20 23:06:00 +03:00			`[%& %dns-domain "dns domain: "]`
Issue #61 Extracted %ask generator methods from sur/sole and put them in a core under lib/sole Fixed names in existing generators 2018-10-02 22:26:16 +03:00			`%+ parse thos:de-purl:html`
auto-starts :dns, adds generator to configure authority 2018-06-20 23:06:00 +03:00			`\|= hot=host:eyre`
disables failures, re-enables successes, or fixes failing tests 2018-08-28 20:08:04 +03:00			`?: ?=(%\| -.hot)`
auto-starts :dns, adds generator to configure authority 2018-06-20 23:06:00 +03:00			`~\|(%ips-unsupported !!)`
Issue #61 Extracted %ask generator methods from sur/sole and put them in a core under lib/sole Fixed names in existing generators 2018-10-02 22:26:16 +03:00			`%+ prompt`
auto-starts :dns, adds generator to configure authority 2018-06-20 23:06:00 +03:00			`[%& %project "gcloud project: "]`
Issue #61 Extracted %ask generator methods from sur/sole and put them in a core under lib/sole Fixed names in existing generators 2018-10-02 22:26:16 +03:00			`%+ parse urs:ab`
auto-starts :dns, adds generator to configure authority 2018-06-20 23:06:00 +03:00			`\|= project=@ta`
Issue #61 Extracted %ask generator methods from sur/sole and put them in a core under lib/sole Fixed names in existing generators 2018-10-02 22:26:16 +03:00			`%+ prompt`
auto-starts :dns, adds generator to configure authority 2018-06-20 23:06:00 +03:00			`[%& %zone "dns zone: "]`
Issue #61 Extracted %ask generator methods from sur/sole and put them in a core under lib/sole Fixed names in existing generators 2018-10-02 22:26:16 +03:00			`%+ parse urs:ab`
auto-starts :dns, adds generator to configure authority 2018-06-20 23:06:00 +03:00			`\|= zone=@ta`
simplifies :dns, removing dependence on %ames routing 2018-10-30 22:05:42 +03:00			`%- produce`
rewrites :dns-bind to use lib/async 2019-06-26 04:41:08 +03:00			`[%dns-authority [p.hot %gcloud project zone ~]]`