Import sources from 2011-03-30 iso image

1 files changed, 52 insertions, 0 deletions

diff --git a/sys/src/libstdio/fflush.c b/sys/src/libstdio/fflush.c
new file mode 100755
index 000000000..a5a5f0b3c
--- /dev/null
+++ b/sys/src/libstdio/fflush.c
@@ -0,0 +1,52 @@
+/*
+ * pANS stdio -- fflush
+ */
+#include "iolib.h"
+/*
+ * pANS stdio -- data (put here, since loader won't load a separate file)
+ */
+FILE _IO_stream[]={
+/*	fd	flags	state	buf	rp	wp	lp	bufl	unbuf */
+	0,	0,	OPEN,	0,	0,	0,	0,	0,	0,
+	1,	0,	OPEN,	0,	0,	0,	0,	0,	0,
+	2,	0,	OPEN,	0,	0,	0,	0,	0,	0,
+};
+
+int _fflush(FILE *f){
+	int error, cnt;
+
+	if(f==NULL){
+		error=0;
+		for(f=_IO_stream;f!=&_IO_stream[FOPEN_MAX];f++)
+			if(f->state==WR && _fflush(f)==EOF)
+				error=EOF;
+		return error;
+	}
+	if(f->flags&STRING) return EOF;
+	switch(f->state){
+	default:	/* OPEN RDWR EOF RD */
+		return 0;
+	case CLOSED:
+	case ERR:
+		return EOF;
+	case WR:
+		cnt=(f->flags&LINEBUF?f->lp:f->wp)-f->buf;
+		if(cnt && write(f->fd, f->buf, cnt)!=cnt){
+			f->state=ERR;
+			return EOF;
+		}
+		f->rp=f->wp=f->buf;
+		f->state=RDWR;
+		return 0;
+	}
+}
+
+int fflush(FILE *f)
+{
+	int r;
+
+	qlock(&_stdiolk);
+	r = _fflush(f);
+	qunlock(&_stdiolk);
+	return r;
+}