Discussion :

[tonio_a_588]

Bonjour,
je cherche a ecrire des donnees dans un fichier binaire qui doit etre lu ensuite par un programme fortran. J'ai essayé le programme suivant :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
#include <iostream>
#include <fstream>
using namespace std;
 
main() {
 
 ofstream OutFile("test.b", std::ios_base::binary);
 int var=3;
 
 OutFile.write(reinterpret_cast<const char*>(&var),sizeof(int));
 
 OutFile.close();
 
}

J'obtiens en l'exécutant le fichier test.b que j'essaye de lire en fortran comme suit :

Code :

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

1
2
3
4
5
6
7
8
9
10
program lire
 
integer lunite
integer var
 
open(lunite,file='test.b',form='unformatted')
read(lunite) var
print*,var
 
end

ce qui me renvoit le message d'erreur suivant :
Fortran runtime error: Unformatted file structure has been corrupted

Existe-t-il des méthodes de fstream pour écrire un fichier binaire à un format lisible par fortran ?
Merci

[Pragmateek]

Le code C++ présenté fait de la sérialisation binaire.
Es-tu sûr que la fonction "open" côté Fortran s'attende à du format binaire et pas texte ?

En effet, si c'est le cas, "open" va chercher à parser du texte représentant des nombres et lever une erreur si elle trouve des données non numériques, or la sérialisation binaire ne donne pas forcément des caractères numériques d'où l'erreur.

[tonio_a_588]

merci de ta réponse,
en fait c'est l'option 'unformatted' qui précise que le fichier est binaire, mais j'ai lu que la représentation des données binaires dans un fichier était différente en fortran et en C++ ;
si je fais une fonction écrire en binaire en fortran, et que j'écris la même valeur, j'obtiens un fichier différent de celui que j'obtiens avec le C (et de taille différente, 12octets pour le fichier créé par fortran, contre 4 pour celui créé par C (taille d'un entier)).
Je me demande s'il existe des fonctions en C qui permettent d'écrire au format binaire de fortran...

[tonio_a_588]

J'ai trouvé une solution sur le lien http://www.idris.fr/su/Vectoriel/bro...rtran_C++.html
J'appelle une subroutine fortran d'ecriture du fichier binaire depuis mon programme C, en sortie duquel j'ai donc un fichier binaire lisible par un programme fortran.