- /*cargo el bloque en "bloque"*/
- if ( leer_bloque(emu,num_bloque,bloque)== -1) return -1;
- /*El error puede haberse producido porque la funcion buscar_lugar devolvio -1, el cual es un bloque invalido*/
-
- /*insertar el registro en el bloque*/
- /*tengo que buscar un ID valido para el nuevo registro*/
- ID_aux = get_id(emu);
- /*grabo el id en el bloque*/
- memcpy(bloque+emu->tam_bloque-fs,&ID_aux,sizeof(int));
- /*grabo el registro en el bloque*/
- memcpy(bloque+emu->tam_bloque-fs+sizeof(int),ptr,tam);
- /*guardo el bloque en el archivo*/
- if ( grabar_bloque(emu, bloque, num_bloque) != 0) return -1; /* se produjo un error */
-
+ /*si no hay bloques con suficiente espacio creo un bloque nuevo */
+ if (num_bloque == -1) {
+ /*crear un nuevo bloque en memoria */
+ bloque = (char*)malloc(emu->tam_bloque);
+ /* grabar el registro al principio del bloque */
+ /*tengo que buscar un ID valido para el nuevo registro*/
+ ID_aux = get_id(emu);
+ /*grabo el id en el bloque*/
+ memcpy(bloque,&ID_aux,sizeof(int));
+ /*grabo el registro en el bloque*/
+ memcpy(bloque+sizeof(int),ptr,tam);
+ /* me paro al final del archivo */
+ fseek(file, 0, SEEK_END);
+ /* grabo el bloque en el final del archivo */
+ fwrite(bloque,emu->tam_bloque,1,file);
+ } else {
+ /*cargo el bloque en "bloque"*/
+ bloque = (char*)malloc(emu->tam_bloque);
+ if ( leer_bloque(emu,num_bloque,bloque)== -1) return -1;
+ /*El error puede haberse producido porque la funcion buscar_lugar devolvio -1, el cual es un bloque invalido*/
+ /*insertar el registro en el bloque*/
+ /*tengo que buscar un ID valido para el nuevo registro*/
+ ID_aux = get_id(emu);
+ /*grabo el id en el bloque*/
+ memcpy(bloque+emu->tam_bloque-fs,&ID_aux,sizeof(int));
+ /*grabo el registro en el bloque*/
+ memcpy(bloque+emu->tam_bloque-fs+sizeof(int),ptr,tam);
+ /*guardo el bloque en el archivo*/
+ if ( grabar_bloque(emu, bloque, num_bloque) != 0) return -1; /* se produjo un error */
+ }
+ free(bloque);