1219b2ee8SDavid du Colombier #pragma src "/sys/src/libstdio" 23e12c5d1SDavid du Colombier #pragma lib "libstdio.a" 33e12c5d1SDavid du Colombier 43e12c5d1SDavid du Colombier /* 5*22df390cSDavid du Colombier * pANS stdio.h 63e12c5d1SDavid du Colombier */ 73e12c5d1SDavid du Colombier /* 83e12c5d1SDavid du Colombier * According to X3J11, there is only one i/o buffer 93e12c5d1SDavid du Colombier * and it must not be occupied by both input and output data. 10*22df390cSDavid du Colombier * 113e12c5d1SDavid du Colombier * If rp<wp, we must have state==RD and 123e12c5d1SDavid du Colombier * if wp<rp, we must have state==WR, so that getc and putc work correctly. 13*22df390cSDavid du Colombier * On open, rp, wp and buf are set to 0, so first getc or putc will call 14*22df390cSDavid du Colombier * _IO_getc or _IO_putc, which will allocate the buffer. 153e12c5d1SDavid du Colombier * If setvbuf(., ., _IONBF, .) is called, bufl is set to 0 and 163e12c5d1SDavid du Colombier * buf, rp and wp are pointed at unbuf. 17*22df390cSDavid du Colombier * If setvbuf(., ., _IOLBF, .) is called, _IO_putc leaves wp and rp pointed at 18*22df390cSDavid du Colombier * the end of the buffer so that it can be called on each putc to check whether 19*22df390cSDavid du Colombier * it's got a newline. This nonsense is in order to avoid impacting performance 20*22df390cSDavid du Colombier * of the other buffering modes more than necessary -- putting the test in putc 21*22df390cSDavid du Colombier * adds many instructions that are wasted in non-_IOLBF mode: 223e12c5d1SDavid du Colombier * #define putc(c, f) (_IO_ctmp=(c),\ 23*22df390cSDavid du Colombier * (f)->wp>=(f)->rp || (f)->flags&LINEBUF && _IO_ctmp=='\n'?\ 24*22df390cSDavid du Colombier * _IO_putc(_IO_ctmp, f): *(f)->wp++=_IO_ctmp) 253e12c5d1SDavid du Colombier */ 263e12c5d1SDavid du Colombier typedef struct{ 273e12c5d1SDavid du Colombier int fd; /* UNIX file pointer */ 283e12c5d1SDavid du Colombier char flags; /* bits for must free buffer on close, line-buffered */ 293e12c5d1SDavid du Colombier char state; /* last operation was read, write, position, error, eof */ 30*22df390cSDavid du Colombier unsigned char *buf; /* pointer to i/o buffer */ 31*22df390cSDavid du Colombier unsigned char *rp; /* read pointer (or write end-of-buffer) */ 32*22df390cSDavid du Colombier unsigned char *wp; /* write pointer (or read end-of-buffer) */ 33*22df390cSDavid du Colombier unsigned char *lp; /* actual write pointer used when line-buffering */ 343e12c5d1SDavid du Colombier long bufl; /* actual length of buffer */ 35*22df390cSDavid du Colombier unsigned char unbuf[1]; /* tiny buffer for unbuffered io (used for ungetc?) */ 36*22df390cSDavid du Colombier int junk; 373e12c5d1SDavid du Colombier }FILE; 38*22df390cSDavid du Colombier 39*22df390cSDavid du Colombier typedef long long fpos_t; 40*22df390cSDavid du Colombier 413e12c5d1SDavid du Colombier #ifndef NULL 42f19e7b74SDavid du Colombier #define NULL ((void*)0) 433e12c5d1SDavid du Colombier #endif 44*22df390cSDavid du Colombier 453e12c5d1SDavid du Colombier /* 463e12c5d1SDavid du Colombier * Third arg of setvbuf 473e12c5d1SDavid du Colombier */ 483e12c5d1SDavid du Colombier #define _IOFBF 1 /* block-buffered */ 493e12c5d1SDavid du Colombier #define _IOLBF 2 /* line-buffered */ 503e12c5d1SDavid du Colombier #define _IONBF 3 /* unbuffered */ 51*22df390cSDavid du Colombier 52*22df390cSDavid du Colombier #define BUFSIZ 8192 /* size of setbuf buffer */ 533e12c5d1SDavid du Colombier #define EOF (-1) /* returned on end of file */ 54*22df390cSDavid du Colombier #define FOPEN_MAX 128 /* max files open */ 553e12c5d1SDavid du Colombier #define FILENAME_MAX BUFSIZ /* silly filename length */ 563e12c5d1SDavid du Colombier #define L_tmpnam 20 /* sizeof "/tmp/abcdefghij9999 */ 573e12c5d1SDavid du Colombier #define SEEK_CUR 1 583e12c5d1SDavid du Colombier #define SEEK_END 2 593e12c5d1SDavid du Colombier #define SEEK_SET 0 603e12c5d1SDavid du Colombier #define TMP_MAX 64 /* very hard to set correctly */ 61*22df390cSDavid du Colombier 623e12c5d1SDavid du Colombier #define stderr (&_IO_stream[2]) 633e12c5d1SDavid du Colombier #define stdin (&_IO_stream[0]) 643e12c5d1SDavid du Colombier #define stdout (&_IO_stream[1]) 65*22df390cSDavid du Colombier 66*22df390cSDavid du Colombier extern FILE _IO_stream[FOPEN_MAX]; 67*22df390cSDavid du Colombier 68*22df390cSDavid du Colombier int _IO_getc(FILE *f); 69*22df390cSDavid du Colombier int _IO_putc(int, FILE *); 70*22df390cSDavid du Colombier void clearerr(FILE *); 713e12c5d1SDavid du Colombier int fclose(FILE *); 723e12c5d1SDavid du Colombier FILE *fdopen(const int, const char *); 73*22df390cSDavid du Colombier int feof(FILE *); 74*22df390cSDavid du Colombier int ferror(FILE *); 75*22df390cSDavid du Colombier int fflush(FILE *); 763e12c5d1SDavid du Colombier int fgetc(FILE *); 77*22df390cSDavid du Colombier int fgetpos(FILE *, fpos_t *); 783e12c5d1SDavid du Colombier char *fgets(char *, int, FILE *); 79*22df390cSDavid du Colombier int fileno(FILE *); 80*22df390cSDavid du Colombier FILE *fopen(const char *, const char *); 81*22df390cSDavid du Colombier int fprintf(FILE *, const char *, ...); 823e12c5d1SDavid du Colombier int fputc(int, FILE *); 833e12c5d1SDavid du Colombier int fputs(const char *, FILE *); 843e12c5d1SDavid du Colombier long fread(void *, long, long, FILE *); 85*22df390cSDavid du Colombier FILE *freopen(const char *, const char *, FILE *); 86*22df390cSDavid du Colombier int fscanf(FILE *, const char *, ...); 87dc5a79c1SDavid du Colombier int fseek(FILE *, long, int); 88dc5a79c1SDavid du Colombier int fseeko(FILE *, long long, int); 893e12c5d1SDavid du Colombier int fsetpos(FILE *, const fpos_t *); 90dc5a79c1SDavid du Colombier long ftell(FILE *); 91dc5a79c1SDavid du Colombier long long ftello(FILE *); 92*22df390cSDavid du Colombier long fwrite(const void *, long, long, FILE *); 93*22df390cSDavid du Colombier int getc(FILE *); 94*22df390cSDavid du Colombier #define getc(f) ((f)->rp>=(f)->wp?_IO_getc(f):*(f)->rp++) 95*22df390cSDavid du Colombier int getchar(void); 96*22df390cSDavid du Colombier #define getchar() getc(stdin) 97*22df390cSDavid du Colombier char *gets(char *); 983e12c5d1SDavid du Colombier void perror(const char *); 99*22df390cSDavid du Colombier int printf(const char *, ...); 100*22df390cSDavid du Colombier int putc(int, FILE *); 101*22df390cSDavid du Colombier /* assignment to f->junk eliminates warnings about unused result of operation */ 102*22df390cSDavid du Colombier #define putc(c, f) ((f)->junk = ((f)->wp>=(f)->rp? \ 103*22df390cSDavid du Colombier _IO_putc(c, f): (*(f)->wp++ = (c)))) 104*22df390cSDavid du Colombier int putchar(int); 105*22df390cSDavid du Colombier #define putchar(c) putc(c, stdout) 106*22df390cSDavid du Colombier int puts(const char *); 107*22df390cSDavid du Colombier void rewind(FILE *); 108*22df390cSDavid du Colombier int scanf(const char *, ...); 109*22df390cSDavid du Colombier char *sclose(FILE *); 110*22df390cSDavid du Colombier void setbuf(FILE *, void *); 111*22df390cSDavid du Colombier int setvbuf(FILE *, void *, int, long); 112*22df390cSDavid du Colombier int snprintf(char *, int, const char *, ...); 1133e12c5d1SDavid du Colombier FILE *sopenr(const char *); 1143e12c5d1SDavid du Colombier FILE *sopenw(void); 115*22df390cSDavid du Colombier int sprintf(char *, const char *, ...); 116*22df390cSDavid du Colombier int sscanf(const char *, const char *, ...); 117*22df390cSDavid du Colombier FILE *tmpfile(void); 118*22df390cSDavid du Colombier char *tmpnam(char *); 119*22df390cSDavid du Colombier int ungetc(int, FILE *); 120*22df390cSDavid du Colombier int vfprintf(FILE *, const char *, va_list); 121*22df390cSDavid du Colombier int vfscanf(FILE *, const char *, va_list); 122*22df390cSDavid du Colombier int vprintf(const char *, va_list); 123*22df390cSDavid du Colombier int vsnprintf(char *, int, const char *, va_list); 124*22df390cSDavid du Colombier int vsprintf(char *, const char *, va_list); 125