ref: db3d99c72d9ae5d3d30357bba2251db3008f71ef
dir: /lib/c/fclose.c/
#include <stdio.h>
#undef fclose
int
fclose(FILE *fp)
{
	int r = EOF;
	if ((fp->flags & _IOSTRG) == 0 &&
	    fp->flags & (_IOWRITE | _IOREAD | _IOWR)) {
		r = 0;
		if (fflush(fp) == EOF)
			r = EOF;
		if (close(fp->fd) < 0)
			r = EOF;
	}
	if (fp->flags & _IOALLOC) {
		free(fp->buf);
		fp->buf = NULL;
	}
	fp->flags &= ~(_IOWRITE | _IOREAD | _IOWR |
	               _IOERR | _IOEOF |
	               _IOALLOC |
	               _IOTXT |
	               _IOSTRG);
	return r;
}