ref: 8f4053d1efa1ee75a7bea09e624f1134d71a289a
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; }