ref: 0f18938914f3e296ef28bc8db9e1e5ab64608d62
dir: /sys/src/libstdio/fopen.c/
/* * pANS stdio -- fopen */ #include "iolib.h" FILE *fopen(const char *name, const char *mode){ FILE *f; qlock(&_stdiolk); for(f=_IO_stream;f!=&_IO_stream[FOPEN_MAX];f++) { if(f->state==CLOSED) { qunlock(&_stdiolk); return freopen(name, mode, f); } } qunlock(&_stdiolk); return NULL; }