Update.
[glibc.git] / stdio-common / tst-ungetc.c
blob44cf6a6bf6d89a77e03be01c9f88871a2c5bdc8f
1 /* Test for ungetc bugs. */
3 #include <stdio.h>
4 #include <unistd.h>
6 #undef assert
7 #define assert(x) \
8 if (!(x)) \
9 { \
10 fputs ("test failed: " #x "\n", stderr); \
11 retval = 1; \
12 goto the_end; \
15 int
16 main (int argc, char *argv[])
18 char *name;
19 FILE *fp = NULL;
20 int retval = 0;
21 int c;
22 char buffer[64];
24 name = tmpnam (NULL);
25 fp = fopen (name, "w");
26 assert (fp != NULL)
27 fputs ("bla", fp);
28 fclose (fp);
29 fp = NULL;
31 fp = fopen (name, "r");
32 assert (fp != NULL);
33 assert (ungetc ('z', fp) == 'z');
34 assert (getc (fp) == 'z');
35 assert (getc (fp) == 'b');
36 assert (getc (fp) == 'l');
37 assert (ungetc ('m', fp) == 'm');
38 assert (getc (fp) == 'm');
39 assert ((c = getc (fp)) == 'a');
40 assert (getc (fp) == EOF);
41 assert (ungetc (c, fp) == c);
42 assert (feof (fp) == 0);
43 assert (getc (fp) == c);
44 assert (getc (fp) == EOF);
45 fclose (fp);
46 fp = NULL;
48 fp = fopen (name, "r");
49 assert (fp != NULL);
50 assert (getc (fp) == 'b');
51 assert (getc (fp) == 'l');
52 assert (ungetc ('b', fp) == 'b');
53 assert (fread (buffer, 1, 64, fp) == 2);
54 assert (buffer[0] == 'b');
55 assert (buffer[1] == 'a');
57 the_end:
58 if (fp != NULL)
59 fclose (fp);
60 unlink (name);
62 return retval;