1616 lines
45 KiB
C++
1616 lines
45 KiB
C++
/* mount.cc: mount handling.
|
|
|
|
Copyright 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005,
|
|
2006, 2007, 2008, 2009 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 "miscfuncs.h"
|
|
#include <mntent.h>
|
|
#include <ctype.h>
|
|
#include <winioctl.h>
|
|
#include <wingdi.h>
|
|
#include <winuser.h>
|
|
#include <winnetwk.h>
|
|
#include <shlobj.h>
|
|
#include <cygwin/version.h>
|
|
#include "cygerrno.h"
|
|
#include "security.h"
|
|
#include "path.h"
|
|
#include "shared_info.h"
|
|
#include "fhandler.h"
|
|
#include "dtable.h"
|
|
#include "cygheap.h"
|
|
#include "cygtls.h"
|
|
#include "tls_pbuf.h"
|
|
#include <ntdll.h>
|
|
#include <wchar.h>
|
|
#include <stdio.h>
|
|
#include <assert.h>
|
|
|
|
/* Determine if path prefix matches current cygdrive */
|
|
#define iscygdrive(path) \
|
|
(path_prefix_p (mount_table->cygdrive, (path), mount_table->cygdrive_len, false))
|
|
|
|
#define iscygdrive_device(path) \
|
|
(isalpha (path[mount_table->cygdrive_len]) && \
|
|
(path[mount_table->cygdrive_len + 1] == '/' || \
|
|
!path[mount_table->cygdrive_len + 1]))
|
|
|
|
#define isproc(path) \
|
|
(path_prefix_p (proc, (path), proc_len, false))
|
|
|
|
bool NO_COPY mount_info::got_usr_bin;
|
|
bool NO_COPY mount_info::got_usr_lib;
|
|
int NO_COPY mount_info::root_idx = -1;
|
|
|
|
/* is_unc_share: Return non-zero if PATH begins with //server/share
|
|
or with one of the native prefixes //./ or //?/
|
|
This function is only used to test for valid input strings.
|
|
The later normalization drops the native prefixes. */
|
|
|
|
static inline bool __stdcall
|
|
is_native_path (const char *path)
|
|
{
|
|
return isdirsep (path[0])
|
|
&& (isdirsep (path[1]) || path[1] == '?')
|
|
&& (path[2] == '?' || path[2] == '.')
|
|
&& isdirsep (path[3])
|
|
&& isalpha (path[4]);
|
|
}
|
|
|
|
static inline bool __stdcall
|
|
is_unc_share (const char *path)
|
|
{
|
|
const char *p;
|
|
return (isdirsep (path[0])
|
|
&& isdirsep (path[1])
|
|
&& isalnum (path[2])
|
|
&& ((p = strpbrk (path + 3, "\\/")) != NULL)
|
|
&& isalnum (p[1]));
|
|
}
|
|
|
|
/* Return true if src_path is a valid, internally supported device name.
|
|
In that case, win32_path gets the corresponding NT device name and
|
|
dev is appropriately filled with device information. */
|
|
|
|
static bool
|
|
win32_device_name (const char *src_path, char *win32_path, device& dev)
|
|
{
|
|
dev.parse (src_path);
|
|
if (dev == FH_FS || dev == FH_DEV)
|
|
return false;
|
|
strcpy (win32_path, dev.native);
|
|
return true;
|
|
}
|
|
|
|
/* Beginning with Samba 3.0.28a, Samba allows to get version information using
|
|
the ExtendedInfo member returned by a FileFsObjectIdInformation request.
|
|
We just store the samba_version information for now. Older versions than
|
|
3.2 are still guessed at by testing the file system flags. */
|
|
#define SAMBA_EXTENDED_INFO_MAGIC 0x536d4261 /* "SmBa" */
|
|
#define SAMBA_EXTENDED_INFO_VERSION_STRING_LENGTH 28
|
|
#pragma pack(push,4)
|
|
struct smb_extended_info {
|
|
DWORD samba_magic; /* Always SAMBA_EXTENDED_INFO_MAGIC */
|
|
DWORD samba_version; /* Major/Minor/Release/Revision */
|
|
DWORD samba_subversion; /* Prerelease/RC/Vendor patch */
|
|
LARGE_INTEGER samba_gitcommitdate;
|
|
char samba_version_string[SAMBA_EXTENDED_INFO_VERSION_STRING_LENGTH];
|
|
};
|
|
#pragma pack(pop)
|
|
|
|
bool
|
|
fs_info::update (PUNICODE_STRING upath, HANDLE in_vol)
|
|
{
|
|
NTSTATUS status = STATUS_OBJECT_NAME_NOT_FOUND;
|
|
HANDLE vol;
|
|
OBJECT_ATTRIBUTES attr;
|
|
IO_STATUS_BLOCK io;
|
|
bool no_media = false;
|
|
FILE_FS_DEVICE_INFORMATION ffdi;
|
|
FILE_FS_OBJECTID_INFORMATION ffoi;
|
|
struct {
|
|
FILE_FS_ATTRIBUTE_INFORMATION ffai;
|
|
WCHAR buf[NAME_MAX + 1];
|
|
} ffai_buf;
|
|
struct {
|
|
FILE_FS_VOLUME_INFORMATION ffvi;
|
|
WCHAR buf[NAME_MAX + 1];
|
|
} ffvi_buf;
|
|
UNICODE_STRING fsname;
|
|
|
|
clear ();
|
|
if (in_vol)
|
|
vol = in_vol;
|
|
else
|
|
{
|
|
/* Always caseinsensitive. We really just need access to the drive. */
|
|
InitializeObjectAttributes (&attr, upath, OBJ_CASE_INSENSITIVE, NULL,
|
|
NULL);
|
|
status = NtOpenFile (&vol, READ_CONTROL, &attr, &io,
|
|
FILE_SHARE_VALID_FLAGS, FILE_OPEN_FOR_BACKUP_INTENT);
|
|
while (!NT_SUCCESS (status)
|
|
&& (attr.ObjectName->Length > 7 * sizeof (WCHAR)
|
|
|| status == STATUS_NO_MEDIA_IN_DEVICE))
|
|
{
|
|
UNICODE_STRING dir;
|
|
RtlSplitUnicodePath (attr.ObjectName, &dir, NULL);
|
|
attr.ObjectName = &dir;
|
|
if (status == STATUS_NO_MEDIA_IN_DEVICE)
|
|
{
|
|
no_media = true;
|
|
dir.Length = 6 * sizeof (WCHAR);
|
|
}
|
|
else if (dir.Length > 7 * sizeof (WCHAR))
|
|
dir.Length -= sizeof (WCHAR);
|
|
status = NtOpenFile (&vol, READ_CONTROL, &attr, &io,
|
|
FILE_SHARE_VALID_FLAGS,
|
|
FILE_OPEN_FOR_BACKUP_INTENT);
|
|
}
|
|
if (!NT_SUCCESS (status))
|
|
{
|
|
debug_printf ("Cannot access path %S, status %08lx",
|
|
attr.ObjectName, status);
|
|
NtClose (vol);
|
|
return false;
|
|
}
|
|
}
|
|
|
|
status = NtQueryVolumeInformationFile (vol, &io, &ffvi_buf.ffvi,
|
|
sizeof ffvi_buf,
|
|
FileFsVolumeInformation);
|
|
sernum = NT_SUCCESS (status) ? ffvi_buf.ffvi.VolumeSerialNumber : 0;
|
|
status = NtQueryVolumeInformationFile (vol, &io, &ffdi, sizeof ffdi,
|
|
FileFsDeviceInformation);
|
|
if (!NT_SUCCESS (status))
|
|
ffdi.DeviceType = ffdi.Characteristics = 0;
|
|
|
|
if ((ffdi.Characteristics & FILE_REMOTE_DEVICE)
|
|
|| (!ffdi.DeviceType
|
|
&& RtlEqualUnicodePathPrefix (attr.ObjectName, &ro_u_uncp, TRUE)))
|
|
is_remote_drive (true);
|
|
|
|
if (!no_media)
|
|
status = NtQueryVolumeInformationFile (vol, &io, &ffai_buf.ffai,
|
|
sizeof ffai_buf,
|
|
FileFsAttributeInformation);
|
|
if (no_media || !NT_SUCCESS (status))
|
|
{
|
|
debug_printf ("Cannot get volume attributes (%S), %08lx",
|
|
attr.ObjectName, status);
|
|
if (!in_vol)
|
|
NtClose (vol);
|
|
return false;
|
|
}
|
|
flags (ffai_buf.ffai.FileSystemAttributes);
|
|
name_len (ffai_buf.ffai.MaximumComponentNameLength);
|
|
/* Should be reevaluated for each new OS. Right now this mask is valid up
|
|
to Vista. The important point here is to test only flags indicating
|
|
capabilities and to ignore flags indicating a specific state of this
|
|
volume. At present these flags to ignore are FILE_VOLUME_IS_COMPRESSED
|
|
and FILE_READ_ONLY_VOLUME. */
|
|
#define GETVOLINFO_VALID_MASK (0x003701ffUL)
|
|
#define TEST_GVI(f,m) (((f) & GETVOLINFO_VALID_MASK) == (m))
|
|
|
|
/* Volume quotas are potentially supported since Samba 3.0, object ids and
|
|
the unicode on disk flag since Samba 3.2. */
|
|
#define SAMBA_IGNORE (FILE_VOLUME_QUOTAS \
|
|
| FILE_SUPPORTS_OBJECT_IDS \
|
|
| FILE_UNICODE_ON_DISK)
|
|
#define FS_IS_SAMBA TEST_GVI(flags () & ~SAMBA_IGNORE, \
|
|
FILE_CASE_SENSITIVE_SEARCH \
|
|
| FILE_CASE_PRESERVED_NAMES \
|
|
| FILE_PERSISTENT_ACLS)
|
|
#define FS_IS_NETAPP_DATAONTAP TEST_GVI(flags (), \
|
|
FILE_CASE_SENSITIVE_SEARCH \
|
|
| FILE_CASE_PRESERVED_NAMES \
|
|
| FILE_UNICODE_ON_DISK \
|
|
| FILE_PERSISTENT_ACLS \
|
|
| FILE_NAMED_STREAMS)
|
|
RtlInitCountedUnicodeString (&fsname, ffai_buf.ffai.FileSystemName,
|
|
ffai_buf.ffai.FileSystemNameLength);
|
|
if (is_remote_drive ())
|
|
{
|
|
/* This always fails on NT4. */
|
|
status = NtQueryVolumeInformationFile (vol, &io, &ffoi, sizeof ffoi,
|
|
FileFsObjectIdInformation);
|
|
if (NT_SUCCESS (status))
|
|
{
|
|
smb_extended_info *extended_info = (smb_extended_info *)
|
|
&ffoi.ExtendedInfo;
|
|
if (extended_info->samba_magic == SAMBA_EXTENDED_INFO_MAGIC)
|
|
{
|
|
is_samba (true);
|
|
samba_version (extended_info->samba_version);
|
|
}
|
|
}
|
|
if (!got_fs ()
|
|
/* Test for Samba on NT4 or for older Samba releases not supporting
|
|
extended info. */
|
|
&& !is_samba (RtlEqualUnicodeString (&fsname, &ro_u_ntfs, FALSE)
|
|
&& FS_IS_SAMBA)
|
|
/* Netapp inode info is unusable. */
|
|
&& !is_netapp (RtlEqualUnicodeString (&fsname, &ro_u_ntfs, FALSE)
|
|
&& FS_IS_NETAPP_DATAONTAP)
|
|
/* Microsoft NFS needs distinct access methods for metadata. */
|
|
&& !is_nfs (RtlEqualUnicodeString (&fsname, &ro_u_nfs, FALSE))
|
|
/* Known remote file system which can't handle calls to
|
|
NtQueryDirectoryFile(FileIdBothDirectoryInformation) */
|
|
&& !is_unixfs (RtlEqualUnicodeString (&fsname, &ro_u_unixfs, FALSE)))
|
|
/* Known remote file system with buggy open calls. Further
|
|
explanation in fhandler.cc (fhandler_disk_file::open). */
|
|
is_sunwnfs (RtlEqualUnicodeString (&fsname, &ro_u_sunwnfs, FALSE));
|
|
}
|
|
if (!got_fs ()
|
|
&& !is_ntfs (RtlEqualUnicodeString (&fsname, &ro_u_ntfs, FALSE))
|
|
&& !is_fat (RtlEqualUnicodePathPrefix (&fsname, &ro_u_fat, TRUE))
|
|
&& !is_csc_cache (RtlEqualUnicodeString (&fsname, &ro_u_csc, FALSE))
|
|
&& is_cdrom (ffdi.DeviceType == FILE_DEVICE_CD_ROM))
|
|
{
|
|
is_udf (RtlEqualUnicodeString (&fsname, &ro_u_udf, FALSE));
|
|
/* UDF on NT 5.x is broken (at least) in terms of case sensitivity.
|
|
The UDF driver reports the FILE_CASE_SENSITIVE_SEARCH capability
|
|
but:
|
|
- Opening the root directory for query seems to work at first,
|
|
but the filenames in the directory listing are mutilated.
|
|
- When trying to open a file or directory case sensitive, the file
|
|
appears to be non-existant. */
|
|
if (is_udf () && wincap.has_broken_udf ())
|
|
caseinsensitive (true);
|
|
}
|
|
|
|
has_acls (flags () & FS_PERSISTENT_ACLS);
|
|
/* Netapp inodes numbers are fly-by-night. */
|
|
hasgood_inode ((has_acls () && !is_netapp ()) || is_nfs ());
|
|
/* Case sensitivity is supported if FILE_CASE_SENSITIVE_SEARCH is set,
|
|
except on Samba which handles Windows clients case insensitive.
|
|
NFS doesn't set the FILE_CASE_SENSITIVE_SEARCH flag but is case
|
|
sensitive. */
|
|
caseinsensitive ((!(flags () & FILE_CASE_SENSITIVE_SEARCH) || is_samba ())
|
|
&& !is_nfs ());
|
|
|
|
if (!in_vol)
|
|
NtClose (vol);
|
|
return true;
|
|
}
|
|
|
|
inline void
|
|
mount_info::create_root_entry (const PWCHAR root)
|
|
{
|
|
/* Create a default root dir derived from the location of the Cygwin DLL.
|
|
The entry is immutable, unless the "override" option is given in /etc/fstab. */
|
|
char native_root[PATH_MAX];
|
|
sys_wcstombs (native_root, PATH_MAX, root);
|
|
mount_table->add_item (native_root, "/",
|
|
MOUNT_SYSTEM | MOUNT_BINARY | MOUNT_IMMUTABLE | MOUNT_AUTOMATIC);
|
|
/* Create a default cygdrive entry. Note that this is a user entry.
|
|
This allows to override it with mount, unless the sysadmin created
|
|
a cygdrive entry in /etc/fstab. */
|
|
cygdrive_flags = MOUNT_BINARY | MOUNT_NOPOSIX | MOUNT_CYGDRIVE;
|
|
strcpy (cygdrive, CYGWIN_INFO_CYGDRIVE_DEFAULT_PREFIX "/");
|
|
cygdrive_len = strlen (cygdrive);
|
|
}
|
|
|
|
/* init: Initialize the mount table. */
|
|
|
|
void
|
|
mount_info::init ()
|
|
{
|
|
nmounts = 0;
|
|
PWCHAR pathend;
|
|
WCHAR path[PATH_MAX];
|
|
|
|
pathend = wcpcpy (path, cygwin_shared->installation_root);
|
|
create_root_entry (path);
|
|
pathend = wcpcpy (pathend, L"\\etc\\fstab");
|
|
|
|
from_fstab (false, path, pathend);
|
|
from_fstab (true, path, pathend);
|
|
|
|
if (!got_usr_bin || !got_usr_lib)
|
|
{
|
|
char native[PATH_MAX];
|
|
assert (root_idx != -1);
|
|
char *p = stpcpy (native, mount[root_idx].native_path);
|
|
if (!got_usr_bin)
|
|
{
|
|
stpcpy (p, "\\bin");
|
|
mount_table->add_item (native, "/usr/bin",
|
|
MOUNT_SYSTEM | MOUNT_BINARY | MOUNT_AUTOMATIC);
|
|
}
|
|
if (!got_usr_lib)
|
|
{
|
|
stpcpy (p, "\\lib");
|
|
mount_table->add_item (native, "/usr/lib",
|
|
MOUNT_SYSTEM | MOUNT_BINARY | MOUNT_AUTOMATIC);
|
|
}
|
|
}
|
|
}
|
|
|
|
static void
|
|
set_flags (unsigned *flags, unsigned val)
|
|
{
|
|
*flags = val;
|
|
if (!(*flags & PATH_BINARY))
|
|
{
|
|
*flags |= PATH_TEXT;
|
|
debug_printf ("flags: text (%p)", *flags & (PATH_TEXT | PATH_BINARY));
|
|
}
|
|
else
|
|
{
|
|
*flags |= PATH_BINARY;
|
|
debug_printf ("flags: binary (%p)", *flags & (PATH_TEXT | PATH_BINARY));
|
|
}
|
|
}
|
|
|
|
int
|
|
mount_item::build_win32 (char *dst, const char *src, unsigned *outflags, unsigned chroot_pathlen)
|
|
{
|
|
int n, err = 0;
|
|
const char *real_native_path;
|
|
int real_posix_pathlen;
|
|
set_flags (outflags, (unsigned) flags);
|
|
if (!cygheap->root.exists () || posix_pathlen != 1 || posix_path[0] != '/')
|
|
{
|
|
n = native_pathlen;
|
|
real_native_path = native_path;
|
|
real_posix_pathlen = chroot_pathlen ?: posix_pathlen;
|
|
}
|
|
else
|
|
{
|
|
n = cygheap->root.native_length ();
|
|
real_native_path = cygheap->root.native_path ();
|
|
real_posix_pathlen = posix_pathlen;
|
|
}
|
|
memcpy (dst, real_native_path, n + 1);
|
|
const char *p = src + real_posix_pathlen;
|
|
if (*p == '/')
|
|
/* nothing */;
|
|
else if ((isdrive (dst) && !dst[2]) || *p)
|
|
dst[n++] = '\\';
|
|
if ((n + strlen (p)) >= NT_MAX_PATH)
|
|
err = ENAMETOOLONG;
|
|
else
|
|
backslashify (p, dst + n, 0);
|
|
return err;
|
|
}
|
|
|
|
/* conv_to_win32_path: Ensure src_path is a pure Win32 path and store
|
|
the result in win32_path.
|
|
|
|
If win32_path != NULL, the relative path, if possible to keep, is
|
|
stored in win32_path. If the relative path isn't possible to keep,
|
|
the full path is stored.
|
|
|
|
If full_win32_path != NULL, the full path is stored there.
|
|
|
|
The result is zero for success, or an errno value.
|
|
|
|
{,full_}win32_path must have sufficient space (i.e. NT_MAX_PATH bytes). */
|
|
|
|
int
|
|
mount_info::conv_to_win32_path (const char *src_path, char *dst, device& dev,
|
|
unsigned *flags)
|
|
{
|
|
bool chroot_ok = !cygheap->root.exists ();
|
|
while (sys_mount_table_counter < cygwin_shared->sys_mount_table_counter)
|
|
{
|
|
int current = cygwin_shared->sys_mount_table_counter;
|
|
init ();
|
|
sys_mount_table_counter = current;
|
|
}
|
|
MALLOC_CHECK;
|
|
|
|
dev.devn = FH_FS;
|
|
|
|
*flags = 0;
|
|
debug_printf ("conv_to_win32_path (%s)", src_path);
|
|
|
|
int i, rc;
|
|
mount_item *mi = NULL; /* initialized to avoid compiler warning */
|
|
|
|
/* The path is already normalized, without ../../ stuff, we need to have this
|
|
so that we can move from one mounted directory to another with relative
|
|
stuff.
|
|
|
|
eg mounting c:/foo /foo
|
|
d:/bar /bar
|
|
|
|
cd /bar
|
|
ls ../foo
|
|
|
|
should look in c:/foo, not d:/foo.
|
|
|
|
converting normalizex UNIX path to a DOS-style path, looking up the
|
|
appropriate drive in the mount table. */
|
|
|
|
/* See if this is a cygwin "device" */
|
|
if (win32_device_name (src_path, dst, dev))
|
|
{
|
|
*flags = MOUNT_BINARY; /* FIXME: Is this a sensible default for devices? */
|
|
rc = 0;
|
|
goto out_no_chroot_check;
|
|
}
|
|
|
|
MALLOC_CHECK;
|
|
/* If the path is on a network drive or a //./ resp.//?/ path prefix,
|
|
bypass the mount table. If it's // or //MACHINE, use the netdrive
|
|
device. */
|
|
if (src_path[1] == '/')
|
|
{
|
|
if (!strchr (src_path + 2, '/'))
|
|
{
|
|
dev = *netdrive_dev;
|
|
set_flags (flags, PATH_BINARY);
|
|
}
|
|
backslashify (src_path, dst, 0);
|
|
/* Go through chroot check */
|
|
goto out;
|
|
}
|
|
if (isproc (src_path))
|
|
{
|
|
dev = *proc_dev;
|
|
dev.devn = fhandler_proc::get_proc_fhandler (src_path);
|
|
if (dev.devn == FH_BAD)
|
|
return ENOENT;
|
|
set_flags (flags, PATH_BINARY);
|
|
strcpy (dst, src_path);
|
|
goto out;
|
|
}
|
|
/* Check if the cygdrive prefix was specified. If so, just strip
|
|
off the prefix and transform it into an MS-DOS path. */
|
|
else if (iscygdrive (src_path))
|
|
{
|
|
int n = mount_table->cygdrive_len - 1;
|
|
int unit;
|
|
|
|
if (!src_path[n])
|
|
{
|
|
unit = 0;
|
|
dst[0] = '\0';
|
|
if (mount_table->cygdrive_len > 1)
|
|
dev = *cygdrive_dev;
|
|
}
|
|
else if (cygdrive_win32_path (src_path, dst, unit))
|
|
{
|
|
set_flags (flags, (unsigned) cygdrive_flags);
|
|
goto out;
|
|
}
|
|
else if (mount_table->cygdrive_len > 1)
|
|
return ENOENT;
|
|
}
|
|
|
|
int chroot_pathlen;
|
|
chroot_pathlen = 0;
|
|
/* Check the mount table for prefix matches. */
|
|
for (i = 0; i < nmounts; i++)
|
|
{
|
|
const char *path;
|
|
int len;
|
|
|
|
mi = mount + posix_sorted[i];
|
|
if (!cygheap->root.exists ()
|
|
|| (mi->posix_pathlen == 1 && mi->posix_path[0] == '/'))
|
|
{
|
|
path = mi->posix_path;
|
|
len = mi->posix_pathlen;
|
|
}
|
|
else if (cygheap->root.posix_ok (mi->posix_path))
|
|
{
|
|
path = cygheap->root.unchroot (mi->posix_path);
|
|
chroot_pathlen = len = strlen (path);
|
|
}
|
|
else
|
|
{
|
|
chroot_pathlen = 0;
|
|
continue;
|
|
}
|
|
|
|
if (path_prefix_p (path, src_path, len, mi->flags & MOUNT_NOPOSIX))
|
|
break;
|
|
}
|
|
|
|
if (i < nmounts)
|
|
{
|
|
int err = mi->build_win32 (dst, src_path, flags, chroot_pathlen);
|
|
if (err)
|
|
return err;
|
|
chroot_ok = true;
|
|
}
|
|
else
|
|
{
|
|
int offset = 0;
|
|
if (src_path[1] != '/' && src_path[1] != ':')
|
|
offset = cygheap->cwd.get_drive (dst);
|
|
backslashify (src_path, dst + offset, 0);
|
|
}
|
|
out:
|
|
MALLOC_CHECK;
|
|
if (chroot_ok || cygheap->root.ischroot_native (dst))
|
|
rc = 0;
|
|
else
|
|
{
|
|
debug_printf ("attempt to access outside of chroot '%s - %s'",
|
|
cygheap->root.posix_path (), cygheap->root.native_path ());
|
|
rc = ENOENT;
|
|
}
|
|
|
|
out_no_chroot_check:
|
|
debug_printf ("src_path %s, dst %s, flags %p, rc %d", src_path, dst, *flags, rc);
|
|
return rc;
|
|
}
|
|
|
|
int
|
|
mount_info::get_mounts_here (const char *parent_dir, int parent_dir_len,
|
|
PUNICODE_STRING mount_points,
|
|
PUNICODE_STRING cygd)
|
|
{
|
|
int n_mounts = 0;
|
|
|
|
for (int i = 0; i < nmounts; i++)
|
|
{
|
|
mount_item *mi = mount + posix_sorted[i];
|
|
char *last_slash = strrchr (mi->posix_path, '/');
|
|
if (!last_slash)
|
|
continue;
|
|
if (last_slash == mi->posix_path)
|
|
{
|
|
if (parent_dir_len == 1 && mi->posix_pathlen > 1)
|
|
RtlCreateUnicodeStringFromAsciiz (&mount_points[n_mounts++],
|
|
last_slash + 1);
|
|
}
|
|
else if (parent_dir_len == last_slash - mi->posix_path
|
|
&& strncasematch (parent_dir, mi->posix_path, parent_dir_len))
|
|
RtlCreateUnicodeStringFromAsciiz (&mount_points[n_mounts++],
|
|
last_slash + 1);
|
|
}
|
|
RtlCreateUnicodeStringFromAsciiz (cygd, cygdrive + 1);
|
|
if (cygd->Length)
|
|
cygd->Length -= 2; // Strip trailing slash
|
|
return n_mounts;
|
|
}
|
|
|
|
/* cygdrive_posix_path: Build POSIX path used as the
|
|
mount point for cygdrives created when there is no other way to
|
|
obtain a POSIX path from a Win32 one. */
|
|
|
|
void
|
|
mount_info::cygdrive_posix_path (const char *src, char *dst, int trailing_slash_p)
|
|
{
|
|
int len = cygdrive_len;
|
|
|
|
memcpy (dst, cygdrive, len + 1);
|
|
|
|
/* Now finish the path off with the drive letter to be used.
|
|
The cygdrive prefix always ends with a trailing slash so
|
|
the drive letter is added after the path. */
|
|
dst[len++] = cyg_tolower (src[0]);
|
|
if (!src[2] || (isdirsep (src[2]) && !src[3]))
|
|
dst[len++] = '\000';
|
|
else
|
|
{
|
|
int n;
|
|
dst[len++] = '/';
|
|
if (isdirsep (src[2]))
|
|
n = 3;
|
|
else
|
|
n = 2;
|
|
strcpy (dst + len, src + n);
|
|
}
|
|
slashify (dst, dst, trailing_slash_p);
|
|
}
|
|
|
|
int
|
|
mount_info::cygdrive_win32_path (const char *src, char *dst, int& unit)
|
|
{
|
|
int res;
|
|
const char *p = src + cygdrive_len;
|
|
if (!isalpha (*p) || (!isdirsep (p[1]) && p[1]))
|
|
{
|
|
unit = -1; /* FIXME: should be zero, maybe? */
|
|
dst[0] = '\0';
|
|
res = 0;
|
|
}
|
|
else
|
|
{
|
|
/* drive letter must always be uppercase for casesensitive native NT. */
|
|
dst[0] = cyg_toupper (*p);
|
|
dst[1] = ':';
|
|
strcpy (dst + 2, p + 1);
|
|
backslashify (dst, dst, !dst[2]);
|
|
unit = dst[0];
|
|
res = 1;
|
|
}
|
|
debug_printf ("src '%s', dst '%s'", src, dst);
|
|
return res;
|
|
}
|
|
|
|
/* conv_to_posix_path: Ensure src_path is a POSIX path.
|
|
|
|
The result is zero for success, or an errno value.
|
|
posix_path must have sufficient space (i.e. NT_MAX_PATH bytes).
|
|
If keep_rel_p is non-zero, relative paths stay that way. */
|
|
|
|
/* TODO: Change conv_to_posix_path to work with native paths. */
|
|
|
|
/* src_path is a wide Win32 path. */
|
|
int
|
|
mount_info::conv_to_posix_path (PWCHAR src_path, char *posix_path,
|
|
int keep_rel_p)
|
|
{
|
|
bool changed = false;
|
|
if (!wcsncmp (src_path, L"\\\\?\\", 4))
|
|
{
|
|
src_path += 4;
|
|
if (src_path[1] != L':') /* native UNC path */
|
|
{
|
|
*(src_path += 2) = L'\\';
|
|
changed = true;
|
|
}
|
|
}
|
|
tmp_pathbuf tp;
|
|
char *buf = tp.c_get ();
|
|
sys_wcstombs (buf, NT_MAX_PATH, src_path);
|
|
int ret = conv_to_posix_path (buf, posix_path, keep_rel_p);
|
|
if (changed)
|
|
src_path[0] = L'C';
|
|
return ret;
|
|
}
|
|
|
|
int
|
|
mount_info::conv_to_posix_path (const char *src_path, char *posix_path,
|
|
int keep_rel_p)
|
|
{
|
|
int src_path_len = strlen (src_path);
|
|
int relative_path_p = !isabspath (src_path);
|
|
int trailing_slash_p;
|
|
|
|
if (src_path_len <= 1)
|
|
trailing_slash_p = 0;
|
|
else
|
|
{
|
|
const char *lastchar = src_path + src_path_len - 1;
|
|
trailing_slash_p = isdirsep (*lastchar) && lastchar[-1] != ':';
|
|
}
|
|
|
|
debug_printf ("conv_to_posix_path (%s, %s, %s)", src_path,
|
|
keep_rel_p ? "keep-rel" : "no-keep-rel",
|
|
trailing_slash_p ? "add-slash" : "no-add-slash");
|
|
MALLOC_CHECK;
|
|
|
|
if (src_path_len >= NT_MAX_PATH)
|
|
{
|
|
debug_printf ("ENAMETOOLONG");
|
|
return ENAMETOOLONG;
|
|
}
|
|
|
|
/* FIXME: For now, if the path is relative and it's supposed to stay
|
|
that way, skip mount table processing. */
|
|
|
|
if (keep_rel_p && relative_path_p)
|
|
{
|
|
slashify (src_path, posix_path, 0);
|
|
debug_printf ("%s = conv_to_posix_path (%s)", posix_path, src_path);
|
|
return 0;
|
|
}
|
|
|
|
tmp_pathbuf tp;
|
|
char *pathbuf = tp.c_get ();
|
|
char *tail;
|
|
int rc = normalize_win32_path (src_path, pathbuf, tail);
|
|
if (rc != 0)
|
|
{
|
|
debug_printf ("%d = conv_to_posix_path (%s)", rc, src_path);
|
|
return rc;
|
|
}
|
|
|
|
int pathbuflen = tail - pathbuf;
|
|
for (int i = 0; i < nmounts; ++i)
|
|
{
|
|
mount_item &mi = mount[native_sorted[i]];
|
|
if (!path_prefix_p (mi.native_path, pathbuf, mi.native_pathlen,
|
|
mi.flags & MOUNT_NOPOSIX))
|
|
continue;
|
|
|
|
if (cygheap->root.exists () && !cygheap->root.posix_ok (mi.posix_path))
|
|
continue;
|
|
|
|
/* SRC_PATH is in the mount table. */
|
|
int nextchar;
|
|
const char *p = pathbuf + mi.native_pathlen;
|
|
|
|
if (!*p || !p[1])
|
|
nextchar = 0;
|
|
else if (isdirsep (*p))
|
|
nextchar = -1;
|
|
else
|
|
nextchar = 1;
|
|
|
|
int addslash = nextchar > 0 ? 1 : 0;
|
|
if ((mi.posix_pathlen + (pathbuflen - mi.native_pathlen) + addslash) >= NT_MAX_PATH)
|
|
return ENAMETOOLONG;
|
|
strcpy (posix_path, mi.posix_path);
|
|
if (addslash)
|
|
strcat (posix_path, "/");
|
|
if (nextchar)
|
|
slashify (p,
|
|
posix_path + addslash + (mi.posix_pathlen == 1 ? 0 : mi.posix_pathlen),
|
|
trailing_slash_p);
|
|
|
|
if (cygheap->root.exists ())
|
|
{
|
|
const char *p = cygheap->root.unchroot (posix_path);
|
|
memmove (posix_path, p, strlen (p) + 1);
|
|
}
|
|
goto out;
|
|
}
|
|
|
|
if (!cygheap->root.exists ())
|
|
/* nothing */;
|
|
else if (!cygheap->root.ischroot_native (pathbuf))
|
|
return ENOENT;
|
|
else
|
|
{
|
|
const char *p = pathbuf + cygheap->root.native_length ();
|
|
if (*p)
|
|
slashify (p, posix_path, trailing_slash_p);
|
|
else
|
|
{
|
|
posix_path[0] = '/';
|
|
posix_path[1] = '\0';
|
|
}
|
|
goto out;
|
|
}
|
|
|
|
/* Not in the database. This should [theoretically] only happen if either
|
|
the path begins with //, or / isn't mounted, or the path has a drive
|
|
letter not covered by the mount table. If it's a relative path then the
|
|
caller must want an absolute path (otherwise we would have returned
|
|
above). So we always return an absolute path at this point. */
|
|
if (isdrive (pathbuf))
|
|
cygdrive_posix_path (pathbuf, posix_path, trailing_slash_p);
|
|
else
|
|
{
|
|
/* The use of src_path and not pathbuf here is intentional.
|
|
We couldn't translate the path, so just ensure no \'s are present. */
|
|
slashify (src_path, posix_path, trailing_slash_p);
|
|
}
|
|
|
|
out:
|
|
debug_printf ("%s = conv_to_posix_path (%s)", posix_path, src_path);
|
|
MALLOC_CHECK;
|
|
return 0;
|
|
}
|
|
|
|
/* Return flags associated with a mount point given the win32 path. */
|
|
|
|
unsigned
|
|
mount_info::set_flags_from_win32_path (const char *p)
|
|
{
|
|
for (int i = 0; i < nmounts; i++)
|
|
{
|
|
mount_item &mi = mount[native_sorted[i]];
|
|
if (path_prefix_p (mi.native_path, p, mi.native_pathlen,
|
|
mi.flags & MOUNT_NOPOSIX))
|
|
return mi.flags;
|
|
}
|
|
return PATH_BINARY;
|
|
}
|
|
|
|
inline char *
|
|
skip_ws (char *in)
|
|
{
|
|
while (*in == ' ' || *in == '\t')
|
|
++in;
|
|
return in;
|
|
}
|
|
|
|
inline char *
|
|
find_ws (char *in)
|
|
{
|
|
while (*in && *in != ' ' && *in != '\t')
|
|
++in;
|
|
return in;
|
|
}
|
|
|
|
inline char *
|
|
conv_fstab_spaces (char *field)
|
|
{
|
|
register char *sp = field;
|
|
while ((sp = strstr (sp, "\\040")) != NULL)
|
|
{
|
|
*sp++ = ' ';
|
|
memmove (sp, sp + 3, strlen (sp + 3) + 1);
|
|
}
|
|
return field;
|
|
}
|
|
|
|
struct opt
|
|
{
|
|
const char *name;
|
|
unsigned val;
|
|
bool clear;
|
|
} oopts[] =
|
|
{
|
|
{"acl", MOUNT_NOACL, 1},
|
|
{"auto", 0, 0},
|
|
{"binary", MOUNT_BINARY, 0},
|
|
{"cygexec", MOUNT_CYGWIN_EXEC, 0},
|
|
{"exec", MOUNT_EXEC, 0},
|
|
{"noacl", MOUNT_NOACL, 0},
|
|
{"nosuid", 0, 0},
|
|
{"notexec", MOUNT_NOTEXEC, 0},
|
|
{"nouser", MOUNT_SYSTEM, 0},
|
|
{"override", MOUNT_OVERRIDE, 0},
|
|
{"posix=0", MOUNT_NOPOSIX, 0},
|
|
{"posix=1", MOUNT_NOPOSIX, 1},
|
|
{"text", MOUNT_BINARY, 1},
|
|
{"user", MOUNT_SYSTEM, 1}
|
|
};
|
|
|
|
static bool
|
|
read_flags (char *options, unsigned &flags)
|
|
{
|
|
while (*options)
|
|
{
|
|
char *p = strchr (options, ',');
|
|
if (p)
|
|
*p++ = '\0';
|
|
else
|
|
p = strchr (options, '\0');
|
|
|
|
for (opt *o = oopts;
|
|
o < (oopts + (sizeof (oopts) / sizeof (oopts[0])));
|
|
o++)
|
|
if (strcmp (options, o->name) == 0)
|
|
{
|
|
if (o->clear)
|
|
flags &= ~o->val;
|
|
else
|
|
flags |= o->val;
|
|
goto gotit;
|
|
}
|
|
system_printf ("invalid fstab option - '%s'", options);
|
|
return false;
|
|
|
|
gotit:
|
|
options = p;
|
|
}
|
|
return true;
|
|
}
|
|
|
|
bool
|
|
mount_info::from_fstab_line (char *line, bool user)
|
|
{
|
|
char *native_path, *posix_path, *fs_type;
|
|
|
|
/* First field: Native path. */
|
|
char *c = skip_ws (line);
|
|
if (!*c || *c == '#')
|
|
return true;
|
|
char *cend = find_ws (c);
|
|
*cend = '\0';
|
|
native_path = conv_fstab_spaces (c);
|
|
/* Always convert drive letter to uppercase for case sensitivity. */
|
|
if (isdrive (native_path))
|
|
native_path[0] = cyg_toupper (native_path[0]);
|
|
/* Second field: POSIX path. */
|
|
c = skip_ws (cend + 1);
|
|
if (!*c)
|
|
return true;
|
|
cend = find_ws (c);
|
|
*cend = '\0';
|
|
posix_path = conv_fstab_spaces (c);
|
|
/* Third field: FS type. */
|
|
c = skip_ws (cend + 1);
|
|
if (!*c)
|
|
return true;
|
|
cend = find_ws (c);
|
|
*cend = '\0';
|
|
fs_type = c;
|
|
/* Forth field: Flags. */
|
|
c = skip_ws (cend + 1);
|
|
if (!*c)
|
|
return true;
|
|
cend = find_ws (c);
|
|
*cend = '\0';
|
|
unsigned mount_flags = MOUNT_SYSTEM | MOUNT_BINARY;
|
|
if (!strcmp (fs_type, "cygdrive"))
|
|
mount_flags |= MOUNT_NOPOSIX;
|
|
if (!read_flags (c, mount_flags))
|
|
return true;
|
|
if (user)
|
|
mount_flags &= ~MOUNT_SYSTEM;
|
|
if (!strcmp (fs_type, "cygdrive"))
|
|
{
|
|
cygdrive_flags = mount_flags | MOUNT_CYGDRIVE;
|
|
slashify (posix_path, cygdrive, 1);
|
|
cygdrive_len = strlen (cygdrive);
|
|
}
|
|
else
|
|
{
|
|
int res = mount_table->add_item (native_path, posix_path, mount_flags);
|
|
if (res && get_errno () == EMFILE)
|
|
return false;
|
|
}
|
|
return true;
|
|
}
|
|
|
|
bool
|
|
mount_info::from_fstab (bool user, WCHAR fstab[], PWCHAR fstab_end)
|
|
{
|
|
UNICODE_STRING upath;
|
|
OBJECT_ATTRIBUTES attr;
|
|
IO_STATUS_BLOCK io;
|
|
NTSTATUS status;
|
|
HANDLE fh;
|
|
|
|
if (user)
|
|
{
|
|
extern void transform_chars (PWCHAR, PWCHAR);
|
|
PWCHAR username;
|
|
sys_mbstowcs (username = wcpcpy (fstab_end, L".d\\"),
|
|
NT_MAX_PATH - (fstab_end - fstab),
|
|
cygheap->user.name ());
|
|
/* Make sure special chars in the username are converted according to
|
|
the rules. */
|
|
transform_chars (username, username + wcslen (username) - 1);
|
|
}
|
|
RtlInitUnicodeString (&upath, fstab);
|
|
InitializeObjectAttributes (&attr, &upath, OBJ_CASE_INSENSITIVE, NULL, NULL);
|
|
debug_printf ("Try to read mounts from %W", fstab);
|
|
status = NtOpenFile (&fh, SYNCHRONIZE | FILE_READ_DATA, &attr, &io,
|
|
FILE_SHARE_VALID_FLAGS,
|
|
FILE_SYNCHRONOUS_IO_NONALERT
|
|
| FILE_OPEN_FOR_BACKUP_INTENT);
|
|
if (!NT_SUCCESS (status))
|
|
{
|
|
debug_printf ("NtOpenFile(%S) failed, %p", &upath, status);
|
|
return false;
|
|
}
|
|
|
|
char buf[NT_MAX_PATH];
|
|
char *got = buf;
|
|
DWORD len = 0;
|
|
unsigned line = 1;
|
|
/* Using buffer size - 2 leaves space to append two \0. */
|
|
while (NT_SUCCESS (NtReadFile (fh, NULL, NULL, NULL, &io, got,
|
|
(sizeof (buf) - 2) - (got - buf), NULL, NULL)))
|
|
{
|
|
char *end;
|
|
|
|
len = io.Information;
|
|
/* Set end marker. */
|
|
got[len] = got[len + 1] = '\0';
|
|
/* Set len to the absolute len of bytes in buf. */
|
|
len += got - buf;
|
|
/* Reset got to start reading at the start of the buffer again. */
|
|
got = buf;
|
|
retry:
|
|
bool got_nl = false;
|
|
while (got < buf + len && (end = strchr (got, '\n')))
|
|
{
|
|
got_nl = true;
|
|
end[end[-1] == '\r' ? -1 : 0] = '\0';
|
|
if (!from_fstab_line (got, user))
|
|
goto done;
|
|
got = end + 1;
|
|
++line;
|
|
}
|
|
if (len < (sizeof (buf) - 2))
|
|
break;
|
|
/* Check if the buffer contained at least one \n. If not, the
|
|
line length is > 32K. We don't take such long lines. Print
|
|
a debug message and skip this line entirely. */
|
|
if (!got_nl)
|
|
{
|
|
system_printf ("%W: Line %d too long, skipping...", fstab, line);
|
|
while (NT_SUCCESS (NtReadFile (fh, NULL, NULL, NULL, &io, buf,
|
|
(sizeof (buf) - 2), NULL, NULL)))
|
|
{
|
|
len = io.Information;
|
|
buf[len] = buf[len + 1] = '\0';
|
|
got = strchr (buf, '\n');
|
|
if (got)
|
|
{
|
|
++got;
|
|
++line;
|
|
goto retry;
|
|
}
|
|
}
|
|
got = buf;
|
|
break;
|
|
}
|
|
/* We have to read once more. Move remaining bytes to the start of
|
|
the buffer and reposition got so that it points to the end of
|
|
the remaining bytes. */
|
|
len = buf + len - got;
|
|
memmove (buf, got, len);
|
|
got = buf + len;
|
|
buf[len] = buf[len + 1] = '\0';
|
|
}
|
|
/* Catch a last line without trailing \n. */
|
|
if (got > buf)
|
|
from_fstab_line (got, user);
|
|
done:
|
|
NtClose (fh);
|
|
return true;
|
|
}
|
|
|
|
/* write_cygdrive_info: Store default prefix and flags
|
|
to use when creating cygdrives to the special user shared mem
|
|
location used to store cygdrive information. */
|
|
|
|
int
|
|
mount_info::write_cygdrive_info (const char *cygdrive_prefix, unsigned flags)
|
|
{
|
|
/* Verify cygdrive prefix starts with a forward slash and if there's
|
|
another character, it's not a slash. */
|
|
if ((cygdrive_prefix == NULL) || (*cygdrive_prefix == 0) ||
|
|
(!isslash (cygdrive_prefix[0])) ||
|
|
((cygdrive_prefix[1] != '\0') && (isslash (cygdrive_prefix[1]))))
|
|
{
|
|
set_errno (EINVAL);
|
|
return -1;
|
|
}
|
|
/* Don't allow overriding of a system cygdrive prefix. */
|
|
if (cygdrive_flags & MOUNT_SYSTEM)
|
|
{
|
|
set_errno (EPERM);
|
|
return -1;
|
|
}
|
|
|
|
slashify (cygdrive_prefix, cygdrive, 1);
|
|
cygdrive_flags = flags & ~MOUNT_SYSTEM;
|
|
cygdrive_len = strlen (cygdrive);
|
|
|
|
return 0;
|
|
}
|
|
|
|
int
|
|
mount_info::get_cygdrive_info (char *user, char *system, char *user_flags,
|
|
char *system_flags)
|
|
{
|
|
if (user)
|
|
*user = '\0';
|
|
if (system)
|
|
*system = '\0';
|
|
if (user_flags)
|
|
*user_flags = '\0';
|
|
if (system_flags)
|
|
*system_flags = '\0';
|
|
|
|
char *path = (cygdrive_flags & MOUNT_SYSTEM) ? system : user;
|
|
char *flags = (cygdrive_flags & MOUNT_SYSTEM) ? system_flags : user_flags;
|
|
|
|
if (path)
|
|
{
|
|
strcpy (path, cygdrive);
|
|
/* Strip trailing slash for backward compatibility. */
|
|
if (cygdrive_len > 2)
|
|
path[cygdrive_len - 1] = '\0';
|
|
}
|
|
if (flags)
|
|
strcpy (flags, (cygdrive_flags & MOUNT_BINARY) ? "binmode" : "textmode");
|
|
return 0;
|
|
}
|
|
|
|
static mount_item *mounts_for_sort;
|
|
|
|
/* sort_by_posix_name: qsort callback to sort the mount entries. Sort
|
|
user mounts ahead of system mounts to the same POSIX path. */
|
|
/* FIXME: should the user should be able to choose whether to
|
|
prefer user or system mounts??? */
|
|
static int
|
|
sort_by_posix_name (const void *a, const void *b)
|
|
{
|
|
mount_item *ap = mounts_for_sort + (*((int*) a));
|
|
mount_item *bp = mounts_for_sort + (*((int*) b));
|
|
|
|
/* Base weighting on longest posix path first so that the most
|
|
obvious path will be chosen. */
|
|
size_t alen = strlen (ap->posix_path);
|
|
size_t blen = strlen (bp->posix_path);
|
|
|
|
int res = blen - alen;
|
|
|
|
if (res)
|
|
return res; /* Path lengths differed */
|
|
|
|
/* The two paths were the same length, so just determine normal
|
|
lexical sorted order. */
|
|
res = strcmp (ap->posix_path, bp->posix_path);
|
|
|
|
if (res == 0)
|
|
{
|
|
/* need to select between user and system mount to same POSIX path */
|
|
if (!(bp->flags & MOUNT_SYSTEM)) /* user mount */
|
|
return 1;
|
|
else
|
|
return -1;
|
|
}
|
|
|
|
return res;
|
|
}
|
|
|
|
/* sort_by_native_name: qsort callback to sort the mount entries. Sort
|
|
user mounts ahead of system mounts to the same POSIX path. */
|
|
/* FIXME: should the user should be able to choose whether to
|
|
prefer user or system mounts??? */
|
|
static int
|
|
sort_by_native_name (const void *a, const void *b)
|
|
{
|
|
mount_item *ap = mounts_for_sort + (*((int*) a));
|
|
mount_item *bp = mounts_for_sort + (*((int*) b));
|
|
|
|
/* Base weighting on longest win32 path first so that the most
|
|
obvious path will be chosen. */
|
|
size_t alen = strlen (ap->native_path);
|
|
size_t blen = strlen (bp->native_path);
|
|
|
|
int res = blen - alen;
|
|
|
|
if (res)
|
|
return res; /* Path lengths differed */
|
|
|
|
/* The two paths were the same length, so just determine normal
|
|
lexical sorted order. */
|
|
res = strcmp (ap->native_path, bp->native_path);
|
|
|
|
if (res == 0)
|
|
{
|
|
/* need to select between user and system mount to same POSIX path */
|
|
if (!(bp->flags & MOUNT_SYSTEM)) /* user mount */
|
|
return 1;
|
|
else
|
|
return -1;
|
|
}
|
|
|
|
return res;
|
|
}
|
|
|
|
void
|
|
mount_info::sort ()
|
|
{
|
|
for (int i = 0; i < nmounts; i++)
|
|
native_sorted[i] = posix_sorted[i] = i;
|
|
/* Sort them into reverse length order, otherwise we won't
|
|
be able to look for /foo in /. */
|
|
mounts_for_sort = mount; /* ouch. */
|
|
qsort (posix_sorted, nmounts, sizeof (posix_sorted[0]), sort_by_posix_name);
|
|
qsort (native_sorted, nmounts, sizeof (native_sorted[0]), sort_by_native_name);
|
|
}
|
|
|
|
/* Add an entry to the mount table.
|
|
Returns 0 on success, -1 on failure and errno is set.
|
|
|
|
This is where all argument validation is done. It may not make sense to
|
|
do this when called internally, but it's cleaner to keep it all here. */
|
|
|
|
int
|
|
mount_info::add_item (const char *native, const char *posix,
|
|
unsigned mountflags)
|
|
{
|
|
tmp_pathbuf tp;
|
|
char *nativetmp = tp.c_get ();
|
|
/* FIXME: The POSIX path is stored as value name right now, which is
|
|
restricted to 256 bytes. */
|
|
char posixtmp[CYG_MAX_PATH];
|
|
char *nativetail, *posixtail, error[] = "error";
|
|
int nativeerr, posixerr;
|
|
|
|
/* Something's wrong if either path is NULL or empty, or if it's
|
|
not a UNC or absolute path. */
|
|
|
|
if (native == NULL || !isabspath (native) ||
|
|
!(is_native_path (native) || is_unc_share (native) || isdrive (native)))
|
|
nativeerr = EINVAL;
|
|
else
|
|
nativeerr = normalize_win32_path (native, nativetmp, nativetail);
|
|
|
|
if (posix == NULL || !isabspath (posix) ||
|
|
is_unc_share (posix) || isdrive (posix))
|
|
posixerr = EINVAL;
|
|
else
|
|
posixerr = normalize_posix_path (posix, posixtmp, posixtail);
|
|
|
|
debug_printf ("%s[%s], %s[%s], %p",
|
|
native, nativeerr ? error : nativetmp,
|
|
posix, posixerr ? error : posixtmp, mountflags);
|
|
|
|
if (nativeerr || posixerr)
|
|
{
|
|
set_errno (nativeerr?:posixerr);
|
|
return -1;
|
|
}
|
|
|
|
/* Make sure both paths do not end in /. */
|
|
if (nativetail > nativetmp + 1 && nativetail[-1] == '\\')
|
|
nativetail[-1] = '\0';
|
|
if (posixtail > posixtmp + 1 && posixtail[-1] == '/')
|
|
posixtail[-1] = '\0';
|
|
|
|
/* Write over an existing mount item with the same POSIX path if
|
|
it exists and is from the same registry area. */
|
|
int i;
|
|
for (i = 0; i < nmounts; i++)
|
|
{
|
|
if (!strcmp (mount[i].posix_path, posixtmp))
|
|
{
|
|
/* Don't allow overriding of a system mount with a user mount. */
|
|
if ((mount[i].flags & MOUNT_SYSTEM) && !(mountflags & MOUNT_SYSTEM))
|
|
{
|
|
set_errno (EPERM);
|
|
return -1;
|
|
}
|
|
if ((mount[i].flags & MOUNT_SYSTEM) != (mountflags & MOUNT_SYSTEM))
|
|
continue;
|
|
else if (!(mount[i].flags & MOUNT_IMMUTABLE))
|
|
break;
|
|
else if (mountflags & MOUNT_OVERRIDE)
|
|
{
|
|
mountflags |= MOUNT_IMMUTABLE;
|
|
break;
|
|
}
|
|
else
|
|
{
|
|
set_errno (EPERM);
|
|
return -1;
|
|
}
|
|
}
|
|
}
|
|
|
|
if (i == nmounts && nmounts == MAX_MOUNTS)
|
|
{
|
|
set_errno (EMFILE);
|
|
return -1;
|
|
}
|
|
|
|
if (i == nmounts)
|
|
nmounts++;
|
|
|
|
if (strcmp (posixtmp, "/usr/bin") == 0)
|
|
got_usr_bin = true;
|
|
|
|
if (strcmp (posixtmp, "/usr/lib") == 0)
|
|
got_usr_lib = true;
|
|
|
|
if (posixtmp[0] == '/' && posixtmp[1] == '\0' && !(mountflags & MOUNT_CYGDRIVE))
|
|
root_idx = i;
|
|
|
|
mount[i].init (nativetmp, posixtmp, mountflags);
|
|
sort ();
|
|
|
|
return 0;
|
|
}
|
|
|
|
/* Delete a mount table entry where path is either a Win32 or POSIX
|
|
path. Since the mount table is really just a table of aliases,
|
|
deleting / is ok (although running without a slash mount is
|
|
strongly discouraged because some programs may run erratically
|
|
without one). If MOUNT_SYSTEM is set in flags, remove from system
|
|
registry, otherwise remove the user registry mount.
|
|
*/
|
|
|
|
int
|
|
mount_info::del_item (const char *path, unsigned flags)
|
|
{
|
|
tmp_pathbuf tp;
|
|
char *pathtmp = tp.c_get ();
|
|
int posix_path_p = false;
|
|
|
|
/* Something's wrong if path is NULL or empty. */
|
|
if (path == NULL || *path == 0 || !isabspath (path))
|
|
{
|
|
set_errno (EINVAL);
|
|
return -1;
|
|
}
|
|
|
|
if (is_unc_share (path) || strpbrk (path, ":\\"))
|
|
backslashify (path, pathtmp, 0);
|
|
else
|
|
{
|
|
slashify (path, pathtmp, 0);
|
|
posix_path_p = true;
|
|
}
|
|
nofinalslash (pathtmp, pathtmp);
|
|
|
|
for (int i = 0; i < nmounts; i++)
|
|
{
|
|
int ent = native_sorted[i]; /* in the same order as getmntent() */
|
|
if (((posix_path_p)
|
|
? !strcmp (mount[ent].posix_path, pathtmp)
|
|
: strcasematch (mount[ent].native_path, pathtmp)))
|
|
{
|
|
/* Don't allow removal of a system mount. */
|
|
if (mount[ent].flags & MOUNT_SYSTEM)
|
|
{
|
|
set_errno (EPERM);
|
|
return -1;
|
|
}
|
|
nmounts--; /* One less mount table entry */
|
|
/* Fill in the hole if not at the end of the table */
|
|
if (ent < nmounts)
|
|
memmove (mount + ent, mount + ent + 1,
|
|
sizeof (mount[ent]) * (nmounts - ent));
|
|
sort (); /* Resort the table */
|
|
return 0;
|
|
}
|
|
}
|
|
set_errno (EINVAL);
|
|
return -1;
|
|
}
|
|
|
|
/************************* mount_item class ****************************/
|
|
|
|
static mntent *
|
|
fillout_mntent (const char *native_path, const char *posix_path, unsigned flags)
|
|
{
|
|
struct mntent& ret=_my_tls.locals.mntbuf;
|
|
bool append_bs = false;
|
|
|
|
/* Remove drivenum from list if we see a x: style path */
|
|
if (strlen (native_path) == 2 && native_path[1] == ':')
|
|
{
|
|
int drivenum = cyg_tolower (native_path[0]) - 'a';
|
|
if (drivenum >= 0 && drivenum <= 31)
|
|
_my_tls.locals.available_drives &= ~(1 << drivenum);
|
|
append_bs = true;
|
|
}
|
|
|
|
/* Pass back pointers to mount_table strings reserved for use by
|
|
getmntent rather than pointers to strings in the internal mount
|
|
table because the mount table might change, causing weird effects
|
|
from the getmntent user's point of view. */
|
|
|
|
ret.mnt_fsname = _my_tls.locals.mnt_fsname;
|
|
strcpy (_my_tls.locals.mnt_dir, posix_path);
|
|
ret.mnt_dir = _my_tls.locals.mnt_dir;
|
|
|
|
/* Try to give a filesystem type that matches what a Linux application might
|
|
expect. Naturally, this is a moving target, but we can make some
|
|
reasonable guesses for popular types. */
|
|
|
|
fs_info mntinfo;
|
|
tmp_pathbuf tp;
|
|
UNICODE_STRING unat;
|
|
tp.u_get (&unat);
|
|
get_nt_native_path (native_path, unat);
|
|
if (append_bs)
|
|
RtlAppendUnicodeToString (&unat, L"\\");
|
|
mntinfo.update (&unat, NULL);
|
|
|
|
if (mntinfo.is_samba())
|
|
strcpy (_my_tls.locals.mnt_type, (char *) "smbfs");
|
|
else if (mntinfo.is_nfs ())
|
|
strcpy (_my_tls.locals.mnt_type, (char *) "nfs");
|
|
else if (mntinfo.is_fat ())
|
|
strcpy (_my_tls.locals.mnt_type, (char *) "vfat");
|
|
else if (mntinfo.is_ntfs ())
|
|
strcpy (_my_tls.locals.mnt_type, (char *) "ntfs");
|
|
else if (mntinfo.is_netapp ())
|
|
strcpy (_my_tls.locals.mnt_type, (char *) "netapp");
|
|
else if (mntinfo.is_udf ())
|
|
strcpy (_my_tls.locals.mnt_type, (char *) "udf");
|
|
else if (mntinfo.is_cdrom ())
|
|
strcpy (_my_tls.locals.mnt_type, (char *) "iso9660");
|
|
else if (mntinfo.is_csc_cache ())
|
|
strcpy (_my_tls.locals.mnt_type, (char *) "csc-cache");
|
|
else
|
|
strcpy (_my_tls.locals.mnt_type, (char *) "unknown");
|
|
|
|
ret.mnt_type = _my_tls.locals.mnt_type;
|
|
|
|
slashify (native_path, _my_tls.locals.mnt_fsname, false);
|
|
|
|
/* mnt_opts is a string that details mount params such as
|
|
binary or textmode, or exec. We don't print
|
|
`silent' here; it's a magic internal thing. */
|
|
|
|
if (!(flags & MOUNT_BINARY))
|
|
strcpy (_my_tls.locals.mnt_opts, (char *) "text");
|
|
else
|
|
strcpy (_my_tls.locals.mnt_opts, (char *) "binary");
|
|
|
|
if (flags & MOUNT_CYGWIN_EXEC)
|
|
strcat (_my_tls.locals.mnt_opts, (char *) ",cygexec");
|
|
else if (flags & MOUNT_EXEC)
|
|
strcat (_my_tls.locals.mnt_opts, (char *) ",exec");
|
|
else if (flags & MOUNT_NOTEXEC)
|
|
strcat (_my_tls.locals.mnt_opts, (char *) ",noexec");
|
|
|
|
if (flags & MOUNT_NOACL)
|
|
strcat (_my_tls.locals.mnt_opts, (char *) ",noacl");
|
|
|
|
if (flags & MOUNT_NOPOSIX)
|
|
strcat (_my_tls.locals.mnt_opts, (char *) ",posix=0");
|
|
|
|
if (!(flags & MOUNT_SYSTEM)) /* user mount */
|
|
strcat (_my_tls.locals.mnt_opts, (char *) ",user");
|
|
|
|
if (flags & MOUNT_CYGDRIVE) /* cygdrive */
|
|
strcat (_my_tls.locals.mnt_opts, (char *) ",noumount");
|
|
|
|
if (flags & (MOUNT_AUTOMATIC | MOUNT_CYGDRIVE))
|
|
strcat (_my_tls.locals.mnt_opts, (char *) ",auto");
|
|
|
|
ret.mnt_opts = _my_tls.locals.mnt_opts;
|
|
|
|
ret.mnt_freq = 1;
|
|
ret.mnt_passno = 1;
|
|
return &ret;
|
|
}
|
|
|
|
struct mntent *
|
|
mount_item::getmntent ()
|
|
{
|
|
return fillout_mntent (native_path, posix_path, flags);
|
|
}
|
|
|
|
static struct mntent *
|
|
cygdrive_getmntent ()
|
|
{
|
|
char native_path[4];
|
|
char posix_path[CYG_MAX_PATH];
|
|
DWORD mask = 1, drive = 'a';
|
|
struct mntent *ret = NULL;
|
|
|
|
while (_my_tls.locals.available_drives)
|
|
{
|
|
for (/* nothing */; drive <= 'z'; mask <<= 1, drive++)
|
|
if (_my_tls.locals.available_drives & mask)
|
|
break;
|
|
|
|
__small_sprintf (native_path, "%c:\\", cyg_toupper (drive));
|
|
if (GetFileAttributes (native_path) == INVALID_FILE_ATTRIBUTES)
|
|
{
|
|
_my_tls.locals.available_drives &= ~mask;
|
|
continue;
|
|
}
|
|
native_path[2] = '\0';
|
|
__small_sprintf (posix_path, "%s%c", mount_table->cygdrive, drive);
|
|
ret = fillout_mntent (native_path, posix_path, mount_table->cygdrive_flags);
|
|
break;
|
|
}
|
|
|
|
return ret;
|
|
}
|
|
|
|
struct mntent *
|
|
mount_info::getmntent (int x)
|
|
{
|
|
if (x < 0 || x >= nmounts)
|
|
return cygdrive_getmntent ();
|
|
|
|
return mount[native_sorted[x]].getmntent ();
|
|
}
|
|
|
|
/* Fill in the fields of a mount table entry. */
|
|
|
|
void
|
|
mount_item::init (const char *native, const char *posix, unsigned mountflags)
|
|
{
|
|
strcpy ((char *) native_path, native);
|
|
strcpy ((char *) posix_path, posix);
|
|
|
|
native_pathlen = strlen (native_path);
|
|
posix_pathlen = strlen (posix_path);
|
|
|
|
flags = mountflags;
|
|
}
|
|
|
|
/********************** Mount System Calls **************************/
|
|
|
|
/* Mount table system calls.
|
|
Note that these are exported to the application. */
|
|
|
|
/* mount: Add a mount to the mount table in memory and to the registry
|
|
that will cause paths under win32_path to be translated to paths
|
|
under posix_path. */
|
|
|
|
extern "C" int
|
|
mount (const char *win32_path, const char *posix_path, unsigned flags)
|
|
{
|
|
/* FIXME: Should we disallow setting MOUNT_SYSTEM in flags since it
|
|
isn't really supported except from fstab? */
|
|
int res = -1;
|
|
|
|
myfault efault;
|
|
if (efault.faulted (EFAULT))
|
|
/* errno set */;
|
|
else if (!*posix_path)
|
|
set_errno (EINVAL);
|
|
else if (strpbrk (posix_path, "\\:"))
|
|
set_errno (EINVAL);
|
|
else if (flags & MOUNT_CYGDRIVE) /* normal mount */
|
|
{
|
|
/* When flags include MOUNT_CYGDRIVE, take this to mean that
|
|
we actually want to change the cygdrive prefix and flags
|
|
without actually mounting anything. */
|
|
res = mount_table->write_cygdrive_info (posix_path, flags);
|
|
win32_path = NULL;
|
|
}
|
|
else if (!*win32_path)
|
|
set_errno (EINVAL);
|
|
else
|
|
res = mount_table->add_item (win32_path, posix_path, flags);
|
|
|
|
syscall_printf ("%d = mount (%s, %s, %p)", res, win32_path, posix_path, flags);
|
|
return res;
|
|
}
|
|
|
|
/* umount: The standard umount call only has a path parameter. Since
|
|
it is not possible for this call to specify whether to remove the
|
|
mount from the user or global mount registry table, assume the user
|
|
table. */
|
|
|
|
extern "C" int
|
|
umount (const char *path)
|
|
{
|
|
myfault efault;
|
|
if (efault.faulted (EFAULT))
|
|
return -1;
|
|
if (!*path)
|
|
{
|
|
set_errno (EINVAL);
|
|
return -1;
|
|
}
|
|
return cygwin_umount (path, 0);
|
|
}
|
|
|
|
/* cygwin_umount: This is like umount but takes an additional flags
|
|
parameter that specifies whether to umount from the user or system-wide
|
|
registry area. */
|
|
|
|
extern "C" int
|
|
cygwin_umount (const char *path, unsigned flags)
|
|
{
|
|
int res = -1;
|
|
|
|
if (!(flags & MOUNT_CYGDRIVE))
|
|
res = mount_table->del_item (path, flags & ~MOUNT_SYSTEM);
|
|
|
|
syscall_printf ("%d = cygwin_umount (%s, %d)", res, path, flags);
|
|
return res;
|
|
}
|
|
|
|
bool
|
|
is_floppy (const char *dos)
|
|
{
|
|
char dev[256];
|
|
if (!QueryDosDevice (dos, dev, 256))
|
|
return false;
|
|
return ascii_strncasematch (dev, "\\Device\\Floppy", 14);
|
|
}
|
|
|
|
extern "C" FILE *
|
|
setmntent (const char *filep, const char *)
|
|
{
|
|
_my_tls.locals.iteration = 0;
|
|
_my_tls.locals.available_drives = GetLogicalDrives ();
|
|
/* Filter floppy drives on A: and B: */
|
|
if ((_my_tls.locals.available_drives & 1) && is_floppy ("A:"))
|
|
_my_tls.locals.available_drives &= ~1;
|
|
if ((_my_tls.locals.available_drives & 2) && is_floppy ("B:"))
|
|
_my_tls.locals.available_drives &= ~2;
|
|
return (FILE *) filep;
|
|
}
|
|
|
|
extern "C" struct mntent *
|
|
getmntent (FILE *)
|
|
{
|
|
return mount_table->getmntent (_my_tls.locals.iteration++);
|
|
}
|
|
|
|
extern "C" int
|
|
endmntent (FILE *)
|
|
{
|
|
return 1;
|
|
}
|