ttyname_r: Make it work on MacOS X 10.4 and Solaris 10.
[pspp] / lib / ttyname_r.c
1 /* Determine name of a terminal.
2
3    Copyright (C) 2010 Free Software Foundation, Inc.
4
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.
9
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.
14
15    You should have received a copy of the GNU General Public License
16    along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
17
18 /* Written by Bruno Haible <bruno@clisp.org>, 2010.  */
19
20 #include <config.h>
21
22 #include <unistd.h>
23
24 #include <errno.h>
25 #include <limits.h>
26 #include <string.h>
27
28 int
29 ttyname_r (int fd, char *buf, size_t buflen)
30 #undef ttyname_r
31 {
32   /* When ttyname_r exists and works, use it.
33      But on Solaris 10, ttyname_r is broken: it returns NULL in situations
34      when ttyname finds the result.  */
35 #if HAVE_TTYNAME_R && !defined __sun
36   /* This code is multithread-safe.  */
37   char *name = ttyname_r (fd, buf, buflen <= INT_MAX ? buflen : INT_MAX);
38   if (name == NULL)
39     return errno;
40   if (name != buf)
41     {
42       size_t namelen = strlen (name) + 1;
43       if (namelen > buflen)
44         return ERANGE;
45       memmove (buf, name, namelen);
46     }
47   return 0;
48 #elif HAVE_TTYNAME
49   /* Note: This is not multithread-safe.  */
50   char *name;
51   size_t namelen;
52
53   name = ttyname (fd);
54   if (name == NULL)
55     return errno;
56   namelen = strlen (name) + 1;
57   if (namelen > buflen)
58     return ERANGE;
59   memcpy (buf, name, namelen);
60   return 0;
61 #else
62   /* Platforms like mingw: no ttys exist at all.  */
63   return ENOTTY;
64 #endif
65 }