Informations sur les extensions

Commenter

Contenu du snippet

Cet addon va vous permettre de rechercher des informations sur une extension de fichier

Imagions que vous ayez une extension du type .mrc et que vous ne savez pas quel programe utilise ce type d'extension, il vous suffira de dire sur le salon ou se trouve votre bot : !file mrc et celui ci recherchera les informations sur cette extension

ex:
> !file mrc
<@Nyctalope> Bibliographic Data Format ( http://www.loc.gov/marc/ )
<@Nyctalope> MIRC Script File ( http://www.mirc.com )

on ne peut pas plus simple ;)

Pour le fonctionnement, le script va chercher des information sur un site web, ca permet d'avoir une base de donnée d'extension qui est à jour (et de ne pas devori le faire nous meme :p )

Source / Exemple : 


ON *:TEXT:!file*:#:{
  set %Chanfile $chan
  set %file $2
  If (. isin %file) {
    %file = $remove(%file,.)
  }
  set %detector off
  ;On le ferme pour éviter les messages d'erreur
  sockclose file
  ;Établie la connexion sur le site  sur le port 80
  sockopen file www.filext.com 80
}

;Lorsque la connexion est établie, on demande la page
;Encore une fois, ce n'est que l'utilisation d'un protocole (HTTP cette fois-ci)
on *:sockopen:file:{ sockwrite -n file GET /detaillist.php?extdetail= $+ %file }
;Lorsqu'on recois l'information
on *:sockread:file:{

  ;On stock l'information dans la variable %sockfile
  sockread %sockfile
  If (Ooops isin %sockfile) {
    msg %chanfile L'extension demandé est introuvable :( 
  }
  If (<strong>Company isin %sockfile) {
    %detector = On
  }
  If (( <td colspan="2"> isin %sockfile) && ( %detector == On)) {
    %detector = Off
    %sockfile = $remove(%sockfile,<td colspan="2">)
    If (<a href=" isin %sockfile) {
      set %url $remove($mid(%sockfile,1,$pos(%sockfile,",2)),<a href=",") 
      set %detecturl On
      %sockfile = $remove($mid(%sockfile,$pos(%sockfile,",2),$len(%sockfile)),</td>,</a>,target="_blank">,")
    }
    Else {
      %sockfile = $remove(%sockfile,</td>)
    }
    ;On affichage cette même information dans la fenêtre active 
    If (%detecturl == On) {
      msg %chanfile %sockfile (12  $+ %url $+  )
      unset %detecturl
    }
    Else {
      msg %Chanfile %sockfile
    }
  }
}

Conclusion :


En cas de probleme n'hesitez pas a me contacter a womby@epiknet.fr ou meme de venir faire un tour sur UnderNet sur le salon #drogenbos :)

Bon chat! ;)

A voir également

S'inscrire maintenant

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.

Du même auteur (cs_Womby)