Asia Pacific Network Information is recorded here and updated every day. Bytes. #! /Bin/sh # autogettheIPTable # getthen
Asia Pacific Network Information is recorded here and updated every day.
Http://ftp.apnic.net/apnic/stats/apnic/delegated-apnic-latest
The script below will edit the text and output the CIDR blocks of several major carriers in China.
#! /Bin/sh
# Auto get the IP Table
# Get the newest delegated-apnic-latest
Rm delegated-apnic-latest
If type wget
Then wget http://ftp.apnic.net/apnic/stats/apnic/delegated-apnic-latest
Else fetch http://ftp.apnic.net/apnic/stats/apnic/delegated-apnic-latest
Fi
Grep 'apnic | CN | ipv4 'delegated-apnic-latest | cut-f 4, 5-d' | '| tr' | ''' | while read ip cnt
Do
Mask = $ (bc < Pow = 32;
Define log2 (x ){
If (x <= 1) return (pow );
Pow --;
Return (log2 (x/2 ));
}
Log2 ($ cnt );
END
)
Echo $ ip/$ mask ';'> cnnet
Resultext = 'whois $ ip@whois.apnic.net | grep-e ^ netname-e ^ descr-e ^ role-e ^ mnt-by | cut-f 2-D ': '| sed's /*//''
If echo $ resultext | grep-I-e 'railcom'-e 'crtc '-e 'railway'
Then echo $ ip/$ mask ';'> crc
Elif echo $ resultext | grep-I-e 'cncgroup'-e 'netcom'
Then echo $ ip/$ mask ';'> cnc
Elif echo $ resultext | grep-I-e 'chinanet '-e 'chinatel'
Then echo $ ip/$ mask ';'> telcom_acl
Elif echo $ resultext | grep-I-e 'unicom'
Then echo $ ip/$ mask ';'> unicom
Elif echo $ resultext | grep-I-e 'cmtnet'
Then echo $ ip/$ mask ';'> cmnet
Else
Echo $ ip/$ mask ';'> other_acl
Fi
Done