FORUM DE DISCUSSION SUR LE LANGAGE PANORAMIC

Développement d'applications avec le langage Panoramic
 
AccueilAccueil  FAQFAQ  RechercherRechercher  S'enregistrerS'enregistrer  MembresMembres  GroupesGroupes  Connexion  
Derniers sujets
» Problème de compilateur.
par Pedro Alvarez Hier à 20:01

» COMPILATEUR V 0.9 beta 8 du 18 aout 2017
par Pedro Alvarez Hier à 19:54

» Pb 17 (en analyse): ITEM_SELECT ne fonctionne pas
par Jack Jeu 17 Aoû 2017 - 19:26

» Compilateur FBPano
par Mike Jeu 17 Aoû 2017 - 13:52

» un nouveau editeur panobasic
par Jean Claude Jeu 17 Aoû 2017 - 10:18

» Le compilateur.
par Pedro Alvarez Jeu 17 Aoû 2017 - 8:36

» Pb 16 (en analyse): ON_CLOSE plante à l'exécution
par Jack Mer 16 Aoû 2017 - 20:00

» Pb 15 (en analyse): TIMER_ON plante à l'exécution
par Jack Mer 16 Aoû 2017 - 19:58

» KGF_dll - nouvelles versions
par Yannick Dim 13 Aoû 2017 - 17:35

» probleme d'outil
par Yannick Dim 13 Aoû 2017 - 17:32

» Carte de France des régions
par Yannick Sam 12 Aoû 2017 - 21:33

» Pb 14 (en analyse): PRINT_LOCATE plante à l'exécution
par Jack Ven 11 Aoû 2017 - 22:37

» Petit avertissement [Mots réservés]
par papydall Ven 11 Aoû 2017 - 13:45

» Distances sur plan
par JL35 Jeu 10 Aoû 2017 - 21:29

» Tracé : Triangle, Carrée, Dents de scie, Sinusoïde redressée
par papydall Jeu 10 Aoû 2017 - 14:52

Navigation
 Portail
 Index
 Membres
 Profil
 FAQ
 Rechercher
Rechercher
 
 

Résultats par :
 
Rechercher Recherche avancée
Août 2017
LunMarMerJeuVenSamDim
 123456
78910111213
14151617181920
21222324252627
28293031   
CalendrierCalendrier

Partagez | 
 

 Surveillance WiFi

Voir le sujet précédent Voir le sujet suivant Aller en bas 
AuteurMessage
JL35



Nombre de messages : 5920
Localisation : 77
Date d'inscription : 29/11/2007

MessageSujet: Surveillance WiFi   Ven 5 Fév 2016 - 2:48

