+
+void ver_estadisticas(EMUFS *fp)
+{
+ WINDOW *win;
+ EMUFS_Estadisticas stats;
+ char s[40];
+ int i=3;
+
+ fprintf(stderr, "....! (%p)\n", fp->leer_estadisticas);
+ stats = fp->leer_estadisticas(fp);
+ fprintf(stderr, "Vamos que pasamos!\n");
+
+ win = newwin(LINES-4, COLS-2, 2, 1);
+
+ mvwaddstr(win, 1, 1, "Tipo de Archivo : ");
+ switch (fp->tipo) {
+ case T1:
+ waddstr(win, "Registro long. variable con bloque parametrizado");
+ break;
+ case T2:
+ waddstr(win, "Registro long. variable sin bloques");
+ break;
+ case T3:
+ waddstr(win, "Registro long. fija con bloque parametrizado");
+ }
+
+ mvwaddstr(win, i++, 1, "Cant. Registros : ");
+ sprintf(s, "%lu", stats.tam_archivo);
+ waddstr(win, s);
+
+ mvwaddstr(win, i++, 1, "Tamaño de Archivo (bytes) : ");
+ sprintf(s, "%lu", stats.tam_archivo_bytes);
+ waddstr(win, s);
+
+ mvwaddstr(win, i++, 1, "Tamaño de Info de Control (bytes) : ");
+ sprintf(s, "%lu", stats.info_control);
+ waddstr(win, s);
+
+ mvwaddstr(win, i++, 1, "Media de espacio libre : ");
+ sprintf(s, "%lu", stats.media_fs);
+ waddstr(win, s);
+
+ mvwaddstr(win, i++, 1, "Espacio Libre : ");
+ sprintf(s, "%lu", stats.total_fs);
+ waddstr(win, s);
+
+ mvwaddstr(win, i++, 1, "Maximo de Espacio libre : ");
+ sprintf(s, "%lu", stats.max_fs);
+ waddstr(win, s);
+
+ mvwaddstr(win, i++, 1, "Minimo de Espacio libre : ");
+ sprintf(s, "%lu", stats.min_fs);
+ waddstr(win, s);
+
+ mvwaddstr(win, i++, 1, "Cantidad de bloques : ");
+ sprintf(s, "%lu", stats.cant_bloques);
+ waddstr(win, s);
+
+ werase(win);
+ wrefresh(win);
+ delwin(win);
+}
+