annotate tests/test-freadahead.c @ 12496:a48d3d749ca5

Refactor common macros used in tests.
author Bruno Haible <bruno@clisp.org>
date Thu, 24 Dec 2009 21:01:42 +0100
parents e8d2c6fc33ad
children c2cbabec01dd
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
9159
e21121c06cf2 Tests for module 'freadahead'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
1 /* Test of freadahead() function.
12496
a48d3d749ca5 Refactor common macros used in tests.
Bruno Haible <bruno@clisp.org>
parents: 12421
diff changeset
2 Copyright (C) 2007-2009 Free Software Foundation, Inc.
9159
e21121c06cf2 Tests for module 'freadahead'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
3
9309
bbbbbf4cd1c5 Change copyright notice from GPLv2+ to GPLv3+.
Bruno Haible <bruno@clisp.org>
parents: 9159
diff changeset
4 This program is free software: you can redistribute it and/or modify
9159
e21121c06cf2 Tests for module 'freadahead'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
5 it under the terms of the GNU General Public License as published by
9309
bbbbbf4cd1c5 Change copyright notice from GPLv2+ to GPLv3+.
Bruno Haible <bruno@clisp.org>
parents: 9159
diff changeset
6 the Free Software Foundation; either version 3 of the License, or
bbbbbf4cd1c5 Change copyright notice from GPLv2+ to GPLv3+.
Bruno Haible <bruno@clisp.org>
parents: 9159
diff changeset
7 (at your option) any later version.
9159
e21121c06cf2 Tests for module 'freadahead'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
8
e21121c06cf2 Tests for module 'freadahead'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
9 This program is distributed in the hope that it will be useful,
e21121c06cf2 Tests for module 'freadahead'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
e21121c06cf2 Tests for module 'freadahead'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
e21121c06cf2 Tests for module 'freadahead'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
12 GNU General Public License for more details.
e21121c06cf2 Tests for module 'freadahead'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
13
e21121c06cf2 Tests for module 'freadahead'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
14 You should have received a copy of the GNU General Public License
9309
bbbbbf4cd1c5 Change copyright notice from GPLv2+ to GPLv3+.
Bruno Haible <bruno@clisp.org>
parents: 9159
diff changeset
15 along with this program. If not, see <http://www.gnu.org/licenses/>. */
9159
e21121c06cf2 Tests for module 'freadahead'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
16
e21121c06cf2 Tests for module 'freadahead'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
17 /* Written by Bruno Haible <bruno@clisp.org>, 2007. */
e21121c06cf2 Tests for module 'freadahead'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
18
e21121c06cf2 Tests for module 'freadahead'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
19 #include <config.h>
e21121c06cf2 Tests for module 'freadahead'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
20
e21121c06cf2 Tests for module 'freadahead'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
21 #include "freadahead.h"
e21121c06cf2 Tests for module 'freadahead'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
22
e21121c06cf2 Tests for module 'freadahead'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
23 #include <stdlib.h>
e21121c06cf2 Tests for module 'freadahead'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
24 #include <unistd.h>
e21121c06cf2 Tests for module 'freadahead'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
25
12496
a48d3d749ca5 Refactor common macros used in tests.
Bruno Haible <bruno@clisp.org>
parents: 12421
diff changeset
26 #include "macros.h"
9159
e21121c06cf2 Tests for module 'freadahead'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
27
e21121c06cf2 Tests for module 'freadahead'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
28 int
e21121c06cf2 Tests for module 'freadahead'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
29 main (int argc, char **argv)
e21121c06cf2 Tests for module 'freadahead'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
30 {
e21121c06cf2 Tests for module 'freadahead'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
31 int nbytes = atoi (argv[1]);
e21121c06cf2 Tests for module 'freadahead'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
32 if (nbytes > 0)
e21121c06cf2 Tests for module 'freadahead'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
33 {
e21121c06cf2 Tests for module 'freadahead'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
34 void *buf = malloc (nbytes);
e21121c06cf2 Tests for module 'freadahead'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
35 ASSERT (fread (buf, 1, nbytes, stdin) == nbytes);
e21121c06cf2 Tests for module 'freadahead'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
36 }
e21121c06cf2 Tests for module 'freadahead'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
37
e21121c06cf2 Tests for module 'freadahead'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
38 if (nbytes == 0)
e21121c06cf2 Tests for module 'freadahead'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
39 ASSERT (freadahead (stdin) == 0);
e21121c06cf2 Tests for module 'freadahead'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
40 else
e21121c06cf2 Tests for module 'freadahead'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
41 {
e21121c06cf2 Tests for module 'freadahead'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
42 if (lseek (0, 0, SEEK_CUR) == nbytes)
12421
e8d2c6fc33ad Use spaces for indentation, not tabs.
Bruno Haible <bruno@clisp.org>
parents: 9889
diff changeset
43 /* An unbuffered stdio, such as BeOS or on uClibc compiled without
e8d2c6fc33ad Use spaces for indentation, not tabs.
Bruno Haible <bruno@clisp.org>
parents: 9889
diff changeset
44 __STDIO_BUFFERS. */
e8d2c6fc33ad Use spaces for indentation, not tabs.
Bruno Haible <bruno@clisp.org>
parents: 9889
diff changeset
45 ASSERT (freadahead (stdin) == 0);
9159
e21121c06cf2 Tests for module 'freadahead'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
46 else
12421
e8d2c6fc33ad Use spaces for indentation, not tabs.
Bruno Haible <bruno@clisp.org>
parents: 9889
diff changeset
47 {
e8d2c6fc33ad Use spaces for indentation, not tabs.
Bruno Haible <bruno@clisp.org>
parents: 9889
diff changeset
48 /* Normal buffered stdio. */
e8d2c6fc33ad Use spaces for indentation, not tabs.
Bruno Haible <bruno@clisp.org>
parents: 9889
diff changeset
49 size_t buffered;
e8d2c6fc33ad Use spaces for indentation, not tabs.
Bruno Haible <bruno@clisp.org>
parents: 9889
diff changeset
50 int c, c2;
9780
cf325a112b9d Take into account the number of pushed-back bytes (ungetc).
Bruno Haible <bruno@clisp.org>
parents: 9309
diff changeset
51
12421
e8d2c6fc33ad Use spaces for indentation, not tabs.
Bruno Haible <bruno@clisp.org>
parents: 9889
diff changeset
52 ASSERT (freadahead (stdin) != 0);
e8d2c6fc33ad Use spaces for indentation, not tabs.
Bruno Haible <bruno@clisp.org>
parents: 9889
diff changeset
53 buffered = freadahead (stdin);
9780
cf325a112b9d Take into account the number of pushed-back bytes (ungetc).
Bruno Haible <bruno@clisp.org>
parents: 9309
diff changeset
54
12421
e8d2c6fc33ad Use spaces for indentation, not tabs.
Bruno Haible <bruno@clisp.org>
parents: 9889
diff changeset
55 c = fgetc (stdin);
e8d2c6fc33ad Use spaces for indentation, not tabs.
Bruno Haible <bruno@clisp.org>
parents: 9889
diff changeset
56 ASSERT (freadahead (stdin) == buffered - 1);
e8d2c6fc33ad Use spaces for indentation, not tabs.
Bruno Haible <bruno@clisp.org>
parents: 9889
diff changeset
57 ungetc (c, stdin);
e8d2c6fc33ad Use spaces for indentation, not tabs.
Bruno Haible <bruno@clisp.org>
parents: 9889
diff changeset
58 ASSERT (freadahead (stdin) == buffered);
e8d2c6fc33ad Use spaces for indentation, not tabs.
Bruno Haible <bruno@clisp.org>
parents: 9889
diff changeset
59 c2 = fgetc (stdin);
e8d2c6fc33ad Use spaces for indentation, not tabs.
Bruno Haible <bruno@clisp.org>
parents: 9889
diff changeset
60 ASSERT (c2 == c);
e8d2c6fc33ad Use spaces for indentation, not tabs.
Bruno Haible <bruno@clisp.org>
parents: 9889
diff changeset
61 ASSERT (freadahead (stdin) == buffered - 1);
9780
cf325a112b9d Take into account the number of pushed-back bytes (ungetc).
Bruno Haible <bruno@clisp.org>
parents: 9309
diff changeset
62
12421
e8d2c6fc33ad Use spaces for indentation, not tabs.
Bruno Haible <bruno@clisp.org>
parents: 9889
diff changeset
63 c = '@';
e8d2c6fc33ad Use spaces for indentation, not tabs.
Bruno Haible <bruno@clisp.org>
parents: 9889
diff changeset
64 ungetc (c, stdin);
e8d2c6fc33ad Use spaces for indentation, not tabs.
Bruno Haible <bruno@clisp.org>
parents: 9889
diff changeset
65 ASSERT (freadahead (stdin) == buffered);
e8d2c6fc33ad Use spaces for indentation, not tabs.
Bruno Haible <bruno@clisp.org>
parents: 9889
diff changeset
66 c2 = fgetc (stdin);
e8d2c6fc33ad Use spaces for indentation, not tabs.
Bruno Haible <bruno@clisp.org>
parents: 9889
diff changeset
67 ASSERT (c2 == c);
e8d2c6fc33ad Use spaces for indentation, not tabs.
Bruno Haible <bruno@clisp.org>
parents: 9889
diff changeset
68 ASSERT (freadahead (stdin) == buffered - 1);
e8d2c6fc33ad Use spaces for indentation, not tabs.
Bruno Haible <bruno@clisp.org>
parents: 9889
diff changeset
69 }
9159
e21121c06cf2 Tests for module 'freadahead'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
70 }
e21121c06cf2 Tests for module 'freadahead'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
71
e21121c06cf2 Tests for module 'freadahead'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
72 return 0;
e21121c06cf2 Tests for module 'freadahead'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
73 }