ref: 5c448c618a89ab8933838da1b5b97ed7c4a42e08
dir: /sys/src/ape/lib/ap/stdio/tmpfile.c/
/* * This file not used on plan9: see ../plan9/tmpfile.c */ /* * pANS stdio -- tmpfile * * Bug: contains a critical section. Two executions by the same * user could interleave as follows, both yielding the same file: * access fails * access fails * fopen succeeds * fopen succeeds * unlink succeeds * unlink fails * As I read the pANS, this can't reasonably use tmpnam to generate * the name, so that code is duplicated. */ #include "iolib.h" FILE *tmpfile(void){ FILE *f; static char name[]="/tmp/tf000000000000"; char *p; while(access(name, 0)==0){ p=name+7; while(*p=='9') *p++='0'; if(*p=='\0') return NULL; ++*p; } f=fopen(name, "wb+"); unlink(name); return f; }