emufs/idx.c

   1 /* vim: set noexpandtab tabstop=4 shiftwidth=4:
   2  *----------------------------------------------------------------------------
   3  *                                  emufs
   4  *----------------------------------------------------------------------------
   5  * This file is part of emufs.
   6  *
   7  * emufs is free software; you can redistribute it and/or modify it under the
   8  * terms of the GNU General Public License as published by the Free Software
   9  * Foundation; either version 2 of the License, or (at your option) any later
  10  * version.
  11  *
  12  * emufs is distributed in the hope that it will be useful, but WITHOUT ANY
  13  * WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
  14  * FOR A PARTICULAR PURPOSE. See the GNU General Public License for more
  15  * details.
  16  *
  17  * You should have received a copy of the GNU General Public License along
  18  * with emufs; if not, write to the Free Software Foundation, Inc., 59 Temple
  19  * Place, Suite 330, Boston, MA  02111-1307  USA
  20  *----------------------------------------------------------------------------
  21  * Creado:  jue abr  8 18:10:35 ART 2004
  22  * Autores: Nicolás Dimov <sagardua@uolsinectis.com.ar>
  23  *----------------------------------------------------------------------------
  24  *
  25  * $Id$
  26  *
  27  */
  28
  29 /** \file
  30  *
  31  * Manejo de archivos de índice de registros.
  32  *
  33  * Implementación del manejo de archivos de índice de registros.
  34  *
  35  */
  36
  37 #include "idx.h"
  38 #include <stdlib.h>
  39 #include <strings.h>
  40
  41 FILE* emufs_idx_abrir(EMUFS* efs, const char* mode)
  42 {
  43         FILE* f;
  44         char* filename;
  45
  46         filename = (char*) malloc(sizeof(char) * (strlen(efs->nombre)
  47                                 + strlen(EMUFS_IDX_EXT) + 1));
  48         if (filename == NULL) {
  49                 /* TODO Manejo de errores */
  50                 return NULL;
  51         }
  52         strcpy(filename, efs->nombre);
  53         strcat(filename, EMUFS_IDX_EXT);
  54         f = fopen(filename, mode);
  55         free(filename);
  56         return f;
  57 }
  58
  59 int emufs_idx_buscar_mayor_id(EMUFS *emu)
  60 {
  61         int id, max = -1;
  62         FILE *f_idx;
  63         EMUFS_IDX reg;
  64         char name_f_idx[255]; /* TODO usar malloc para no limitar el tamaño de nombre de archivo */
  65
  66         strcpy(name_f_idx,emu->nombre);
  67         strcat(name_f_idx, EMUFS_IDX_EXT);
  68
  69         if ( (f_idx = fopen(name_f_idx,"r")) == NULL) return -1; /*ERROR*/
  70         id = -1;
  71         while ( !feof(f_idx) ){
  72                 /* Me aseguro de leer la cantidad de bytes correcta */
  73                 if (fread(&reg,sizeof(EMUFS_IDX),1,f_idx) != 1) continue;
  74                 if ( reg.id_reg >= max )
  75                         max = reg.id_reg;
  76         }
  77         id = max+1;
  78         fclose(f_idx);
  79
  80         return id;
  81 }
  82
  83 /*busca el registro ID en el archivo "block_reg.dat" y devuelve el nro de bloque en el que se encuentra*/
  84 int emufs_idx_buscar_registro(EMUFS *emu, int ID)
  85 {
  86         FILE* f_idx;
  87         EMUFS_IDX reg;
  88         char name_f_idx[255];
  89         strcpy(name_f_idx,emu->nombre);
  90         strcat(name_f_idx, EMUFS_IDX_EXT);
  91
  92         if ( (f_idx = fopen(name_f_idx,"r")) == NULL) return -1; /*ERROR*/
  93         while ( !feof(f_idx) ){
  94                 if (fread(&reg,sizeof(EMUFS_IDX),1,f_idx) != 1) continue;
  95                 if ( reg.id_reg == ID ){
  96                         fclose(f_idx);
  97                         return reg.block;
  98                 }
  99         }
 100
 101         fclose(f_idx);
 102         return -1; /*no existe el registro*/
 103 }
 104
 105 /* agrega un registro al final del archivo */
 106 int emufs_idx_agregar(EMUFS *emu, int num_bloque, int ID_aux)
 107 {
 108         FILE *f_idx;
 109         EMUFS_IDX reg;
 110         char name_f_idx[255];
 111
 112         strcpy(name_f_idx,emu->nombre);
 113         strcat(name_f_idx, EMUFS_IDX_EXT);
 114
 115         if ( (f_idx = fopen(name_f_idx,"ab+"))==NULL ) return -1;
 116
 117         reg.block = num_bloque;
 118         reg.id_reg = ID_aux;
 119         fwrite(&reg,sizeof(EMUFS_IDX),1,f_idx);
 120         fclose(f_idx);
 121         return 0;
 122 }