Updated from GMP 1.906.7
[kopensolaris-gnu/glibc.git] / sysdeps / posix / ttyname_r.c
1 /* Copyright (C) 1991, 1992, 1993, 1995 Free Software Foundation, Inc.
2 This file is part of the GNU C Library.
3
4 The GNU C Library is free software; you can redistribute it and/or
5 modify it under the terms of the GNU Library General Public License as
6 published by the Free Software Foundation; either version 2 of the
7 License, or (at your option) any later version.
8
9 The GNU C Library 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 GNU
12 Library General Public License for more details.
13
14 You should have received a copy of the GNU Library General Public
15 License along with the GNU C Library; see the file COPYING.LIB.  If
16 not, write to the Free Software Foundation, Inc., 675 Mass Ave,
17 Cambridge, MA 02139, USA.  */
18
19 #include <errno.h>
20 #include <limits.h>
21 #include <stddef.h>
22 #include <dirent.h>
23 #include <sys/types.h>
24 #include <sys/stat.h>
25 #include <unistd.h>
26 #include <string.h>
27 #include <stdlib.h>
28
29 #ifndef MIN
30 # define MIN(a, b) ((a) < (b) ? (a) : (b))
31 #endif
32
33 /* Store at most BUFLEN character of the pathname of the terminal FD is
34    open on in BUF.  Return 0 on success, -1 otherwise.  */
35 int
36 ttyname_r (fd, buf, buflen)
37      int fd;
38      char *buf;
39      int buflen;
40 {
41   static const char dev[] = "/dev";
42   struct stat st;
43   dev_t mydev;
44   ino_t myino;
45   DIR *dirstream;
46   struct dirent *d;
47   int save = errno;
48
49   /* Test for the absolute minimal size.  This makes life easier inside
50      the loop.  */
51   if (buflen < sizeof (dev) + 2)
52     {
53       errno = EINVAL;
54       return -1;
55     }
56
57   if (fstat (fd, &st) < 0)
58     return -1;
59   mydev = st.st_dev;
60   myino = st.st_ino;
61
62   dirstream = opendir (dev);
63   if (dirstream == NULL)
64     return -1;
65
66   /* Prepare the result buffer.  */
67   memcpy (buf, dev, sizeof (dev));
68   buf[sizeof (dev)] = '/';
69   buflen -= sizeof (dev) + 1;
70
71   while ((d = readdir (dirstream)) != NULL)
72     if (d->d_fileno == myino)
73       {
74         char *cp;
75
76         cp = stpncpy (&buf[sizeof (dev) + 1], d->d_name,
77                       MIN (d->d_namlen + 1, buflen));
78         cp[0] = '\0';
79
80         if (stat (buf, &st) == 0 && st.st_dev == mydev)
81           {
82             (void) closedir (dirstream);
83             errno = save;
84             return 0;
85           }
86       }
87
88   (void) closedir (dirstream);
89   errno = save;
90   return -1;
91 }