Untitled

;; 사용방법은 /ipw 127.0.0.1   식으로 하면 됨..

alias ipw {

  ; $1 가 아이피 형식인지 체크. 정규식을 만들어야하는데.. 일단 귀찮으니 맨 마지막 자리가 숫자인지 체크하자..

  if ( $1 && isnum($mid($1,$len($1)-1,$len($1))) ) {

    set %ipw.ip $1

    sockclose nrc | sockopen nrc rtc.nrc.go.kr 80

  }

}

 

on *:sockopen:nrc: {

 

  sockwrite -nt $sockname GET /nalog/check_ip.php?ip= $+ %ipw.ip HTTP/1.1

  sockwrite -nt $sockname Host: rtc.nrc.go.kr

  sockwrite -nt $sockname User-Agent: Mozilla/5.0 (Windows; U; Windows NT 5.1; ko; rv:1.9.2.3) Gecko/20100401 Firefox/3.6.3 (.NET CLR 3.5.30729)

  sockwrite -nt $sockname Accept: text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8

  sockwrite -nt $sockname Accept-Language: ko-kr,ko;q=0.8,en-us;q=0.5,en;q=0.3

  ;sockwrite -nt $sockname Accept-Encoding: gzip,deflate

  sockwrite -nt $sockname Accept-Charset: EUC-KR,utf-8;q=0.7,*;q=0.7

  ;sockwrite -nt $sockname Keep-Alive: 115

  sockwrite -nt $sockname Connection: keep-alive

  sockwrite -nt $sockname $lf

  echo -a %ipw.ip

}

 

var %flag = 0

on *:sockread:nrc: {

  sockread %tmp

  if ( %tmp && 아래와 isin %tmp ) { %flag = 1 }

  if ( %tmp && 조회하신 isin %tmp ) { %flag = 1 }

  if ( %flag == 1 && %tmp ) { echo -s %tmp }

  if ( %tmp && ---------------------- isin %tmp ) { %flag = 0 }

  if ( %tmp && 전자우편 isin %tmp ) { %flag = 0 }

}

on *:sockclose:nrc: {

 

}