+
+void ver_estadisticas(EMUFS *fp)
+{
+ WINDOW *win;
+ EMUFS_Estadisticas stats;
+ char s[40];
+ int i=3;
+
+ stats = fp->leer_estadisticas(fp);
+
+ win = newwin(LINES-4, COLS-2, 2, 1);
+ curs_set(0);
+
+ wattron(win, COLOR_PAIR(COLOR_YELLOW));
+ wattron(win, A_BOLD);
+ mvwaddstr(win, 1, 1, "Tipo de Archivo : ");
+ wattroff(win, A_BOLD);
+ wattroff(win, COLOR_PAIR(COLOR_YELLOW));
+ switch (fp->tipo) {
+ case T1:
+ waddstr(win, "Registro long. variable con bloque parametrizado");
+ wattron(win, A_BOLD);
+ mvwaddstr(win, i++, 1, "Tamaño de bloque : ");
+ wattroff(win, A_BOLD);
+ sprintf(s, "%lu bytes", fp->tam_bloque);
+ waddstr(win, s);
+ break;
+ case T2:
+ waddstr(win, "Registro long. variable sin bloques");
+ break;
+ case T3:
+ waddstr(win, "Registro long. fija con bloque parametrizado");
+ wattron(win, A_BOLD);
+ mvwaddstr(win, i++, 1, "Tamaño de bloque : ");
+ wattroff(win, A_BOLD);
+ sprintf(s, "%lu bytes", fp->tam_bloque);
+ waddstr(win, s);
+ wattron(win, A_BOLD);
+ mvwaddstr(win, i++, 1, "Tamaño de registro : ");
+ wattroff(win, A_BOLD);
+ sprintf(s, "%lu bytes", fp->tam_reg);
+ waddstr(win, s);
+ }
+
+ wattron(win, A_BOLD);
+ mvwaddstr(win, i++, 1, "Cant. Registros : ");
+ wattroff(win, A_BOLD);
+ sprintf(s, "%lu", stats.tam_archivo);
+ waddstr(win, s);
+
+ wattron(win, A_BOLD);
+ mvwaddstr(win, i++, 1, "Tamaño de Archivo : ");
+ wattroff(win, A_BOLD);
+ sprintf(s, "%lu bytes", stats.tam_archivo_bytes);
+ waddstr(win, s);
+
+ wattron(win, A_BOLD);
+ mvwaddstr(win, i++, 1, "Tamaño de Info de Control : ");
+ wattroff(win, A_BOLD);
+ sprintf(s, "%lu bytes", stats.info_control);
+ waddstr(win, s);
+
+ wattron(win, A_BOLD);
+ mvwaddstr(win, i++, 1, "Media de espacio libre : ");
+ wattroff(win, A_BOLD);
+ sprintf(s, "%lu bytes/bloque", stats.media_fs);
+ waddstr(win, s);
+
+ wattron(win, A_BOLD);
+ mvwaddstr(win, i++, 1, "Espacio Libre : ");
+ wattroff(win, A_BOLD);
+ sprintf(s, "%lu bytes", stats.total_fs);
+ waddstr(win, s);
+
+ wattron(win, A_BOLD);
+ mvwaddstr(win, i++, 1, "Maximo de Espacio libre : ");
+ wattroff(win, A_BOLD);
+ sprintf(s, "%lu bytes", stats.max_fs);
+ waddstr(win, s);
+
+ wattron(win, A_BOLD);
+ mvwaddstr(win, i++, 1, "Minimo de Espacio libre : ");
+ wattroff(win, A_BOLD);
+ sprintf(s, "%lu bytes", stats.min_fs);
+ waddstr(win, s);
+
+ wattron(win, A_BOLD);
+ mvwaddstr(win, i++, 1, "Cantidad de bloques : ");
+ wattroff(win, A_BOLD);
+ sprintf(s, "%lu", stats.cant_bloques);
+ waddstr(win, s);
+
+ wattron(win, A_BLINK);
+ mvwaddstr(win, i+2, 1, "Presione una tecla para continuar.");
+ wattroff(win, A_BLINK);
+
+ wrefresh(win);
+
+ getch();
+ werase(win);
+ wrefresh(win);
+ delwin(win);
+}
+