newlib/winsup/cygwin/tty.cc

501 lines
11 KiB
C++

/* tty.cc
Copyright 1997, 1998, 2000, 2001, 2002 Red Hat, Inc.
This file is part of Cygwin.
This software is a copyrighted work licensed under the terms of the
Cygwin license. Please consult the file "CYGWIN_LICENSE" for
details. */
#include "winsup.h"
#include <unistd.h>
#include <utmp.h>
#include <wingdi.h>
#include <winuser.h>
#include <sys/cygwin.h>
#include "cygerrno.h"
#include "security.h"
#include "path.h"
#include "fhandler.h"
#include "dtable.h"
#include "cygheap.h"
#include "pinfo.h"
#include "cygserver.h"
#include "shared_info.h"
#include "cygthread.h"
extern fhandler_tty_master *tty_master;
extern "C" int
grantpt (int fd)
{
return 0;
}
extern "C" int
unlockpt (int fd)
{
return 0;
}
extern "C" int
revoke (char *ttyname)
{
set_errno (ENOSYS);
return -1;
}
extern "C" int
ttyslot (void)
{
if (NOTSTATE (myself, PID_USETTY))
return -1;
return myself->ctty;
}
void __stdcall
tty_init ()
{
if (!myself->cygstarted && NOTSTATE (myself, PID_CYGPARENT))
cygheap->fdtab.get_debugger_info ();
if (NOTSTATE (myself, PID_USETTY))
return;
if (myself->ctty == -1)
if (NOTSTATE (myself, PID_CYGPARENT))
myself->ctty = attach_tty (myself->ctty);
else
return;
if (myself->ctty == -1)
termios_printf ("Can't attach to tty");
}
/* Create session's master tty */
void __stdcall
create_tty_master (int ttynum)
{
device ttym = *ttym_dev;
ttym.setunit (ttynum); /* CGF FIXME device */
tty_master = (fhandler_tty_master *) build_fh_dev (ttym);
if (tty_master->init ())
api_fatal ("Can't create master tty");
else
{
/* Log utmp entry */
struct utmp our_utmp;
DWORD len = sizeof our_utmp.ut_host;
bzero ((char *) &our_utmp, sizeof (utmp));
time (&our_utmp.ut_time);
strncpy (our_utmp.ut_name, getlogin (), sizeof (our_utmp.ut_name));
GetComputerName (our_utmp.ut_host, &len);
__small_sprintf (our_utmp.ut_line, "tty%d", ttynum);
if ((len = strlen (our_utmp.ut_line)) >= UT_IDLEN)
len -= UT_IDLEN;
else
len = 0;
strncpy (our_utmp.ut_id, our_utmp.ut_line + len, UT_IDLEN);
our_utmp.ut_type = USER_PROCESS;
our_utmp.ut_pid = myself->pid;
myself->ctty = ttynum;
login (&our_utmp);
}
}
void __stdcall
tty_terminate ()
{
if (NOTSTATE (myself, PID_USETTY))
return;
cygwin_shared->tty.terminate ();
}
int __stdcall
attach_tty (int num)
{
if (num != -1)
{
return cygwin_shared->tty.connect_tty (num);
}
if (NOTSTATE (myself, PID_USETTY))
return -1;
return cygwin_shared->tty.allocate_tty (true);
}
void
tty_list::terminate ()
{
int ttynum = myself->ctty;
/* Keep master running till there are connected clients */
if (ttynum != -1 && ttys[ttynum].master_pid == GetCurrentProcessId ())
{
tty *t = ttys + ttynum;
CloseHandle (t->from_master);
CloseHandle (t->to_master);
/* Wait for children which rely on tty handling in this process to
go away */
for (int i = 0; ; i++)
{
if (!t->slave_alive ())
break;
if (i >= 100)
{
small_printf ("waiting for children using tty%d to terminate\n",
ttynum);
i = 0;
}
low_priority_sleep (200);
}
if (WaitForSingleObject (tty_mutex, INFINITE) == WAIT_FAILED)
termios_printf ("WFSO for tty_mutex %p failed, %E", tty_mutex);
termios_printf ("tty %d master about to finish", ttynum);
ForceCloseHandle1 (t->to_slave, to_pty);
ForceCloseHandle1 (t->from_slave, from_pty);
CloseHandle (tty_master->inuse);
t->init ();
char buf[20];
__small_sprintf (buf, "tty%d", ttynum);
logout (buf);
ReleaseMutex (tty_mutex);
}
}
int
tty_list::connect_tty (int ttynum)
{
if (ttynum < 0 || ttynum >= NTTYS)
{
termios_printf ("ttynum (%d) out of range", ttynum);
return -1;
}
if (!ttys[ttynum].exists ())
{
termios_printf ("tty %d was not allocated", ttynum);
return -1;
}
return ttynum;
}
void
tty_list::init ()
{
for (int i = 0; i < NTTYS; i++)
{
ttys[i].init ();
ttys[i].setntty (i);
}
}
/* Search for tty class for our console. Allocate new tty if our process is
the only cygwin process in the current console.
Return tty number or -1 if error.
If flag == 0, just find a free tty.
*/
int
tty_list::allocate_tty (bool with_console)
{
HWND console;
int freetty = -1;
HANDLE hmaster = NULL;
/* FIXME: This whole function needs a protective mutex. */
if (WaitForSingleObject (tty_mutex, INFINITE) == WAIT_FAILED)
termios_printf ("WFSO for tty_mutex %p failed, %E", tty_mutex);
if (!with_console)
console = NULL;
else if (!(console = GetConsoleWindow ()))
{
char oldtitle[TITLESIZE];
if (!GetConsoleTitle (oldtitle, TITLESIZE))
{
termios_printf ("Can't read console title");
goto out;
}
char buf[40];
__small_sprintf (buf, "cygwin.find.console.%d", myself->pid);
SetConsoleTitle (buf);
for (int times = 0; times < 25; times++)
{
Sleep (10);
if ((console = FindWindow (NULL, buf)))
break;
}
SetConsoleTitle (oldtitle);
Sleep (40);
if (console == NULL)
{
termios_printf ("Can't find console window");
goto out;
}
}
/* Is a tty allocated for console? */
for (int i = 0; i < NTTYS; i++)
{
if (!ttys[i].exists ())
{
if (freetty < 0) /* Scanning? */
freetty = i; /* Yes. */
if (!with_console) /* Do we want to attach this to a console? */
break; /* No. We've got one. */
}
/* FIXME: Is this right? We can potentially query a "nonexistent"
tty slot after falling through from the above? */
if (with_console && ttys[i].gethwnd () == console)
{
termios_printf ("console %x already associated with tty%d",
console, i);
/* Is the master alive? */
hmaster = OpenProcess (PROCESS_DUP_HANDLE, FALSE, ttys[i].master_pid);
if (hmaster)
{
CloseHandle (hmaster);
freetty = i;
goto out;
}
/* Master is dead */
freetty = i;
break;
}
}
/* There is no tty allocated to console, allocate the first free found */
if (freetty == -1)
goto out;
tty *t;
t = ttys + freetty;
t->init ();
t->setsid (-1);
t->setpgid (myself->pgid);
t->sethwnd (console);
out:
if (freetty < 0)
{
ReleaseMutex (tty_mutex);
system_printf ("No tty allocated");
}
else if (!with_console)
{
termios_printf ("tty%d allocated", freetty);
/* exit with tty_mutex still held -- caller has more work to do */
}
else
{
termios_printf ("console %p associated with tty%d", console, freetty);
if (!hmaster)
create_tty_master (freetty);
ReleaseMutex (tty_mutex);
}
return freetty;
}
bool
tty::slave_alive ()
{
return alive (TTY_SLAVE_ALIVE);
}
bool
tty::master_alive ()
{
return alive (TTY_MASTER_ALIVE);
}
bool
tty::alive (const char *fmt)
{
HANDLE ev;
char buf[CYG_MAX_PATH];
shared_name (buf, fmt, ntty);
if ((ev = OpenEvent (EVENT_ALL_ACCESS, FALSE, buf)))
CloseHandle (ev);
return ev != NULL;
}
HANDLE
tty::open_output_mutex ()
{
return open_mutex (OUTPUT_MUTEX);
}
HANDLE
tty::open_input_mutex ()
{
return open_mutex (INPUT_MUTEX);
}
HANDLE
tty::open_mutex (const char *mutex)
{
char buf[CYG_MAX_PATH];
shared_name (buf, mutex, ntty);
return OpenMutex (MUTEX_ALL_ACCESS, TRUE, buf);
}
HANDLE
tty::create_inuse (const char *fmt)
{
HANDLE h;
char buf[CYG_MAX_PATH];
shared_name (buf, fmt, ntty);
h = CreateEvent (&sec_all, TRUE, FALSE, buf);
termios_printf ("%s %p", buf, h);
if (!h)
termios_printf ("couldn't open inuse event, %E", buf);
return h;
}
void
tty::init ()
{
output_stopped = 0;
setsid (0);
pgid = 0;
hwnd = NULL;
to_slave = NULL;
from_slave = NULL;
was_opened = 0;
master_pid = 0;
}
HANDLE
tty::get_event (const char *fmt, BOOL manual_reset)
{
HANDLE hev;
char buf[CYG_MAX_PATH];
shared_name (buf, fmt, ntty);
if (!(hev = CreateEvent (&sec_all, manual_reset, FALSE, buf)))
{
termios_printf ("couldn't create %s", buf);
set_errno (ENOENT); /* FIXME this can't be the right errno */
return NULL;
}
termios_printf ("created event %s", buf);
return hev;
}
bool
tty::make_pipes (fhandler_pty_master *ptym)
{
/* Create communication pipes */
/* FIXME: should this be sec_none_nih? */
if (!CreatePipe (&from_master, &to_slave, &sec_all, 128 * 1024))
{
termios_printf ("can't create input pipe");
set_errno (ENOENT);
return false;
}
// ProtectHandle1INH (to_slave, to_pty);
if (!CreatePipe (&from_slave, &to_master, &sec_all, 128 * 1024))
{
termios_printf ("can't create output pipe");
set_errno (ENOENT);
return false;
}
// ProtectHandle1INH (from_slave, from_pty);
termios_printf ("tty%d from_slave %p, to_slave %p", ntty, from_slave,
to_slave);
DWORD pipe_mode = PIPE_NOWAIT;
if (!SetNamedPipeHandleState (to_slave, &pipe_mode, NULL, NULL))
termios_printf ("can't set to_slave to non-blocking mode");
ptym->set_io_handle (from_slave);
ptym->set_output_handle (to_slave);
return true;
}
bool
tty::common_init (fhandler_pty_master *ptym)
{
/* Set termios information. Force initialization. */
ptym->tcinit (this, true);
if (!make_pipes (ptym))
return false;
ptym->need_nl = 0;
/* Save our pid */
master_pid = GetCurrentProcessId ();
/* We do not open allow the others to open us (for handle duplication)
but rely on cygheap->inherited_ctty for descendant processes.
In the future the cygserver may allow access by others. */
#ifdef USE_SERVER
if (wincap.has_security ())
{
if (cygserver_running == CYGSERVER_UNKNOWN)
cygserver_init ();
}
#endif
/* Create synchronisation events */
if (ptym->get_major () != DEV_TTYM_MAJOR)
{
ptym->output_done_event = ptym->ioctl_done_event =
ptym->ioctl_request_event = NULL;
}
else
{
if (!(ptym->output_done_event = get_event (OUTPUT_DONE_EVENT)))
return false;
if (!(ptym->ioctl_done_event = get_event (IOCTL_DONE_EVENT)))
return false;
if (!(ptym->ioctl_request_event = get_event (IOCTL_REQUEST_EVENT)))
return false;
}
if (!(ptym->input_available_event = get_event (INPUT_AVAILABLE_EVENT, TRUE)))
return false;
char buf[CYG_MAX_PATH];
shared_name (buf, OUTPUT_MUTEX, ntty);
if (!(ptym->output_mutex = CreateMutex (&sec_all, FALSE, buf)))
{
termios_printf ("can't create %s", buf);
set_errno (ENOENT);
return false;
}
shared_name (buf, INPUT_MUTEX, ntty);
if (!(ptym->input_mutex = CreateMutex (&sec_all, FALSE, buf)))
{
termios_printf ("can't create %s", buf);
set_errno (ENOENT);
return false;
}
// /* screws up tty master */ ProtectHandle1INH (ptym->output_mutex, output_mutex);
// /* screws up tty master */ ProtectHandle1INH (ptym->input_mutex, input_mutex);
winsize.ws_col = 80;
winsize.ws_row = 25;
termios_printf ("tty%d opened", ntty);
return true;
}