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
» KGF.dll - demandes ou suggestions de modifications ou ajouts
par Klaus Aujourd'hui à 19:48

» KGF_dll - nouvelles versions
par pascal10000 Aujourd'hui à 17:27

» Mah-Jong européen new-look
par Minibug Hier à 22:31

» track_bar circulaire
par Klaus Hier à 13:54

» API Windows
par Klaus Hier à 3:21

» Cartes de voeux, menus, etc.
par JL35 Lun 11 Déc 2017 - 17:48

» a l'aide klaus
par Minibug Lun 11 Déc 2017 - 11:42

» bug SYNEDIT_TARGET_IS_OBJECT
par Jack Lun 11 Déc 2017 - 0:16

» Jukebox : Serge Reggiani
par papydall Sam 9 Déc 2017 - 5:58

» Ecouter la radio fm sur votre pc
par pascal10000 Sam 9 Déc 2017 - 3:42

» anomalie
par Klaus Sam 9 Déc 2017 - 3:21

» hommage
par Jicehel Ven 8 Déc 2017 - 11:29

» Logiciel de soutien scolaire en langues.
par Pedro Alvarez Ven 8 Déc 2017 - 10:43

» carte son
par Klaus Ven 8 Déc 2017 - 2:37

» mise a jour calculatrice
par joeeee2017 Mer 6 Déc 2017 - 22:19

Navigation
 Portail
 Index
 Membres
 Profil
 FAQ
 Rechercher
Rechercher
 
 

Résultats par :
 
Rechercher Recherche avancée
Décembre 2017
LunMarMerJeuVenSamDim
    123
45678910
11121314151617
18192021222324
25262728293031
CalendrierCalendrier

Partagez | 
 

 Surveillance WiFi

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



Nombre de messages : 6018
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 : 5613
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 : 10257
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 : 6018
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 : 5613
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 : 6018
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 : 5613
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 :: Vos sources, vos utilitaires à partager-
Sauter vers: