|
Packit |
6c4009 |
/* Copyright (C) 1994-2018 Free Software Foundation, Inc.
|
|
Packit |
6c4009 |
This file is part of the GNU C Library.
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
The GNU C Library is free software; you can redistribute it and/or
|
|
Packit |
6c4009 |
modify it under the terms of the GNU Lesser General Public
|
|
Packit |
6c4009 |
License as published by the Free Software Foundation; either
|
|
Packit |
6c4009 |
version 2.1 of the License, or (at your option) any later version.
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
The GNU C Library is distributed in the hope that it will be useful,
|
|
Packit |
6c4009 |
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
Packit |
6c4009 |
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
Packit |
6c4009 |
Lesser General Public License for more details.
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
You should have received a copy of the GNU Lesser General Public
|
|
Packit |
6c4009 |
License along with the GNU C Library; if not, see
|
|
Packit |
6c4009 |
<http://www.gnu.org/licenses/>. */
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
#include <sys/types.h>
|
|
Packit |
6c4009 |
#include <sys/mman.h>
|
|
Packit |
6c4009 |
#include <errno.h>
|
|
Packit |
6c4009 |
#include <hurd.h>
|
|
Packit |
6c4009 |
#include <hurd/fd.h>
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
/* Map addresses starting near ADDR and extending for LEN bytes. from
|
|
Packit |
6c4009 |
OFFSET into the file FD describes according to PROT and FLAGS. If ADDR
|
|
Packit |
6c4009 |
is nonzero, it is the desired mapping address. If the MAP_FIXED bit is
|
|
Packit |
6c4009 |
set in FLAGS, the mapping will be at ADDR exactly (which must be
|
|
Packit |
6c4009 |
page-aligned); otherwise the system chooses a convenient nearby address.
|
|
Packit |
6c4009 |
The return value is the actual mapping address chosen or (void *) -1
|
|
Packit |
6c4009 |
for errors (in which case `errno' is set). A successful `mmap' call
|
|
Packit |
6c4009 |
deallocates any previous mapping for the affected region. */
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
void *
|
|
Packit |
6c4009 |
__mmap (void *addr, size_t len, int prot, int flags, int fd, off_t offset)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
error_t err;
|
|
Packit |
6c4009 |
vm_prot_t vmprot;
|
|
Packit |
6c4009 |
memory_object_t memobj;
|
|
Packit |
6c4009 |
vm_address_t mapaddr;
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
mapaddr = (vm_address_t) addr;
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
/* ADDR and OFFSET must be page-aligned. */
|
|
Packit |
6c4009 |
if ((mapaddr & (__vm_page_size - 1)) || (offset & (__vm_page_size - 1)))
|
|
Packit |
6c4009 |
return (void *) (long int) __hurd_fail (EINVAL);
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
if ((flags & (MAP_TYPE|MAP_INHERIT)) == MAP_ANON
|
|
Packit |
6c4009 |
&& prot == (PROT_READ|PROT_WRITE)) /* cf VM_PROT_DEFAULT */
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
/* vm_allocate has (a little) less overhead in the kernel too. */
|
|
Packit |
6c4009 |
err = __vm_allocate (__mach_task_self (), &mapaddr, len, mapaddr == 0);
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
if (err == KERN_NO_SPACE)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
if (flags & MAP_FIXED)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
/* XXX this is not atomic as it is in unix! */
|
|
Packit |
6c4009 |
/* The region is already allocated; deallocate it first. */
|
|
Packit |
6c4009 |
err = __vm_deallocate (__mach_task_self (), mapaddr, len);
|
|
Packit |
6c4009 |
if (!err)
|
|
Packit |
6c4009 |
err = __vm_allocate (__mach_task_self (), &mapaddr, len, 0);
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
else if (mapaddr != 0)
|
|
Packit |
6c4009 |
err = __vm_allocate (__mach_task_self (), &mapaddr, len, 1);
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
return err ? (void *) (long int) __hurd_fail (err) : (void *) mapaddr;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
vmprot = VM_PROT_NONE;
|
|
Packit |
6c4009 |
if (prot & PROT_READ)
|
|
Packit |
6c4009 |
vmprot |= VM_PROT_READ;
|
|
Packit |
6c4009 |
if (prot & PROT_WRITE)
|
|
Packit |
6c4009 |
vmprot |= VM_PROT_WRITE;
|
|
Packit |
6c4009 |
if (prot & PROT_EXEC)
|
|
Packit |
6c4009 |
vmprot |= VM_PROT_EXECUTE;
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
switch (flags & MAP_TYPE)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
default:
|
|
Packit |
6c4009 |
return (void *) (long int) __hurd_fail (EINVAL);
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
case MAP_ANON:
|
|
Packit |
6c4009 |
memobj = MACH_PORT_NULL;
|
|
Packit |
6c4009 |
break;
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
case MAP_FILE:
|
|
Packit |
6c4009 |
case 0: /* Allow, e.g., just MAP_SHARED. */
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
mach_port_t robj, wobj;
|
|
Packit |
6c4009 |
if (err = HURD_DPORT_USE (fd, __io_map (port, &robj, &wobj)))
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
if (err == MIG_BAD_ID || err == EOPNOTSUPP || err == ENOSYS)
|
|
Packit |
6c4009 |
err = ENODEV; /* File descriptor doesn't support mmap. */
|
|
Packit |
6c4009 |
return (void *) (long int) __hurd_dfail (fd, err);
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
switch (prot & (PROT_READ|PROT_WRITE))
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
/* Although it apparently doesn't make sense to map a file with
|
|
Packit |
6c4009 |
protection set to PROT_NONE, it is actually sometimes done.
|
|
Packit |
6c4009 |
In particular, that's how localedef reserves some space for
|
|
Packit |
6c4009 |
the locale archive file, the rationale being that some
|
|
Packit |
6c4009 |
implementations take into account whether the mapping is
|
|
Packit |
6c4009 |
anonymous or not when selecting addresses. */
|
|
Packit |
6c4009 |
case PROT_NONE:
|
|
Packit |
6c4009 |
case PROT_READ:
|
|
Packit |
6c4009 |
memobj = robj;
|
|
Packit |
6c4009 |
if (wobj != MACH_PORT_NULL)
|
|
Packit |
6c4009 |
__mach_port_deallocate (__mach_task_self (), wobj);
|
|
Packit |
6c4009 |
break;
|
|
Packit |
6c4009 |
case PROT_WRITE:
|
|
Packit |
6c4009 |
memobj = wobj;
|
|
Packit |
6c4009 |
if (robj != MACH_PORT_NULL)
|
|
Packit |
6c4009 |
__mach_port_deallocate (__mach_task_self (), robj);
|
|
Packit |
6c4009 |
break;
|
|
Packit |
6c4009 |
case PROT_READ|PROT_WRITE:
|
|
Packit |
6c4009 |
if (robj == wobj)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
memobj = wobj;
|
|
Packit |
6c4009 |
/* Remove extra reference. */
|
|
Packit |
6c4009 |
__mach_port_deallocate (__mach_task_self (), memobj);
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
else if (wobj == MACH_PORT_NULL && /* Not writable by mapping. */
|
|
Packit |
6c4009 |
!(flags & MAP_SHARED))
|
|
Packit |
6c4009 |
/* The file can only be mapped for reading. Since we are
|
|
Packit |
6c4009 |
making a private mapping, we will never try to write the
|
|
Packit |
6c4009 |
object anyway, so we don't care. */
|
|
Packit |
6c4009 |
memobj = robj;
|
|
Packit |
6c4009 |
else
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
__mach_port_deallocate (__mach_task_self (), wobj);
|
|
Packit |
6c4009 |
return (void *) (long int) __hurd_fail (EACCES);
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
break;
|
|
Packit |
6c4009 |
default:
|
|
Packit |
6c4009 |
__builtin_unreachable ();
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
break;
|
|
Packit |
6c4009 |
/* XXX handle MAP_NOEXTEND */
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
/* XXX handle MAP_INHERIT */
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
err = __vm_map (__mach_task_self (),
|
|
Packit |
6c4009 |
&mapaddr, (vm_size_t) len, (vm_address_t) 0,
|
|
Packit |
6c4009 |
mapaddr == 0,
|
|
Packit |
6c4009 |
memobj, (vm_offset_t) offset,
|
|
Packit |
6c4009 |
! (flags & MAP_SHARED),
|
|
Packit |
6c4009 |
vmprot, VM_PROT_ALL,
|
|
Packit |
6c4009 |
(flags & MAP_SHARED) ? VM_INHERIT_SHARE : VM_INHERIT_COPY);
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
if (err == KERN_NO_SPACE)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
if (flags & MAP_FIXED)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
/* XXX this is not atomic as it is in unix! */
|
|
Packit |
6c4009 |
/* The region is already allocated; deallocate it first. */
|
|
Packit |
6c4009 |
err = __vm_deallocate (__mach_task_self (), mapaddr, len);
|
|
Packit |
6c4009 |
if (! err)
|
|
Packit |
6c4009 |
err = __vm_map (__mach_task_self (),
|
|
Packit |
6c4009 |
&mapaddr, (vm_size_t) len, (vm_address_t) 0,
|
|
Packit |
6c4009 |
0, memobj, (vm_offset_t) offset,
|
|
Packit |
6c4009 |
! (flags & MAP_SHARED),
|
|
Packit |
6c4009 |
vmprot, VM_PROT_ALL,
|
|
Packit |
6c4009 |
(flags & MAP_SHARED) ? VM_INHERIT_SHARE
|
|
Packit |
6c4009 |
: VM_INHERIT_COPY);
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
else if (mapaddr != 0)
|
|
Packit |
6c4009 |
err = __vm_map (__mach_task_self (),
|
|
Packit |
6c4009 |
&mapaddr, (vm_size_t) len, (vm_address_t) 0,
|
|
Packit |
6c4009 |
1, memobj, (vm_offset_t) offset,
|
|
Packit |
6c4009 |
! (flags & MAP_SHARED),
|
|
Packit |
6c4009 |
vmprot, VM_PROT_ALL,
|
|
Packit |
6c4009 |
(flags & MAP_SHARED) ? VM_INHERIT_SHARE
|
|
Packit |
6c4009 |
: VM_INHERIT_COPY);
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
if (memobj != MACH_PORT_NULL)
|
|
Packit |
6c4009 |
__mach_port_deallocate (__mach_task_self (), memobj);
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
if (err)
|
|
Packit |
6c4009 |
return (void *) (long int) __hurd_fail (err);
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
return (void *) mapaddr;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
libc_hidden_def (__mmap)
|
|
Packit |
6c4009 |
weak_alias (__mmap, mmap)
|