Export a whole bunch of procedures from the low-level interface of the
DNS library.
This commit is contained in:
		
							parent
							
								
									222f5c5052
								
							
						
					
					
						commit
						6cf0413f98
					
				| 
						 | 
					@ -158,7 +158,66 @@
 | 
				
			||||||
	  dns-check-nameservers         ; checks for working nameservers
 | 
						  dns-check-nameservers         ; checks for working nameservers
 | 
				
			||||||
	  socket-address->fqdn
 | 
						  socket-address->fqdn
 | 
				
			||||||
	  host-fqdn
 | 
						  host-fqdn
 | 
				
			||||||
	  system-fqdn))
 | 
						  system-fqdn
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					          dns-get-information
 | 
				
			||||||
 | 
					          
 | 
				
			||||||
 | 
					          (network-protocol :syntax)
 | 
				
			||||||
 | 
					          network-protocol?
 | 
				
			||||||
 | 
					          dns-lookup
 | 
				
			||||||
 | 
					          
 | 
				
			||||||
 | 
					          dns-message? dns-message-query dns-message-reply dns-message-cache?
 | 
				
			||||||
 | 
					          dns-message-protocol dns-message-tried-nameservers
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					          pretty-print-dns-message
 | 
				
			||||||
 | 
					          
 | 
				
			||||||
 | 
					          message? message-header message-questions message-answers
 | 
				
			||||||
 | 
					          message-nameservers message-additionals message-source
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					          make-query-message make-simple-query-message
 | 
				
			||||||
 | 
					          
 | 
				
			||||||
 | 
					          header? header-flags header-question-count header-answer-count
 | 
				
			||||||
 | 
					          header-nameserver-count header-additional-count
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					          flags? flags-query-type flags-opcode flags-authoritative?
 | 
				
			||||||
 | 
					          flags-truncated? flags-recursion-desired? flags-recursion-available?
 | 
				
			||||||
 | 
					          flags-zero flags-response-code
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					          question? question-name question-type question-class
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					          (message-class :syntax)
 | 
				
			||||||
 | 
					          message-class? message-class-name message-class-number
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					          (message-type :syntax)
 | 
				
			||||||
 | 
					          message-type? message-type-name message-type-number
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					          resource-record?
 | 
				
			||||||
 | 
					          resource-record-name resource-record-type
 | 
				
			||||||
 | 
					          resource-record-class resource-record-ttl 
 | 
				
			||||||
 | 
					          resource-record-data
 | 
				
			||||||
 | 
					          
 | 
				
			||||||
 | 
					          resource-record-data-a? resource-record-data-a-ip
 | 
				
			||||||
 | 
					          resource-record-data-ns? resource-record-data-ns-name
 | 
				
			||||||
 | 
					          resource-record-data-cname? resource-record-data-cname-name
 | 
				
			||||||
 | 
					          resource-record-data-mx? resource-record-data-mx-preference
 | 
				
			||||||
 | 
					          resource-record-data-mx-exchanger resource-record-data-ptr?
 | 
				
			||||||
 | 
					          resource-record-data-ptr-name
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					          resource-record-data-soa?
 | 
				
			||||||
 | 
					          resource-record-data-soa-mname
 | 
				
			||||||
 | 
					          resource-record-data-soa-rname
 | 
				
			||||||
 | 
					          resource-record-data-soa-serial
 | 
				
			||||||
 | 
					          resource-record-data-soa-refresh
 | 
				
			||||||
 | 
					          resource-record-data-soa-retry
 | 
				
			||||||
 | 
					          resource-record-data-soa-expire
 | 
				
			||||||
 | 
					          resource-record-data-soa-minimum
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					          cache? cache-answer cache-ttl cache-time
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					          resolv.conf-parse-error?
 | 
				
			||||||
 | 
					          resolv.conf parse-resolv.conf! 
 | 
				
			||||||
 | 
					          
 | 
				
			||||||
 | 
					          domains-for-search))
 | 
				
			||||||
 | 
					
 | 
				
			||||||
(define-interface ips-interface
 | 
					(define-interface ips-interface
 | 
				
			||||||
  (export address32->ip-string
 | 
					  (export address32->ip-string
 | 
				
			||||||
| 
						 | 
					
 | 
				
			||||||
		Loading…
	
		Reference in New Issue