CodeS-SourceS est hébergé par Frontier.fr

Ce site au démarrage

begin process at 2010 02 10 10:53:10

Accueil Codes Tutoriels Forum Livres Emploi Services Connexion

Trouver un code source :

dans

[ Dernières recherches ]

Accueil >

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 :1 830

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

MIRC ADDONS

Toutes les sources de nxtreme

Sources de la même categorie

BLACKLIST PSEUDOS/MASKS par usurpateur

[XCHAT] ANTI KICK / AWAY C++ par GeroXXXX

JEU DU CODE par alanpersonproject

SERVEUR FTP par hisoka2501

BANNIR LES AGES, LES HOMMES, LES FEMMES ET PSEUDO AVEC CHIFF... par cougar_du_havre

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 <html></html>).
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 :>

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

Derniers Blogs

UNE JOLIE-HORLOGE ET PAS QU'UN PEU ! par neodante

TECHDAYS PARIS 2010 : CONNECTEZ VOS DONNéES à SHAREPOINT 2010 AVEC LES BUSINESS CONNECTIVITY SERVICES par ROMELARD Fabrice

[DIVERS] SUIVRE VOS SéRIES PRéFéRéS SUR LA TOILE par orion

TECHDAYS PARIS 2010 : LA BI DANS SHAREPOINT 2010 par ROMELARD Fabrice

TECHDAYS PARIS 2010 : DéPLOIEMENT DE NOUVELLES TECHNOLOGIES - RETOUR D'EXPéRIENCE PAR L'INFORMATIQUE DE MICROSOFT par ROMELARD Fabrice

Forum

RE : ON RAWMODE par WorldDMT

RE : PROBLEME AVEC UN QUIZZ par vincent67190

RE : PROBLèME FLAG IRCOP par WebiK

AVERTISSMENT ET KIKK par mouhcine951990

RE : PROBLèME FLAG IRCOP par Benjamin37

Côté IT

Offres d'emploi

Formations Video

Appels d'offres

PLATEFORME SUR L ESOTERISME VOYANCE - sans charte graphique
Budget : 3 500€
Joomla 15 module paiement adaptation composant cuisine
Budget : 250€
Integrateur web dans template
Budget : 500€

Logiciels

DB-MAIN (9.1.0)
DB-MAIN (9.1.0)

DB-MAIN is a data-modeling and data-architecture tool. It is designed to help developers and anal...

Cliquez pour télécharger DB-MAIN
Xilisoft DPG Convertisseur (5.1.37.0120)
XILISOFT DPG CONVERTISSEUR (5.1.37.0120)

Xilisoft DPG Convertisseur offre aux fans de Nintendo DS une bonne solution leur permettant de dé...

Cliquez pour télécharger Xilisoft DPG Convertisseur
GraphicsGale (2.01.01)
GRAPHICSGALE (2.01.01)

GraphicsGale est un logiciel de PixelArt avec de nombreuse fonctionnalités permettant de réalisé ...

Cliquez pour télécharger GraphicsGale
Architecte 3D (Platinum 2010)
ARCHITECTE 3D (PLATINUM 2010)

Architecte 3D Platinium vous permet de concevoir facilement les plans votre future maison, de l'é...

Cliquez pour télécharger Architecte 3D
TeamViewer 5 (TeamViewer 5)
TEAMVIEWER 5 (TEAMVIEWER 5)

Dépanner un ami,expliquer une manipulation devient un jeu d'enfant. Prise en main d'un autre ord...

Cliquez pour télécharger TeamViewer 5