Une solution de script Shell sous Win pour tester les ping et telnet sur multi_site

**hackmed** · 14/05/2015, 04h35

Bonjour,

Je me permet de vous écrire suite a un blocage de plusieurs jour pour résoudre le problème pour mon script je viens de commencer sur shell

:

Le principe de ce code est de faire un :

- Test sur :
* ping GOOGLE.FR et test.FR
* telnet test 10050
* telnet localhost 20150

- et afficher le hostname et le SID(Security Identifiers) de la machine windows.

>> Résultat souhaité : pour le ping et telnet : résultat doit afficher si le test de ping est bon alors afficher "success" sinon afficher "failed", même prince pour telnet .

Une fois mon code s’exécute doit m'envoyer des fichiers de log à un chemin précis à déclarer, ainsi doit m'envoyer un rapport de résultat par email si c'est possible.

Je demande un retour d'expérience svp

. Merci pour vos retour.

**InitSreen** · 14/05/2015, 09h47

La commande curl me parait tout indiquée.

http://curl.haxx.se/download.html

**hackoofr** · 14/05/2015, 10h02

Pouvez-vous poster le code que vous avez testé jusqu'à maintenant ?

**hackmed** · 14/05/2015, 14h52

Bonjour,

à Quoi sert ce site est ce que y'a des package à télécharger ou quoi j'ai rien compris ?

**hackmed** · 14/05/2015, 19h08

Bonjour,

merci pour ta réponse:

Voici le code que j'ai fais, mais ça fonctionne pas

Code:

Code bat :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
 @echo off 
for /L %%a in (1,1,1000) do ( 
     ( 
          echo %date% %time% 
          ping -n 6 www.code42.fr
          ping -n 6 www.google.fr
     ) >> rapport.txt
)

j'ai fait ça aussi, mais j'ai l'air de faire n'importe quoi :/

Code bat :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
@ECHO OFF 
TITLE Test la connexion %USERNAME% 
ECHO Test la connexion... 
FOR /F "TOKENS=2,* DELIMS=[]" %%A IN ('PING www.google.fr -n 4 ^| FIND /I "envoi"') 
DO ( 
          CLS 
          ECHO %%A - www.google.fr 
          ECHO Information :
          ECHO Ping [OK] 
          ECHO Internet [OUI] ) 
PAUSE>NUL

Merci pour ton retour.

**InitSreen** · 14/05/2015, 20h01

Envoyé par hackmed

Code bat :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
 @echo off 
for /L %%a in (1,1,1000) do ( 
     ( 
          echo %date% %time% 
          ping -n 6 www.code42.fr
          ping -n 6 www.google.fr
     ) >> rapport.txt
)

Ce code produit 1000 ping avec 6 requête ECHO soit 6000 requête ECHO par domaine. Je vois pas a quoi ça te mène, il est même possible (selon la config du(es) seveur(s)), au bout d'un certain nombre de requête, que le domaine ne réponde volontairement pas.

Envoyé par hackmed

Code bat :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
@echo off 
titleTest la connexion %UserName% 
echo Test la connexion... 
for /f "tokens=2 delims=[]" %%A in('ping www.google.fr -n 4 ^| find /i "envoi"') do ( 
          cls
          echo %%A - www.google.fr 
          echo Information :
          echo Ping [OK] 
          echo Internet [OUI] ) 
pause>nul

ce code récupère l'IP du serveur google sur lequel tu ping: aucun intérêt.

J'ai fait ce code pour rechercher la MTU maximale, il date un peu et n'est pas terrible mais tu peux t'en servir comme base.

Code bat :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
@echo off
setlocal enabledelayedexpansion
 
 
set "OutputInterface="
set "ProtocolVersion="
 
set "TCP_IPv4_HeaderSize=28"
set "Minimum_IPv4_MTU=68"
set "Maximum_IPv4_MTU=9000"
 
set "TCP_IPv6_HeaderSize=28"
set "Minimum_IPv6_MTU=1280"
set "Maximum_IPv6_MTU=9000"
 
