Import sources from 2011-03-30 iso image

1 files changed, 30 insertions, 0 deletions

diff --git a/sys/src/ape/lib/ap/stdio/_IO_getc.c b/sys/src/ape/lib/ap/stdio/_IO_getc.c
new file mode 100755
index 000000000..3f99922c2
--- /dev/null
+++ b/sys/src/ape/lib/ap/stdio/_IO_getc.c
@@ -0,0 +1,30 @@
+/*
+ * pANS stdio -- _IO_getc
+ */
+#include "iolib.h"
+int _IO_getc(FILE *f){
+	int cnt, n;
+	switch(f->state){
+	default:	/* CLOSED, WR, ERR, EOF */
+		return EOF;
+	case OPEN:
+		_IO_setvbuf(f);
+	case RDWR:
+	case RD:
+		if(f->flags&STRING) return EOF;
+		if(f->buf == f->unbuf)
+			n = 1;
+		else
+			n = f->bufl;
+		cnt=read(f->fd, f->buf, n);
+		switch(cnt){
+		case -1: f->state=ERR; return EOF;
+		case 0: f->state=END; return EOF;
+		default:
+			f->state=RD;
+			f->rp=f->buf;
+			f->wp=f->buf+cnt;
+			return (*f->rp++)&_IO_CHMASK;
+		}
+	}
+}