1 /* Determine name of the slave side of a pseudo-terminal.
2 Copyright (C) 1998, 2002, 2010-2012 Free Software Foundation, Inc.
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.
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.
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/>. */
31 # define _PATH_TTY "/dev/tty"
34 # define _PATH_DEV "/dev/"
37 # define __set_errno(e) errno = (e)
38 # define __isatty isatty
40 # define __ttyname_r ttyname_r
41 # define __ptsname_r ptsname_r
46 /* Get ioctl() and 'struct strioctl'. */
49 # include <sys/stream.h>
50 # include <sys/ptms.h>
51 /* Get the major, minor macros. */
52 # include <sys/sysmacros.h>
56 #if defined _AIX || defined __osf__
57 /* Get ioctl(), ISPTM. */
58 # include <sys/ioctl.h>
59 /* Get the major, minor macros. */
60 # include <sys/sysmacros.h>
65 /* Store at most BUFLEN characters of the pathname of the slave pseudo
66 terminal associated with the master FD is open on in BUF.
67 Return 0 on success, otherwise an error number. */
69 __ptsname_r (int fd, char *buf, size_t buflen)
71 int save_errno = errno;
81 #if defined __sun /* Solaris */
82 if (fstat (fd, &st) < 0)
84 if (!(S_ISCHR (st.st_mode) && major (st.st_rdev) == 0))
90 /* Master ptys can be recognized through a STREAMS ioctl. See
91 "STREAMS-based Pseudo-Terminal Subsystem"
92 <http://docs.oracle.com/cd/E18752_01/html/816-4855/termsub15-44781.html>
93 and "STREAMS ioctl commands"
94 <http://docs.oracle.com/cd/E18752_01/html/816-5177/streamio-7i.html>
96 struct strioctl ioctl_arg;
97 ioctl_arg.ic_cmd = ISPTM;
98 ioctl_arg.ic_timout = 0;
100 ioctl_arg.ic_dp = NULL;
102 if (ioctl (fd, I_STR, &ioctl_arg) < 0)
109 char tmpbuf[9 + 10 + 1];
110 int n = sprintf (tmpbuf, "/dev/pts/%u", minor (st.st_rdev));
116 memcpy (buf, tmpbuf, n + 1);
118 #elif defined _AIX || defined __osf__ /* AIX, OSF/1 */
119 /* This implementation returns /dev/pts/N, like ptsname() does.
120 Whereas the generic implementation below returns /dev/ttypN.
121 Both are correct, but let's be consistent with ptsname(). */
122 if (fstat (fd, &st) < 0)
124 if (!S_ISCHR (st.st_mode))
132 char tmpbuf[9 + 10 + 1];
135 ret = ioctl (fd, ISPTM, &dev);
138 ret = ioctl (fd, ISPTM, NULL);
146 n = sprintf (tmpbuf, "/dev/pts/%u", minor (dev));
152 memcpy (buf, tmpbuf, n + 1);
157 #if ISATTY_FAILS_WITHOUT_SETTING_ERRNO && defined F_GETFL /* IRIX, Solaris */
159 if (fcntl (fd, F_GETFL) != -1)
162 /* We rely on isatty to set errno properly (i.e. EBADF or ENOTTY). */
167 if (buflen < strlen (_PATH_TTY) + 3)
169 __set_errno (ERANGE);
173 err = __ttyname_r (fd, buf, buflen);
180 if (strncmp(buf, "/dev/pts/", strlen("/dev/pts/")) != 0)
181 buf[sizeof (_PATH_DEV) - 1] = 't';
184 if (__stat (buf, &st) < 0)
187 __set_errno (save_errno);