begin process at 2012 02 08 19:44:50
  Trouver un code source :
 
dans
 
[ Dernières recherches ]
Accueil > 

Code

 > 

AddOns

 > INUTIL [SCANNEUR DE SOUS LIENS DE SITES]

INUTIL [SCANNEUR DE SOUS LIENS DE SITES]


 Information sur la source

Note :
Aucune note
Catégorie :AddOns Niveau :Initié Date de création :01/07/2004 Vu :2 246
Auteur : nxtreme

Ecrire un message privé
Commentaire sur cette source (13)
Ajouter un commentaire et/ou une note

 Description

Comme son nom l'indique, c'est le truc qui sert à rien!
Vous lui donnez un site, et il vous trouvera tous les sous liens pour les afficher dans une list d'un dialog tres simple d'utilisation, il servira plus à comprendre le fonctionnement des sockets plutot que pour faire mumuse avec!
Ne reccopiez pas ce code, inspirez vous en seulement, et j'en serai ravi d'aider d'autre personnes avec, meme si il reste encore très basique.


/inut pour activer la bête!

Source

  • alias inut { dialog -m Intl Intl }
  • dialog Intl {
  • title "InutiL, le script inutile"
  • size 250 200 500 320
  • button "",1,1 1 1 1,close
  • text "Adresse du site:",2,10 12 80 15
  • edit "vtff.fr.st",3,100 10 120 20,autohs
  • button "Scan",4,240 10 80 20,flat
  • text "Scripté par nxtreme",5,330 10 160 30,center
  • list 6,10 40 480 280, sort, extsel, vsbar, hsbar
  • }
  • on *:dialog:Intl:sclick:4:{
  • if ($did(4) == Scan) {
  • did -ra intl 4 Stop
  • did -ra intl 6 $null
  • did -ra Intl 5 Scanne $did(3) 80
  • sockclose inut
  • sockopen inut $did(3) 80
  • if ((www. isin $did(3)) || (http:// isin $did(3))) {
  • did -ra intl 5 Réinscrivez l'adresse sans www. ou http://
  • did -e intl 4
  • }
  • else set %serveurinutile $did(3)
  • }
  • else {
  • sockclose inut
  • did -ra intl 4 Scan
  • }
  • }
  • on *:sockopen:inut:{
  • sockwrite -n inut GET / HTTP/1.1
  • sockwrite -n $sockname Host: %serveurinutile $+ $str($crlf ,2)
  • }
  • on *:sockread:inut:{
  • sockread %a.tmp
  • if (<html> isin %a.tmp) { did -ra intl 5 Connexion établie: %serveurinutile }
  • if (href=" isin %a.tmp) {
  • if ((/ isin $gettok(%a.tmp,2,34)) && (< !isin $gettok(%a.tmp,2,34))) { did -a intl 6 $gettok(%a.tmp,2,34) }
  • }
  • if (</html> isin %a.tmp) {
  • did -ra intl 5 Terminé
  • did -ra intl 4 Scan
  • }
  • }
alias inut { dialog -m Intl Intl }
dialog Intl {
  title "InutiL, le script inutile"
  size 250 200 500 320
  button "",1,1 1 1 1,close
  text "Adresse du site:",2,10 12 80 15
  edit "vtff.fr.st",3,100 10 120 20,autohs
  button "Scan",4,240 10 80 20,flat
  text "Scripté par nxtreme",5,330 10 160 30,center
  list 6,10 40 480 280, sort, extsel, vsbar, hsbar

}
on *:dialog:Intl:sclick:4:{
  if ($did(4) == Scan) {
    did -ra intl 4 Stop
    did -ra intl 6 $null
    did -ra Intl 5 Scanne $did(3) 80
    sockclose inut
    sockopen inut $did(3) 80
    if ((www. isin $did(3)) || (http:// isin $did(3))) {
      did -ra intl 5 Réinscrivez l'adresse sans www. ou http://
      did -e intl 4
    }
    else set %serveurinutile $did(3)
  }
  else {
    sockclose inut
    did -ra intl 4 Scan
  }
}
on *:sockopen:inut:{
  sockwrite -n inut GET / HTTP/1.1
  sockwrite -n $sockname Host: %serveurinutile $+ $str($crlf ,2)
}
on *:sockread:inut:{ 
  sockread %a.tmp
  if (<html> isin %a.tmp) { did -ra intl 5 Connexion établie: %serveurinutile }
  if (href=" isin %a.tmp) {
    if ((/ isin $gettok(%a.tmp,2,34)) && (< !isin $gettok(%a.tmp,2,34))) { did -a intl 6 $gettok(%a.tmp,2,34) }
  }
  if (</html> isin %a.tmp) { 
    did -ra intl 5 Terminé
    did -ra intl 4 Scan
  }
}

 Conclusion

Ne donnez pas de fausses adresses au script, il ne saura pas les recconaitre, j'ai eu la fleme de faire une fonction comme ca, ce script à été créé en 1heure!


 Sources du même auteur

Source avec Zip Source avec une capture MIRC ADDONS
Toutes les sources de nxtreme

 Sources de la même categorie

PACMAN MULTI-JOUEUR EN LIGNE par wims
PROXY&SOCKS SCANNER+LEECHER par independentt
GESTIONNAIRE DE HIGHLIGHT AVANCÉ AVEC IGNORE SALON OU PSEUDO par doob666
AUTOJOIN HTABLE MULTISERVER par doob666
TCL - AJOUT SUPPRESSION DE LOGS par Atok
Toutes les sources de la catégorie AddOns

Commentaires et avis

Commentaire de nxtreme le 01/07/2004 14:07:11

Laissez vos commentaires svp! merci
nxtreme

Commentaire de Solisoft le 01/07/2004 14:20:52

As lire le titre: INUTIL [SCANNEUR DE SOUS LIENS DE SITES]


Laissez vos commentaires svp! merci nxtreme:

Ce qui me viens en 1er as l'esprit de te dire c'est: Si c'est inutile et que ca sert as rien pourquoi tu le poste ? -.-

Commentaire de SornDrixer le 01/07/2004 18:12:13 administrateur CS

La façon dont tu détectes les liens n'est pas très sûr, une utilisation des regex serait plus approprié.

Commentaire de nxtreme le 01/07/2004 19:17:58

oui je sais pas, je sais aps utiliser les regex de toutes maniere...
^^
mais ca en detecte quand meme pas mal :)

Commentaire de Kerrigan le 01/07/2004 19:48:05

si on a envie de se coder un internet explorer en socket (ptdrrrrrrr) ça serait bien de connaitre tous les sous liens et a ce moment la peut etre que ta source serait utile. Encore faudrait t'il coder ce truc de dingue :)

Commentaire de Huitre le 02/07/2004 08:19:24

Hum c pas mal mais faut compléter, trop hasardeu ton scan :)
La vérification du debut/fin n' est pas trop sure (g jamais foutu de balises &lt;html&gt;&lt;/html&gt;).
Si tu ve en faire un truc utile, transforme ca en image viewer ;) tu vérif le fichier distant (jpg,gif,png...) et tu renvois le lien ou un thumbnail :D
Voila, bonne chance a toi petit padawan que le scripting soit avec toi :&gt;

