ref: fe2b29d13bac3ab3c16490b859f452201c6b4c77
dir: /src/libc/stdio/__putc.c/
#include <errno.h> #include <stdio.h> #include <stdlib.h> #include "../libc.h" static void cleanup(void) { fflush(NULL); } int __putc(int ch, FILE *fp) { static int first = 1; if (fp->flags & _IOERR) return EOF; if (fp->flags & _IOREAD) { fp->flags |= _IOERR; errno = EBADF; return EOF; } if (fp->flags & _IOSTRG) { fp->flags |= _IOERR; return EOF; } if (fp->buf == NULL && _allocbuf(fp)) return EOF; if (first) { if (atexit(cleanup)) { fp->flags |= _IOERR; errno = ENOMEM; return EOF; } first = 0; } if (fp->flags & _IOLBF) { if (fp->wp == fp->lp && _flsbuf(fp)) return EOF; *fp->wp++ = ch; if (ch == '\n' && _flsbuf(fp)) return EOF; } else if (fp->flags & _IOFBF) { if (_flsbuf(fp)) return EOF; *fp->wp++ = ch; fp->rp = fp->buf + fp->len; } else { *fp->wp++ = ch; if (_flsbuf(fp)) return EOF; } fp->flags |= _IOWRITE; return ch & 0xFF; }