#include <lunaix/mm/vmm.h>
#include <lunaix/spike.h>
-int
-__elf_populate_mapped(struct mm_region* region, void* pg, off_t offset)
-{
- struct elf32_phdr* phdr = (struct elf32_phdr*)region->data;
- size_t segsz = phdr->p_filesz;
- size_t segoff = offset - phdr->p_offset;
-
- if (segoff >= segsz) {
- return 0;
- }
-
- struct v_file* file = region->mfile;
- size_t rdlen = MIN(segsz - segoff, PG_SIZE);
-
- if (rdlen == PG_SIZE) {
- // This is because we want to exploit any optimization on read_page
- return file->ops->read_page(file->inode, pg, PG_SIZE, offset);
- } else {
- return file->ops->read(file->inode, pg, rdlen, offset);
- }
-}
-
-void
-__elf_destruct_mapped(struct mm_region* region)
-{
- vfree(region->data);
-}
-
int
elf_map_segment(struct ld_param* ldparam,
struct v_file* elfile,
struct elf32_phdr* phdr)
{
+ assert(PG_ALIGNED(phdr->p_offset));
+
int proct = 0;
if ((phdr->p_flags & PF_R)) {
proct |= PROT_READ;
proct |= PROT_EXEC;
}
- struct mm_region* seg_reg;
struct mmap_param param = { .vms_mnt = ldparam->vms_mnt,
- .regions = &ldparam->proc->mm.regions,
+ .pvms = &ldparam->proc->mm,
.proct = proct,
- .offset = phdr->p_offset,
- .length = ROUNDUP(phdr->p_memsz, PG_SIZE),
- .flags =
- MAP_FIXED | MAP_PRIVATE | REGION_TYPE_CODE };
+ .offset = PG_ALIGN(phdr->p_offset),
+ .mlen = ROUNDUP(phdr->p_memsz, PG_SIZE),
+ .flen = phdr->p_filesz + PG_MOD(phdr->p_va),
+ .flags = MAP_FIXED | MAP_PRIVATE,
+ .type = REGION_TYPE_CODE };
+ struct mm_region* seg_reg;
int status = mem_map(NULL, &seg_reg, PG_ALIGN(phdr->p_va), elfile, ¶m);
if (!status) {
- struct elf32_phdr* phdr_ = valloc(sizeof(SIZE_PHDR));
- *phdr_ = *phdr;
- seg_reg->data = phdr;
-
- seg_reg->init_page = __elf_populate_mapped;
- seg_reg->destruct_region = __elf_destruct_mapped;
+ size_t next_addr = phdr->p_memsz + phdr->p_va;
+ ldparam->info.end = MAX(ldparam->info.end, ROUNDUP(next_addr, PG_SIZE));
+ ldparam->info.mem_sz += phdr->p_memsz;
}
return status;
}
tbl_sz = 1 << ILOG2(tbl_sz);
- phdrs = elfile->ops->read(elfile->inode, phdrs, tbl_sz, ehdr->e_phoff);
+ status = elfile->ops->read(elfile->inode, phdrs, tbl_sz, ehdr->e_phoff);
+
+ if (status < 0) {
+ goto done;
+ }
+
+ if (PG_ALIGN(phdrs[0].p_va) != USER_START) {
+ status = ENOEXEC;
+ goto done;
+ }
size_t entries = tbl_sz / SIZE_PHDR;
for (size_t i = 0; i < entries; i++) {
struct elf32_phdr* phdr = &phdrs[i];
if (phdr->p_type == PT_LOAD) {
- status = elf_map_segment(ldparam, elfile, phdr);
+ if (phdr->p_align == PG_SIZE) {
+ status = elf_map_segment(ldparam, elfile, phdr);
+ } else {
+ // surprising alignment!
+ status = ENOEXEC;
+ }
}
// TODO process other types of segments
if (status) {
+ // errno in the middle of mapping restructuring, it is impossible
+ // to recover!
ldparam->status |= LD_STAT_FKUP;
goto done;
}
struct elf32_ehdr* ehdr = valloc(SIZE_EHDR);
int status = elfile->ops->read(elfile->inode, ehdr, SIZE_EHDR, 0);
- if (status) {
+ if (status < 0) {
goto done;
}
goto done;
}
- ldparam->ehdr_out = *ehdr;
+ ldparam->info.ehdr_out = *ehdr;
done:
vfree(ehdr);