ref: 192c1fd73a54870f8736908886d7fe0905e5ec58
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; }