Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
Comment: | Experiment with flow label |
---|---|
Timelines: | family | ancestors | descendants | both | trunk |
Files: | files | file ages | folders |
SHA1: |
69d886902f82eb878acbb876ab227948 |
User & Date: | bernd 2019-08-30 18:53:29.927 |
Context
2019-08-30
| ||
21:57 | Fix disabling IPv6 check-in: 6ed16db24a user: bernd tags: trunk | |
18:53 | Experiment with flow label check-in: 69d886902f user: bernd tags: trunk | |
18:49 | Experiment with flow label check-in: 78b0625b9a user: bernd tags: trunk | |
Changes
Changes to addr.fs.
︙ | ︙ | |||
117 118 119 120 121 122 123 | User dest-0key> \ pointer to dest-0key User dest-0key< \ pointer to obtained dest-0key : addr>6sock ( -- ) host:key @ dest-0key< ! host:portv6 w@ sockaddr1 port be-w! host:ipv6 sockaddr1 sin6_addr ip6! | | | 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 | User dest-0key> \ pointer to dest-0key User dest-0key< \ pointer to obtained dest-0key : addr>6sock ( -- ) host:key @ dest-0key< ! host:portv6 w@ sockaddr1 port be-w! host:ipv6 sockaddr1 sin6_addr ip6! flowlabel( rng32 $7FFFF and sockaddr1 sin6_flowinfo be-l! ) host:route $@ !temp-addr ; : addr>4sock ( -- ) host:key @ dest-0key< ! host:portv4 w@ sockaddr1 port be-w! host:ipv4 be-ul@ sockaddr1 ipv4! host:route $@ !temp-addr ; |
︙ | ︙ |
Changes to debugging.fs.
︙ | ︙ | |||
80 81 82 83 84 85 86 87 88 89 90 91 92 93 | debug: slurp( \ debug slurp&spit debug: wallet( \ debug wallet stuff debug: qr( \ qr code stuff debug: deprecated( \ deprecated stuff debug: unhandled( \ unhandled commands debug: syncfile( \ synchronous file operations debug: newvault( \ new style vault keys -db profile( \ don't profile by default ) +db ipv6( \ ipv6 should be on by default ) +db ipv4( \ ipv4 should be on by default ) +db ipv64( \ ipv6 over 4 -db newvault( \ new vault disabled for now ) +db syncfile( \ disable async file operations for now ) | > | 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 | debug: slurp( \ debug slurp&spit debug: wallet( \ debug wallet stuff debug: qr( \ qr code stuff debug: deprecated( \ deprecated stuff debug: unhandled( \ unhandled commands debug: syncfile( \ synchronous file operations debug: newvault( \ new style vault keys debug: flowlabel( \ experiment with flow labels -db profile( \ don't profile by default ) +db ipv6( \ ipv6 should be on by default ) +db ipv4( \ ipv4 should be on by default ) +db ipv64( \ ipv6 over 4 -db newvault( \ new vault disabled for now ) +db syncfile( \ disable async file operations for now ) |
︙ | ︙ |
Changes to ip.fs.
︙ | ︙ | |||
126 127 128 129 130 131 132 | >r r@ sin6_addr 12 + be-l! 0 r@ sin6_addr 8 + l! 0 r@ sin6_addr 4 + l! $0064ff9b r> sin6_addr be-l! ; : sock-rest ( sockaddr -- addr u ) >r AF_INET6 r@ family w! | | | 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 | >r r@ sin6_addr 12 + be-l! 0 r@ sin6_addr 8 + l! 0 r@ sin6_addr 4 + l! $0064ff9b r> sin6_addr be-l! ; : sock-rest ( sockaddr -- addr u ) >r AF_INET6 r@ family w! flowlabel( )else( 0 r@ sin6_flowinfo l! ) 0 r@ sin6_scope_id l! r> sockaddr_in6 ; : sock-rest4 ( sockaddr -- addr u ) >r AF_INET r@ family w! r> sockaddr_in4 ; |
︙ | ︙ |