static
load_return_t
load_segment(
struct load_command *lcp,
uint32_t filetype,
void * control,
off_t pager_offset,
off_t macho_size,
uint8_t *vp,
int64_t slide,
load_result_t *result
)
{
struct segment_command_64 segment_command, *scp;
kern_return_t ret;
vm_map_offset_t map_addr, map_offset;
vm_map_size_t map_size, seg_size, delta_size;
vm_prot_t initprot;
vm_prot_t maxprot;
size_t segment_command_size, total_section_size,
single_section_size;
if (LC_SEGMENT_64 == lcp->cmd) {
segment_command_size = sizeof(struct segment_command_64);
single_section_size = sizeof(struct section_64);
} else {
segment_command_size = sizeof(struct segment_command);
single_section_size = sizeof(struct section);
}
if (lcp->cmdsize < segment_command_size) {
printf("load_segment 1: %s\n", load_to_string(LOAD_BADMACHO));
return (LOAD_BADMACHO);
}
total_section_size = lcp->cmdsize - segment_command_size;
if (LC_SEGMENT_64 == lcp->cmd)
scp = (struct segment_command_64 *)lcp;
else {
scp = &segment_command;
widen_segment_command((struct segment_command *)lcp, scp);
}
/*
* Make sure what we get from the file is really ours (as specified
* by macho_size).
*/
if (scp->fileoff + scp->filesize < scp->fileoff ||
scp->fileoff + scp->filesize > (uint64_t)macho_size) {
printf("load_segment 2: %s\n", load_to_string(LOAD_BADMACHO));
return (LOAD_BADMACHO);
}
/*
* Ensure that the number of sections specified would fit
* within the load command size.
*/
if (total_section_size / single_section_size < scp->nsects) {
printf("load_segment 3: %s\n", load_to_string(LOAD_BADMACHO));
return (LOAD_BADMACHO);
}
/*
* Round sizes to page size.
*/
seg_size = scp->vmsize;
map_size = scp->filesize;
map_addr = scp->vmaddr; /* JVXXX note that in XNU TOT this is round instead of trunc for 64 bits */
if (seg_size == 0) {
printf("load_segment 4: KERN_SUCCESS\n");
return (KERN_SUCCESS);
}
if (map_addr == 0 &&
map_size == 0 &&
seg_size != 0 &&
(scp->initprot & VM_PROT_ALL) == VM_PROT_NONE &&
(scp->maxprot & VM_PROT_ALL) == VM_PROT_NONE) {
/*
* For PIE, extend page zero rather than moving it. Extending
* page zero keeps early allocations from falling predictably
* between the end of page zero and the beginning of the first
* slid segment.
*/
seg_size += slide;
slide = 0;
/*
* This is a "page zero" segment: it starts at address 0,
* is not mapped from the binary file and is not accessible.
* User-space should never be able to access that memory, so
* make it completely off limits by raising the VM map's
* minimum offset.
*/
return (LOAD_SUCCESS);
}
/* If a non-zero slide was specified by the caller, apply now */
map_addr += slide;
if (map_addr < result->min_vm_addr)
result->min_vm_addr = map_addr;
if (map_addr+seg_size > result->max_vm_addr)
result->max_vm_addr = map_addr+seg_size;
map_offset = pager_offset + scp->fileoff; /* limited to 32 bits */
if (map_size > 0) {
initprot = (scp->initprot) & VM_PROT_ALL;
maxprot = (scp->maxprot) & VM_PROT_ALL;
map_addr = (vm_map_offset_t)mmap((void*)map_addr, map_size, initprot, MAP_PRIVATE | MAP_ANON, 0, 0);
printf("load_segment 5: loaded %p size %d\n", (void*)map_addr, map_size);
if ((void*)map_addr == MAP_FAILED) {
return (LOAD_NOSPACE);
}
/*
* If the file didn't end on a page boundary,
* we need to zero the leftover.
*/
delta_size = map_size - scp->filesize;
}
if ( (scp->fileoff == 0) && (scp->filesize != 0) )
result->mach_header = map_addr;
ret = LOAD_SUCCESS;
if (LOAD_SUCCESS == ret && filetype == MH_DYLINKER && result->all_image_info_addr == MACH_VM_MIN_ADDRESS) {
note_all_image_info_section(scp,
LC_SEGMENT_64 == lcp->cmd, single_section_size,
(const char *)lcp + segment_command_size, slide, result);
}
printf("load_segment 6: (%p >= %p) && (%p < (%p))\n", result->entry_point, (void*)map_addr, result->entry_point, (void*)(map_addr + map_size));
// QEMU: will need to figure out the entry point somehow.
result->entry_point = map_addr;
if ((result->entry_point >= map_addr) && (result->entry_point < (map_addr + map_size))) {
result->validentry = 1;
}
return ret;
}
static
load_return_t
load_segment(
struct load_command *lcp,
uint32_t filetype,
void * control,
off_t pager_offset,
off_t macho_size,
struct vnode *vp,
vm_map_t map,
int64_t slide,
load_result_t *result
)
{
struct segment_command_64 segment_command, *scp;
kern_return_t ret;
vm_map_offset_t map_addr, map_offset;
vm_map_size_t map_size, seg_size, delta_size;
vm_prot_t initprot;
vm_prot_t maxprot;
size_t segment_command_size, total_section_size,
single_section_size;
boolean_t prohibit_pagezero_mapping = FALSE;
if (LC_SEGMENT_64 == lcp->cmd) {
segment_command_size = sizeof(struct segment_command_64);
single_section_size = sizeof(struct section_64);
} else {
segment_command_size = sizeof(struct segment_command);
single_section_size = sizeof(struct section);
}
if (lcp->cmdsize < segment_command_size)
return (LOAD_BADMACHO);
total_section_size = lcp->cmdsize - segment_command_size;
if (LC_SEGMENT_64 == lcp->cmd)
scp = (struct segment_command_64 *)lcp;
else {
scp = &segment_command;
widen_segment_command((struct segment_command *)lcp, scp);
}
/*
* Make sure what we get from the file is really ours (as specified
* by macho_size).
*/
if (scp->fileoff + scp->filesize < scp->fileoff ||
scp->fileoff + scp->filesize > (uint64_t)macho_size)
return (LOAD_BADMACHO);
/*
* Ensure that the number of sections specified would fit
* within the load command size.
*/
if (total_section_size / single_section_size < scp->nsects)
return (LOAD_BADMACHO);
/*
* Make sure the segment is page-aligned in the file.
*/
if ((scp->fileoff & PAGE_MASK_64) != 0)
return (LOAD_BADMACHO);
/*
* Round sizes to page size.
*/
seg_size = round_page_64(scp->vmsize);
map_size = round_page_64(scp->filesize);
map_addr = trunc_page_64(scp->vmaddr); /* JVXXX note that in XNU TOT this is round instead of trunc for 64 bits */
if (seg_size == 0)
return (KERN_SUCCESS);
if (map_addr == 0 &&
map_size == 0 &&
seg_size != 0 &&
(scp->initprot & VM_PROT_ALL) == VM_PROT_NONE &&
(scp->maxprot & VM_PROT_ALL) == VM_PROT_NONE) {
/*
* For PIE, extend page zero rather than moving it. Extending
* page zero keeps early allocations from falling predictably
* between the end of page zero and the beginning of the first
* slid segment.
*/
seg_size += slide;
slide = 0;
#if CONFIG_EMBEDDED
prohibit_pagezero_mapping = TRUE;
#endif
/* XXX (4596982) this interferes with Rosetta, so limit to 64-bit tasks */
if (scp->cmd == LC_SEGMENT_64) {
prohibit_pagezero_mapping = TRUE;
}
if (prohibit_pagezero_mapping) {
/*
* This is a "page zero" segment: it starts at address 0,
* is not mapped from the binary file and is not accessible.
* User-space should never be able to access that memory, so
* make it completely off limits by raising the VM map's
* minimum offset.
*/
ret = vm_map_raise_min_offset(map, seg_size);
if (ret != KERN_SUCCESS) {
return (LOAD_FAILURE);
}
return (LOAD_SUCCESS);
}
}
/* If a non-zero slide was specified by the caller, apply now */
map_addr += slide;
if (map_addr < result->min_vm_addr)
result->min_vm_addr = map_addr;
if (map_addr+seg_size > result->max_vm_addr)
result->max_vm_addr = map_addr+seg_size;
if (map == VM_MAP_NULL)
return (LOAD_SUCCESS);
map_offset = pager_offset + scp->fileoff; /* limited to 32 bits */
if (map_size > 0) {
initprot = (scp->initprot) & VM_PROT_ALL;
maxprot = (scp->maxprot) & VM_PROT_ALL;
/*
* Map a copy of the file into the address space.
*/
ret = vm_map_enter_mem_object_control(map,
&map_addr, map_size, (mach_vm_offset_t)0,
VM_FLAGS_FIXED, control, map_offset, TRUE,
initprot, maxprot,
VM_INHERIT_DEFAULT);
if (ret != KERN_SUCCESS)
return (LOAD_NOSPACE);
/*
* If the file didn't end on a page boundary,
* we need to zero the leftover.
*/
delta_size = map_size - scp->filesize;
#if FIXME
if (delta_size > 0) {
mach_vm_offset_t tmp;
ret = mach_vm_allocate(kernel_map, &tmp, delta_size, VM_FLAGS_ANYWHERE);
if (ret != KERN_SUCCESS)
return(LOAD_RESOURCE);
if (copyout(tmp, map_addr + scp->filesize,
delta_size)) {
(void) mach_vm_deallocate(
kernel_map, tmp, delta_size);
return (LOAD_FAILURE);
}
(void) mach_vm_deallocate(kernel_map, tmp, delta_size);
}
#endif /* FIXME */
}
/*
* If the virtual size of the segment is greater
* than the size from the file, we need to allocate
* zero fill memory for the rest.
*/
delta_size = seg_size - map_size;
if (delta_size > 0) {
mach_vm_offset_t tmp = map_addr + map_size;
ret = mach_vm_map(map, &tmp, delta_size, 0, VM_FLAGS_FIXED,
NULL, 0, FALSE,
scp->initprot, scp->maxprot,
VM_INHERIT_DEFAULT);
if (ret != KERN_SUCCESS)
return(LOAD_NOSPACE);
}
if ( (scp->fileoff == 0) && (scp->filesize != 0) )
result->mach_header = map_addr;
if (scp->flags & SG_PROTECTED_VERSION_1) {
ret = unprotect_segment(scp->fileoff,
scp->filesize,
vp,
pager_offset,
map,
map_addr,
map_size);
} else {
ret = LOAD_SUCCESS;
}
if (LOAD_SUCCESS == ret && filetype == MH_DYLINKER &&
result->all_image_info_addr == MACH_VM_MIN_ADDRESS)
note_all_image_info_section(scp,
LC_SEGMENT_64 == lcp->cmd, single_section_size,
(const char *)lcp + segment_command_size, slide, result);
if ((result->entry_point >= map_addr) && (result->entry_point < (map_addr + map_size)))
result->validentry = 1;
return ret;
}
