Passer un fichier d'entrée en argument en ligne de commande

Bonjour tout le monde. Voila j'ai un problème assez ennuyeux. J'ai fait un code fortran qui en dur fonctionne très bien. Je tourne sous Linux.
J'ai crée un fichier d'entrée initialement appelé toto.bat. Mon exécutable s'appelle EperVeille.out et en faisant un OPEN avec un FILE='toto.bat' lorque l'on tape la ligne de commande suivante:

EperVeille.out toto.bat

le programme s'execute correctement avec les parametres du fichier d'entrée toto.bat

Seulement sa ne me satisfait pas. Car si jamais je renomme mon fichier d'entree en romeo.bat par exemple puis que je tape la commande

EperVeille.out romeo.bat

sa ne marche plus puisque j'ai spécifié dans le code que le fichier s'appelait toto.bat
Ce que je veux c'est faire quelque chose pour ne plus avoir besoin d'aller dans le code changer le nom de mon fichier arametre d'entree.

Je voudrais que quelque soit le nom du fichier parametre d'entree lorsque j'ecris

EperVeille.out fichier_entrée.bat
il me lance le programme avec les parametres utilisé dans le fichier d'entree.
Je voudrais simplement que le fait de renommer le fichier d'entrée ne me fasse plus intervenir dans le code.
Comment puis je modifier mon code pour faire cela??
Voila ce que j'ai écrit pour la lecture du fichier parametre d'entrée:

Code:

---

1 2 3 4

OPEN(UNIT=5,FILE='toto.bat',STATUS='OLD',err=10000) READ(5,SIMU) CLOSE(5) ....

---

10000: "Fichier d'entrée introuvable"
Est ce que quelqu un peut m'aider je désespere.

J'avais pense a utiliser getarg mais mon compilo ne me reconnait pas cette fonction et puis je ne saurais pas quoi ecrire. Aidez moi svp. Merci

Bonjour,
Je ne sais pas si c'est la solution optimale, mais tu peux créer un fichier au nom fixe. Celui-ci contiendrait le nom du fichier qui doit être lu.

Code:

---

1 2 3 4

open(12, file='data') read(12,*) file.dat open(13,file=file.dat) ...

---

Je me sers aussi parfois de ce genre d'astuces pour donner les noms des fichiers de sortie, le nombre de lignes à lire, ... Bref, des paramètres d'entrées variables selon les cas de figures mais devant être utilisés par un programme unique.

Oui mais dans ton fichier data je vais mettre le fichier que j'ai appelé toto.dat qui est le nom du fichier d'entrée mais si je veux le renommer un jour ce toto.dat il faudra aussi modifier dans le fichier data. Moi ce que je cherche si c'est possible c'est s'il n'y a pas moyen de faire en sorte qu'il reconnaisse le fichier d'entrée peu importe son nom.

bonjour,

tu as la possibilité d'utiliser la fonction GETARG mais je ne sais pas si elle fait partie de la norme Fortran, du coup elle peut ne pas être disponible sur certains compilateurs:

http://gcc.gnu.org/onlinedocs/gfortran/GETARG.html

sinon, l'autre possibilité est de lancer ton exécutable fortran via un script qui lui peut récupérer les arguments de la ligne de commande et qui peut les écrire dans un fichier temporaire qui lui a un nom fixe dans ton programme. en ce qui me concerne, c'est toujours comme ça que je fais.

Citation:

---

Envoyé par kango

...tu as la possibilité d'utiliser la fonction GETARG mais je ne sais pas si elle fait partie de la norme Fortran, du coup elle peut ne pas être disponible sur certains compilateurs:

http://gcc.gnu.org/onlinedocs/gfortran/GETARG.html
...

---

Le lien donne la réponse : getarg() est propriétaire. La norme spécifie GET_COMMAND_ARGUMENT. Elle n'est disponible qu'à compter de Fortran 2003, mais elle a été introduite très tôt dans la plupart des compilateurs.

Dans ton cas la fonction getarg() est la meilleure des solutions.

Elle marche très bien avec gfortran et ifort.

Citation:

---

Envoyé par Ladgalen

Dans ton cas la fonction getarg() est la meilleure des solutions.

Elle marche très bien avec gfortran et ifort.

---

Pourquoi ?

Si les 2 compilateurs supportent la fonction standard, pourquoi prendre une fonction propriétaire ?

C'est juste un reflet de mon ignorance.

Je connaissait pas get_command_argument() et j'avais entendu parler de getarg() qui me satisfaisait vu qu'elle marche avec ifort et gfortran.

En plus dans un des posts j'ai cru comprendre que get_command_argument n'était pas encore dispo. Ceci dis j'ai testé avec ifort et gfortran et ça marche avec l'un comme l'autre (getarg ou ger_command_argument).

La solution getarg() repond a priori ton post: "passer un nom de fichier en argument dans la ligne de commande"
Mais ce que tu veux je pense, c'est surtout pouvoir ouvrir un fichier dont tu specifierais le nom pendant l'execution de ton programme. Tu evites ainsi de changer le nom dans le source et devoir recompiler a chaque fois ou alors tu evites que tous les fichiers traites aient le meme nom generique.
voila comment faire:

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16

character*80 nom_file     write(*,1) ' nom du fichier à ouvrir ? ' 1 format (a,$) read(*,2) nom_file 2 format(a)   open (1, file=nom_file, status ='old' )   ......   ......     end

---