--- /dev/null
+#include <stdlib.h>
+#include <stdio.h>
+#include <string.h>
+#include <errno.h>
+#include <limits.h>
+#include <unistd.h>
+#include "test.h"
+
+#define T(f, x, m) do { \
+ r = (f); \
+ if (r != (x)) \
+ error("%s failed (got %d, expected %d, errno \"%s\") (%s)\n", \
+ #f, r, x, errno ? strerror(errno) : "", m); \
+ errno = 0; \
+} while (0)
+
+#define S(s, x, m) do { \
+ if (strcmp(s, x) != 0) \
+ error("got [%s] want [%s] (%s)\n", s, x, m); \
+} while(0)
+
+int main(void)
+{
+ int r, x, y;
+ char a[100], b[100];
+ int p[2];
+ FILE *f;
+
+ T(pipe(p), 0, "open pipe");
+ T(!(f = fdopen(p[0], "rb")), 0, "fdopen pipe");
+ if (!f) {
+ close(p[0]);
+ close(p[1]);
+ return test_status;
+ }
+
+ T(write(p[1], "hello, world\n", 13), 13, "write to pipe");
+ T(fscanf(f, "%s %[own]", a, b), 2, "");
+ S(a, "hello,", "wrong result for %s");
+ S(b, "wo", "wrong result for %[own]");
+ T(fgetc(f), 'r', "fgetc 'r'");
+
+ T(write(p[1], " 0x12 0x34", 10), 10, "");
+ T(fscanf(f, "ld %5i%2i", &x, &y), 1, "");
+ T(x, 0x12, "");
+ T(fgetc(f), '3', "fgetc '3'");
+
+ fclose(f);
+ close(p[1]);
+ return test_status;
+}