Discussion :

[Merel]

Bonjour à tous,

J'ai tenté de coder un bout de programme en fortran qui doit tout simplement décompresser des données. Pour ce faire, j'utilise la commande call system en complément de bunzip2.

La compilation se passe sans problème. Aucune erreur de renvoyée. Par contre, quand j'éxécute le programme, ca plante. Le fichier n'est pas décompressé et je ne vois pas d'où ca peut venir...

Code :

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

1
2
3
call system ('bunzip2 -c
     $/home/****/DX_ISCCP/2006/06/01/ISCCP.DX.0.MET-7.
     $2006.06.01.1200.EUM.bz2')

L'erreur lors de l'exécution est la suivante :

Code :

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

bunzip2: Can't open input file /home/****/DX_ISCCP/2006/06/01/ISCCP.DX.0.MET-7.: No such file or directory.

De ce que je comprends, le programme tente de decompresser uniquement la première ligne dans ce soucier de la seconde... Du coup, le nom du fichier est incomplet... Si quelqu'un sait d'où ca peut venir...

Merci d'avance !

[bobbyboy]

Bonjour,
c'est juste une remarque mais pourquoi ne pas mettre la commande sur une seule ligne ? Si c'est pour une question de lisibilité, pourquoi n'y a t-il pas de caractère de continuation de ligne (symbole "&") ?

[Merel]

Alors le chemin d'accès est trop long pour tenir sur une seule ligne, c'est pour ca que je fais un renvoie à la ligne.

Pour ce qui est du "&", j'ai essayé avec et sans et aucune différence...

J'ai une version de ce programme qui fonctionne parfaitement sans les "&" sur un serveur de données... Du coup, je pencherais pour un problème directement lié à ma machine en local. Soit c'est le compilateur qui bug (j'en doute), soit il manque des trucs en local pour qu'unzip fonctionne correctement. Je pense plus à cette solution...

[bobbyboy]

Bonjour,
Ca semble quand même étonnant que le compilateur comprenne une instruction sur 3 lignes.
Ce que tu peux faire c'est mettre l'instruction dans une variable caractère :

Code :

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

1
2
3
4
5
6
7
8
9
 
character*200 :: commande
 
commande = "bunzip2 -c"
commande = trim(commande)//"$/home/****/DX_ISCCP/2006/06/01/SCCP.DX.0.MET-7."
...
 
write(*,"(A)") commande  ! ca permet de vérifier que la commande est la bonne
call system(commande)

Au moins tu peux vérifier que la commande est la bonne et cibler le problème.

[Merel]

Merci pour cette réponse.

J'ai pu contourner le problème en utilisant les // pour concaténer le tout.

Je ne comprends pas trop pourquoi le programme attend une telle instruction mais ca fonctionne...

Code :

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

1
2
3
call system ('bunzip2 '//
     $     '/home/*******/DX_ISCCP/2006/06/01/ISCCP.DX.0.MET-7.2006'//
     $'.06.01.1200.EUM.bz2')