Whois domain mirc socket

Soyez le premier à donner votre avis sur cette source.

Snippet vu 4 058 fois - Téléchargée 27 fois

Contenu du snippet

Ce petit addon (tien en 5 lignes dans mes remotes, bon d'accord j'ai fait le moin de lignes possible lol) sert à whois un nom de domaine grace au site whois.net (faut bien le cité). Je l'ai fait en socket mIRC, c'est la premiere fois que je fais un addon en socket mIRC port 80 pour recupérer dees infos sur des site... J'ai fait simple, un alias wdomain seulement, aucun dialog et le resultat en echo :)

Utilisation -> /wdomain <nom-de-domaine/ip-du-site>

Source / Exemple :


alias wdomain { set %domain $replace($1,www,.,,) | .dns %domain | sockopen whois www.whois.net 80 }
on *:sockopen:whois:{ sockwrite -n $sockname GET /whois.cgi2?d= $+ %domain }
on *:sockread:whois:{ sockread %a | if ($chr(9) isin %a) { if (Domain: isin %a) { echo -a Domain IP: %ipdomain | echo -a $upper($left($replace(%a, $+ $chr(9),),1)) $+ $right($replace(%a, $+ $chr(9),),$calc($len($replace(%a, $+ $chr(9),))-1)) }
else { echo -a 2 $+ $upper($left($replace(%a, $+ $chr(9),),1)) $+ 12 $+ $right($replace(%a, $+ $chr(9),),$calc($len($replace(%a, $+ $chr(9),))-1)) } } }
on *:dns:{ var %b = $dns(0) | set %ipdomain No DNS resolve | while (%b > 0) { set %ipdomain $dns(%b).ip | dec %b } }

Conclusion :


Je ne l'ai pas développé, mais je pense qu'il y a des petits malin qui aimerais peut-etre le faire pour leurs script ou autre donc bein jvous laisse le prendre comme vous voulez, et si vous mettez pas mon nom pour la source bein tempi prenez vous pour un ripper :)

PS: si quelqu'un pourrais me dire comment je peux faire pour que dans le 2 $+ $upper($left($replace(%a, $+ $chr(9),),1)) $+ 12 $+ $right($replace(%a, $+ $chr(9),),$calc($len($replace(%a, $+ $chr(9),))-1)) lors de ela reception de l'info, il y ai un espace entre le : et le truc style Domain:ircfr.com jvoudrais plutot Domain: ircdfr.com, j'ai pas trouver en $replace(%a,:,: $+ $chr(1 ou 2)) enfin put etre que emon test a été mal fait, et si cela ne marche pas, ya un autre moyen ? Thanks ++

A voir également

Ajouter un commentaire

Commentaires

Messages postés
12
Date d'inscription
jeudi 12 février 2009
Statut
Membre
Dernière intervention
4 mai 2009

moé sa sorti les code dla page internet mdrr ^^
Messages postés
5
Date d'inscription
mercredi 20 août 2003
Statut
Membre
Dernière intervention
29 octobre 2003

thx jle modifierais + tard kan jorais ltemps :)
Messages postés
817
Date d'inscription
mercredi 25 juin 2003
Statut
Membre
Dernière intervention
19 avril 2004

si tu veux des espaces sert toi de $chr(32)
Messages postés
5
Date d'inscription
mercredi 20 août 2003
Statut
Membre
Dernière intervention
29 octobre 2003

:)
Messages postés
9
Date d'inscription
jeudi 17 juillet 2003
Statut
Membre
Dernière intervention
11 mai 2004

Simpa les infos kil donne

Ke0

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.