d852fb3658b61f60d67f153c7d69f488b89b76e3
[kopensolaris-gnu/glibc.git] / sysdeps / unix / sysv / linux / ptsname.c
1 /* Copyright (C) 1998 Free Software Foundation, Inc.
2    This file is part of the GNU C Library.
3    Contributed by Zack Weinberg <zack@rabi.phys.columbia.edu>, 1998.
4
5    The GNU C Library is free software; you can redistribute it and/or
6    modify it under the terms of the GNU Library General Public License as
7    published by the Free Software Foundation; either version 2 of the
8    License, or (at your option) any later version.
9
10    The GNU C Library 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 GNU
13    Library General Public License for more details.
14
15    You should have received a copy of the GNU Library General Public
16    License along with the GNU C Library; see the file COPYING.LIB.  If not,
17    write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
18    Boston, MA 02111-1307, USA.  */
19
20 #include <errno.h>
21 #include <paths.h>
22 #include <stdlib.h>
23 #include <string.h>
24 #include <sys/ioctl.h>
25 #include <sys/stat.h>
26 #include <sys/sysmacros.h>
27 #include <termios.h>
28 #include <unistd.h>
29
30 #include <stdio-common/_itoa.h>
31
32 /* Directory where we can find the slave pty nodes.  */
33 #define _PATH_DEVPTS "/dev/pts/"
34
35 /* The are declared in getpt.c.  */
36 extern const char __libc_ptyname1[];
37 extern const char __libc_ptyname2[];
38
39 /* Static buffer for `ptsname'.  */
40 static char buffer[sizeof (_PATH_DEVPTS) + 20];
41
42
43 /* Return the pathname of the pseudo terminal slave assoicated with
44    the master FD is open on, or NULL on errors.
45    The returned storage is good until the next call to this function.  */
46 char *
47 ptsname (int fd)
48 {
49   return __ptsname_r (fd, buffer, sizeof (buffer)) != 0 ? NULL : buffer;
50 }
51
52
53 /* Store at most BUFLEN characters of the pathname of the slave pseudo
54    terminal associated with the master FD is open on in BUF.
55    Return 0 on success, otherwise an error number.  */
56 int
57 __ptsname_r (int fd, char *buf, size_t buflen)
58 {
59   int save_errno = errno;
60   struct stat st;
61   int ptyno;
62
63   if (buf == NULL)
64     {
65       __set_errno (EINVAL);
66       return EINVAL;
67     }
68
69   if (!__isatty (fd))
70     {
71       __set_errno (ENOTTY);
72       return ENOTTY;
73     }
74
75 #ifdef TIOCGPTN
76   if (__ioctl (fd, TIOCGPTN, &ptyno) == 0)
77     {
78       /* Buffer we use to print the number in.  For a maximum size for
79          `int' of 8 bytes we never need more than 20 digits.  */
80       char numbuf[21];
81       const char *devpts = _PATH_DEVPTS;
82       const size_t devptslen = strlen (devpts);
83       char *p;
84
85       numbuf[20] = '\0';
86       p = _itoa_word (ptyno, &numbuf[20], 10, 0);
87
88       if (buflen < devptslen + strlen (p) + 1)
89         {
90           __set_errno (ERANGE);
91           return ERANGE;
92         }
93
94       __stpcpy (__stpcpy (buf, devpts), p);
95     }
96   else if (errno == EINVAL)
97 #endif
98     {
99       char *p;
100
101       if (buflen < strlen (_PATH_TTY) + 3)
102         {
103           __set_errno (ERANGE);
104           return ERANGE;
105         }
106
107       if (__fstat (fd, &st) < 0)
108         return errno;
109
110       ptyno = minor (st.st_rdev);
111       if (major (st.st_rdev) == 4)
112         ptyno -= 128;
113
114       if (ptyno / 16 >= strlen (__libc_ptyname1))
115         {
116           __set_errno (ENOTTY);
117           return ENOTTY;
118         }
119
120       p = __stpcpy (buf, _PATH_TTY);
121       p[0] = __libc_ptyname1[ptyno / 16];
122       p[1] = __libc_ptyname2[ptyno % 16];
123       p[2] = '\0';
124     }
125
126   if (__stat (buf, &st) < 0)
127     return errno;
128
129   __set_errno (save_errno);
130   return 0;
131 }
132 weak_alias (__ptsname_r, ptsname_r)