uclibc-ng/ldso/ldso/mips/dl-startup.h

/* Any assmbly language/system dependent hacks needed to setup boot1.c so it
 * will work as expected and cope with whatever platform specific wierdness is
 * needed for this architecture.
 */

asm("" \
"	.text\n"			\
"	.globl	_dl_boot\n"		\
"_dl_boot:\n"				\
"	.set noreorder\n"		\
"	bltzal $0, 0f\n"		\
"	nop\n"				\
"0:	.cpload $31\n"			\
"	.set reorder\n"			\
"	la $4, _DYNAMIC\n"		\
"	sw $4, -0x7ff0($28)\n"	        \
"	move $4, $29\n"			\
"	la $8, coff\n"			\
"	.set noreorder\n"		\
"	bltzal $0, coff\n"		\
"	nop\n"				\
"coff:	subu $8, $31, $8\n"		\
"	.set reorder\n"			\
"	la $25, _dl_boot2\n"	        \
"	addu $25, $8\n"			\
"	jalr $25\n"			\
"	lw $4, 0($29)\n"		\
"	la $5, 4($29)\n"		\
"	sll $6, $4, 2\n"		\
"	addu $6, $6, $5\n"		\
"	addu $6, $6, 4\n"		\
"	la $7, _dl_elf_main\n"		\
"	lw $25, 0($7)\n"		\
"	jr $25\n"			\
);

#define DL_BOOT(X)   static void __attribute_used__ _dl_boot2 (X)

/*
 * Get a pointer to the argv array.  On many platforms this can be just
 * the address if the first argument, on other platforms we need to
 * do something a little more subtle here.
 */
#define GET_ARGV(ARGVP, ARGS) ARGVP = ((unsigned long *) ARGS)


/*
 * Here is a macro to perform the GOT relocation. This is only
 * used when bootstrapping the dynamic loader.
 */
#define PERFORM_BOOTSTRAP_GOT(got)						\
do {										\
	Elf32_Sym *sym;								\
	unsigned long i;							\
										\
	/* Add load address displacement to all local GOT entries */		\
	i = 2;									\
	while (i < tpnt->mips_local_gotno)					\
		got[i++] += load_addr;						\
										\
	/* Handle global GOT entries */						\
	got += tpnt->mips_local_gotno;						\
	sym = (Elf32_Sym *) (tpnt->dynamic_info[DT_SYMTAB] +			\
		 load_addr) + tpnt->mips_gotsym;				\
	i = tpnt->mips_symtabno - tpnt->mips_gotsym;				\
										\
	while (i--) {								\
		if (sym->st_shndx == SHN_UNDEF ||				\
			sym->st_shndx == SHN_COMMON)				\
			*got = load_addr + sym->st_value;			\
		else if (ELF32_ST_TYPE(sym->st_info) == STT_FUNC &&		\
			*got != sym->st_value)					\
			*got += load_addr;					\
		else if (ELF32_ST_TYPE(sym->st_info) == STT_SECTION) {		\
			if (sym->st_other == 0)					\
				*got += load_addr;				\
		}								\
		else								\
			*got = load_addr + sym->st_value;			\
										\
		got++;								\
		sym++;								\
	}									\
} while (0)


/*
 * Here is a macro to perform a relocation.  This is only used when
 * bootstrapping the dynamic loader.
 */
#define PERFORM_BOOTSTRAP_RELOC(RELP,REL,SYMBOL,LOAD,SYMTAB)			\
	switch(ELF32_R_TYPE((RELP)->r_info)) {					\
	case R_MIPS_REL32:							\
		if (symtab_index) {						\
			if (symtab_index < tpnt->mips_gotsym)			\
				*REL += SYMBOL;					\
		}								\
		else {								\
			*REL += LOAD;						\
		}								\
		break;								\
	case R_MIPS_NONE:							\
		break;								\
	default:								\
		SEND_STDERR("Aiieeee!");					\
		_dl_exit(1);							\
	}


/*
 * Transfer control to the user's application, once the dynamic loader
 * is done.  This routine has to exit the current function, then
 * call the _dl_elf_main function. For MIPS, we do it in assembly
 * because the stack doesn't get properly restored otherwise. Got look
 * at boot1_arch.h
 */
#define START()