:ParsingArgs
if "%~1"=="" goto Init
if /i "%~1"=="/4" (
    set "ProtocolVersion=4"
    shift /1
    goto ParsingArgs
)
if /i "%~1"=="/6" (
    set "ProtocolVersion=6"
    shift /1
    goto ParsingArgs
)
if /i "%~1"=="/target" (
    set "TargetIp=%~2"
    shift /1
    shift /1
    goto ParsingArgs
)
if /i "%~1"=="/interface" (
    set "OutputInterface=%~2"
    shift /1
    shift /1
    goto ParsingArgs
)
if /i "%~1"=="/?" goto Help
if /i "%~1"=="-?" goto Help
if /i "%~1"=="/h" goto Help
if /i "%~1"=="-h" goto Help
if /i "%~1"=="/help" goto Help
if /i "%~1"=="-help" goto Help
:BadSyntaxe
for /f "delims=" %%a in ('net helpmsg 4342') do set "Error=%%a"
for /f "delims=" %%a in ('net helpmsg 87') do set "InvalidParams=%%a"
echo [!Error!]    !InvalidParams:~0,-1!: %~1
exit /b 87
:Init
if not defined OutputInterface (
    echo.
    echo Recherche de la route vers le système cible ...
    echo.
    ping %TargetIp%>nul
    set "UsedInterface="
    set "UsedInterface_TTL="
    for /f "delims=" %%a in ('arp -a') do (
        for /f "tokens=1-2 delims=:- " %%A in ("%%a") do (
            set "fix=%%A"
            if /i "!fix:~0,-1!"=="Interface" (
                set "Interface=%%B"
            )
        )
        for /f "tokens=1-3 delims= " %%A in ("%%a") do (
            if /i "%%A"=="%TargetIp%" (
                if not defined UsedInterface (
                    set "UsedInterface=!Interface!"
                    for /f "skip=2 delims=" %%b in ('ping -n 1 %TargetIp%') do (
                        for /f "delims= " %%B in ("%%b") do (
                            if /i "%%B"=="Réponse" (
                                for /f "tokens=4 delims==" %%c in ("%%b") do (
                                    set /a "UsedInterface_TTL=256 - %%c"
                                )
                            )
                        )
                    )
                ) else (
                    for /f "skip=2 delims=" %%b in ('ping -n 1 %TargetIp%') do (
                        for /f "delims= " %%B in ("%%b") do (
                            if /i "%%B"=="Réponse" (
                                for /f "tokens=4 delims==" %%c in ("%%b") do (
                                    set /a "fix=256 - %%c"
                                    if !fix! LSS !UsedInterface_TTL! (
                                        set "UsedInterface=!Interface!"
                                        set /a "UsedInterface_TTL=!fix!"
                                    )
                                )
                            )
                        )
                    )
                )
            )
        )
    )
)
if not defined UsedInterface (
    echo Impossible de définir de route vers %TargetIp%. Vérifier que les cables réseaux sont correctements branchés et que l'appareillage actif est allimenté.
    echo.
    exit /b 1
) else (
    echo Interface=!UsedInterface!  Jump=!UsedInterface_TTL!
    echo.
)
if not defined ProtocolVersion (
    for /f "tokens=1-4 delims=." %%a in ("%TargetIp%") do (
        if not "%%B"=="" (
            set "ProtocolVersion=4"
        ) else (
            set "ProtocolVersion=6"
        )
    )
)
:Exec
if not exist "%cd%\Stat\" md "%cd%\Stat"
echo.
echo Recherche de la limite supérrieur de la MTU, merci de patienter ...
echo.
if %ProtocolVersion% EQU 4 (
    set "Limit="
    for /l %%a in (%Minimum_IPv4_MTU% 1 %Maximum_IPv4_MTU%) do (
        if "!Limit!"=="" (
            set /a "MSS=%%a - %TCP_IPv4_HeaderSize%"
            for /f "skip=2 delims=" %%A in ('ping -n 1 -f -l !MSS! -4 -S !UsedInterface! %TargetIp%') do (
                echo %%A|(1>nul find /i "Le paquet doit être fragmenté mais paramétré DF.")
                if not errorlevel 1 set /a "Limit=%%a - 1"
            )
        )
    )
) else if %ProtocolVersion% EQU 6 (
    ping -n 10 -f -l %Default_IPv6_MTU% -6 -S !UsedInterface! %TargetIp%
)
echo MaxMTU=!Limit!
echo.
echo.
exit /b 0
:Help
echo.
echo Usage: %~nx0 /target ^<ip_target^> [/4^|/6] [/interface ^<ip_interface^>]
echo        %~nx0 /?^|-?^|/h^|-h^|/help^|-help
echo.
echo     /target ^<ip_target^>          Addresse IP du système distant.
echo     /4^|/6                        Version du protocole IP.
echo     /interface ^<ip_interface^>    Addresse IP de l'interface locale.
echo     -?^|/?^|/h^|-h^|/help^|-help      Affiche cette aide.
echo.
exit /b 0

