PowerPC: Fix nearbyint/nearbyintf result for FE_DOWNWARD
[glibc.git] / io / tst-getcwd.c
blob0db4d011461dd1ca5a444f9dd3ea1fde2f335dcc
1 /* Test of getcwd function.
2 Copyright (C) 2000-2014 Free Software Foundation, Inc.
3 This file is part of the GNU C Library.
4 Contributed by Ulrich Drepper <drepper@cygnus.com>, 2000.
6 The GNU C Library is free software; you can redistribute it and/or
7 modify it under the terms of the GNU Lesser General Public
8 License as published by the Free Software Foundation; either
9 version 2.1 of the License, or (at your option) any later version.
11 The GNU C Library is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 Lesser General Public License for more details.
16 You should have received a copy of the GNU Lesser General Public
17 License along with the GNU C Library; if not, see
18 <http://www.gnu.org/licenses/>. */
20 #include <errno.h>
21 #include <stdio.h>
22 #include <stdlib.h>
23 #include <string.h>
24 #include <unistd.h>
25 #include <sys/param.h>
28 #define TEST_FUNCTION do_test ()
29 static int
30 do_test (void)
32 char thepath[4096]; /* Yes, this limits the environment this test
33 can run it but I honestly don't care about
34 people which have this problem. */
35 char *bufs[10];
36 size_t lens[10];
37 size_t sbs;
38 size_t len, i;
40 if (getcwd (thepath, sizeof thepath) == NULL)
42 if (errno == ERANGE)
43 /* The path is too long, skip all tests. */
44 return 0;
46 puts ("getcwd (thepath, sizeof thepath) failed");
47 return 1;
49 len = strlen (thepath);
51 sbs = 1;
52 while (sbs < len + 1)
53 sbs <<= 1;
55 for (i = 0; i < 4; ++i)
57 lens[i] = sbs;
58 bufs[i] = (char *) malloc (sbs);
61 bufs[i] = getcwd (NULL, sbs);
62 lens[i] = sbs;
63 if (bufs[i] == NULL)
65 puts ("getcwd (NULL, sbs) failed");
66 return 1;
68 ++i;
70 for (; i < 10; sbs >>= 1, ++i)
72 bufs[i] = (char *) malloc (MAX (1, sbs));
73 lens[i] = sbs;
76 /* Before we test the result write something in the memory to see
77 whether the allocation went right. */
78 for (i = 0; i < 10; ++i)
79 if (i != 4 && bufs[i] != NULL)
80 memset (bufs[i], '\xff', lens[i]);
82 if (strcmp (thepath, bufs[4]) != 0)
84 printf ("\
85 getcwd (NULL, sbs) = \"%s\", getcwd (thepath, sizeof thepath) = \"%s\"\n",
86 bufs[4], thepath);
87 return 1;
90 /* Now overwrite all buffers to see that getcwd allocated the buffer
91 of right size. */
92 for (i = 0; i < 10; ++i)
93 memset (bufs[i], i, lens[i]);
95 for (i = 0; i < 10; ++i)
96 free (bufs[i]);
98 /* Test whether the function signals success despite the buffer
99 being too small. */
100 if (getcwd (NULL, len) != NULL)
102 puts ("getcwd (NULL, len) didn't failed");
103 return 1;
106 bufs[0] = malloc (len);
107 bufs[1] = malloc (len);
108 bufs[2] = malloc (len);
109 if (bufs[1] != NULL)
111 if (getcwd (bufs[1], len) != NULL)
113 puts ("getcwd (bufs[1], len) didn't failed");
114 return 1;
116 free (bufs[0]);
117 free (bufs[1]);
118 free (bufs[2]);
121 memset (thepath, '\xfe', sizeof (thepath));
122 if (getcwd (thepath, len) != NULL)
124 puts ("getcwd (thepath, len) didn't failed");
125 return 1;
128 for (i = len; i < sizeof thepath; ++i)
129 if (thepath[i] != '\xfe')
131 puts ("thepath[i] != '\xfe'");
132 return 1;
135 /* Now test handling of correctly sized buffers. */
136 bufs[0] = getcwd (NULL, len + 1);
137 if (bufs[0] == NULL)
139 puts ("getcwd (NULL, len + 1) failed");
140 return 1;
142 free (bufs[0]);
144 memset (thepath, '\xff', sizeof thepath);
145 if (getcwd (thepath, len + 1) == NULL)
147 puts ("getcwd (thepath, len + 1) failed");
148 return 1;
151 for (i = len + 1; i < sizeof thepath; ++i)
152 if (thepath[i] != '\xff')
154 printf ("thepath[%zd] != '\xff'\n", i);
155 return 1;
158 puts ("everything OK");
160 return 0;
163 #include "../test-skeleton.c"