mirror of
https://github.com/jart/cosmopolitan.git
synced 2025-02-01 03:53:33 +00:00
5e8ae2d5bc
Continuous Integration (via runit and runitd) is now re-enabled on win7 and win10. The `make test` command, which runs the tests on all systems is now the fastest and most stable it's been since the project started. UBSAN is now enabled in MODE=dbg in addition to ASAN. Many instances of undefined behavior have been removed. Mostly things like passing a NULL argument to memcpy(), which works fine with Cosmopolitan Libc, but that doesn't prevents the compiler from being unhappy. There was an issue w/ GNU make where static analysis claims a sprintf() call can overflow. We also now have nicer looking crash reports on Windows since uname should now be supported and msys64 addr2line works reliably.
223 lines
6.3 KiB
PHP
223 lines
6.3 KiB
PHP
/*-*- mode:unix-assembly; indent-tabs-mode:t; tab-width:8; coding:utf-8 -*-│
|
|
│vi: set et ft=asm ts=8 sw=8 fenc=utf-8 :vi│
|
|
╞══════════════════════════════════════════════════════════════════════════════╡
|
|
│ Copyright 2020 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/intrin/asancodes.h"
|
|
#include "ape/relocations.h"
|
|
/* clang-format off */
|
|
|
|
#if __MNO_VZEROUPPER__ + 0
|
|
#define vzeroupper
|
|
#endif
|
|
|
|
// Begins definition of frameless function that calls no functions.
|
|
.macro .leafprologue
|
|
#if !(defined(TINY) && !defined(__PG__))
|
|
push %rbp
|
|
mov %rsp,%rbp
|
|
#endif
|
|
.endm
|
|
|
|
// Ends definition of frameless function that calls no functions.
|
|
.macro .leafepilogue
|
|
#if !(defined(TINY) && !defined(__PG__))
|
|
pop %rbp
|
|
#endif
|
|
ret
|
|
.endm
|
|
|
|
// Good alignment for functions where alignment actually helps.
|
|
// @note 16-byte
|
|
.macro .alignfunc
|
|
#ifndef __OPTIMIZE_SIZE__
|
|
.p2align 4
|
|
#endif
|
|
.endm
|
|
|
|
// Good alignment for loops where alignment actually helps.
|
|
// @note 16-byte if <10 padding otherwise 8-byte
|
|
.macro .alignloop
|
|
#ifndef __OPTIMIZE_SIZE__
|
|
.p2align 4,,10
|
|
.p2align 4
|
|
#endif
|
|
.endm
|
|
|
|
// Loads Effective Address
|
|
// Supporting security blankets
|
|
.macro plea symbol:req reg64:req reg32:req
|
|
#if __PIC__ + __PIE__ + __code_model_medium__ + __code_model_large__ + 0 > 1
|
|
lea \symbol(%rip),\reg64
|
|
#else
|
|
mov $\symbol,\reg32
|
|
#endif
|
|
.endm
|
|
|
|
// Loads Effective Address to Stack
|
|
// Supporting security blankets
|
|
.macro pshaddr symbol:req
|
|
#if __PIC__ + __PIE__ + __code_model_medium__ + __code_model_large__ + 0 > 1
|
|
push $IMAGE_BASE_VIRTUAL+RVA(\symbol)(%rip),\reg64
|
|
#else
|
|
push $\symbol
|
|
#endif
|
|
.endm
|
|
|
|
// TODO(jart): delete
|
|
// Loads Effective Address
|
|
// Supporting security blankets
|
|
.macro ezlea symbol:req reg:req
|
|
#if __pic__ + __pie__ + __code_model_medium__ + __code_model_large__ + 0 > 1
|
|
// lea \symbol(%rip),%r\reg
|
|
mov $\symbol,%e\reg
|
|
#else
|
|
mov $\symbol,%e\reg
|
|
#endif
|
|
.endm
|
|
|
|
.macro farcall symbol:req
|
|
.type \symbol,@function
|
|
#if __PIC__ + __PIE__ + __code_model_medium__ + __code_model_large__ + 0 > 1
|
|
call *\symbol\()@gotpcrel(%rip)
|
|
#else
|
|
call \symbol\()@plt
|
|
#endif
|
|
.endm
|
|
|
|
// Documents unreachable assembly code.
|
|
.macro .unreachable
|
|
#ifndef NDEBUG
|
|
ud2 # crash if contract is broken
|
|
#elif defined(__FNO_OMIT_FRAME_POINTER__)
|
|
nop # avoid noreturn tail call backtrace ambiguity
|
|
#endif
|
|
.endm
|
|
|
|
// Inserts profiling hook in prologue if cc wants it.
|
|
//
|
|
// Cosmopolitan does this in a slightly different way from normal
|
|
// GNU toolchains. We always use the -mnop-mcount behavior, since
|
|
// the runtime is able to morph the binary at runtime. It is good
|
|
// since we can put hooks for profiling and function tracing into
|
|
// most builds, without any impact on performance.
|
|
//
|
|
// @cost ≥0.3 cycles, 5 bytes
|
|
// @see build/compile
|
|
.macro .profilable
|
|
#ifdef __PG__
|
|
1382:
|
|
#if defined(__MFENTRY__)
|
|
call __fentry__
|
|
#elif defined(__PIC__) || defined(__PIE__)
|
|
// nopw 0x00(%rax,%rax,1)
|
|
.byte 0x66,0x0f,0x1f,0x44,0x00,0x00
|
|
#else
|
|
// nopl 0x00(%rax,%rax,1)
|
|
.byte 0x0f,0x1f,0x44,0x00,0x00
|
|
#endif
|
|
#endif
|
|
.endm
|
|
|
|
// Pushes RVA on stack of linktime mergeable string literal.
|
|
// @see popstr
|
|
.macro pushstr text
|
|
.section .rodata.str1.1,"aSM",@progbits,1
|
|
.Lstr\@: .asciz "\text"
|
|
.endobj .Lstr\@
|
|
.previous
|
|
push $.Lstr\@ - IMAGE_BASE_VIRTUAL
|
|
.endm
|
|
|
|
// Pops off stack string address.
|
|
// @see pushstr
|
|
.macro popstr dest:req
|
|
addl $IMAGE_BASE_VIRTUAL,(%rsp)
|
|
pop \dest
|
|
.endm
|
|
|
|
// Loads address of linktime mergeable string literal into register.
|
|
.macro getstr text:req reg64:req reg32 regsz64 regsz32 bias=0
|
|
.section .rodata.str1.1,"aSM",@progbits,1
|
|
.type .Lstr\@,@object
|
|
.Lstr\@: .asciz "\text"
|
|
.Lstr\@.size = .-.Lstr\@ - 1
|
|
.size .Lstr\@,.-.Lstr\@
|
|
.previous
|
|
plea .Lstr\@,\reg64,\reg32
|
|
.ifnb \regsz64
|
|
#ifdef __OPTIMIZE_SIZE__
|
|
.if .Lstr\@.size + \bias < 128
|
|
pushpop .Lstr\@.size,\regsz64
|
|
.else
|
|
mov $.Lstr\@.size,\regsz32
|
|
.endif
|
|
#else
|
|
mov $.Lstr\@.size,\regsz32
|
|
#endif
|
|
.endif
|
|
.endm
|
|
|
|
// TODO(jart): delete
|
|
// Loads address of linktime mergeable string literal into register.
|
|
.macro loadstr text:req reg:req regsz bias=0
|
|
.section .rodata.str1.1,"aSM",@progbits,1
|
|
.type .Lstr\@,@object
|
|
.Lstr\@: .asciz "\text"
|
|
.Lstr\@.size = .-.Lstr\@ - 1
|
|
.size .Lstr\@,.-.Lstr\@
|
|
.previous
|
|
ezlea .Lstr\@,\reg
|
|
.ifnb \regsz
|
|
#ifdef __OPTIMIZE_SIZE__
|
|
.if .Lstr\@.size + \bias < 128
|
|
pushpop .Lstr\@.size,%r\regsz
|
|
.else
|
|
mov $.Lstr\@.size,%e\regsz
|
|
.endif
|
|
#else
|
|
mov $.Lstr\@.size,%e\regsz
|
|
#endif
|
|
.endif
|
|
.endm
|
|
|
|
.macro .poison name:req kind:req
|
|
#ifdef __SANITIZE_ADDRESS__
|
|
2323: .quad 0
|
|
.init.start 304,"_init_\name\()_poison_\@"
|
|
push %rdi
|
|
push %rsi
|
|
ezlea 2323b,di
|
|
mov $8,%esi
|
|
mov $\kind,%edx
|
|
call __asan_poison
|
|
pop %rsi
|
|
pop %rdi
|
|
.init.end 304,"_init_\name\()_poison_\@"
|
|
#endif
|
|
.endm
|
|
|
|
.macro .underrun
|
|
#ifdef __SANITIZE_ADDRESS__
|
|
.poison __BASE_FILE__, kAsanGlobalUnderrun
|
|
#endif
|
|
.endm
|
|
|
|
.macro .overrun
|
|
#ifdef __SANITIZE_ADDRESS__
|
|
.poison __BASE_FILE__, kAsanGlobalUnderrun
|
|
#endif
|
|
.endm
|