emufs/indices.c

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