PowerPC64 startup code.

Determine location of toc based on PC relative location and load into %r2

1 files changed, 124 insertions, 0 deletions

diff --git a/lib/csu/powerpc64/md_init.h b/lib/csu/powerpc64/md_init.h
new file mode 100644
index 00000000000..0b46df1d426
--- /dev/null
+++ b/lib/csu/powerpc64/md_init.h
@@ -0,0 +1,124 @@
+/* $OpenBSD: md_init.h,v 1.1 2020/06/25 04:09:39 drahn 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")
+
+#include <sys/syscall.h>	/* for SYS_mprotect */
+
+#define STR(x) __STRING(x)
+
+#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, %r30							\n" \
+"	mr %r5, %r17							\n" \
+"	li %r6, 0							\n" \
+"	bl ___start							\n" \
+"									\n" \
+"	.globl	_dl_exit						\n" \
+"	.type	_dl_exit, @function					\n" \
+"_dl_exit:								\n" \
+"	li	%r0, " STR(SYS_exit) "					\n" \
+"	sc								\n" \
+"	blr								\n" \
+)