Pour savoir qui est connecté à votre réseau WiFi à un instant donné, un utilitaire: WirelessNetworkWatcher,
à télécharger ici: http://www.nirsoft.net/utils/wireless_network_watcher.html
(en bas de page, prendre la version zip, sans installation, portable)
Ça permet de voir qui est connecté à votre réseau wifi, un parasite éventuel (!), ou surveiller ses propres connexions
(les enfants par exemple, qui sont censés étudier ou dormir...).
On peut lancer l'exécutable directement en GUI, sur le bureau, ou bien en ligne de commande depuis un programme Panoramic, par exemple:
Code:
DIM wat$,rtm$,f$,a$,k%
' Lien de chargement: http://www.nirsoft.net/utils/wireless_network_watcher.html
wat$ = "C:\OUTILS\WiFiWatcher\WNetWatcher.exe": ' A ajuster
rtm$ = "C:\TEMP\": ' fichiers temporaires
f$ = rtm$+"WiFi.txt": ' A ajuster
IF FILE_EXISTS(f$)=1 THEN FILE_DELETE f$
HEIGHT 0,800
MEMO 1: FULL_SPACE 1: FONT_NAME 1,"Consolas": FONT_SIZE 1,10
EXECUTE_WAIT "Cmd.exe /c "+wat$+" /stext "+f$
WHILE FILE_EXISTS(f$) = 0: PAUSE 100: END_WHILE
Uni2Asc(f$,""): ' Conversion du fichier résultat Unicode en Ascii pur
FILE_LOAD 1,f$: FILE_DELETE f$
END
' ==============================================================================
SUB Uni2Asc(f$,fr$)
  ' Conversion fichier texte f$ Unicode (16bits) en Ascii (8bits)
  ' Si fr$ = "", la conversion se fait dans le fichier f$
  DIM_LOCAL sz%,i%,v%(2000),a$
  FILEBIN_OPEN_READ 9,f$: sz%=FILEBIN_SIZE(9)
  a$ = ""
  WHILE sz% > 2000
      FILEBIN_BLOCK_READ 9,2000,v%(0)
      FOR i% = 0 TO 1999: a$ = a$+CHR$(v%(i%)): NEXT i%: sz% = sz%-2000
  END_WHILE
  IF sz%>0
      FILEBIN_BLOCK_READ 9,sz%,v%(0)
      FOR i% = 0 TO sz%-1: a$ = a$+CHR$(v%(i%)): NEXT i%
  END_IF
  FILEBIN_CLOSE 9
  IF fr$ = "" THEN fr$ = f$
  FILEBIN_OPEN_WRITE 9,fr$
      FOR i% = 3 TO LEN(a$)-1 STEP 2: FILEBIN_WRITE 9,ASC(MID$(a$,i%,1)): NEXT i%
  FILEBIN_CLOSE 9
END_SUB
' ==============================================================================
Il y a 2 chemins à ajuster:
- le chemin du programme lui-même
- le chemin du répertoire des fichiers temporaires (supprimés après usage)

ATTENTION: après lancement du programme, il faut attendre une vingtaine de secondes (chez moi) avant d'obtenir le résultat (le temps du scan des adresses IP).
Ce résultat est dans un fichier texte, à mettre en forme (un zéro est intercalé après chaque caractère, la conversion est un peu bestiale mais ça marche).
Il y a d'autres options de sortie (par exemple html, etc.), à voir dans le fichier readme.txt joint au programme)

PS  j'ai modifié un peu: comme c'est un petit fichier, pas besoin de faire appel à KGF.dll, on peut le faire en Panoramic pur.

Edit 2: En fait le texte résultat est au format Unicode, du coup j'ai supprimé la lecture dans une chaîne pour supprimer les zéros un par un, et j'ai ajouté une petite sub de conversion unicode en texte pur, laquelle sub pourrait servir à d'autres occasions.


Dernière édition par JL35 le Sam 6 Fév 2016 - 0:27, édité 3 fois
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
papydall

avatar

Nombre de messages : 5508
Age : 67
Localisation : Moknine (Tunisie) Entre la chaise et le clavier
Date d'inscription : 03/03/2012

MessageSujet: Re: Surveillance WiFi   Ven 5 Fév 2016 - 4:15

Merci JL35 pour cette info.
J’ajoute que l’on peut franciser  cet utilitaire qui est en anglais par défaut.
Pour cela il suffit de cliquer sur French (il en existe trois) pour télécharger wnetwatcher_french.zip qui contient WNetWatcher_Ing.ini qu’il faut mettre dans le même dossier où vous avez dézipé wnetwatcher.zip
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://papydall-panoramic.forumarabia.com/
Klaus

avatar

Nombre de messages : 10062
Age : 68
Localisation : Ile de France
Date d'inscription : 29/12/2009

MessageSujet: Re: Surveillance WiFi   Ven 5 Fév 2016 - 4:51

Merci. Ca marche parfaitement.
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://klauspanoramic.comxa.com/index.html
JL35



Nombre de messages : 5920
Localisation : 77
Date d'inscription : 29/11/2007

MessageSujet: Re: Surveillance WiFi   Ven 5 Fév 2016 - 15:24

