Scanner d'ircops

Soyez le premier à donner votre avis sur cette source.

Snippet vu 3 590 fois - Téléchargée 29 fois

Contenu du snippet

Voici un scanner d'ircops, qui peut scanner le serveur et les channels où vous êtes.

Source / Exemple :


dialog ircops {
  title "IrcOps Scanner"
  size -1 -1 118 104
  option dbu
  text "Scanner :", 1, 3 4 25 8
  combo 2, 28 2 54 11, drop
  button "Scanner", 3, 83 2 32 10, disable
  box "Liste des IrcOps", 4, 3 13 113 76
  list 5, 6 21 73 65, size vsbar
  button "WhoIs", 6, 81 30 32 11, disable
  button "Query", 7, 81 45 32 11, disable
  button "Uwho", 8, 81 60 32 11, disable
  button "Fermer", 9, 78 90 37 12, cancel
  text "Etat : En attente...", 10, 4 93 65 8
}
on *:DIALOG:ircops:*:*:{
  if ($devent == init) {
    did -a $dname 2 $$iif($server,Serveur)
    did -a $dname 2 $$iif($chan(1),Tous les salons)
    var %a 1
    while ($chan(%a)) { did -a $dname 2 $ifmatch | inc %a }
  }
  elseif ($devent == sclick) {
    if ($did == 2) { did $+(-,$iif($did(2).seltext,e,b)) $dname 3 }
    elseif ($did == 3) {
      did -r $dname 5
      did -ra $dname 10 Etat : Scanner en cours...
      .enable #IrcOpScan
      .who $iif($did(2).seltext == Serveur,0,$iif($did(2).seltext == Tous les salons,+Mm,$did(2).seltext)) o
    }
    elseif ($did == 5) { did $+(-,$iif($did(5).seltext,e,b)) $dname 6,7,8 }
    elseif ($did == 6) { whois $did(5).seltext }
    elseif ($did == 7) { query $did(5).seltext }
    elseif ($did == 8) { .uwho $did(5).seltext }
  }
}
#IrcOpScan off
raw 352:*:{
  if ($dialog(ircops) && $chr(42) isin $7) { did -a ircops 5 $6 }
  halt
}
raw 315:*:{ .disable #IrcOpScan | did -ra ircops 10 Etat : Terminé. | halt }
#IrcOpScan end
alias ircops { dialog $+(-,$iif($dialog(ircops),v,m)) ircops ircops }
menu Status,Channel,MenuBar {
  -
  Scanner d'IrcOps:ircops
}

Conclusion :


Si vous avez des conseils n'hésitez pas =)

/ircops où accessible depuis les menus.

A voir également

Ajouter un commentaire Commentaires
MaX_62
Messages postés
879
Date d'inscription
vendredi 22 octobre 2004
Statut
Membre
Dernière intervention
29 juin 2007

14 mars 2005 à 16:38
Je vais mettre a jour ça :/
cs_wims
Messages postés
2466
Date d'inscription
vendredi 23 juillet 2004
Statut
Membre
Dernière intervention
1 août 2010
1
14 mars 2005 à 12:09
un autres truc : si je scan un salon ou il n'y y a pas d'ircop
il maffiche "terminé" mais il ne m'indique pas qu'il n'y a pas d'ircop.
cs_PaDa
Messages postés
1804
Date d'inscription
mardi 15 juillet 2003
Statut
Membre
Dernière intervention
22 septembre 2009
6
14 mars 2005 à 07:16
ah un autre truc, qui me parait essentiel : fais une vérification que tu as pas un $chan(N).inwho enclenché, sinon tu peux récupérer n'importe quoi :] sur des salons énormes, le /who mettant bien 5 a 10 secondes a etre renvoyé en entier, ca a son intérêt. D'ou au passage le double intérêt de vérifier si une étoile arrive au début du raw 352
cs_PaDa
Messages postés
1804
Date d'inscription
mardi 15 juillet 2003
Statut
Membre
Dernière intervention
22 septembre 2009
6
14 mars 2005 à 07:12
Non, tu auras beau faire un raw -q ou tout ce que tu veux, si le serveur local du whoisé n'accepte pas le whois distant, c'est mort. Le raw -q ne fait rien gagner, tu n'auras pas plus de réponse. (cf posts forums a ce sujet)

Quant à la source, je pige pas a quoi sert la combo, dans la mesure ou on scanne rarement un salon pour savoir si ya un ircop... enfin moi ca me sert jamais, mon scanner d'ircops scanne juste avec les deux méthodes connues :
/who 0 o (non +i), et /who +Mm o (visibles ayant un salon commun)...
Sinon, tu pourrais vérifier que tu recois une * dans le retour du raw 352, ca t'éviterait que tlm soit ircop sur certains réseaux :)

Bonne continuation
COOLMAN002
Messages postés
969
Date d'inscription
lundi 16 juin 2003
Statut
Membre
Dernière intervention
1 juillet 2012
1
13 mars 2005 à 23:51
elseif ($did == 6) { whois $$did(5).seltext $$did(5).seltext }

<devient>

elseif ($did == 6) { raw -q whois $$did(5).seltext $$did(5).seltext }
Afficher les 9 commentaires

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.