cambio los printf por PERR

[z.facultad/75.06/emufs.git] / emufs / did.c

diff --git a/emufs/did.c b/emufs/did.c
index 0e3b79f730e3e4ec92ce789d071963cd3baea550..82fe63d9c61d614b6c0d6464cd140ac7c7b2e2a5 100644 (file)
--- a/emufs/did.c
+++ b/emufs/did.c
@@ -1,33 +1,134 @@
+/* vim: set noexpandtab tabstop=4 shiftwidth=4:
+ *----------------------------------------------------------------------------
+ *                                  emufs
+ *----------------------------------------------------------------------------
+ * This file is part of emufs.
+ *
+ * emufs is free software; you can redistribute it and/or modify it under the
+ * terms of the GNU General Public License as published by the Free Software
+ * Foundation; either version 2 of the License, or (at your option) any later
+ * version.
+ *
+ * emufs is distributed in the hope that it will be useful, but WITHOUT ANY
+ * WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
+ * FOR A PARTICULAR PURPOSE. See the GNU General Public License for more
+ * details.
+ *
+ * You should have received a copy of the GNU General Public License along
+ * with emufs; if not, write to the Free Software Foundation, Inc., 59 Temple
+ * Place, Suite 330, Boston, MA  02111-1307  USA
+ *----------------------------------------------------------------------------
+ * Creado:  jue abr  8 18:07:57 ART 2004
+ * Autores: Nicolás Dimov <sagardua@uolsinectis.com.ar>
+ *          Leandro Lucarella <llucare@fi.uba.ar>
+ *----------------------------------------------------------------------------
+ *
+ * $Id$
+ *
+ */
+
+/** \file
+ *
+ * Manejo de archivos de índices de registros borrados (reutilizables).
+ * 
+ * Implementación del manejo de archivos de índices de registros borrados
+ * (reutilizables).
+ *
+ */
+
 #include "did.h"
+#include <string.h>
+#include <unistd.h>
+
+int emufs_did_crear(EMUFS* efs)
+{
+       return emufs_crear_archivo_auxiliar(efs->nombre, EMUFS_DID_EXT);
+}
 
-int emufs_did_get_last(EMUFS *emu)
+EMUFS_REG_ID emufs_did_get_last(EMUFS *efs, int* err)
 {
-       FILE * f_did;
-       int id, offset;
+       FILE *f_did;
+       EMUFS_REG_ID n_regid;
+       EMUFS_OFFSET n_offset;
        char name_f_did[255];
+       long pos;
        
-       strcpy(name_f_did, emu->nombre);
-       strcat(name_f_did, ".did");
+       strcpy(name_f_did, efs->nombre);
+       strcat(name_f_did, EMUFS_DID_EXT);
        
-       if ( (f_did = fopen(name_f_did,"r")) == NULL) return -1; /*ERROR*/
-       fseek(f_did, 0, SEEK_END);
+       if ((f_did = fopen(name_f_did, "rb")) == NULL) {
+               PERR("No se puede abrir archivo");
+               *err = 4; /* EMUFS_ERROR_CANT_OPEN_FILE */
+               return EMUFS_NOT_FOUND;
+       }
+       if (fseek(f_did, 0l, SEEK_END)) {
+               PERR("No se pudo hacer fseek()");
+               fclose(f_did);
+               *err = 8; /* EMUFS_ERROR_SEEK_FILE */
+               return EMUFS_NOT_FOUND;
+       }
        
-       if (ftell(f_did) > 0){
+       if ((pos = ftell(f_did)) > 0){
                /* si el archivo no esta vacio es porque hay un nro disponible*/
-               fseek(f_did, -sizeof(int),SEEK_END);
+               if (fseek(f_did, -sizeof(EMUFS_REG_ID), SEEK_END)) {
+                       PERR("No se pudo hacer fseek()");
+                       fclose(f_did);
+                       *err = 8; /* EMUFS_ERROR_SEEK_FILE */
+                       return EMUFS_NOT_FOUND;
+               }
                /* leo el ultimo numero */
-               fread(&id,sizeof(int),1,f_did);
+               if (fread(&n_regid, sizeof(EMUFS_REG_ID), 1, f_did) != 1) {
+                       fclose(f_did);
+                       PERR("Error al leer did");
+                       *err = 3; /* EMUFS_ERROR_FILE_READ */
+                       return EMUFS_NOT_FOUND;
+               }
                /* voy al final */
-               fseek(f_did, 0, SEEK_END);
-               /* mido el tamaño del archivo*/
-               offset = ftell(f_did);
+               if (fseek(f_did, 0l, SEEK_END)) {
+                       PERR("No se pudo hacer fseek()");
+                       fclose(f_did);
+                       *err = 8; /* EMUFS_ERROR_SEEK_FILE */
+                       return EMUFS_NOT_FOUND;
+               }
+               /* mido el tamaño del archivo */
+               if ((n_offset = ftell(f_did)) == -1) {
+                       PERR("No se pudo hacer ftell()");
+                       fclose(f_did);
+                       *err = 9; /* EMUFS_ERROR_TELL_FILE */
+                       return EMUFS_NOT_FOUND;
+               }
                fclose(f_did);
-               /*lo trunco */
-               truncate(name_f_did, offset - sizeof(int));
-       } else {
+               /* lo trunco */
+               if (truncate(name_f_did, n_offset - sizeof(EMUFS_REG_ID))) {
+                       PERR("No se pudo truncar el archivo did");
+                       *err = 10; /* EMUFS_ERROR_TRUNCATE_FILE */
+                       return EMUFS_NOT_FOUND;
+               }
+       } else if (!pos) {
                fclose(f_did);
                /* si el archivo esta vacio */
-               id = -1;
+               n_regid = EMUFS_NOT_FOUND;
+       } else {
+               PERR("No se pudo hacer ftell()");
+               fclose(f_did);
+               *err = 9; /* EMUFS_ERROR_TELL_FILE */
+               return EMUFS_NOT_FOUND;
        }
-       return id;
+       return n_regid;
 }
+
+int emufs_did_agregar(EMUFS *efs, EMUFS_REG_ID n_regid)
+{
+       FILE *f_did;
+       char name_f_did[255];
+       
+       strcpy(name_f_did, efs->nombre);
+       strcat(name_f_did,  EMUFS_DID_EXT);
+       
+       if ( (f_did = fopen(name_f_did,"a+")) == NULL) return -1;
+       fwrite(&n_regid, sizeof(EMUFS_REG_ID), 1, f_did);
+       fclose(f_did);
+       
+       return 0;
+}
+