arpa>ipv6 ( string -- ip )

Vocabulary

dns

Inputs

string

an object

Outputs

ip

an object

Definition

USING: grouping kernel math math.parser sequences splitting ;

IN: dns

: arpa>ipv6 ( string -- ip )
    trim-ipv6-arpa "." split 2 group reverse
    [ first2 swap [ hex> ] bi@ [ 4 shift ] [ ] bi* bitor ] B{ }
    map-as byte-array>ipv6 ;