Get longip

[Martin]

Is it posseble to creat a long ip from a normal ip like 192.168.0.1 to 3232235521? same as $longip in mirc.

[stdragon]

Yes, it's essentially 2 lines of tcl.

Code: Select all

# Assuming $ip contains your dotted-decimal ip address
regexp {^(\d*).(\d*).(\d*).(\d*)$} $ip ignore a b c d
set long [expr ($d << 24) + ($c << 16) + ($b << 8) + $a]

I think that's right anyway.

[stdragon]

Uhh, I guess maybe it's

set long [expr ($a << 24) + ($b << 16) + ($c << 8) + $d]

I thought the bytes were reversed for some reason.

[ppslim]

It's ages since I seen some conversion code.

I think you reverse the bytes when doign long2ip.