Mai acu vreo saptamana asa, vine un gigel si intreaba pe NANOG cum poate converti un integer la o adresa IP, de exemplu din 1089055123 sa faca 64.233.169.147. trecand pe langa modalitatea matematica de a face aceasta conversie, o gramada de oameni au venit cu idei diferite despre cum poti realiza asta in diverse limbjae de programare, de la shell scripting la postscript. Enjoy!<\/p>\n
bash<\/strong><\/p>\n bash# inttoip(){ echo $[$1>>24].$[($1>>16)&255].$[($1>>8)&255].$[$1&255]; } bc<\/strong><\/p>\n $ bc 064 233 169 147<\/p>\n shell<\/strong><\/p>\n # ping -c 1 1089055123 | head -n 1 | awk ‘{{{print $3}}}’ | sed ‘s\/((.*))\/1\/’ REXX<\/strong><\/p>\n PARSE VALUE D2X(ARG(1)) WITH a 3 b 5 c 7 d . PHP<\/strong><\/p>\n echo long2ip(‘1089055123’);<\/p>\n C<\/strong><\/p>\n #include <stdio.h> Perl (two liner)<\/strong><\/p>\n sub ntoa_in_one_line { join(“.”, unpack(“CCCC”, pack(“N”, $_[0]))); } awk<\/strong><\/p>\n dec2ip ip2dec Ruby<\/strong><\/p>\n require “ipaddr” Perl (one liner)<\/strong><\/p>\n $ perl -e ‘use IO::Socket; print inet_ntoa(pack(“N”,2066563929)).”n”;’ ITS TECO<\/strong><\/p>\n 1089055123u14<q1&377.\u0000j46i0jq1\/400.u1>d$$<\/p>\n PostScript (in cazul in care vreti sa faca imprimanta calculele) ##### BEGIN of ntoa.ps ##### \/printa { \/Helvetica findfont 36 scalefont setfont 36 444 moveto<\/p>\n 1089055123 ntoa printa<\/p>\n showpage Fun, ain’t it, no ?<\/p>\n","protected":false},"excerpt":{"rendered":" Mai acu vreo saptamana asa, vine un gigel si intreaba pe NANOG cum poate converti un integer la o adresa IP, de exemplu din 1089055123 sa faca 64.233.169.147. trecand pe langa modalitatea matematica de a face aceasta conversie, o gramada de oameni au venit cu idei diferite despre cum poti realiza asta in diverse limbjae … Continue reading [geek stuff] integer to ip address<\/span>
\nbash# inttoip 1089055123
\n64.233.169.147<\/p>\n
\nbc 1.06
\nCopyright 1991-1994, 1997, 1998, 2000 Free Software Foundation, Inc.
\nThis is free software with ABSOLUTELY NO WARRANTY.
\nFor details type `warranty’.
\nobase=256
\n1089055123<\/p>\n
\n64.233.169.147<\/p>\n
\nSAY X2D(a)”.”X2D(b)”.”X2D(c)”.”X2D(d)<\/p>\n
\nmain(int argc, char *argv[])
\n{
\nunion {
\nunsigned int i;
\nunsigned char c[4];
\n} ip;
\nint i = 0;
\nip.i = 1089055123;
\n\/* endian-neutral iteration: *\/
\nprintf(“%d.%d.%d.%dn”, ip.c[i++], ip.c[i++], ip.c[i++], ip.c[i++]);
\nreturn 0;
\n}<\/p>\n
\nprint ntoa_in_one_line(1089055123) . “n”;<\/p>\n
\nawk ‘{ print int($1 \/ 16777216) “.” int($1 % 16777216 \/ 65536) “.” int($1 % 65536 \/ 256) “.” int($1 % 256) }’<\/p>\n
\nawk ‘{ split($1, a, “.”); print a[1]*16777216 + a[2]*65536 + a[3]*256 + a[4] }’<\/p>\n
\nprint “#{IPAddr.new(167772215,Socket::AF_INET)}n”<\/p>\n
\n123.45.67.89<\/p>\n
\n<\/strong><\/p>\n
\n%!
\n\/ntoa {
\n3 { dup 256 idiv exch 256 mod exch } repeat 256 mod
\n} def<\/p>\n
\n3 string cvs show 3 { (.) show 3 string cvs show } repeat
\n} def<\/p>\n
\n###### END of ntoa.ps ######<\/p>\n