FTP_MacBinary

version 6.5

FTP_MacBinary (ftp_ID; modeMacBinary) Entier

La commande FTP_MacBinary active/désactive le mode MacBinary lors des transferts FTP utilisant FTP_Send ou FTP_Receive dans la session FTP courante identifiée par ftp_ID.

Le protocole MacBinary est souvent utilisé par les clients et serveurs FTP Macintosh pour faciliter le transfert de données ou de fichiers binaires contenant à la fois des data forks (parties de "données") et des resource forks (parties de "ressources").

Note à l'attention des utilisateurs Windows : Il est possible d'utiliser le protocole MacBinary pour des transferts FTP dans un environnement Windows. Toutefois, il est généralement inutile de décoder un fichier MacBinary sur un PC. Les ordinateurs à base de processeur Intel ne peuvent pas stocker des fichiers contenant une data forks et une resource fork (format Mac OS). Comme ce format est étranger à la plate-forme PC, les fichiers Mac OS contenant une resource fork risquent d'être endommagés s'ils sont enregistrés dans un format non encodé.

ftp_ID est l'identifiant de la session FTP établie avec FTP_Login.

Le paramètre modeMacBinary indique s'il faut activer ou non le mode de transfert MacBinary. Cette valeur doit être fournie en tant que variable pour que la commande puisse renvoyer l'état des transferts MacBinary après une tentative de modification.

• 1 active le mode de transfert MacBinary.

• 0 (zéro) désactive le mode de transfert MacBinary.

• -1 retourne dans ce paramètre modeMacBinary le paramétrage courant du mode de transfert MacBinary (1 ou 0).

Attention : Tous les serveurs FTP ne gèrent pas le protocole MacBinary. S'il n'est pas géré, l'erreur 10053 est générée à chaque appel de la commande FTP_MacBinary, quelle que soit la valeur du paramètre modeMacBinary. Les comportements précédemment décrits ne s'appliquent alors pas.

Cet exemple active le protocole MacBinary avant la réception d'un fichier FTP. Si le fichier a été correctement reçu avec MacBinary activé, il est alors décodé dans son format original et le document MacBinary reçu est supprimé.

   vUtiliserMacBin:=-1
   $erreur:=FTP_MacBinary (vFTP_ID;vUtiliserMacBin)
   Si($erreur=10053)
      MacBinaryEstAccepte:=Faux   `Le serveur ftp ne gère pas le protocole MacBinary
   Sinon
      MacBinaryEstAccepte:=Vrai
   Fin de si


   vFichierLocal:=""
   Si(MacBinaryEstAccepte)
      vUtiliserMacBin:=1
      $erreur:=FTP_MacBinary (vFTP_ID;vUtiliserMacBin)  `Activation de MacBinary pour le téléchargement
   Fin de si 
   $erreur:=FTP_Receive (vFTP_ID;"MonApplication";vFichierLocal;cbShowTherm)
   Si ($erreur=0) & (vUtiliserMacBin=1)  `Si la réception est OK et le fichier est au format MacBinary
      vCheminDecode:=""
      Si (IT_Decode (vFichierLocal;vCheminDecode;8)=0)  `Décodage MacBinary
         SUPPRIMER DOCUMENT(vFichierLocal)  `Si le décodage a réussi, alors supprimer le fichier source
      Fin de si 
   Fin de si   

IT_Decode.