ports/sysdeps/mips/mips64/n64/crti.S

   1 /* Special .init and .fini section support for MIPS (n64).
   2    Copyright (C) 1995-2014 Free Software Foundation, Inc.
   3    This file is part of the GNU C Library.
   4
   5    The GNU C Library is free software; you can redistribute it and/or
   6    modify it under the terms of the GNU Lesser General Public
   7    License as published by the Free Software Foundation; either
   8    version 2.1 of the License, or (at your option) any later version.
   9
  10    In addition to the permissions in the GNU Lesser General Public
  11    License, the Free Software Foundation gives you unlimited
  12    permission to link the compiled version of this file with other
  13    programs, and to distribute those programs without any restriction
  14    coming from the use of this file. (The GNU Lesser General Public
  15    License restrictions do apply in other respects; for example, they
  16    cover modification of the file, and distribution when not linked
  17    into another program.)
  18
  19    Note that people who make modified versions of this file are not
  20    obligated to grant this special exception for their modified
  21    versions; it is their choice whether to do so. The GNU Lesser
  22    General Public License gives permission to release a modified
  23    version without this exception; this exception also makes it
  24    possible to release a modified version which carries forward this
  25    exception.
  26
  27    The GNU C Library is distributed in the hope that it will be useful,
  28    but WITHOUT ANY WARRANTY; without even the implied warranty of
  29    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  30    Lesser General Public License for more details.
  31
  32    You should have received a copy of the GNU Lesser General Public
  33    License along with the GNU C Library.  If not, see
  34    <http://www.gnu.org/licenses/>.  */
  35
  36 /* crti.S puts a function prologue at the beginning of the .init and
  37    .fini sections and defines global symbols for those addresses, so
  38    they can be called as functions.  The symbols _init and _fini are
  39    magic and cause the linker to emit DT_INIT and DT_FINI.  */
  40
  41 #include <libc-symbols.h>
  42
  43 #ifndef PREINIT_FUNCTION
  44 # define PREINIT_FUNCTION __gmon_start__
  45 #endif
  46
  47 #ifndef PREINIT_FUNCTION_WEAK
  48 # define PREINIT_FUNCTION_WEAK 1
  49 #endif
  50
  51 #if PREINIT_FUNCTION_WEAK
  52         weak_extern (PREINIT_FUNCTION)
  53 #else
  54         .hidden PREINIT_FUNCTION
  55 #endif
  56
  57         .set nomips16
  58
  59         .section .init,"ax",@progbits
  60         .p2align 2
  61         .globl _init
  62         .type _init, @function
  63 _init:
  64         daddiu $sp,$sp,-16
  65         sd $28,0($sp)
  66         lui $28,%hi(%neg(%gp_rel(_init)))
  67         daddu $28,$28,$25
  68         sd $31,8($sp)
  69         daddiu $28,$28,%lo(%neg(%gp_rel(_init)))
  70 #if PREINIT_FUNCTION_WEAK
  71         ld $2,%got_disp(PREINIT_FUNCTION)($28)
  72         beq $2,$0,.Lno_weak_fn
  73         ld $25,%call16(PREINIT_FUNCTION)($28)
  74         .reloc 1f,R_MIPS_JALR,PREINIT_FUNCTION
  75 1:      jalr $25
  76 .Lno_weak_fn:
  77 #else
  78         ld $25,%got_disp(PREINIT_FUNCTION)($28)
  79         .reloc 1f,R_MIPS_JALR,PREINIT_FUNCTION
  80 1:      jalr $25
  81 #endif
  82
  83         .section .fini,"ax",@progbits
  84         .p2align 2
  85         .globl _fini
  86         .type _fini, @function
  87 _fini:
  88         daddiu $sp,$sp,-16
  89         sd $28,0($sp)
  90         lui $28,%hi(%neg(%gp_rel(_fini)))
  91         daddu $28,$28,$25
  92         sd $31,8($sp)
  93         daddiu $28,$28,%lo(%neg(%gp_rel(_fini)))