+
+void *emufs_tipo1_leer_registro_plus(EMUFS *emu, CLAVE clave, EMUFS_REG_SIZE *size, int *err)
+{
+ CLAVE clave_ajena;
+ char *reg;
+ char *bloque, *aux;
+ INDEX_DAT query;
+ int result, cant_reg, i;
+ EMUFS_REG_SIZE tam_reg;
+
+ /*cargo el query*/
+ query.clave = clave;
+ query.num_bloque = 0;
+ /*hago la consulta*/
+
+ result = emufs_b_plus_get_bloque(emu->indices, &query, 0);
+
+ if (result == -1){
+ PERR("NO EXISTE EL BLOQUE");
+ return NULL;
+ }
+ if (result == 1){
+ PERR("SE PRODUJO UN ERROR EN EL ARBOL");
+ return NULL;
+ }
+ /*leo el bloque*/
+ bloque = emufs_tipo1_leer_bloque(emu, query.num_bloque, err);
+ /*busco el registro en el bloque*/
+ /*copio la cantidad de registros*/
+ memcpy(&cant_reg, bloque+emu->tam_bloque-sizeof(int), sizeof(int));
+ aux = bloque;
+ for (i=0; i<cant_reg; i++){
+ /*copio el tamanio del registro*/
+ memcpy(&tam_reg, aux+sizeof(EMUFS_REG_ID), sizeof(EMUFS_REG_SIZE));
+ /*leo la clave*/
+ clave_ajena = emufs_indice_generar_clave(emu->indices, aux+sizeof(EMUFS_TIPO1_REG_HEADER));
+ if ( emufs_indice_es_igual(emu->indices, clave, clave_ajena) ){
+ reg = (char*)malloc(tam_reg);
+ if (reg == NULL){
+ PERR("NO SE PUDO CARGAR EL REGISTRO");
+ *err = -1;
+ free(bloque);
+ return -1;
+ }
+ /*copio el registro*/
+ memcpy(reg, aux+sizeof(EMUFS_TIPO1_REG_HEADER), tam_reg);
+ *size = tam_reg;
+ break; /*ya lo encontre, corto el for*/
+ }
+ aux += tam_reg+sizeof(EMUFS_TIPO1_REG_HEADER); /*paso al proximo*/
+ }
+ free(bloque);
+ return reg;
+}