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
» A propos des attributs de fichier
par Oscaribout Aujourd'hui à 1:53

» Problème de math
par Marc37 Hier à 23:04

» Problème de math
par braveen Hier à 21:40

» I Love You
par papydall Hier à 19:22

» Un petit "coucou" à tous les Panoramiciens !
par mindstorm Hier à 17:06

» MARK_ON déclenche un événement ON_CLICK à la place de ...
par Jean Claude Mer 18 Oct 2017 - 18:08

» mise a jour calculatrice
par joeeee2017 Mer 18 Oct 2017 - 15:57

» [solved] 3D_LINE How to ?
par Jicehel Mer 18 Oct 2017 - 11:01

» Convertisseur de base 10 de 2 à 36
par gigi75 Mar 17 Oct 2017 - 18:49

» calculatrice avec touches movibles
par joeeee2017 Dim 15 Oct 2017 - 1:11

» CORTANA
par gigi75 Sam 14 Oct 2017 - 16:32

» Calculatrice
par Jean Claude Sam 14 Oct 2017 - 12:30

» Compilateur FBPano
par jean_debord Jeu 12 Oct 2017 - 9:53

» KGF_dll - nouvelles versions
par Klaus Mar 10 Oct 2017 - 18:49

» à propos de Panoramic_Editor [Résolu]
par Klaus Mar 10 Oct 2017 - 3:19

Navigation
 Portail
 Index
 Membres
 Profil
 FAQ
 Rechercher
Rechercher
 
 

Résultats par :
 
Rechercher Recherche avancée
Octobre 2017
LunMarMerJeuVenSamDim
      1
2345678
9101112131415
16171819202122
23242526272829
3031     
CalendrierCalendrier

Partagez | 
 

 Surveillance WiFi

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



Nombre de messages : 5953
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 : 5547
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/ En ligne
Klaus

avatar

Nombre de messages : 10074
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 : 5953
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 : 5547
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/ En ligne
JL35



Nombre de messages : 5953
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 : 5547
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/ En ligne
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: