Mercurial > hg > octave-lojdl > gnulib-hg
annotate tests/test-areadlinkat.c @ 17149:a49df7b88261
errno: port to LynxOS 178 2.2.2
Problem reported by Joel Brobecker in
<http://lists.gnu.org/archive/html/bug-gnulib/2012-10/msg00088.html>.
* doc/posix-headers/errno.texi (errno.h): Document this.
* lib/errno.in.h (EILSEQ, GNULIB_defined_EILSEQ) [!EILSEQ]: New macros.
* lib/strerror-override.c, lib/strerror-override.h (strerror_override):
Supply a string for EILSEQ.
* m4/errno_h.m4 (gl_HEADER_ERRNO_H): Check for EILSEQ.
| author | Paul Eggert <eggert@cs.ucla.edu> |
|---|---|
| date | Thu, 01 Nov 2012 15:29:14 -0700 |
| parents | 8250f2777afc |
| children | e542fd46ad6f |
| rev | line source |
|---|---|
| 12136 | 1 /* Tests of areadlinkat. |
|
16201
8250f2777afc
maint: update all copyright year number ranges
Jim Meyering <meyering@redhat.com>
parents:
14079
diff
changeset
|
2 Copyright (C) 2009-2012 Free Software Foundation, Inc. |
| 12136 | 3 |
| 4 This program is free software: you can redistribute it and/or modify | |
| 5 it under the terms of the GNU General Public License as published by | |
| 6 the Free Software Foundation; either version 3 of the License, or | |
| 7 (at your option) any later version. | |
| 8 | |
| 9 This program is distributed in the hope that it will be useful, | |
| 10 but WITHOUT ANY WARRANTY; without even the implied warranty of | |
| 11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
| 12 GNU General Public License for more details. | |
| 13 | |
| 14 You should have received a copy of the GNU General Public License | |
| 15 along with this program. If not, see <http://www.gnu.org/licenses/>. */ | |
| 16 | |
| 17 /* Written by Eric Blake <ebb9@byu.net>, 2009. */ | |
| 18 | |
| 19 #include <config.h> | |
| 20 | |
| 21 #include "areadlink.h" | |
| 22 | |
| 23 #include <fcntl.h> | |
| 24 #include <errno.h> | |
| 25 #include <stdbool.h> | |
| 26 #include <stdio.h> | |
| 27 #include <stdlib.h> | |
| 28 #include <string.h> | |
| 29 #include <sys/stat.h> | |
| 30 #include <unistd.h> | |
| 31 | |
|
12842
b2bf8684a2db
tests: silence warning about system return
Eric Blake <ebb9@byu.net>
parents:
12559
diff
changeset
|
32 #include "ignore-value.h" |
|
12496
a48d3d749ca5
Refactor common macros used in tests.
Bruno Haible <bruno@clisp.org>
parents:
12482
diff
changeset
|
33 #include "macros.h" |
| 12136 | 34 |
| 35 #define BASE "test-areadlinkat.t" | |
| 36 | |
| 37 #include "test-areadlink.h" | |
| 38 | |
| 39 static int dfd = AT_FDCWD; | |
| 40 | |
| 41 /* Wrapper for testing areadlinkat. */ | |
| 42 static char * | |
|
12482
11bc92a9e2bc
gnulib-common: prefer _GL_UNUSED over _UNUSED_PARAMETER_
Eric Blake <ebb9@byu.net>
parents:
12197
diff
changeset
|
43 do_areadlinkat (char const *name, size_t ignored _GL_UNUSED) |
| 12136 | 44 { |
| 45 return areadlinkat (dfd, name); | |
| 46 } | |
| 47 | |
| 48 int | |
|
12197
e45d9bb2233e
tests: avoid several compiler warnings
Eric Blake <ebb9@byu.net>
parents:
12146
diff
changeset
|
49 main (void) |
| 12136 | 50 { |
| 51 int result; | |
| 52 | |
| 53 /* Remove any leftovers from a previous partial run. */ | |
|
12842
b2bf8684a2db
tests: silence warning about system return
Eric Blake <ebb9@byu.net>
parents:
12559
diff
changeset
|
54 ignore_value (system ("rm -rf " BASE "*")); |
| 12136 | 55 |
| 56 /* Basic tests. */ | |
| 57 result = test_areadlink (do_areadlinkat, false); | |
| 58 dfd = open (".", O_RDONLY); | |
| 59 ASSERT (0 <= dfd); | |
| 60 ASSERT (test_areadlink (do_areadlinkat, false) == result); | |
| 61 | |
| 62 /* Relative tests. */ | |
| 63 if (result == 77) | |
|
12146
e076a06bae48
maint: prefer 'file system' over 'filesystem'
Eric Blake <ebb9@byu.net>
parents:
12136
diff
changeset
|
64 fputs ("skipping test: symlinks not supported on this file system\n", |
| 12136 | 65 stderr); |
| 66 else | |
| 67 { | |
| 68 char *buf; | |
| 69 ASSERT (symlink ("nowhere", BASE "link") == 0); | |
| 70 ASSERT (mkdir (BASE "dir", 0700) == 0); | |
| 71 ASSERT (chdir (BASE "dir") == 0); | |
| 72 buf = areadlinkat (dfd, BASE "link"); | |
| 73 ASSERT (buf); | |
| 74 ASSERT (strcmp (buf, "nowhere") == 0); | |
| 75 free (buf); | |
| 76 errno = 0; | |
| 77 ASSERT (areadlinkat (-1, BASE "link") == NULL); | |
| 78 ASSERT (errno == EBADF); | |
| 79 errno = 0; | |
| 80 ASSERT (areadlinkat (AT_FDCWD, BASE "link") == NULL); | |
| 81 ASSERT (errno == ENOENT); | |
| 82 ASSERT (chdir ("..") == 0); | |
| 83 ASSERT (rmdir (BASE "dir") == 0); | |
| 84 ASSERT (unlink (BASE "link") == 0); | |
| 85 } | |
| 86 | |
| 87 ASSERT (close (dfd) == 0); | |
| 88 return result; | |
| 89 } |