Buenas,

estoy bastante acostumbrado a programar en Fortran, pero ahora tengo un proyecto en el cual debo programar en C, y aunque tengo en mente cómo hacer el programa, me falla el proceso de lecturas de datos desde un fichero.

Tengo un fichero en el cual hay dos tipos de datos. El primer tipo tiene el siguiente formato:

AAAA-MM-DD E F

(AAAA es año, MM es mes, DD es día, E es un número entero, y F uno decimal)

El segundo tipo es muy parecido:

AAAA-MM-DD F


A mí me interesa leer los números E y F del primer grupo de datos, guardándolos en dos vectores, y leer el número F del segundo grupo de datos, guardándolo en otro vector. Aquí es donde surge mi problema.

Estoy intentando hacer esto utilizando la función fscanf, escribiendo estos dos comando después de delcarar variables y abrir los ficheros:

fscanf (f1, "%d-%d-%d %d %f\n", &ano, &mes, &dia , E1, F1);
fscanf (f1, "%d-%d-%d %f\n", &ano, &mes, &dia, F2);

He declarado E1(3000), F1(3000) y F2(3000) asegurándome de que son suficientemente grandes para almacenar todos los números que hay en el fichero.

Haciendo esto, no consigo que se almacenen los números, ni siquiera el año. No sé si la función fscanf se utiliza así o no.

Agradecería cualquier ayuda, ya que tengo el algoritmo básico en mente, pero no puedo aplicarlo por culpa de que no sé cómo leer el fichero.

Muchas gracias.

Me pasa un detalle para mi curioso. Con esto en el fichero:


la salida es:


Es decir, en el código que te pongo a continuación sólo actúa el scanf==5 y lo que hace el muy bandido es, cuando debería actuar para mi criterio el scanf==4, sigue actuando el scanf==5 y lo que hace es coger, en las líneas pares, el decimal y separarlo en la parte entera y la parte decimal y así no deja actuar al scanf==4.

¿Me podrían iluminar a ver qué diablos estoy haciendo fatal?.

#include <stdio.h>
#include <stdlib.h>
#define N 5
 
int main(){
  int i=0,j=0,k=0,aux[3],E[N];
  float F1[N],F2[N];
  FILE* fichero;
  fichero = fopen("fecha0.txt", "r");
  if ((fichero = fopen("fecha0.txt", "r")) == NULL){
    perror("fecha0.txt");
    return EXIT_FAILURE;
  }
  while (! feof(fichero)){
      if (fscanf(fichero,"%d %d %d %d %f ", &aux[0],&aux[1], &aux[2], &E[i], &F1[i])==5){
        printf("5: %d %g\n", E[i], F1[i]);
        i++;
      }
      else if (fscanf(fichero,"%d %d %d %f ", &aux[0],&aux[1], &aux[2], &F2[k])==4){
        printf("4: %g\n", F2[k]);
        k++;
      }
      else
        puts("Error");
  }
  for (j=0;j<i;j++)
    printf ("%3d  ",E[j]) ;
  putchar ('\n');
  for (j=0;j<i;j++)
    printf ("%3g  ",F1[j]) ;
  putchar ('\n');
  /*for (j=0;j<k;j++)
    printf ("%3g  ",F2[j]);*/
  putchar ('\n');
  fclose(fichero);
  return EXIT_SUCCESS;
}
 

Obviamente el código que  cuelga rir3760 funciona, como no podría ser de otra manera al ser suyo, a las mil maravillas. La salida es:

#include <stdio.h>
#include <stdlib.h>
#define N 5
 
int main()
{
  int i=0,j=0,k=0,aux[3],E[N],nc;
  float F1[N],F2[N];
  char linea[81];
  FILE* fichero;
  fichero = fopen("fecha0.txt", "r");
  if ((fichero = fopen("fecha0.txt", "r")) == NULL){
    perror("fecha0.txt");
    return EXIT_FAILURE;
  }
  while (! feof(fichero)){
    fgets(linea, 80, fichero);
      if (sscanf(linea, "%d-%d-%d%n", &aux[0], &aux[1], &aux[2], &nc) == 3){
         if (sscanf(linea + nc, "%d%*[ ]%f", &E[i], &F1[i]) == 2){
           i++;
         }
         else if (sscanf(linea + nc, "%f", &F2[k]) == 1){
           k++;
         }
         else
            puts("Error");
      }
  }
  for (j=0;j<i;j++)
    printf ("%3d  ",E[j]) ;
  putchar ('\n');
  for (j=0;j<i;j++)
    printf ("%3g  ",F1[j]) ;
  putchar ('\n');
  for (j=0;j<k;j++)
    printf ("%3g  ",F2[j]) ;
  putchar ('\n');
  fclose(fichero);
  return EXIT_SUCCESS;
}

Gracias de antemano.





REEDITADO:

Lo he solventado de la forma más simple. Ahora la salida es la correcta:

#include <stdio.h>
#include <stdlib.h>
#define N 5
 
int main(){
  int i=0,j=0,k=0,aux[3],E[N];
  float F1[N],F2[N];
  FILE* fichero;
  fichero = fopen("fecha0.txt", "r");
  if ((fichero = fopen("fecha0.txt", "r")) == NULL){
    perror("fecha0.txt");
    return EXIT_FAILURE;
  }
  while (! feof(fichero)){
      fscanf(fichero,"%d %d %d %d %f ", &aux[0],&aux[1], &aux[2], &E[i], &F1[i]);
        printf("5: %d  %g\n", E[i], F1[i]);
        i++;
      fscanf(fichero,"%d %d %d %f ", &aux[0],&aux[1], &aux[2], &F2[k]);
        printf("4: %g\n", F2[k]);
        k++;
  }
  for (j=0;j<i;j++)
    printf ("%3d  ",E[j]) ;
  putchar ('\n');
  for (j=0;j<i;j++)
    printf ("%3g  ",F1[j]) ;
  putchar ('\n');
  for (j=0;j<k;j++)
    printf ("%3g  ",F2[j]);
  putchar ('\n');
  fclose(fichero);
  return EXIT_SUCCESS;
}

Pero me sigue quedando la duda que planteé.

Muchas gracias a los dos, ya me va quedando todo más claro, pero todavía tengo una duda. Resulta que en el fichero que tengo, además de estas fechas con los números posteriores, hay una línea en la que pone "Observaciones" y otra en la que pone "Predicciones", y me está dando error al implementar vuestros programas. Más concretamente, no sé qué significan esos ==1, ==2.... que ponéis después de las funciones scanf, así que no sé cómo añadir el caso en el que una línea pueda ser  "Observaciones" o "Predicciones".

Además, también tengo dudas en cómo almacenar el fichero en el vector "linea" utilizando fgets para poder después procesarlo con sscanf.

Os agradezco de nuevo toda la ayuda, ya os digo que tengo bastante soltura en Fortran, pero que estoy bastante perdido en la forma de leer datos de C.

Gracias, ya me ha quedado claro lo de las lecturas del scanf.

Respecto a fgets aún hay un matiz que no me queda claro. En el ejemplo que pones, ¿se guarda el fichero por completo en "char linea"? Es decir, ¿linea(1) sería la primera línea del fichero, linea(2) la segunda, y así sucesivamente? Planteado de otra forma; ¿cuando hacemos fgets lee el fichero?

Saludos!

Entendido! Ya me ha salido por fin! Os agradezco mucho a los dos vuestra ayuda, era muy importante que pudiese resolver esto para poder seguir.

Saludos!