int vfvol_close(VFILE* vfp)
{
- /* Si es de escritura y el último guardo la cabecera. */
- if (vfp->mode == VFWRITE && vfp->lastvol)
+ int ret = 0;
+ if (vfp->fp)
{
- int ret;
- PERR("vfvol_close: modo == VFWRITE");
- /* Me posiciono al principio del archivo. */
- if ((ret = fseek(vfp->fp, 0l, SEEK_SET)))
+ /* Si es de escritura y el último guardo la cabecera. */
+ if (vfp->mode == VFWRITE && vfp->lastvol)
{
- PERR("vfvol_close: fseek error");
- return ret; /* fseek error. */
- }
- /* Guardo cabecera para indicar si es el último volumen o no. */
- if ((ret = fputc(vfp->lastvol, vfp->fp)) == EOF)
- {
- PERR("vfvol_close: fputc error");
- return ret; /* fputc error. */
+ int ret;
+ PERR("vfvol_close: modo == VFWRITE");
+ /* Me posiciono al principio del archivo. */
+ if ((ret = fseek(vfp->fp, 0l, SEEK_SET)))
+ {
+ PERR("vfvol_close: fseek error");
+ return ret; /* fseek error. */
+ }
+ /* Guardo cabecera para indicar si es el último volumen o no. */
+ if ((ret = fputc(vfp->lastvol, vfp->fp)) == EOF)
+ {
+ PERR("vfvol_close: fputc error");
+ return ret; /* fputc error. */
+ }
}
+ ret = fclose(vfp->fp);
+ vfp->fp = 0;
}
- return fclose(vfp->fp);
+ return ret;
}
int vfvol_open_next(VFILE* vfp)