Et pour l'url, il faut regarder en bas de la page pour les downloads Windows. Lit la doc, tu comprendras mieux: http://curl.haxx.se/docs/

**hackmed** · 14/05/2015, 20h11

Merci bcp, pour les explications, je vois un peu quand tu m'a expliqué ces codes la, parce que je les ai chopé sur le net, j'ai modifié mais je ne comprend pas à ce je fais

.

Mon but c'est de faire un ping sur 2 sites google.fr et test.fr , et j'aurai comme résultat success ou failed .

J'ai resté 1 semaine avec sans résoudre le problème

J t'en remercie comme même, je vais essayer de voir ton code même si sa l'air compliqué parce que c'est niveau avancée. moi je suis encore débutant en shell.

**InitSreen** · 14/05/2015, 20h17

J' ai fait ce tuto sur le batch, il pourra t'aider à démarrer

https://docs.google.com/file/d/0B4EC...it?usp=sharing

il contient ~~quelques~~ beaucoup d'erreurs mais regarde developpez.com régulièrement parce qu'une nouvelle version y sera publié sous peu.

**hackmed** · 14/05/2015, 20h24

je vous remercie beaucoup. c'est gentil de votre part.

**InitSreen** · 14/05/2015, 20h39

Si tu as des questions, n'hésite pas à poster sur le forum.

**hackoofr** · 14/05/2015, 20h54

Vous pouvez aussi regarder cette discussion pour test de ping avec envoi mail
MultiPingTester.bat

Code BAT :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
 @echo off
 Title Multi Ping Tester
 mode con cols=90 lines=8 & color 9B
 set rapport=rapport.txt
 if Exist %rapport% del %rapport% 
    set adresse=www.developpez.net www.google.fr www.code42.fr
    For %%a in (%adresse%) do call :test_ping %%a
    Echo TEST TERMINE
    Pause
    If Exist %rapport%  start %rapport%
    Exit
    :test_ping
    cls
    echo.
    echo TEST EN COURS......
    echo.
    ping %1 | find "sur"
    if %errorlevel%==1 (echo [%date%] [%time%] CONNECTION A %1 FAILED >> %rapport%
                        ping localhost -n 6 >nul
                        )
    if %errorlevel%==0 (echo [%date%] [%time%] CONNECTION A %1 OK !>> %rapport%)

**hackmed** · 18/05/2015, 11h36

Bonjour,

Merci pour le code c'est super gentil de votre part, sa fonctionne a merveille;

Juste un souci quand j'exécute le code, je recois bien le rapport dans le fichier logbate.txt, par contre par email non.

Les étapes que j'ai fais,
j'ai copié le blat.exe dans systèmes32,

j'ai changé

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 ::*************A changer*****************
 Set Exp=test@salt.fr          
 Set Dest=rafiachraf91@gmail.com
 Set MySmtp=smtp.gmail.com
 ::***************************************

Voici le message d'erreur que je recois dans le fichier logbate:

2015.05.18 11:28:37 (Mon)------------Start of Session-----------------
Blat v3.2.4 (build : Feb 24 2015 21:30:17)
64-bit Windows, Full, Unicode
Error: Server refused connection.
2015.05.18 11:28:37 (Mon)-------------End of Session------------------

merci pour votre retour?

**hackoofr** · 18/05/2015, 11h54

Envoyé par hackmed

Bonjour,

