Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | Experimental fix to [7554bfed30] |
|---|---|
| Timelines: | family | ancestors | fix-dns-udp-ipv6-7554bfed30 |
| Files: | files | file ages | folders |
| SHA3-256: |
31f9e28d7c490954fc611c33265c2b37 |
| User & Date: | rkeene 2018-12-31 05:19:48 |
References
|
2019-02-21
| ||
| 23:58 | • Ticket [7554bfed30] IPv6 nameservers are not supported in UDP mode status still Open with 4 other changes artifact: e7650438ca user: aku | |
Context
|
2018-12-31
| ||
| 05:19 | Experimental fix to [7554bfed30] Leaf check-in: 31f9e28d7c user: rkeene tags: fix-dns-udp-ipv6-7554bfed30 | |
|
2018-12-08
| ||
| 18:18 | Pulling a commit to uuid that was missed check-in: 63590365a7 user: hypnotoad tags: trunk | |
Changes
Changes to modules/dns/dns.tcl.
789 790 791 792 793 794 795 796 797 798 799 800 801 802 803 |
if {[llength [package provide ceptcl]] > 0} {
# using ceptcl
set state(sock) [cep -type datagram $state(-nameserver) $state(-port)]
fconfigure $state(sock) -blocking 0
} else {
# using tcludp
set state(sock) [udp_open]
udp_conf $state(sock) $state(-nameserver) $state(-port)
}
fconfigure $state(sock) -translation binary -buffering none
set state(status) connect
puts -nonewline $state(sock) $state(request)
fileevent $state(sock) readable [list [namespace current]::UdpEvent $token]
|
> > > | > |
789 790 791 792 793 794 795 796 797 798 799 800 801 802 803 804 805 806 807 |
if {[llength [package provide ceptcl]] > 0} {
# using ceptcl
set state(sock) [cep -type datagram $state(-nameserver) $state(-port)]
fconfigure $state(sock) -blocking 0
} else {
# using tcludp
if {[string match "*:*" $state(-nameserver)]} {
set state(sock) [udp_open ipv6]
} else {
set state(sock) [udp_open]
}
udp_conf $state(sock) $state(-nameserver) $state(-port)
}
fconfigure $state(sock) -translation binary -buffering none
set state(status) connect
puts -nonewline $state(sock) $state(request)
fileevent $state(sock) readable [list [namespace current]::UdpEvent $token]
|