2 * Copyright (C) 2011-2020 Free Software Foundation, Inc.
3 * Written by Ben Walton.
5 * This program is free software: you can redistribute it and/or modify
6 * it under the terms of the GNU General Public License as published by
7 * the Free Software Foundation; either version 3 of the License, or
8 * (at your option) any later version.
10 * This program is distributed in the hope that it will be useful,
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 * GNU General Public License for more details.
15 * You should have received a copy of the GNU General Public License
16 * along with this program. If not, see <https://www.gnu.org/licenses/>. */
22 /* for HOST_NAME_MAX */
34 #define TESTHOSTNAME "gnulib-hostname"
36 /* mingw and MSVC 9 lack geteuid, so setup a dummy value.
37 On Cygwin, geteuid() may return non-zero even for user accounts with
38 administrator privileges, so use a dummy value as well. */
39 #if !HAVE_GETEUID || defined __CYGWIN__
40 # define geteuid() ROOT_UID
44 main (int argc
, char *argv
[] _GL_UNUSED
)
46 char origname
[HOST_NAME_MAX
];
47 char newname
[HOST_NAME_MAX
];
48 char longname
[HOST_NAME_MAX
+ 2];
51 /* skip the tests if we don't have root privilege. this does not
52 consider things like CAP_SYS_ADMIN (linux) or PRIV_SYS_ADMIN
53 (solaris), etc. systems without a working geteuid (mingw, MSVC
54 9) will always skip this test. */
55 if (geteuid () != ROOT_UID
)
57 fprintf (stderr
, "Skipping test: insufficient permissions.\n");
61 /* we want to ensure we can do a get/set/get check to ensure the
62 change is accepted. record the current name so it can be restored
64 ASSERT (gethostname (origname
, sizeof (origname
)) == 0);
66 /* try setting a valid hostname. if it fails -1/ENOSYS, we will
67 skip the test for long names as this is an indication we're using
68 the stub function that doesn't do anything on this platform. */
69 rcs
= sethostname (TESTHOSTNAME
, strlen (TESTHOSTNAME
));
73 if (rcs
== -1 && errno
== ENOSYS
)
76 "Skipping test: sethostname is not really implemented.\n");
79 else if (rcs
== -1 && errno
== EPERM
)
81 fprintf (stderr
, "Skipping test: insufficient permissions.\n");
86 fprintf (stderr
, "error setting valid hostname.\n");
92 ASSERT (gethostname (newname
, sizeof (newname
)) == 0);
94 /* On Windows, a hostname change becomes effective only after
96 #if !(defined _WIN32 || defined __CYGWIN__)
98 /* if we don't get back what we put in, there is no need to
99 restore the original name as we will assume it was not
101 if (strcmp (newname
, TESTHOSTNAME
) != 0)
103 fprintf (stderr
, "set/get comparison failed.\n");
109 /* glibc does allow setting a zero length name, so the lower bound
110 needs no test. validate that we are constrained by
112 for (i
= 0; i
< (HOST_NAME_MAX
+ 1); i
++)
117 rcs
= sethostname (longname
, (HOST_NAME_MAX
+ 1));
121 /* attempt to restore the original name. */
122 ASSERT (sethostname (origname
, strlen (origname
)) == 0);
123 fprintf (stderr
, "setting a too long hostname succeeded.\n");
127 /* restore the original name. */
128 ASSERT (sethostname (origname
, strlen (origname
)) == 0);