#include "stdio_impl.h"
+#include "libc.h"
+
+static void dummy(FILE *f) { }
+weak_alias(dummy, __unlist_locked_file);
int fclose(FILE *f)
{
int r;
int perm;
- /* This lock is not paired with any unlock. */
FLOCK(f);
+ __unlist_locked_file(f);
+
if (!(perm = f->flags & F_PERM)) {
- OFLLOCK();
+ FILE **head = __ofl_lock();
if (f->prev) f->prev->next = f->next;
if (f->next) f->next->prev = f->prev;
- if (libc.ofl_head == f) libc.ofl_head = f->next;
- OFLUNLOCK();
+ if (*head == f) *head = f->next;
+ __ofl_unlock();
}
r = fflush(f);
if (f->getln_buf) free(f->getln_buf);
if (!perm) free(f);
-
+ else FUNLOCK(f);
+
return r;
}