*----------------------------------------------------------------------------
* Creado: jue abr 8 18:07:57 ART 2004
* Autores: Nicolás Dimov <sagardua@uolsinectis.com.ar>
+ * Leandro Lucarella <llucare@fi.uba.ar>
*----------------------------------------------------------------------------
*
* $Id$
*/
#include "did.h"
+#include "error.h"
+#include "common.h"
+#include <unistd.h>
+#include <string.h>
-int emufs_did_get_last(EMUFS *emu)
+int emufs_did_crear(EMUFS* efs)
{
- FILE * f_did;
- int id, offset;
+ return emufs_crear_archivo_auxiliar(efs->nombre, EMUFS_DID_EXT);
+}
+
+EMUFS_REG_ID emufs_did_get_last(EMUFS *efs, int* err)
+{
+ 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 = 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 = 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 = 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 = 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 = 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 = 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 = 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 = 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;
+}
+
+long emufs_did_get_file_size(EMUFS* efs, int* err)
+{
+ char name[255];
+ strcpy(name, efs->nombre);
+ strcat(name, EMUFS_DID_EXT);
+ return emufs_common_get_file_size(name, err);
}