/* Open a pseudo-terminal.
Copyright (C) 2010-2011 Free Software Foundation, Inc.
This program is free software: you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation; either version 3 of the License, or
(at your option) any later version.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with this program. If not, see . */
#include
/* Specification. */
#include
#if HAVE_OPENPTY
/* Provide a wrapper with the prototype of glibc-2.8 and newer. */
# undef openpty
int
rpl_openpty (int *amaster, int *aslave, char *name,
struct termios const *termp, struct winsize const *winp)
{
/* Cast away const, for implementations with weaker prototypes. */
return openpty (amaster, aslave, name, (struct termios *) termp,
(struct winsize *) winp);
}
#else /* AIX 5.1, HP-UX 11, IRIX 6.5, Solaris 10, mingw */
# include
# include
# include
# include
# include
# if defined __sun || defined __hpux /* Solaris, HP-UX */
# include
# endif
int
openpty (int *amaster, int *aslave, char *name,
struct termios const *termp, struct winsize const *winp)
{
int master;
char *slave_name;
int slave;
# if HAVE__GETPTY /* IRIX */
slave_name = _getpty (&master, O_RDWR, 0622, 0);
if (slave_name == NULL)
return -1;
# else /* AIX 5.1, HP-UX 11, Solaris 10, mingw */
# if HAVE_POSIX_OPENPT /* Solaris 10 */
master = posix_openpt (O_RDWR | O_NOCTTY);
if (master < 0)
return -1;
# else /* AIX 5.1, HP-UX 11, Solaris 9, mingw */
# ifdef _AIX /* AIX */
master = open ("/dev/ptc", O_RDWR | O_NOCTTY);
if (master < 0)
return -1;
# else /* HP-UX 11, Solaris 9, mingw */
/* HP-UX, Solaris have /dev/ptmx.
HP-UX also has /dev/ptym/clone, but this should not be needed.
Linux also has /dev/ptmx, but Linux already has openpty().
MacOS X also has /dev/ptmx, but MacOS X already has openpty().
OSF/1 also has /dev/ptmx and /dev/ptmx_bsd, but OSF/1 already has
openpty(). */
master = open ("/dev/ptmx", O_RDWR | O_NOCTTY);
if (master < 0)
return -1;
# endif
# endif
/* If all this does not work, we could try to open, one by one:
- On MacOS X: /dev/pty[p-w][0-9a-f]
- On *BSD: /dev/pty[p-sP-S][0-9a-v]
- On AIX: /dev/ptyp[0-9a-f]
- On HP-UX: /dev/pty[p-r][0-9a-f]
- On OSF/1: /dev/pty[p-q][0-9a-f]
- On Solaris: /dev/pty[p-r][0-9a-f]
*/
# endif
/* This call does not require a dependency to the 'grantpt' module,
because AIX, HP-UX, IRIX, Solaris all have the grantpt() function. */
if (grantpt (master))
goto fail;
/* This call does not require a dependency to the 'unlockpt' module,
because AIX, HP-UX, IRIX, Solaris all have the unlockpt() function. */
if (unlockpt (master))
goto fail;
# if !HAVE__GETPTY /* !IRIX */
slave_name = ptsname (master);
if (slave_name == NULL)
goto fail;
# endif
slave = open (slave_name, O_RDWR | O_NOCTTY);
if (slave == -1)
goto fail;
# if defined __sun || defined __hpux /* Solaris, HP-UX */
if (ioctl (slave, I_PUSH, "ptem") < 0
|| ioctl (slave, I_PUSH, "ldterm") < 0
# if defined __sun
|| ioctl (slave, I_PUSH, "ttcompat") < 0
# endif
)
{
close (slave);
goto fail;
}
# endif
/* XXX Should we ignore errors here? */
if (termp)
tcsetattr (slave, TCSAFLUSH, termp);
if (winp)
ioctl (slave, TIOCSWINSZ, winp);
*amaster = master;
*aslave = slave;
if (name != NULL)
strcpy (name, slave_name);
return 0;
fail:
close (master);
return -1;
}
#endif