| 12
 3
 4
 5
 6
 7
 8
 9
 10
 11
 12
 13
 14
 15
 16
 17
 18
 19
 20
 21
 22
 23
 24
 25
 26
 27
 28
 29
 30
 31
 32
 33
 34
 35
 36
 37
 38
 39
 40
 41
 42
 43
 44
 45
 46
 47
 48
 49
 50
 51
 52
 53
 54
 55
 56
 57
 58
 59
 60
 61
 62
 63
 64
 65
 66
 67
 68
 69
 70
 71
 72
 73
 74
 75
 
 |  
int OuvrirF63( GESTION *gestionPtr, int argc, char **argv)
{
  char *fbinaire, temp[255];
  FILE* Fichier63;
  FILE* FicCom;
  Station *Station63;
  Entete63 Entete;
FILE* log;
 
  if (argc != 3) {
    Tcl_AppendResult (gestionPtr->interp, "Mauvais nombre d'arguments : ce doit etre \"", argv[0], " OuvrirF63 <nomFichier63> \"", 0) ;
    return(TCL_ERROR) ;
  }
/**************** Test philou *********/
printf ("\nAvant alloc memoire dans OuvrirF63\n");
 
/***********************************/
 
 
 Station63 = (Station*) malloc(sizeof(Station));
 
/**************** test philou *********/
printf ("\nEntre les deux malloc\n");
/**********************************/
 
log=fopen (LOG_FILE,"a+");
if (log == NULL) {
	printf ("probleme ouverture fichier %s, errno=%d\n"LOG_FILE, errno);
}
fprintf (log,"\nEntre les deux malloc\n");
fflush(log);
 
 
fbinaire = (char*) malloc(sizeof(char)*255);
if (fbinaire == NULL) {
fprintf (log, "Probleme alloc mémoire, errno=%d",errno );
}
fflush(log);
 
 
   if ( estBinaire(argv[2]) == 0 ) {
     creeBinaire(argv[2], fbinaire);	       
     }
    else {
     strcpy(fbinaire, argv[2]);
   }  
 
  /* Ouverture en lecture du fichier binaire */
  Fichier63 = fopen(fbinaire, "rb");
 
 
  /* Creation du fichier de communication C/Tcl utilise par LectureStation */
  strcpy (temp, (char *)getenv("HOME"));
  strcat (temp, FIC_COM);
  FicCom = fopen(temp, "w");
 
  /* Ecriture dans le fichier de communication des informations contenues
   *  dans le fichier binaire */
  LectureStation(Fichier63, FicCom, Station63, Entete);
  /* verifs 
     printf("\n %s passe par lecture station cree temp.txt \n");*/
 
  /* Ecriture du nom complet du fichier binaire a la fin du fichier de cimmunication */
  fprintf( FicCom, "%s\n", fbinaire);
 
  fclose(Fichier63);
  fclose(FicCom);
 
  free(fbinaire);
  free(Station63);
 
 
  return (TCL_OK);
} | 
Partager