+char *procesar_registro_articulo_tipo1(EMUFS *emu, char *ptr, EMUFS_REG_SIZE *size, int *pos_actual, int *ancho)
+{
+ EMUFS_REG_SIZE offset, curr_size;
+ char *tmp, *salida, *tmp1, pos_actualizada, ant;
+ int cant_header, i=0, j;
+ if (ptr == NULL) return NULL;
+
+ /* Cuento la cantidad de registros en este bloque */
+ cant_header = 0;
+ offset = 0;
+ do {
+ /* Me salto el ID, que no me interesa saber su valor */
+ offset += sizeof(EMUFS_REG_ID);
+ /* Copio el tamaño del registro de la cabecera. */
+ memcpy(&curr_size, ptr + offset, sizeof(EMUFS_REG_SIZE));
+ offset += sizeof(EMUFS_REG_SIZE);
+
+ /* Desplazo el offset */
+ if (curr_size == 0) {
+ /* Si el tamaño de registro es 0, quiere decir que llegue a la
+ * parte que esta vacia */
+ break;
+ } else {
+ cant_header++;
+ offset += curr_size;
+ }
+ } while (offset < (*size));
+
+ /* Proceso */
+ salida = (char *)malloc((*size)-sizeof(unsigned int)*cant_header*3 + 3*cant_header*10+1);
+ tmp = ptr;
+ tmp1 = salida;
+ pos_actualizada = 0;
+ while (i<cant_header) {
+ /* Verifico la pos_actual para el resaltado, asi queda coherente
+ * en el cambio de formato
+ */
+ if (((tmp - ptr) == *pos_actual) && (!pos_actualizada)) {
+ (*pos_actual) = tmp1-salida;
+ pos_actualizada = 1;
+ }
+ /* Pongo el ID del registro */
+ sprintf(tmp1, "(%08lu)", *((EMUFS_REG_ID *)tmp));
+ tmp1 += 10;
+ tmp += sizeof(EMUFS_REG_ID);
+ /* Pongo el tamaño del registro */
+ sprintf(tmp1, "{%08lu}", *((EMUFS_REG_SIZE *)tmp));
+ curr_size = *((EMUFS_REG_SIZE *)tmp);
+ if (pos_actualizada == 1) {
+ (*ancho) = curr_size-sizeof(unsigned int)+30;
+ pos_actualizada = 2;
+ }
+ tmp1 += 10;
+ tmp += sizeof(EMUFS_REG_SIZE);
+ /* Pongo el campo numero del registro */
+ sprintf(tmp1, "[%08d]", *((unsigned int *)tmp));
+ tmp1 += 10;
+ tmp += sizeof(unsigned int);
+ j = sizeof(unsigned int);;
+ while (j < curr_size) {
+ if (*tmp == '\0') {
+ if (ant == (*tmp))
+ (*tmp1) = '.';
+ else
+ (*tmp1) = '|';
+ } else {
+ (*tmp1) = (*tmp);
+ }
+ ant = (*tmp);
+ tmp++;
+ tmp1++;
+ j++;
+ }
+ i++;
+ }
+ /* Tengo que trabajar sobre lo que me falte (seguro es espacio libre) */
+ (*size) = (*size)-sizeof(unsigned int)*cant_header*3+3*cant_header*10+1;
+ memset(tmp1, '.', (*size)-(tmp1-salida));
+ free(ptr);
+ salida[*size] = '\0';
+
+ return salida;
+}
+
+int preguntar_id(WINDOW *win, EMUFS *fp)
+{
+ int n=-1, j=0;
+ t_Form *form = form_crear(win);
+ form_agregar_widget(form, INPUT, "ID a buscar", 8, "");
+
+ do {
+ if (j != 0) {
+ curs_set(0);
+ wattron(win, COLOR_PAIR(COLOR_YELLOW));
+ wattron(win, A_BOLD);
+ mvwaddstr(win, 2, 1, "Registro no encontrado!!");
+ wattroff(win, A_BOLD);
+ wattroff(win, COLOR_PAIR(COLOR_YELLOW));
+ wrefresh(win);
+ getch();
+ werase(win);
+ box(win, 0, 0);
+ }
+ form_ejecutar(form, 1,1);
+
+ n = form_obtener_valor_int(form, "ID a buscar");
+ j = 1;
+ } while (emufs_idx_existe_id(fp, n) != 0);
+
+ form_destruir(form);
+ return n;
+}
+