emufs/indices.c

   1
   2 #include "indices.h"
   3 #include "emufs.h"
   4 #include "indice_b.h"
   5 #include "common.h"
   6
   7 INDICE *emufs_indice_crear(EMUFS *emu, char *nombre, INDICE_FUNCION funcion, INDICE_TIPO tipo, INDICE_TIPO_DATO tipo_dato, unsigned int offset, unsigned int tam_bloque)
   8 {
   9         int len;
  10         INDICE *tmp;
  11         tmp = (INDICE *)malloc(sizeof(INDICE));
  12         if (tmp == NULL) return NULL;
  13
  14         len = strlen(emu->nombre);
  15         len += strlen(nombre);
  16
  17         tmp->filename = (char *)malloc(sizeof(char)*(len+6));
  18         strcpy(tmp->filename, emu->nombre);
  19         strcat(tmp->filename, "_");
  20         strcat(tmp->filename, nombre);
  21         strcat(tmp->filename, ".idx");
  22
  23         tmp->nombre = (char *)malloc(sizeof(char)*(strlen(nombre)+1));
  24         strcpy(tmp->nombre, nombre);
  25
  26         tmp->tipo = tipo;
  27         tmp->tipo_dato = tipo_dato;
  28         tmp->tam_bloque = tam_bloque;
  29         tmp->funcion = funcion;
  30         tmp->offset = offset;
  31         tmp->sig = NULL;
  32
  33         switch (tipo) {
  34                 case IND_B:
  35                         PERR("Creando indice con Arbol B");
  36                         emufs_indice_b_crear(tmp);
  37                         tmp->agregar_entrada = emufs_indice_b_insertar;
  38                         tmp->borrar_entrada = emufs_indice_b_borrar;
  39                         tmp->existe_entrada = emufs_indice_b_buscar;
  40                         tmp->buscar_entradas = NULL;
  41                 break;
  42                 case IND_B_ASC:
  43                         /* llenar metodos */
  44                         PERR("Creando indice con Arbol B*");
  45                         PERR("AÚN NO IMPLEMENTADO!!!!!!!!");
  46                         break;
  47         }
  48
  49         return tmp;
  50 }
  51
  52 void emufs_indice_destruir(EMUFS *emu, INDICE *i)
  53 {
  54         /* TODO Sacar el indice de la lista en EMUFS */
  55
  56         free(i->filename);
  57         free(i->nombre);
  58         free(i);
  59 }
  60
  61 void emufs_indice_agregar(INDICE *primero, char *data, INDICE_DATO dato)
  62 {
  63         INDICE *iter = primero;
  64
  65         while (iter) {
  66                 iter->agregar_entrada(iter, emufs_indice_generar_clave(iter, data), dato);
  67                 iter = iter->sig;
  68         }
  69 }
  70
  71 INDICE_DATO emufs_indice_buscar(INDICE *primero, char *data)
  72 {
  73         return primero->existe_entrada(primero, emufs_indice_generar_clave_desde_valor(primero, data));
  74 }
  75
  76 CLAVE emufs_indice_generar_clave_desde_valor(INDICE *idx, char *data)
  77 {
  78         CLAVE k;
  79         if (idx == NULL) PERR("NULL INDEX!");
  80
  81         PERR("---- 1 ----");
  82         switch (idx->tipo_dato) {
  83                 case IDX_FLOAT:
  84                         k.f_clave= *((float *)(data));
  85                 break;
  86                 case IDX_INT:
  87                         k.i_clave = *((int *)(data));
  88         }
  89         PERR("---- 2 ----");
  90
  91         return k;
  92 }
  93
  94 CLAVE emufs_indice_generar_clave(INDICE *idx, char *data)
  95 {
  96         CLAVE k;
  97         switch (idx->tipo_dato) {
  98                 case IDX_FLOAT:
  99                         k.f_clave= *((float *)(data+idx->offset));
 100                 break;
 101                 case IDX_INT:
 102                         k.i_clave = *((int *)(data+idx->offset));
 103         }
 104
 105         return k;
 106 }
 107
 108 int emufs_indice_es_menor(INDICE *idx, CLAVE c1, CLAVE c2)
 109 {
 110         switch (idx->tipo_dato) {
 111                 case IDX_FLOAT:
 112                         return c1.f_clave < c2.f_clave;
 113                 case IDX_INT:
 114                         return c1.i_clave < c2.i_clave;
 115         }
 116         return 0;
 117 }
 118
 119 int emufs_indice_es_igual(INDICE *idx, CLAVE c1, CLAVE c2)
 120 {
 121         switch (idx->tipo_dato) {
 122                 case IDX_FLOAT:
 123                         return c1.f_clave == c2.f_clave;
 124                 case IDX_INT:
 125                         return c1.i_clave == c2.i_clave;
 126         }
 127         return 0;
 128 }
 129