Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
Comment: | dns - Ticket [7e0f5ae0f6] - Fixed the missing automatic wait on replies in udp mode without a -command forcing async operation. To this end the responsible code has been moved out of the TCP branch where it lived since udp support was added in 2003. |
---|---|
Timelines: | family | ancestors | descendants | both | trunk |
Files: | files | file ages | folders |
SHA1: |
ca36641e9fd0cb672a4466fcc99cd5bf |
User & Date: | andreask 2015-04-15 19:12:13 |
Original Comment: | dns - Ticket [7e0f5ae0f6] - Fixed the missing automatic wait on replies in udp mode without a -command forcing async operation. To this end the responsible code has been moved out of the TCP branch where it lived since udp supported was added in 2003. |
References
2015-04-15
| ||
19:20 | • Closed ticket [7e0f5ae0f6]: dns package plus 6 other changes artifact: 10171c356f user: aku | |
Context
2015-04-15
| ||
19:48 | uri - Ticket [c315712173] - Fixed handling of scheme-relative urls which have an authority (network-path). New test cases. Version bumped to 1.2.5. check-in: a29e0299a8 user: andreask tags: trunk | |
19:12 | dns - Ticket [7e0f5ae0f6] - Fixed the missing automatic wait on replies in udp mode without a -command forcing async operation. To this end the responsible code has been moved out of the TCP branch where it lived since udp support was added in 2003. check-in: ca36641e9f user: andreask tags: trunk | |
2015-04-14
| ||
23:05 | Ticket [9014664163] - control - Drop superfluous "version" variable. check-in: 71ed84053f user: andreask tags: trunk | |
Changes
Changes to modules/dns/dns.tcl.
︙ | ︙ | |||
259 260 261 262 263 264 265 | set state(-type) PTR } BuildMessage $token if {$state(-protocol) == "tcp"} { TcpTransmit $token | < < < > > | | 259 260 261 262 263 264 265 266 267 268 269 270 271 272 273 274 275 276 277 278 | set state(-type) PTR } BuildMessage $token if {$state(-protocol) == "tcp"} { TcpTransmit $token } else { UdpTransmit $token } if {$state(-command) == {}} { wait $token } return $token } # ------------------------------------------------------------------------- # Description: # Return a list of domain names returned as results for the last query. |
︙ | ︙ | |||
1405 1406 1407 1408 1409 1410 1411 | return "dns:$query" } # ------------------------------------------------------------------------- catch {dns::configure -nameserver [lindex [dns::nameservers] 0]} | | | 1404 1405 1406 1407 1408 1409 1410 1411 1412 1413 1414 1415 1416 | return "dns:$query" } # ------------------------------------------------------------------------- catch {dns::configure -nameserver [lindex [dns::nameservers] 0]} package provide dns 1.3.5 # ------------------------------------------------------------------------- # Local Variables: # indent-tabs-mode: nil # End: |
Changes to modules/dns/pkgIndex.tcl.
1 2 3 4 5 | # pkgIndex.tcl - # # $Id: pkgIndex.tcl,v 1.21 2010/08/16 17:35:18 andreas_kupries Exp $ if {![package vsatisfies [package provide Tcl] 8.2]} {return} | | | 1 2 3 4 5 6 7 8 9 | # pkgIndex.tcl - # # $Id: pkgIndex.tcl,v 1.21 2010/08/16 17:35:18 andreas_kupries Exp $ if {![package vsatisfies [package provide Tcl] 8.2]} {return} package ifneeded dns 1.3.5 [list source [file join $dir dns.tcl]] package ifneeded resolv 1.0.3 [list source [file join $dir resolv.tcl]] package ifneeded ip 1.2.2 [list source [file join $dir ip.tcl]] package ifneeded spf 1.1.1 [list source [file join $dir spf.tcl]] |
Changes to modules/dns/tcllib_dns.man.
|
| | | 1 2 3 4 5 6 7 8 | [vset DNS_VERSION 1.3.5] [manpage_begin dns n [vset DNS_VERSION]] [see_also resolver(5)] [keywords DNS] [keywords {domain name service}] [keywords resolver] [keywords {rfc 1034}] [keywords {rfc 1035}] |
︙ | ︙ |