Commentaire de nxtreme le 02/07/2004 11:27:17

oui c vrai qu'il est tres hasardeux, j'ai pas cherché a faire de trucs trop complikés pour un debut en programation mirc...

J'essayerai l'image viewer , faut que je me renseigne d'abbord comment télécharger des images via sockets lol (je suis qu'une pitite newbie)

Commentaire de VestaX le 02/07/2004 17:50:18

Ben moi par exemple je ne dirrais pas que ton addon sert a rien!! Il peux toujours servir a contourner les allopass :p ca peux toujours servir :)

Commentaire de nxtreme le 02/07/2004 19:09:24

je ne pense pas qu'il puisse le faire franchement ^^

Commentaire de Kerrigan le 02/07/2004 19:14:52

c'est quoi un allopass ? pourquoi tout le monde en parle ?

Commentaire de Huitre le 02/07/2004 23:02:24

Systeme de paiement par téléphone , ils te filent un code qui prouvent la facturationn pour avoir acces au reste du site.

Commentaire de nxtreme le 03/07/2004 13:24:15

c pas si facile d'avoir ca malheureusement ^^si vous arrivez à faire ca avec mon script vous me le dites alors lol, sans le savoir j'auré créé un logiciel de piratage! :-(

Commentaire de Wallach le 21/04/2005 00:18:17

Comme son nom l'indique, c'est le truc qui sert à rien! <- pq tu le post ? ;)

 Ajouter un commentaire

Nos sponsors


Sondage...

Comparez les prix


Motorola MILESTONE
Entre 489€ et 489€

Visiter le guide achat

CalendriCode

Février 2012
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
272829    

Consulter la suite du CalendriCode

Photothèque

Photo Green Energy Solutions With Light Bulb Morphed Into LandscapePhoto Single Large Rock Formation in Monument Valley
Photo Photo aérienne de Saintes Maries de la Mer 

Visiter la photothèque
 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 0,842 sec (4)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales
Outils Convertisseur VB/C# Snippets et scripts Outils en ligne La ToolBox
Communauté Programmation Photographie Technologie Newsgroups Emploi Forum Blogs
Guide d'achat Téléphonie mobile Image et son Informatique Bureautique Jeux vidéo
Logiciels Internet & Réseau Développement Market Android Jeux & Loisirs Graphisme Multimédia Sécurité Pilotes
Loisirs Cartes virtuelles Vidéos droles Jeux en ligne Géoguide AndroLib (Android Market)