chiark / gitweb /
dispatch entrypoints
[chiark-tcl.git] / adns / adns.tct
1 Type adnsresults:               adns_answer *@
2 Init adnsresults                @=0;
3 Fini adnsresults                free(@);
4
5 Table *adnstoplevel TopLevel_Command
6         adns
7                 subcmd  enum(Adns/_SubCommand, "adns subcommand")
8                 ...     obj
9
10 Table adns Adns_SubCommand
11         lookup
12                 rrtype  enum(AdnsTclRRTypeInfo/, "rrtype")
13                 domain  string
14                 ...     obj
15                 =>      obj
16         synch
17                 rrtype  enum(AdnsTclRRTypeInfo/, "rrtype")
18                 domain  string
19                 ...     obj
20                 =>      obj
21         asynch
22                 on_yes  obj
23                 on_no   obj
24                 on_fail obj
25                 xargs   obj
26                 rrtype  enum(AdnsTclRRTypeInfo/, "rrtype")
27                 domain  string
28                 ...     obj
29                 =>      iddata(&adnstcl_queries)
30         asynch-cancel
31                 query   iddata(&adnstcl_queries)
32         new-resolver
33                 ...     obj
34                 =>      iddata(&adnstcl_resolvers)
35         set-default-resolver
36                 res     iddata(&adnstcl_resolvers)
37         destroy-resolver
38                 res     iddata(&adnstcl_resolvers)
39