Merci à vous.
Tu as raison papydall, mais bon, pour l'usage en ligne de commande comme ici l'anglais est simple et supportable.
J'ai fait la lecture du fichier -> chaîne en panoramic pur (et non KGF.dll), pour un petit fichier comme ici il n'y a pas une grosse différence (pour un gros fichier, la différence de temps d'exécution est considérable).

Je ne sais plus quel est ce format de texte renvoyé, avec un 0 machine après chaque caractère, il y a peut-être un moyen plus simple que l'analyse caractère par caractère pour le convertir en texte brut ?
Il semble que c'est le format UTF-16/UCS-2 (little endian), mais je ne suis pas plus avancé pour autant...
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
papydall

avatar

Nombre de messages : 5508
Age : 67
Localisation : Moknine (Tunisie) Entre la chaise et le clavier
Date d'inscription : 03/03/2012

MessageSujet: Re: Surveillance WiFi   Ven 5 Fév 2016 - 16:07

JL35 a écrit:
Je ne sais plus quel est ce format de texte renvoyé, avec un 0 machine après chaque caractère, il y a peut-être un moyen plus simple que l'analyse caractère par caractère pour le convertir en texte brut ?
Il semble que c'est le format UTF-16/UCS-2 (little endian), mais je ne suis pas plus avancé pour autant...

Je pense que c’est un délimiteur.
Les délimiteur sont
/stab ===> Tabulation
/comma ===> Virgule

La doc indique
Command-Line Options:
/cfg <Filename>     Start Wireless Network Watcher with the specified configuration file. For example:
WNetWatcher.exe /cfg "c:\config\wnw.cfg"
WNetWatcher.exe /cfg "%AppData%\WNetWatcher.cfg"
/stext <Filename>   Scan your network, and save the network devices list into a regular text file.
/stab <Filename>    Scan your network, and save the network devices list into a tab-delimited text file.
/scomma <Filename>     Scan your network, and save the network devices list into a comma-delimited text file (csv).
/stabular <Filename>     Scan your network, and save the network devices list into a tabular text file.
/shtml <Filename>       Scan your network, and save the network devices list into HTML file (Horizontal).
/sverhtml <Filename>    Scan your network, and save the network devices list into HTML file (Vertical).
/sxml <Filename>        Scan your network, and save the network devices list into XML file.
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://papydall-panoramic.forumarabia.com/
JL35



Nombre de messages : 5920
Localisation : 77
Date d'inscription : 29/11/2007

MessageSujet: Re: Surveillance WiFi   Ven 5 Fév 2016 - 18:18

Je sais bien papydall que l'option définit le délimiteur de champs, mais ce soit /stext ou /stab on a toujours ce fichu format unicode avec ses zéros partout, illisible par Panoramic (mais lisible par Notepad): les caractères sont codés sur 16 bits et non sur 8, par contre pas avec /scomma.
Je laisse comme ça (/stext), avec la sub de conversion, c'est mieux pour l'affichage
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
papydall

avatar

Nombre de messages : 5508
Age : 67
Localisation : Moknine (Tunisie) Entre la chaise et le clavier
Date d'inscription : 03/03/2012

MessageSujet: Re: Surveillance WiFi   Ven 5 Fév 2016 - 18:31

OK ! J'ai pigé. king
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://papydall-panoramic.forumarabia.com/
Contenu sponsorisé




MessageSujet: Re: Surveillance WiFi   

Revenir en haut Aller en bas
 
Surveillance WiFi
Voir le sujet précédent Voir le sujet suivant Revenir en haut 
Page 1 sur 1
 Sujets similaires
-
» [Résolu] Sécurité Wifi WEP vers WPA sur LiveBox
» Mon PC se connécte pas automatique a la wifi
» l'IPOD TOUCH en WIFI
» réseau wifi disponible mais pas pour moi
» [Résolu] Wifi identifier les connectés

Permission de ce forum:Vous ne pouvez pas répondre aux sujets dans ce forum
FORUM DE DISCUSSION SUR LE LANGAGE PANORAMIC :: PANORAMIC 32 bits :: Vos sources, vos utilitaires à partager-
Sauter vers: