;########################
; 
;      See Identd
;    By [SaRRiO] 2000
;   sarrio@univers.org
;
;########################


; para ver el identd de un usuario teclea: /seeidentd 

alias seeidentd {
  sockclose seeidentd 
  sockopen seeidentd $remove($address($$1,2),*!*@) 113
  echo -s 3- 4Identd3 -1 mirando el identd de12 $$1

}

on 1:sockopen:seeidentd: {
  if $sockerr > 0 { echo -s 3- 4Identd3 -1 no se pudo conectar con12 $sock($sockname).ip }
  else { sockwrite -n identd 0,0 }
}

on 1:sockread:seeidentd:{
  sockread %identd.read
  echo -s 3- 4Identd3 -1 $sock($sockname).ip 4>>10 %identd.read
  unset %identd.read
}

 Volver a la página principal