Merci pour le code c'est super gentil de votre part, sa fonctionne a merveille;

Juste un souci quand j'exécute le code, je recois bien le rapport dans le fichier logbate.txt, par contre par email non.

Les étapes que j'ai fais,
j'ai copié le blat.exe dans systèmes32,

j'ai changé

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 ::*************A changer*****************
 Set Exp=test@salt.fr          
 Set Dest=rafiachraf91@gmail.com
 Set MySmtp=smtp.gmail.com
 ::***************************************

Voici le message d'erreur que je recois dans le fichier logbate:

2015.05.18 11:28:37 (Mon)------------Start of Session-----------------
Blat v3.2.4 (build : Feb 24 2015 21:30:17)
64-bit Windows, Full, Unicode
Error: Server refused connection.
2015.05.18 11:28:37 (Mon)-------------End of Session------------------

merci pour votre retour?

Je vous déconseille pour le moment d'utiliser Gmail ! car il faut être authentifié par le login et le password de votre compte avec le port 587 ou bien 465 et d'utiliser autre configuration, donc c'est peu plus compliqué avec gmail.
C'est quoi votre fournisseur d'accès à internet ? il faut utiliser le smtp de votre FAI

**hackmed** · 18/05/2015, 11h57

Ah Merci beaucoup,

mon fournisseur c'est Orange.

c'est quoi les paramètres que j'aurai besoin pour demander sa à mon encadrant, pour qu'il puisse me les fournir.

Merci pour ton retour frère.

**hackmed** · 18/05/2015, 12h05

J'ai reçu bien à un mail de votre part, un rapport de test

**hackoofr** · 18/05/2015, 12h10

Envoyé par hackmed

J'ai reçu bien à un mail de votre part, un rapport de test

Donc, vous changiez juste la variable smtp par : smtp.orange.tn si vous êtes en tunisie
si vous êtes en france smtp.orange.fr
Et essayez maintenant de m'envoyer un mail depuis Blat pour vérifier

le bon déroulement

NB : pas besoin d'être authentifié

**hackmed** · 18/05/2015, 12h18

Merci, je suis en france à ce moment.

D'accord c'est compréhensible. en faite pour blat.

pour la configuration c'est comme sa ?

C:\Windows\System32>blat -install smtp.orange.fr rafiachraf91@gmail.com -u test -pw test

quand je tape cette commande j’exécute mon bat n'est ce pas?

**hackoofr** · 18/05/2015, 12h27

Testez ce code sans changer rien puis envoyez le rapport du debug

Code bat :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
 @echo off
 Title Multi Ping Test avec alerte par Mail
 mode con cols=90 lines=8 & color 9B
 if Exist Data.log del Data.log 
    set adresse=www.developpez.net www.yahoo.com bbat.forumeiros.com www.voila.fr www.orange.fr www.google.com
    For %%a in (%adresse%) do call :test_ping %%a
    Call :Mail
 
    :test_ping
    cls
    echo.
    echo TEST EN COURS......
    echo.
    ping %1 | find "sur"
    if %errorlevel%==1 (echo [%date%] [%time%] CONNECTION A %1 REFUSEE >>Data.log
                        ping localhost -n 6 >nul
                        )
    if %errorlevel%==0 (echo [%date%] [%time%] CONNECTION A %1 OK !>>Data.log)                  
    echo.
    echo TEST TERMINE
    echo.
    goto :eof
 
    :Mail
    cls
    Set Expediteur=-f rafiachraf91@gmail.com
    set Destinataire=-to rafiachraf91@gmail.com
    set subj=-s "Multi Ping Test"
    set server=-server smtp.orange.fr
    set Message=-bodyF "Data.log"
    set log=-log LogBlat.txt
    set Debug=-debug
    echo.
    echo Envoi de Mail ......
    blat %Message% %Destinataire% %Expediteur% %subj% %server% %piecejointe% %log% %Debug%
    Start LogBlat.txt

**hackmed** · 18/05/2015, 12h51

Merci pour la modification,

J'ai rien modifié dans le code. sa doit être pas au niveau du balt ? parce que j'ai pas modifié le balt-install
même erreur