Welcome to mirror list, hosted at ThFree Co, Russian Federation.

cygwin.com/git/newlib-cygwin.git - Unnamed repository; edit this file 'description' to name the repository.
summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
Diffstat (limited to 'winsup/cygwin/dtable.cc')
-rw-r--r--winsup/cygwin/dtable.cc1053
1 files changed, 0 insertions, 1053 deletions
diff --git a/winsup/cygwin/dtable.cc b/winsup/cygwin/dtable.cc
deleted file mode 100644
index 6a9d55df1..000000000
--- a/winsup/cygwin/dtable.cc
+++ /dev/null
@@ -1,1053 +0,0 @@
-/* dtable.cc: file descriptor support.
-
- Copyright 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004,
- 2005, 2006, 2007, 2008, 2009, 2010 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. */
-
-#define __INSIDE_CYGWIN_NET__
-
-#include "winsup.h"
-#include <sys/socket.h>
-#include <stdlib.h>
-#include <stdio.h>
-#include <unistd.h>
-#include <wchar.h>
-
-#define USE_SYS_TYPES_FD_SET
-#include <winsock.h>
-#include "pinfo.h"
-#include "cygerrno.h"
-#include "perprocess.h"
-#include "path.h"
-#include "fhandler.h"
-#include "select.h"
-#include "dtable.h"
-#include "cygheap.h"
-#include "tls_pbuf.h"
-#include "ntdll.h"
-#include "shared_info.h"
-
-static const NO_COPY DWORD std_consts[] = {STD_INPUT_HANDLE, STD_OUTPUT_HANDLE,
- STD_ERROR_HANDLE};
-
-static bool handle_to_fn (HANDLE, char *);
-
-#define WCLEN(x) ((sizeof (x) / sizeof (WCHAR)) - 1)
-char unknown_file[] = "some disk file";
-const WCHAR DEV_NULL[] = L"\\Device\\Null";
-static const WCHAR DEV_SOCKET[] = L"\\Device\\Afd";
-
-const WCHAR DEVICE_PREFIX[] = L"\\device\\";
-const size_t DEVICE_PREFIX_LEN WCLEN (DEVICE_PREFIX);
-
-static const WCHAR DEV_NAMED_PIPE[] = L"\\Device\\NamedPipe\\";
-static const size_t DEV_NAMED_PIPE_LEN = WCLEN (DEV_NAMED_PIPE);
-
-static const WCHAR DEV_REMOTE[] = L"\\Device\\LanmanRedirector\\";
-static const size_t DEV_REMOTE_LEN = WCLEN (DEV_REMOTE);
-
-static const WCHAR DEV_REMOTE1[] = L"\\Device\\WinDfs\\Root\\";
-static const size_t DEV_REMOTE1_LEN = WCLEN (DEV_REMOTE1);
-
-/* Set aside space for the table of fds */
-void
-dtable_init ()
-{
- if (!cygheap->fdtab.size)
- cygheap->fdtab.extend (NOFILE_INCR);
-}
-
-void __stdcall
-set_std_handle (int fd)
-{
- if (fd == 0)
- SetStdHandle (std_consts[fd], cygheap->fdtab[fd]->get_handle ());
- else if (fd <= 2)
- SetStdHandle (std_consts[fd], cygheap->fdtab[fd]->get_output_handle ());
-}
-
-int
-dtable::extend (int howmuch)
-{
- int new_size = size + howmuch;
- fhandler_base **newfds;
-
- if (howmuch <= 0)
- return 0;
-
- if (new_size > OPEN_MAX_MAX)
- {
- set_errno (EMFILE);
- return 0;
- }
-
- /* Try to allocate more space for fd table. We can't call realloc ()
- here to preserve old table if memory allocation fails */
-
- if (!(newfds = (fhandler_base **) ccalloc (HEAP_ARGV, new_size, sizeof newfds[0])))
- {
- debug_printf ("calloc failed");
- set_errno (ENOMEM);
- return 0;
- }
- if (fds)
- {
- memcpy (newfds, fds, size * sizeof (fds[0]));
- cfree (fds);
- }
-
- size = new_size;
- fds = newfds;
- debug_printf ("size %d, fds %p", size, fds);
- return 1;
-}
-
-void
-dtable::get_debugger_info ()
-{
- extern bool jit_debug;
- if (!jit_debug && being_debugged ())
- {
- char std[3][sizeof ("/dev/ttyNNNN")];
- std[0][0] = std[1][0] = std [2][0] = '\0';
- char buf[sizeof ("cYgstd %x") + 32];
- sprintf (buf, "cYgstd %x %x %x", (unsigned) &std, sizeof (std[0]), 3);
- OutputDebugString (buf);
- for (int i = 0; i < 3; i++)
- if (std[i][0])
- {
- HANDLE h = GetStdHandle (std_consts[i]);
- fhandler_base *fh = build_fh_name (std[i]);
- if (!fh)
- continue;
- fds[i] = fh;
- if (!fh->open ((i ? (i == 2 ? O_RDWR : O_WRONLY) : O_RDONLY)
- | O_BINARY, 0777))
- release (i);
- else
- CloseHandle (h);
- /* Copy to Windows' idea of a standard handle, otherwise
- we have invalid standard handles when calling Windows
- functions (small_printf and strace might suffer, too). */
- SetStdHandle (std_consts[i], i ? fh->get_output_handle ()
- : fh->get_handle ());
- }
- }
-}
-
-/* Initialize the file descriptor/handle mapping table.
- This function should only be called when a cygwin function is invoked
- by a non-cygwin function, i.e., it should only happen very rarely. */
-
-void
-dtable::stdio_init ()
-{
- extern void set_console_ctty ();
- /* Set these before trying to output anything from strace.
- Also, always set them even if we're to pick up our parent's fds
- in case they're missed. */
-
- if (myself->cygstarted || ISSTATE (myself, PID_CYGPARENT))
- {
- tty_min *t = cygwin_shared->tty.get_tty (myself->ctty);
- if (t && t->getpgid () == myself->pid && t->gethwnd ())
- init_console_handler (true);
- return;
- }
-
- HANDLE in = GetStdHandle (STD_INPUT_HANDLE);
- HANDLE out = GetStdHandle (STD_OUTPUT_HANDLE);
- HANDLE err = GetStdHandle (STD_ERROR_HANDLE);
-
- init_std_file_from_handle (0, in);
-
- /* STD_ERROR_HANDLE has been observed to be the same as
- STD_OUTPUT_HANDLE. We need separate handles (e.g. using pipes
- to pass data from child to parent). */
- /* CV 2008-10-17: Under debugger control, std fd's have been potentially
- initialized in dtable::get_debugger_info (). In this case
- init_std_file_from_handle is a no-op, so, even if out == err we don't
- want to duplicate the handle since it will be unused. */
- if (out == err && (!being_debugged () || !not_open (2)))
- {
- /* Since this code is not invoked for forked tasks, we don't have
- to worry about the close-on-exec flag here. */
- if (!DuplicateHandle (GetCurrentProcess (), out,
- GetCurrentProcess (), &err,
- 0, TRUE, DUPLICATE_SAME_ACCESS))
- {
- /* If that fails, do this as a fall back. */
- err = out;
- system_printf ("couldn't make stderr distinct from stdout, %E");
- }
- }
-
- init_std_file_from_handle (1, out);
- init_std_file_from_handle (2, err);
-
- /* Assign the console as the controlling tty for this process if we actually
- have a console and no other controlling tty has been assigned. */
- if (!fhandler_console::need_invisible () && myself->ctty < 0)
- set_console_ctty ();
-}
-
-const int dtable::initial_archetype_size;
-
-fhandler_base *
-dtable::find_archetype (device& dev)
-{
- for (unsigned i = 0; i < farchetype; i++)
- if (archetypes[i]->get_device () == (unsigned) dev)
- return archetypes[i];
- return NULL;
-}
-
-fhandler_base **
-dtable::add_archetype ()
-{
- if (farchetype++ >= narchetypes)
- archetypes = (fhandler_base **) crealloc_abort (archetypes, (narchetypes += initial_archetype_size) * sizeof archetypes[0]);
- return archetypes + farchetype - 1;
-}
-
-void
-dtable::delete_archetype (fhandler_base *fh)
-{
- for (unsigned i = 0; i < farchetype; i++)
- if (fh == archetypes[i])
- {
- debug_printf ("deleting element %d for %s", i, fh->get_name ());
- if (i < --farchetype)
- archetypes[i] = archetypes[farchetype];
- break;
- }
-
- delete fh;
-}
-
-int
-dtable::find_unused_handle (int start)
-{
- do
- {
- for (size_t i = start; i < size; i++)
- /* See if open -- no need for overhead of not_open */
- if (fds[i] == NULL)
- return i;
- }
- while (extend (NOFILE_INCR));
- return -1;
-}
-
-void
-dtable::release (int fd)
-{
- if (!not_open (fd))
- {
- if (fds[fd]->need_fixup_before ())
- dec_need_fixup_before ();
- fhandler_base *arch = fds[fd]->archetype;
- delete fds[fd];
- if (arch && !arch->usecount)
- cygheap->fdtab.delete_archetype (arch);
- fds[fd] = NULL;
- }
-}
-
-extern "C" int
-cygwin_attach_handle_to_fd (char *name, int fd, HANDLE handle, mode_t bin,
- DWORD myaccess)
-{
- if (fd == -1)
- fd = cygheap->fdtab.find_unused_handle ();
- fhandler_base *fh = build_fh_name (name);
- cygheap->fdtab[fd] = fh;
- fh->init (handle, myaccess, bin ?: fh->pc_binmode ());
- return fd;
-}
-
-void
-dtable::init_std_file_from_handle (int fd, HANDLE handle)
-{
- CONSOLE_SCREEN_BUFFER_INFO buf;
- DCB dcb;
- unsigned bin = O_BINARY;
- device dev;
-
- dev.devn = 0; /* FIXME: device */
- first_fd_for_open = 0;
-
- if (!not_open (fd))
- return;
-
- SetLastError (0);
- DWORD access = 0;
- DWORD ft = GetFileType (handle);
- char name[NT_MAX_PATH];
- name[0] = '\0';
- if (ft == FILE_TYPE_UNKNOWN && GetLastError () == ERROR_INVALID_HANDLE)
- /* can't figure out what this is */;
- else if (ft == FILE_TYPE_PIPE)
- {
- int rcv = 0, len = sizeof (int);
-
- if (handle_to_fn (handle, name))
- dev.parse (name);
- else if (strcmp (name, ":sock:") == 0
- /* On NT4, NtQueryObject returns STATUS_NOT_IMPLEMENTED when
- called for a socket handle. */
- || (strcmp (name, unknown_file) == 0
- && !::getsockopt ((SOCKET) handle, SOL_SOCKET, SO_RCVBUF,
- (char *) &rcv, &len)))
- {
- /* socket */
- dev = *tcp_dev;
- name[0] = '\0';
- }
- else if (fd == 0)
- dev = *piper_dev;
- else
- dev = *pipew_dev;
- }
- else if (GetConsoleScreenBufferInfo (handle, &buf))
- {
- /* Console output */
- if (ISSTATE (myself, PID_USETTY))
- dev.parse (FH_TTY);
- else
- dev = *console_dev;
- }
- else if (GetNumberOfConsoleInputEvents (handle, (DWORD *) &buf))
- {
- /* Console input */
- if (ISSTATE (myself, PID_USETTY))
- dev.parse (FH_TTY);
- else
- dev = *console_dev;
- }
- else if (GetCommState (handle, &dcb))
- /* serial */
- dev.parse (DEV_TTYS_MAJOR, 0);
- else
- /* Try to figure it out from context - probably a disk file */
- handle_to_fn (handle, name);
-
- if (!name[0] && !dev)
- fds[fd] = NULL;
- else
- {
- fhandler_base *fh;
-
- if (dev)
- fh = build_fh_dev (dev);
- else
- fh = build_fh_name (name);
-
- if (name[0])
- {
- bin = fh->pc_binmode ();
- if (!bin)
- {
- bin = fh->get_default_fmode (O_RDWR);
- if (!bin && dev)
- bin = O_BINARY;
- }
- }
-
- IO_STATUS_BLOCK io;
- FILE_ACCESS_INFORMATION fai;
-
- /* Console windows are not kernel objects, so the access mask returned
- by NtQueryInformationFile is meaningless. CMD always hands down
- stdin handles as R/O handles, but our tty slave sides are R/W. */
- if (dev == FH_TTY || dev == FH_CONSOLE || dev.major == DEV_TTYS_MAJOR)
- access |= GENERIC_READ | GENERIC_WRITE;
- else if (NT_SUCCESS (NtQueryInformationFile (handle, &io, &fai,
- sizeof fai,
- FileAccessInformation)))
- {
- if (fai.AccessFlags & FILE_READ_DATA)
- access |= GENERIC_READ;
- if (fai.AccessFlags & FILE_WRITE_DATA)
- access |= GENERIC_WRITE;
- }
- else if (fd == 0)
- access |= GENERIC_READ;
- else
- access |= GENERIC_WRITE; /* Should be rdwr for stderr but not sure that's
- possible for some versions of handles */
- /* FIXME: Workaround Windows 7 issue. If the parent process of
- the process tree closes the original handles to the console window,
- strange problems occur when starting child processes later on if
- stdio redirection is used.
-
- CV 2009-08-08: It looks like this problem has been fixed only
- half-heartedly in RTM. Unfortunately the new implementation
- has still a problem which now also occurs on the 32 bit release
- of Windows 7. It's still not quite clear what happens but it's
- easily reproducible. Just start X via the start menu entry.
- This opens an xterm window with a shell. Exit from the shell,
- and you get a Windows error box reporting a crash in the
- Console Window Host application (conhost.exe) due to an access
- violation.
-
- This needs further investigation but the workaround not to close
- the handles will have a marginal hit of three extra handles per
- process at most. */
- if (!fh->init (dev == FH_CONSOLE && wincap.has_console_handle_problem ()
- ? INVALID_HANDLE_VALUE : handle, access, bin))
- api_fatal ("couldn't initialize fd %d for %s", fd, fh->get_name ());
-
- cygheap->fdtab[fd] = fh;
- set_std_handle (fd);
- paranoid_printf ("fd %d, handle %p", fd, handle);
- }
-}
-
-#define cnew(name) new ((void *) ccalloc (HEAP_FHANDLER, 1, sizeof (name))) name
-
-fhandler_base *
-build_fh_name (const char *name, unsigned opt, suffix_info *si)
-{
- path_conv pc (name, opt | PC_NULLEMPTY | PC_POSIX, si);
- if (pc.error)
- {
- fhandler_base *fh = cnew (fhandler_nodevice) ();
- if (fh)
- fh->set_error (pc.error);
- set_errno (fh ? pc.error : EMFILE);
- return fh;
- }
-
- return build_fh_pc (pc);
-}
-
-fhandler_base *
-build_fh_dev (const device& dev, const char *unix_name)
-{
- path_conv pc (dev);
- if (unix_name)
- pc.set_normalized_path (unix_name);
- else
- pc.set_normalized_path (dev.name);
- return build_fh_pc (pc);
-}
-
-#define fh_unset ((fhandler_base *) 1)
-fhandler_base *
-build_fh_pc (path_conv& pc, bool set_name)
-{
- fhandler_base *fh = fh_unset;
-
- switch (pc.dev.major)
- {
- case DEV_TTYS_MAJOR:
- fh = cnew (fhandler_tty_slave) ();
- break;
- case DEV_TTYM_MAJOR:
- fh = cnew (fhandler_tty_master) ();
- break;
- case DEV_CYGDRIVE_MAJOR:
- fh = cnew (fhandler_cygdrive) ();
- break;
- case DEV_FLOPPY_MAJOR:
- case DEV_CDROM_MAJOR:
- case DEV_SD_MAJOR:
- case DEV_SD1_MAJOR:
- case DEV_SD2_MAJOR:
- case DEV_SD3_MAJOR:
- case DEV_SD4_MAJOR:
- case DEV_SD5_MAJOR:
- case DEV_SD6_MAJOR:
- case DEV_SD7_MAJOR:
- fh = cnew (fhandler_dev_floppy) ();
- break;
- case DEV_TAPE_MAJOR:
- fh = cnew (fhandler_dev_tape) ();
- break;
- case DEV_SERIAL_MAJOR:
- fh = cnew (fhandler_serial) ();
- break;
- default:
- switch (pc.dev)
- {
- case FH_CONSOLE:
- case FH_CONIN:
- case FH_CONOUT:
- fh = cnew (fhandler_console) ();
- break;
- case FH_PTYM:
- fh = cnew (fhandler_pty_master) ();
- break;
- case FH_WINDOWS:
- fh = cnew (fhandler_windows) ();
- break;
- case FH_FIFO:
- fh = cnew (fhandler_fifo) ();
- break;
- case FH_PIPE:
- case FH_PIPER:
- case FH_PIPEW:
- fh = cnew (fhandler_pipe) ();
- break;
- case FH_TCP:
- case FH_UDP:
- case FH_ICMP:
- case FH_UNIX:
- case FH_STREAM:
- case FH_DGRAM:
- fh = cnew (fhandler_socket) ();
- break;
- case FH_FS:
- fh = cnew (fhandler_disk_file) ();
- break;
- case FH_NULL:
- fh = cnew (fhandler_dev_null) ();
- break;
- case FH_ZERO:
- case FH_FULL:
- fh = cnew (fhandler_dev_zero) ();
- break;
- case FH_RANDOM:
- case FH_URANDOM:
- fh = cnew (fhandler_dev_random) ();
- break;
- case FH_MEM:
- case FH_PORT:
- fh = cnew (fhandler_dev_mem) ();
- break;
- case FH_CLIPBOARD:
- fh = cnew (fhandler_dev_clipboard) ();
- break;
- case FH_OSS_DSP:
- fh = cnew (fhandler_dev_dsp) ();
- break;
- case FH_PROC:
- fh = cnew (fhandler_proc) ();
- break;
- case FH_REGISTRY:
- fh = cnew (fhandler_registry) ();
- break;
- case FH_PROCESS:
- case FH_PROCESSFD:
- fh = cnew (fhandler_process) ();
- break;
- case FH_PROCNET:
- fh = cnew (fhandler_procnet) ();
- break;
- case FH_PROCSYS:
- fh = cnew (fhandler_procsys) ();
- break;
- case FH_NETDRIVE:
- fh = cnew (fhandler_netdrive) ();
- break;
- case FH_TTY:
- {
- if (myself->ctty == TTY_CONSOLE)
- fh = cnew (fhandler_console) ();
- else if (myself->ctty >= 0)
- fh = cnew (fhandler_tty_slave) ();
- break;
- }
- case FH_KMSG:
- fh = cnew (fhandler_mailslot) ();
- break;
- }
- }
-
- if (fh == fh_unset)
- fh = cnew (fhandler_nodevice) ();
-
- if (!fh)
- set_errno (EMFILE);
- else if (set_name)
- fh->set_name (pc);
-
- debug_printf ("fh %p", fh);
- return fh;
-}
-
-fhandler_base *
-dtable::dup_worker (fhandler_base *oldfh, int flags)
-{
- /* Don't call set_name in build_fh_pc. It will be called in
- fhandler_base::operator= below. Calling it twice will result
- in double allocation. */
- fhandler_base *newfh = build_fh_pc (oldfh->pc, false);
- if (!newfh)
- debug_printf ("build_fh_pc failed");
- else
- {
- *newfh = *oldfh;
- newfh->set_io_handle (NULL);
- newfh->pc.reset_conv_handle ();
- if (oldfh->dup (newfh))
- {
- delete newfh;
- newfh = NULL;
- debug_printf ("oldfh->dup failed");
- }
- else
- {
- /* The O_CLOEXEC flag enforces close-on-exec behaviour. */
- if (flags & O_CLOEXEC)
- newfh->set_close_on_exec (true);
- else
- newfh->close_on_exec (false);
- debug_printf ("duped '%s' old %p, new %p", oldfh->get_name (), oldfh->get_io_handle (), newfh->get_io_handle ());
- }
- }
- return newfh;
-}
-
-int
-dtable::dup3 (int oldfd, int newfd, int flags)
-{
- int res = -1;
- fhandler_base *newfh = NULL; // = NULL to avoid an incorrect warning
-
- MALLOC_CHECK;
- debug_printf ("dup3 (%d, %d, %p)", oldfd, newfd, flags);
- lock ();
-
- if (not_open (oldfd))
- {
- syscall_printf ("fd %d not open", oldfd);
- set_errno (EBADF);
- goto done;
- }
- if (newfd < 0)
- {
- syscall_printf ("new fd out of bounds: %d", newfd);
- set_errno (EBADF);
- goto done;
- }
- if ((flags & ~O_CLOEXEC) != 0)
- {
- syscall_printf ("invalid flags value %x", flags);
- set_errno (EINVAL);
- return -1;
- }
-
- if ((newfh = dup_worker (fds[oldfd], flags)) == NULL)
- {
- res = -1;
- goto done;
- }
-
- debug_printf ("newfh->io_handle %p, oldfh->io_handle %p, new win32_name %p, old win32_name %p",
- newfh->get_io_handle (), fds[oldfd]->get_io_handle (), newfh->get_win32_name (), fds[oldfd]->get_win32_name ());
-
- if (!not_open (newfd))
- close (newfd);
- else if ((size_t) newfd < size)
- /* nothing to do */;
- else if (find_unused_handle (newfd) < 0)
- {
- newfh->close ();
- res = -1;
- goto done;
- }
-
- fds[newfd] = newfh;
-
- if ((res = newfd) <= 2)
- set_std_handle (res);
-
-done:
- MALLOC_CHECK;
- unlock ();
- syscall_printf ("%d = dup3 (%d, %d, %p)", res, oldfd, newfd, flags);
-
- return res;
-}
-
-bool
-dtable::select_read (int fd, select_stuff *ss)
-{
- if (not_open (fd))
- {
- set_errno (EBADF);
- return false;
- }
- fhandler_base *fh = fds[fd];
- select_record *s = fh->select_read (ss);
- s->fd = fd;
- if (!s->fh)
- s->fh = fh;
- s->thread_errno = 0;
- debug_printf ("%s fd %d", fh->get_name (), fd);
- return true;
-}
-
-bool
-dtable::select_write (int fd, select_stuff *ss)
-{
- if (not_open (fd))
- {
- set_errno (EBADF);
- return NULL;
- }
- fhandler_base *fh = fds[fd];
- select_record *s = fh->select_write (ss);
- s->fd = fd;
- s->fh = fh;
- s->thread_errno = 0;
- debug_printf ("%s fd %d", fh->get_name ());
- return true;
-}
-
-bool
-dtable::select_except (int fd, select_stuff *ss)
-{
- if (not_open (fd))
- {
- set_errno (EBADF);
- return NULL;
- }
- fhandler_base *fh = fds[fd];
- select_record *s = fh->select_except (ss);
- s->fd = fd;
- s->fh = fh;
- s->thread_errno = 0;
- debug_printf ("%s fd %d", fh->get_name (), fd);
- return true;
-}
-
-void
-dtable::move_fd (int from, int to)
-{
- // close (to); /* It is assumed that this is close-on-exec */
- fds[to] = fds[from];
- fds[from] = NULL;
-}
-
-void
-dtable::set_file_pointers_for_exec ()
-{
-/* This is not POSIX-compliant so the function is only called for
- non-Cygwin processes. */
- LONG off_high = 0;
- lock ();
- fhandler_base *fh;
- for (size_t i = 0; i < size; i++)
- if ((fh = fds[i]) != NULL && fh->get_flags () & O_APPEND)
- SetFilePointer (fh->get_handle (), 0, &off_high, FILE_END);
- unlock ();
-}
-
-void
-dtable::fixup_after_exec ()
-{
- first_fd_for_open = 0;
- fhandler_base *fh;
- for (size_t i = 0; i < size; i++)
- if ((fh = fds[i]) != NULL)
- {
- fh->clear_readahead ();
- fh->fixup_after_exec ();
- if (fh->close_on_exec ())
- {
- if (fh->archetype)
- {
- debug_printf ("closing fd %d since it is an archetype", i);
- fh->close ();
- }
- release (i);
- }
- else if (fh->get_popen_pid ())
- close (i);
- else if (i == 0)
- SetStdHandle (std_consts[i], fh->get_io_handle ());
- else if (i <= 2)
- SetStdHandle (std_consts[i], fh->get_output_handle ());
- }
-}
-
-void
-dtable::fixup_after_fork (HANDLE parent)
-{
- fhandler_base *fh;
- for (size_t i = 0; i < size; i++)
- if ((fh = fds[i]) != NULL)
- {
- if (fh->close_on_exec () || fh->need_fork_fixup ())
- {
- debug_printf ("fd %d (%s)", i, fh->get_name ());
- fh->fixup_after_fork (parent);
- }
- if (i == 0)
- SetStdHandle (std_consts[i], fh->get_io_handle ());
- else if (i <= 2)
- SetStdHandle (std_consts[i], fh->get_output_handle ());
- }
-}
-
-#ifdef NEWVFORK
-int
-dtable::vfork_child_dup ()
-{
- fhandler_base **newtable;
- lock ();
- newtable = (fhandler_base **) ccalloc (HEAP_ARGV, size, sizeof (fds[0]));
- int res = 1;
-
- /* Remove impersonation */
- cygheap->user.deimpersonate ();
- if (cygheap->ctty)
- {
- cygheap->ctty->usecount++;
- cygheap->console_count++;
- report_tty_counts (cygheap->ctty, "vfork dup", "incremented ", "");
- }
-
- for (size_t i = 0; i < size; i++)
- if (not_open (i))
- continue;
- else if ((newtable[i] = dup_worker (fds[i])) != NULL)
- newtable[i]->set_close_on_exec (fds[i]->close_on_exec ());
- else
- {
- res = 0;
- goto out;
- }
-
- fds_on_hold = fds;
- fds = newtable;
-
-out:
- /* Restore impersonation */
- cygheap->user.reimpersonate ();
-
- unlock ();
- return 1;
-}
-
-void
-dtable::vfork_parent_restore ()
-{
- lock ();
-
- fhandler_tty_slave *ctty_on_hold = cygheap->ctty_on_hold;
- close_all_files ();
- fhandler_base **deleteme = fds;
- fds = fds_on_hold;
- fds_on_hold = NULL;
- cfree (deleteme);
- unlock ();
-
- if (cygheap->ctty != ctty_on_hold)
- {
- cygheap->ctty = ctty_on_hold; // revert
- cygheap->ctty->close (); // Undo previous bump of this archetype
- }
- cygheap->ctty_on_hold = NULL;
-}
-
-void
-dtable::vfork_child_fixup ()
-{
- if (!fds_on_hold)
- return;
- debug_printf ("here");
- fhandler_base **saveme = fds;
- fds = fds_on_hold;
-
- fhandler_base *fh;
- for (int i = 0; i < (int) size; i++)
- if ((fh = fds[i]) != NULL)
- {
- fh->clear_readahead ();
- if (!fh->archetype && fh->close_on_exec ())
- release (i);
- else
- {
- fh->close ();
- release (i);
- }
- }
-
- fds = saveme;
- cfree (fds_on_hold);
- fds_on_hold = NULL;
-
- if (cygheap->ctty_on_hold)
- {
- cygheap->ctty_on_hold->close ();
- cygheap->ctty_on_hold = NULL;
- }
-}
-#endif /*NEWVFORK*/
-
-static void
-decode_tty (char *buf, WCHAR *w32)
-{
- int ttyn = wcstol (w32, NULL, 10);
- __small_sprintf (buf, "/dev/tty%d", ttyn);
-}
-
-/* Try to derive posix filename from given handle. Return true if
- the handle is associated with a cygwin tty. */
-static bool
-handle_to_fn (HANDLE h, char *posix_fn)
-{
- tmp_pathbuf tp;
- ULONG len = 0;
- WCHAR *maxmatchdos = NULL;
- int maxmatchlen = 0;
- OBJECT_NAME_INFORMATION *ntfn = (OBJECT_NAME_INFORMATION *) tp.w_get ();
-
- NTSTATUS status = NtQueryObject (h, ObjectNameInformation, ntfn, 65536, &len);
- if (!NT_SUCCESS (status))
- debug_printf ("NtQueryObject failed, %p", status);
- // NT seems to do this on an unopened file
- else if (!ntfn->Name.Buffer)
- debug_printf ("nt->Name.Buffer == NULL");
- else
- {
- WCHAR *w32 = ntfn->Name.Buffer;
- size_t w32len = ntfn->Name.Length / sizeof (WCHAR);
- w32[w32len] = L'\0';
-
- if (wcscasecmp (w32, DEV_NULL) == 0)
- {
- strcpy (posix_fn, "/dev/null");
- return false;
- }
-
- if (wcscasecmp (w32, DEV_SOCKET) == 0)
- {
- strcpy (posix_fn, ":sock:");
- return false;
- }
-
- if (wcsncasecmp (w32, DEV_NAMED_PIPE, DEV_NAMED_PIPE_LEN) == 0)
- {
- w32 += DEV_NAMED_PIPE_LEN;
- if (wcsncmp (w32, L"cygwin-", WCLEN (L"cygwin-")) != 0)
- return false;
- w32 += WCLEN (L"cygwin-");
- /* Check for installation key and trailing dash. */
- w32len = installation_key.Length / sizeof (WCHAR);
- if (w32len && wcsncmp (w32, installation_key.Buffer, w32len) != 0)
- return false;
- w32 += w32len;
- if (*w32 != L'-')
- return false;
- ++w32;
- bool istty = wcsncmp (w32, L"tty", WCLEN (L"tty")) == 0;
- if (istty)
- decode_tty (posix_fn, w32 + WCLEN (L"tty"));
- else if (wcsncmp (w32, L"pipe", WCLEN (L"pipe")) == 0)
- strcpy (posix_fn, "/dev/pipe");
- return istty;
- }
-
- WCHAR fnbuf[64 * 1024];
- if (wcsncasecmp (w32, DEVICE_PREFIX, DEVICE_PREFIX_LEN) != 0
- || !QueryDosDeviceW (NULL, fnbuf, sizeof (fnbuf)))
- {
- sys_wcstombs (posix_fn, NT_MAX_PATH, w32, w32len);
- return false;
- }
-
- for (WCHAR *s = fnbuf; *s; s = wcschr (s, '\0') + 1)
- {
- WCHAR device[NT_MAX_PATH];
- if (!QueryDosDeviceW (s, device, sizeof (device)))
- continue;
- if (wcschr (s, ':') == NULL)
- continue;
- WCHAR *q = wcsrchr (device, ';');
- if (q)
- {
- WCHAR *r = wcschr (q, '\\');
- if (r)
- wcscpy (q, r + 1);
- }
- int devlen = wcslen (device);
- if (device[devlen - 1] == L'\\')
- device[--devlen] = L'\0';
- if (devlen < maxmatchlen)
- continue;
- if (wcsncmp (device, w32, devlen) != 0||
- (w32[devlen] != L'\0' && w32[devlen] != L'\\'))
- continue;
- maxmatchlen = devlen;
- maxmatchdos = s;
- debug_printf ("current match '%W' = '%W'\n", s, device);
- }
-
- if (maxmatchlen)
- {
- WCHAR *p = wcschr (w32 + DEVICE_PREFIX_LEN, L'\\');
- size_t n = wcslen (maxmatchdos);
- WCHAR ch;
- if (!p)
- ch = L'\0';
- else
- {
- if (maxmatchdos[n - 1] == L'\\')
- n--;
- w32 += maxmatchlen - n;
- ch = L'\\';
- }
- memcpy (w32, maxmatchdos, n * sizeof (WCHAR));
- w32[n] = ch;
- }
- else if (wcsncmp (w32, DEV_REMOTE, DEV_REMOTE_LEN) == 0)
- {
- w32 += DEV_REMOTE_LEN - 2;
- *w32 = L'\\';
- debug_printf ("remote drive");
- }
- else if (wcsncmp (w32, DEV_REMOTE1, DEV_REMOTE1_LEN) == 0)
- {
- w32 += DEV_REMOTE1_LEN - 2;
- *w32 = L'\\';
- debug_printf ("remote drive");
- }
-
- cygwin_conv_path (CCP_WIN_W_TO_POSIX | CCP_ABSOLUTE, w32, posix_fn,
- NT_MAX_PATH);
-
- debug_printf ("derived path '%W', posix '%s'", w32, posix_fn);
- return false;
- }
-
- strcpy (posix_fn, unknown_file);
- return false;
-}
-
-void
-dtable::fixup_before_fork (DWORD target_proc_id)
-{
- lock ();
- fhandler_base *fh;
- for (size_t i = 0; i < size; i++)
- if ((fh = fds[i]) != NULL)
- {
- debug_printf ("fd %d (%s)", i, fh->get_name ());
- fh->fixup_before_fork_exec (target_proc_id);
- }
- unlock ();
-}
-void
-dtable::fixup_before_exec (DWORD target_proc_id)
-{
- lock ();
- fhandler_base *fh;
- for (size_t i = 0; i < size; i++)
- if ((fh = fds[i]) != NULL && !fh->close_on_exec ())
- {
- debug_printf ("fd %d (%s)", i, fh->get_name ());
- fh->fixup_before_fork_exec (target_proc_id);
- }
- unlock ();
-}
-