/* $OpenBSD: md_init.h,v 1.5 2023/11/18 16:26:16 deraadt Exp $ */

/*
 * Copyright (c) 2020 Dale Rahn <drahn@openbsd.org>
 *
 * Permission to use, copy, modify, and 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.
 */

#define MD_SECT_CALL_FUNC(section, func)                                \
        __asm (".section "#section", \"ax\"                             \n" \
        "       bl " #func "                                            \n" \
        "       .previous")

#define MD_SECTION_PROLOGUE(sect, entry_pt)                             \
        __asm (                                                         \
        ".section "#sect",\"ax\",@progbits                              \n" \
        "       .globl " #entry_pt "                                    \n" \
        "       .type " #entry_pt ",@function                           \n" \
        "       .align 4                                                \n" \
        #entry_pt":                                                     \n" \
        ".L_"sect"_gep:                                                 \n" \
        "       addis %r2, %r12, .TOC.-.L_"sect"_gep@ha                 \n" \
        "       addi %r2, %r2, .TOC.-.L_"sect"_gep@l                    \n" \
        ".L_"sect"_lep:                                                 \n" \
        "       .localentry " #entry_pt", .L_"sect"_lep-.L_"sect"_gep;  \n" \
        "       mflr    %r0                                             \n" \
        "       std     %r0,16(%r1)                                     \n" \
        "       stdu    %r1,-64(%r1)                                    \n" \
        "       /* fall thru */                                         \n" \
        "       .previous")


#define MD_SECTION_EPILOGUE(sect)                                       \
        __asm (                                                         \
        ".section "#sect",\"ax\",@progbits                              \n" \
        "       addi    %r1,%r1,64                                      \n" \
        "       ld      %r0,16(%r1)                                     \n" \
        "       mtlr    %r0                                             \n" \
        "       blr                                                     \n" \
        "       .previous")

#define MD_CRT0_START                                                   \
__asm(                                                                  \
"       .text                                                           \n" \
"       .section        \".text\"                                       \n" \
"       .align 2                                                        \n" \
"       .globl  _start                                                  \n" \
"       .type   _start, @function                                       \n" \
"       .globl  __start                                                 \n" \
"       .type   __start, @function                                      \n" \
"_start:                                                                \n" \
"__start:                                                               \n" \
"       bl      1f                                                      \n" \
"1:                                                                     \n" \
"       mflr    %r30                                                    \n" \
"       addis   %r2, %r30, .TOC.-1b@ha                                  \n" \
"       addi    %r2, %r2, .TOC.-1b@l                                    \n" \
"       # put cleanup in r6 instead of r7                               \n" \
"       mr      %r6, %r7                                                \n" \
"       li      %r7, 0                                                  \n" \
"       stdu    %r7, -64(%r1)                                           \n" \
"       b ___start                                                      \n" \
)

#define MD_RCRT0_START                                                  \
__asm(                                                                  \
"       .text                                                           \n" \
"       .section        \".text\"                                       \n" \
"       .align 2                                                        \n" \
"       .globl  _start                                                  \n" \
"       .type   _start, @function                                       \n" \
"       .globl  __start                                                 \n" \
"       .type   __start, @function                                      \n" \
"_start:                                                                \n" \
"__start:                                                               \n" \
"       bl      1f                                                      \n" \
"1:                                                                     \n" \
"       mflr    %r31                                                    \n" \
"       addis   %r2, %r31, .TOC.-1b@ha                                  \n" \
"       addi    %r2, %r2, .TOC.-1b@l                                    \n" \
"       stdu    1, (-48 -((9+3)*8))(%r1) # allocate dl_data             \n" \
"                                                                       \n" \
"       # Preserve program parameters during setup                      \n" \
"       mr %r15, %r3                    # argc                          \n" \
"       mr %r16, %r4                    # argv                          \n" \
"       mr %r17, %r5                    # envp                          \n" \
"                                                                       \n" \
"       addis   %r14, %r2, _DYNAMIC@toc@ha                              \n" \
"       addi    %r14, %r14, _DYNAMIC@toc@l                              \n" \
"                                                                       \n" \
"       subi    %r3, %r16, 8    # pointer to argc on stack.             \n" \
"       addi    %r4, %r1, 48    # dl_data                               \n" \
"       mr      %r5, %r14       # dynamicp                              \n" \
"                                                                       \n" \
"      bl      _dl_boot_bind                                            \n" \
"                                                                       \n" \
"       # restore program arguments                                     \n" \
"       mr %r3, %r15                                                    \n" \
"       mr %r4, %r16                                                    \n" \
"       mr %r5, %r17                                                    \n" \
"       li %r6, 0                                                       \n" \
"       bl ___start                                                     \n" \
"                                                                       \n" \
"       .globl  _csu_abort                                              \n" \
"       .type   _csu_abort, @function                                   \n" \
"_csu_abort:                                                            \n" \
"       .long 0 # illegal                                               \n" \
)