S/390: Add hwcap value for transactional execution.
[platform/upstream/glibc.git] / misc / tst-dirname.c
1 /* Test program for dirname function a la XPG.
2    Copyright (C) 1996, 2000, 2001, 2002 Free Software Foundation, Inc.
3    This file is part of the GNU C Library.
4    Contributed by Ulrich Drepper <drepper@cygnus.com>, 1996.
5
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.
10
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.
15
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/>.  */
19
20 #define _GNU_SOURCE     1
21 #include <libgen.h>
22 #include <stdio.h>
23 #include <string.h>
24
25
26 static int
27 test (const char *input, const char *result)
28 {
29   int retval;
30   char *cp;
31   cp = strdupa (input);
32   cp = dirname (cp);
33   retval = strcmp (cp, result);
34   if (retval)
35     printf ("dirname(\"%s\") should be \"%s\", but is \"%s\"\n",
36             input, result, cp);
37   return retval;
38 }
39
40 int
41 main (void)
42 {
43   int result = 0;
44
45   /* These are the examples given in XPG4.2.  */
46   result |= test ("/usr/lib", "/usr");
47   result |= test ("/usr/", "/");
48   result |= test ("usr", ".");
49   result |= test ("/", "/");
50   result |= test (".", ".");
51   result |= test ("..", ".");
52
53   /* Some more tests.   */
54   result |= test ("/usr/lib/", "/usr");
55   result |= test ("/usr", "/");
56   result |= test ("a//", ".");
57   result |= test ("a////", ".");
58   result |= test ("////usr", "/");
59   result |= test ("////usr//", "/");
60   result |= test ("//usr", "//");
61   result |= test ("//usr//", "//");
62   result |= test ("//", "//");
63
64   /* Other Unix implementations behave like this.  */
65   result |= test ("x///y", "x");
66   result |= test ("x/////y", "x");
67
68   return result != 0;
69 }