Discussion :

[megamario]

Bonjour,

Actuellement je développe un petit programme pour automatiser une procédure de mise à jour d'un petit serveur linux.

J'effectue des opérations sur le port COM, sa c'est bon.
Et je dois envoyer l'image Linux par ftp.


J'arrive sans souci a me connecter en ftp mais impossible d'envoyer le fichier. Sur le serveur il est bien présent mais avec 0 octet et j'ai une erreur de transmission.

Je suppose que c'est le fait qu'il faut passer le serveur en mode binaire.

Les commandes que je dois effectuées avec un terminal Windows en mode ftp sont:
(A partir du répertoire ou se trouve linux.bin bien sur)


cd /home
bin
put linux.bin


Merci de votre aide

[Pol63]

il y a des classes dans le framework pour dialoguer avec un serveur ftp

http://archive.loicrebours.fr/index....ndes-ftp-en-c/

[megamario]

il y a des classes dans le framework pour dialoguer avec un serveur ftp

http://archive.loicrebours.fr/index....ndes-ftp-en-c/

Merci Pol63, j'était partie avec du code trouvé bien plus complexe, je vais étudier cela, merci encore.

[megamario]

J'ai un petit souci avec ce que j'ai adapté.

Voici mon code pour envoyer le fichier linux.bin en ftp

Code :

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
 
 Public Sub ftpConnect()
 
        Try
            Dim myadress As String = "ftp://" & "192.168.42.20 & "/home/linux.bin"
            Dim serverUri As Uri = New Uri(myadress)
            If serverUri.Scheme <> Uri.UriSchemeFtp Then
                Return
            End If
            Dim myRequest As FtpWebRequest = DirectCast(WebRequest.Create(serverUri), FtpWebRequest)
            myRequest.Credentials = New NetworkCredential(iniLogin, iniPass)
            myRequest.Method = WebRequestMethods.Ftp.UploadFile
            myRequest.UsePassive = True
            myRequest.UseBinary = True
            myRequest.KeepAlive = False
            Dim File() As Byte = System.IO.File.ReadAllBytes(LinuxFile) 'LinuxFile = D:\linux.bin
            Dim UpFile As System.IO.Stream = myRequest.GetRequestStream()
 
            UpFile.Write(File, 0, File.Length)
            UpFile.Close()
            UpFile.Dispose()
 
        Catch ex As Exception
            MsgBox(ex.ToString)
        End Try
 
    End Sub

Cela plante sur UpFile.Write(File, 0, File.Length)

Le message lors de l’exception est:

The underlying connection was closed: un unexpected error occurred on a receive

Le ex.Tostring m'indique:


En ligne 338 c'est UpFile.Close() mais il ne si arrête pas !!

J'ai testé avec : Dim myadress As String = "ftp://" & "192.168.42.20 & "/home"
sans mettre linux.bin mais la il me dit que je n'est pas donner de nom au fichier.


Mais il me semble qu'il a fonctionné 1 fois car j'ai fait plein d'essaie mais la plus rien. Je précise que je reset complètement le serveur Linux à chaque fois car c'est le reste qui lance ma procédure d’écoute du port COM.

Le serveur linux m'envoie sur le port COM immediatemetn aprés le : UpFile.Write(File, 0, File.Length)
fault-common.c 387
Unhandled fault: external abort on line(F4) at 0x00000001
fault-common.c(97): start_code=0x308040, start_stack=0x335f64


Une fois que cela fonctionnera!!! j'aimerai savoir s'il y a un moyen de connaitre son avancement car il faut plus d'une minute pour transférer le fichier et l’opérateur risque de s'impatienter.

[Pol63]

en 1er lieu je testerais en fonction de keepalive et usepassive
sinon quel est le type de l'exception ? y a t il une innerexception ?

sinon il y a la classe webclient aussi qui elle a des évènements de progression et doit fonctionner sur du ftp, par contre pas sûr qu'on puisse dire binary, mais ca reste à essayer
sinon il faut faire write dans une boucle avec x octets et donc à chaque tour de bouble tu pourras connaitre la progression, le tout avec backgroundworker pour être sur un autre thread et avoir des events de progression

[megamario]

Merci encore Pol63 je vais suivre tes conseils.

Le petit serveur linux plante parfois sans raison aussi lorsque l'on utilise les commandes dans un terminal pour ce transfert ftp. Mais la c'est immédiat ou presque et le serveur n'a pas l'air d'être bloqué, j'arrive encore à faire du telnet dessus.

Merci pour l'idée du Write en boucle, tout bête mais je n'y est pas pensé.


[edit]
Je ne sais pas exactement ce que vous voulez dire par type d’exception. Sur l’erreur, catch, en titre c'est noté "Interception de WebException"


Je viens de jouer avec UsePassive et KeepAlive mais cela change rien.