This source file includes following definitions.
- main
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19 #include <config.h>
20
21
22
23 #define _GL_NO_LARGE_FILES
24 #include <stdio.h>
25
26 #include "signature.h"
27 SIGNATURE_CHECK (ftell, long, (FILE *));
28
29 #include "binary-io.h"
30 #include "macros.h"
31
32 #ifndef FUNC_UNGETC_BROKEN
33 # define FUNC_UNGETC_BROKEN 0
34 #endif
35
36 int
37 main (int argc, char **argv)
38 {
39 int ch;
40
41 if (argc == 1)
42 {
43 ASSERT (ftell (stdin) == -1);
44 return 0;
45 }
46
47
48 set_binary_mode (0, O_BINARY);
49
50
51 ASSERT (ftell (stdin) == 0);
52
53 ch = fgetc (stdin);
54 ASSERT (ch == '#');
55 ASSERT (ftell (stdin) == 1);
56
57
58 ch = ungetc ('#', stdin);
59 ASSERT (ch == '#');
60 ASSERT (ftell (stdin) == 0);
61
62 ch = fgetc (stdin);
63 ASSERT (ch == '#');
64 ASSERT (ftell (stdin) == 1);
65
66
67 ASSERT (fseek (stdin, 2, SEEK_SET) == 0);
68 ASSERT (ftell (stdin) == 2);
69
70
71 ch = fgetc (stdin);
72 ASSERT (ch == '/');
73 ch = ungetc ('@', stdin);
74 ASSERT (ch == '@');
75 ASSERT (ftell (stdin) == 2);
76
77 ch = fgetc (stdin);
78 ASSERT (ch == '@');
79 ASSERT (ftell (stdin) == 3);
80
81 if (2 < argc)
82 {
83 if (FUNC_UNGETC_BROKEN)
84 {
85 fputs ("Skipping test: ungetc cannot handle arbitrary bytes\n",
86 stderr);
87 return 77;
88 }
89
90 ASSERT (fseek (stdin, 0, SEEK_CUR) == 0);
91 ASSERT (ftell (stdin) == 3);
92
93 ch = ungetc ('~', stdin);
94 ASSERT (ch == '~');
95 ASSERT (ftell (stdin) == 2);
96 }
97
98 #if !defined __MINT__
99
100 ASSERT (fseek (stdin, 0, SEEK_END) == 0);
101 ch = ftell (stdin);
102 ASSERT (fseek (stdin, 10, SEEK_END) == 0);
103 ASSERT (ftell (stdin) == ch + 10);
104 #endif
105
106 return 0;
107 }