1 /* Check regression of a bug uncovered by the libio tFile test (old
2    libstdc++, pre-gcc-3.x era), where appending to a file doesn't work.
3    The default open-flags-mapping does not match Linux/CRIS, so a
4    specific mapping is necessary.  */
5 
6 #include <stdio.h>
7 #include <string.h>
8 #include <stdlib.h>
9 
10 int
main(void)11 main (void)
12 {
13   FILE *f;
14   const char fname[] = "sk1test.dat";
15   const char tsttxt1[]
16     = "This is the first and only line of this file.\n";
17   const char tsttxt2[] = "Now there is a second line.\n";
18   char buf[sizeof (tsttxt1) + sizeof (tsttxt2) - 1] = "";
19 
20   f = fopen (fname, "w+");
21   if (f == NULL
22       || fwrite (tsttxt1, 1, strlen (tsttxt1), f) != strlen (tsttxt1)
23       || fclose (f) != 0)
24     {
25       printf ("fail\n");
26       exit (1);
27     }
28 
29   f = fopen (fname, "a+");
30   if (f == NULL
31       || fwrite (tsttxt2, 1, strlen (tsttxt2), f) != strlen (tsttxt2)
32       || fclose (f) != 0)
33     {
34       printf ("fail\n");
35       exit (1);
36     }
37 
38   f = fopen (fname, "r");
39   if (f == NULL
40       || fread (buf, 1, sizeof (buf), f) != sizeof (buf) - 1
41       || strncmp (buf, tsttxt1, strlen (tsttxt1)) != 0
42       || strncmp (buf + strlen (tsttxt1), tsttxt2, strlen (tsttxt2)) != 0
43       || fclose (f) != 0)
44     {
45       printf ("fail\n");
46       exit (1);
47     }
48 
49   printf ("pass\n");
50   exit (0);
51 }
52