mirror of
https://github.com/jart/cosmopolitan.git
synced 2025-01-31 03:27:39 +00:00
9f8e6c10dd
Rosetta doesn't correctly respect the startup registers as defined in LC_UNIXTHREAD which makes platform detection go awry. But at least Rosetta appears to consistently set rbx to 0x00000000ffffffff and rdx to 0x0000000000000001 at startup for every x64 executable I could get my hands on. So we use that to detect Rosetta's presence and set up the correct registers for XNU.
249 lines
7.3 KiB
ArmAsm
249 lines
7.3 KiB
ArmAsm
/*-*- mode:unix-assembly; indent-tabs-mode:t; tab-width:8; coding:utf-8 -*-│
|
|
│vi: set et ft=asm ts=8 tw=8 fenc=utf-8 :vi│
|
|
╞══════════════════════════════════════════════════════════════════════════════╡
|
|
│ Copyright 2021 Justine Alexandra Roberts Tunney │
|
|
│ │
|
|
│ Permission to use, copy, modify, and/or distribute this software for │
|
|
│ any purpose with or without fee is hereby granted, provided that the │
|
|
│ above copyright notice and this permission notice appear in all copies. │
|
|
│ │
|
|
│ THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL │
|
|
│ WARRANTIES WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED │
|
|
│ WARRANTIES OF MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE │
|
|
│ AUTHOR BE LIABLE FOR ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL │
|
|
│ DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR │
|
|
│ PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER │
|
|
│ TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR │
|
|
│ PERFORMANCE OF THIS SOFTWARE. │
|
|
╚─────────────────────────────────────────────────────────────────────────────*/
|
|
#include "libc/elf/def.h"
|
|
#include "libc/sysv/consts/prot.h"
|
|
#include "libc/macho.internal.h"
|
|
#include "libc/dce.h"
|
|
#include "libc/macros.internal.h"
|
|
|
|
// APE Loader Executable Structure
|
|
// Linux, FreeBSD, NetBSD, OpenBSD
|
|
|
|
.align 8
|
|
ehdr: .ascii "\177ELF"
|
|
.byte ELFCLASS64
|
|
.byte ELFDATA2LSB
|
|
.byte 1
|
|
.byte ELFOSABI_FREEBSD
|
|
.quad 0
|
|
.word ET_EXEC # e_type
|
|
.word EM_NEXGEN32E # e_machine
|
|
.long 1 # e_version
|
|
.quad _start # e_entry
|
|
.quad phdrs - ehdr # e_phoff
|
|
.quad 0 # e_shoff
|
|
.long 0 # e_flags
|
|
.word 64 # e_ehsize
|
|
.word 56 # e_phentsize
|
|
.word 4 # e_phnum
|
|
.word 0 # e_shentsize
|
|
.word 0 # e_shnum
|
|
.word 0 # e_shstrndx
|
|
.endobj ehdr,globl
|
|
|
|
.align 8
|
|
phdrs: .long PT_LOAD # p_type
|
|
.long PF_R|PF_X # p_flags
|
|
.quad 0 # p_offset
|
|
.quad ehdr # p_vaddr
|
|
.quad ehdr # p_paddr
|
|
.quad filesz # p_filesz
|
|
.quad filesz # p_memsz
|
|
.quad PAGESIZE # p_align
|
|
|
|
.long PT_LOAD # p_type
|
|
.long PF_R|PF_W # p_flags
|
|
.quad 0 # p_offset
|
|
.quad bss # p_vaddr
|
|
.quad bss # p_paddr
|
|
.quad 0 # p_filesz
|
|
.quad bsssize # p_memsz
|
|
.quad PAGESIZE # p_align
|
|
|
|
.long PT_GNU_STACK # p_type
|
|
.long PF_R|PF_W # p_flags
|
|
.quad 0 # p_offset
|
|
.quad 0 # p_vaddr
|
|
.quad 0 # p_paddr
|
|
.quad 0 # p_filesz
|
|
.quad 0 # p_memsz
|
|
.quad 16 # p_align
|
|
|
|
.long PT_NOTE # p_type
|
|
.long PF_R # p_flags
|
|
.quad note - ehdr # p_offset
|
|
.quad note # p_vaddr
|
|
.quad note # p_paddr
|
|
.quad notesize # p_filesz
|
|
.quad notesize # p_memsz
|
|
.quad 8 # p_align
|
|
.endobj phdrs
|
|
|
|
note: .long 2f-1f
|
|
.long 4f-3f
|
|
.long 1
|
|
1: .asciz "OpenBSD"
|
|
2: .align 4
|
|
3: .long 0
|
|
4: .long 2f-1f
|
|
.long 4f-3f
|
|
.long 1
|
|
1: .asciz "NetBSD"
|
|
2: .align 4
|
|
3: .long 901000000
|
|
4: .endobj note
|
|
notesize = . - note
|
|
|
|
.align 64,0 # for ape.S dd
|
|
.org 0x180 # for ape.S dd
|
|
|
|
// APE Loader XNU Header
|
|
//
|
|
// This header is dd'd backwards by the APE shell script when
|
|
// running on Mac OS X.
|
|
//
|
|
// @see ape/ape.S
|
|
macho: .long 0xFEEDFACE+1
|
|
.long MAC_CPU_NEXGEN32E
|
|
.long MAC_CPU_NEXGEN32E_ALL
|
|
.long MAC_EXECUTE
|
|
.long 5 # number of load commands
|
|
.long 60f-10f # size of all load commands
|
|
.long MAC_NOUNDEFS # flags
|
|
.long 0 # reserved
|
|
10: .long MAC_LC_SEGMENT_64
|
|
.long 20f-10b # unmaps first page dir
|
|
.ascin "__PAGEZERO",16 # consistent with linux
|
|
.quad 0,0x200000,0,0 # which forbids mem <2m
|
|
.long 0,0,0,0
|
|
20: .long MAC_LC_SEGMENT_64
|
|
.long 30f-20b
|
|
.ascin "__TEXT",16
|
|
.quad ehdr # vaddr
|
|
.quad 4096 # memsz
|
|
.quad 0 # file offset
|
|
.quad filesz # file size
|
|
.long PROT_EXEC|PROT_READ|PROT_WRITE # maxprot
|
|
.long PROT_EXEC|PROT_READ # initprot
|
|
.long 1 # segment section count
|
|
.long 0 # flags
|
|
210: .ascin "__text",16 # section name (.text)
|
|
.ascin "__TEXT",16
|
|
.quad _start # vaddr
|
|
.quad textsz # memsz
|
|
.long textoff # offset
|
|
.long 6 # align 2**6 = 64
|
|
.long 0 # reloc table offset
|
|
.long 0 # relocation count
|
|
.long MAC_S_ATTR_SOME_INSTRUCTIONS # section type & attributes
|
|
.long 0,0,0 # reserved
|
|
30: .long MAC_LC_SEGMENT_64
|
|
.long 40f-30b
|
|
.ascin "__DATA",16
|
|
.quad bss # vaddr
|
|
.quad bsssize # memsz
|
|
.quad 0 # offset
|
|
.quad 0 # file size
|
|
.long PROT_EXEC|PROT_READ|PROT_WRITE # maxprot
|
|
.long PROT_READ|PROT_WRITE # initprot
|
|
.long 1 # segment section count
|
|
.long 0 # flags
|
|
310: .ascin "__bss",16 # section name (.bss)
|
|
.ascin "__DATA",16
|
|
.quad bss # vaddr
|
|
.quad bsssize # memsz
|
|
.long 0 # offset
|
|
.long 12 # align 2**12 = 4096
|
|
.long 0 # reloc table offset
|
|
.long 0 # relocation count
|
|
.long MAC_S_ZEROFILL # section type & attributes
|
|
.long 0,0,0 # reserved
|
|
40: .long MAC_LC_UUID
|
|
.long 50f-40b
|
|
.quad 0x3fb29ee4ac6c87aa # uuid1
|
|
.quad 0xdd2c9bb866d9eef8 # uuid2
|
|
50: .long MAC_LC_UNIXTHREAD
|
|
.long 60f-50b # cmdsize
|
|
.long MAC_THREAD_NEXGEN32E # flavaflav
|
|
.long (520f-510f)/4 # count
|
|
510: .quad 0 # rax
|
|
.quad 0 # rbx
|
|
.quad 0 # rcx
|
|
.quad XNU # rdx
|
|
.quad 0 # rdi
|
|
.quad 0 # rsi
|
|
.quad 0 # rbp
|
|
.quad 0 # rsp
|
|
.quad 0 # r8
|
|
.quad 0 # r9
|
|
.quad 0 # r10
|
|
.quad 0 # r11
|
|
.quad 0 # r12
|
|
.quad 0 # r13
|
|
.quad 0 # r14
|
|
.quad 0 # r15
|
|
.quad _start # rip
|
|
.quad 0 # rflags
|
|
.quad 0 # cs
|
|
.quad 0 # fs
|
|
.quad 0 # gs
|
|
520:
|
|
60:
|
|
.endobj macho
|
|
|
|
.align 64,0 # for ape.S dd
|
|
.org 0x400 # for ape.S dd
|
|
|
|
// Ape Loader Entrpoint
|
|
//
|
|
// This is normally called by the operating system. However it may
|
|
// be called by the Actually Portable Executables themselves, when
|
|
// re-executing a program. Just do this:
|
|
//
|
|
// memcpy(0x200000, loader)
|
|
// lea handoff(%rip),%rcx
|
|
// lea argblock(%rip),%rsp
|
|
// jmp 0x200400
|
|
//
|
|
// @see APE_LOADER_ENTRY
|
|
// @see ape/loader.h
|
|
_start:
|
|
|
|
// Hack for detecting M1 Rosetta environment.
|
|
// https://github.com/jart/cosmopolitan/issues/429#issuecomment-1166704377
|
|
cmp $-1,%ebx
|
|
jne 0f
|
|
cmp $+1,%edx
|
|
jne 0f
|
|
mov $XNU,%dl
|
|
xor %ecx,%ecx
|
|
|
|
0: mov %rsp,%rsi
|
|
jmp ApeLoader
|
|
.endfn _start,globl
|
|
|
|
// System Call Entrpoint
|
|
//
|
|
// This function is used by the APE loader to make system calls.
|
|
// We also pass a reference to this function to the APE binary's
|
|
// _start() function. It's needed because on OpenBSD, msyscall()
|
|
// restricts which pages can issue system calls, and it can only
|
|
// be called once. Therefore if we want to be load and re-load a
|
|
// binary multiple times without calling the system execve(), we
|
|
// need to be able to handover the SYSCALL function. We hardcode
|
|
// this to a fixed address, but that shouldn't be used, since we
|
|
// would ideally want to move it to a random page in the future.
|
|
__syscall_loader:
|
|
clc
|
|
syscall
|
|
jc 1f
|
|
ret
|
|
1: neg %rax
|
|
ret
|
|
.endfn __syscall_loader,globl
|