1 /* Test the gnulib getprogname module.
2    Copyright (C) 2016-2018 Free Software Foundation, Inc.
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 <https://www.gnu.org/licenses/>.  */
16 
17 #include <config.h>
18 
19 #include "getprogname.h"
20 #include <string.h>
21 #include <assert.h>
22 
23 #ifdef __hpux
24 # define STREQ(a, b) (strncmp (a, b, 14) == 0)
25 #else
26 # define STREQ(a, b) (strcmp (a, b) == 0)
27 #endif
28 
29 int
main(void)30 main (void)
31 {
32   char const *p = getprogname ();
33 
34   /* libtool creates a temporary executable whose name is sometimes prefixed
35      with "lt-" (depends on the platform).  But the name of the temporary
36      executable is a detail that should not be visible to the end user and to
37      the test suite.  Remove this "lt-" prefix here.  */
38   if (strncmp (p, "lt-", 3) == 0)
39     p += 3;
40 
41   /* Note: You can make this test fail
42      a) by running it on a case-insensitive file system (such as on Windows,
43         Cygwin, or on Mac OS X with a case-insensitive HFS+ file system),
44         with an invocation that contains upper case characters, e.g.
45         test-GETPROGNAME,
46      b) by hardlinking or symlinking it to a different name (e.g. test-foo)
47         and invoking it through that name.
48      That's not the intended use. The Makefile always invokes it as
49      'test-getprogname${EXEEXT}'. */
50 #if defined __CYGWIN__
51   /* The Cygwin getprogname() function strips the ".exe" suffix. */
52   assert (STREQ (p, "test-getprogname"));
53 #else
54   assert (STREQ (p, "test-getprogname" EXEEXT));
55 #endif
56 
57   return 0;
58 }
59