Exemple d'utilisation

Voici maintenant un exemple d'utilisation du client FTP en OpenScheme :

$ _osm_c --exec osmftp.osm
Osm ftp client

OsmFtp[0]> help
open hôte        : connexion à hôte
user [nom [pass]]: identification
ls [chemin]      : listing court
ll [chemin]      : listing long
cd chemin        : changement de répertoire
get fich fich ...: obtenir des fichiers
put fich fich ...: envoyer des fichiers
close            : fermer une connexion
quit             : quitter the client
help             : cette aide

OsmFtp[1]> open localhost
Connexion établie:
Nom: gdw
Mot de passe: motdepasse
Login: ok

OsmFtp[2]> ls
Desktop MachinaSapiens axhome cv erian tmp

OsmFtp[3]> ll
drwxr-xr-x 17 gdw  gdw   3072 Aug  9 14:47 .
drwxr-xr-x  6 root root  1024 Apr  4 15:37 ..
-rw-------  1 gdw  gdw    373 Aug  9 14:47 .Xauthority
-rwxr-xr-x  1 gdw  gdw    172 Nov 23  1999 .Xclients
-rw-r--r--  1 gdw  gdw   4114 Mar  1 15:14 .Xdefaults
-rw-r--r--  1 gdw  gdw   2455 Oct 24  1998 .Xmodmap
-rw-r--r--  1 gdw  gdw  14054 Oct 24  1998 .Xresources
drwx------  2 gdw  gdw   1024 Jun  2 12:40 .cedit
-rwx------  1 gdw  gdw    757 Oct 24  1998 .clean
drwx------  3 gdw  gdw   1024 Aug  4 12:05 .ddd
drwxr-xr-x 15 gdw  gdw   1024 Aug  4 18:53 .dt
-rwxr-xr-x  1 gdw  gdw   5111 Nov  4  1999 .dtprofile
drwxr-xr-x  2 gdw  gdw   1024 Aug  1 00:26 .hotjava
-rw-------  1 gdw  gdw     20 Oct 24  1998 .ispell_english
-rw-------  1 gdw  gdw   1959 Jun 22 21:43 .ispell_francais
-rw-------  1 gdw  gdw    341 Jul  3 09:57 .mailcap
-rw-rw-r--  1 gdw  gdw    561 Jun 19 22:25 .mtvrc
drwxr-xr-x  8 gdw  gdw   1024 Aug  9 14:58 .netscape
-rw-rw-r--  1 gdw  gdw    728 Feb 17 18:54 .pgaccessrc
-rw-r--r--  1 gdw  gdw    268 Nov 23  1999 .profile
-rw-r--r--  1 gdw  gdw   3336 Oct 24  1998 .screenrc
-rw-r--r--  1 gdw  gdw    102 Aug 24  1999 .signature
drwx------  2 gdw  gdw   1024 Aug  4 18:19 .solregis
-rw-r--r--  1 gdw  gdw   3932 Apr  2 21:02 .twmrc
drwx------  3 gdw  gdw   1024 Jan 15  2000 .xauth
drwxr-xr-x  5 gdw  gdw   1024 May  8 18:59 Desktop
drwxrwxr-x  3 gdw  gdw   1024 Jan 31  2000 MachinaSapiens
drwxr-xr-x  5 gdw  gdw   1024 Aug  4 14:55 axhome
drwxr--r--  4 gdw  gdw   1024 Jul 28 14:37 cv
drwxr-xr-x  8 gdw  gdw   1024 Feb 24 21:00 erian
drwxr-xr-x  2 gdw  gdw   2048 Aug  2 11:13 tmp

OsmFtp[4]> cd tmp

OsmFtp[5]> put fichier_local

OsmFtp[6]> get fichier_distant


OsmFtp[7]> close
Connexion terminée

OsmFtp[8]> quit