sys/powerpc/include/profile.h

   1 /*-
   2  * Copyright (c) 1994, 1995, 1996 Carnegie-Mellon University.
   3  * All rights reserved.
   4  *
   5  * Author: Chris G. Demetriou
   6  *
   7  * Permission to use, copy, modify and distribute this software and
   8  * its documentation is hereby granted, provided that both the copyright
   9  * notice and this permission notice appear in all copies of the
  10  * software, derivative works or modified versions, and any portions
  11  * thereof, and that both notices appear in supporting documentation.
  12  *
  13  * CARNEGIE MELLON ALLOWS FREE USE OF THIS SOFTWARE IN ITS "AS IS"
  14  * CONDITION.  CARNEGIE MELLON DISCLAIMS ANY LIABILITY OF ANY KIND
  15  * FOR ANY DAMAGES WHATSOEVER RESULTING FROM THE USE OF THIS SOFTWARE.
  16  *
  17  * Carnegie Mellon requests users of this software to return to
  18  *
  19  *  Software Distribution Coordinator  or  Software.Distribution@CS.CMU.EDU
  20  *  School of Computer Science
  21  *  Carnegie Mellon University
  22  *  Pittsburgh PA 15213-3890
  23  *
  24  * any improvements or extensions that they make and grant Carnegie the
  25  * rights to redistribute these changes.
  26  *
  27  *      from: NetBSD: profile.h,v 1.9 1997/04/06 08:47:37 cgd Exp
  28  *      from: FreeBSD: src/sys/alpha/include/profile.h,v 1.4 1999/12/29
  29  * $FreeBSD$
  30  */
  31
  32 #ifndef _MACHINE_PROFILE_H_
  33 #define _MACHINE_PROFILE_H_
  34
  35 #define _MCOUNT_DECL    void __mcount
  36
  37 #define FUNCTION_ALIGNMENT 16
  38
  39 typedef u_int   fptrdiff_t;
  40
  41 /*
  42  * The mcount trampoline macro, expanded in libc/gmon/mcount.c
  43  *
  44  * For PowerPC SVR4 ABI profiling, the compiler will insert
  45  * a data declaration and code sequence at the start of a routine of the form
  46  *
  47  * .function_mc:        .data
  48  *                      .align  2
  49  *                      .long   0
  50  *                      .text
  51  *
  52  * function:            mflr    %r0
  53  *                      addis   %r11,%r0, .function_mc@ha
  54  *                      stw     %r0,4(%r1)
  55  *                      addi    %r0,%r11, .function_mc@l
  56  *                      bl      _mcount
  57  *
  58  * The link register is saved in the LR save word in the caller's
  59  * stack frame, r0 is set up to point to the allocated longword,
  60  * and control is transferred to _mcount.
  61  *
  62  * On return from _mcount, the routine should function as it would
  63  * with no profiling so _mcount must restore register state to that upon
  64  * entry. Any routine called by the _mcount trampoline will save
  65  * callee-save registers, so _mcount must make sure it saves volatile
  66  * registers that may have state after it returns i.e. parameter registers.
  67  *
  68  * The FreeBSD libc mcount routine ignores the r0 longword pointer, but
  69  * instead requires as parameters the current PC and called PC. The current
  70  * PC is obtained from the link register, as a result of "bl _mcount" in
  71  * the stub, while the caller's PC is obtained from the LR save word.
  72  *
  73  * On return from libc mcount, the return is done indirectly with the
  74  * ctr register rather than the link register, to allow the link register
  75  * to be restored to what it was on entry to the profiled routine.
  76  */
  77
  78 #ifdef PIC
  79 #define _PLT "@plt"
  80 #else
  81 #define _PLT
  82 #endif
  83
  84 #define MCOUNT \
  85 __asm(" .globl  _mcount                                         \n" \
  86 "       .type   _mcount,@function                               \n" \
  87 "_mcount:                                                       \n" \
  88 "       stwu    %r1,-64(%r1)    /* alloca for reg save space */ \n" \
  89 "       stw     %r3,16(%r1)     /* save parameter registers, */ \n" \
  90 "       stw     %r4,20(%r1)     /*  r3-10                    */ \n" \
  91 "       stw     %r5,24(%r1)                                     \n" \
  92 "       stw     %r6,28(%r1)                                     \n" \
  93 "       stw     %r7,32(%r1)                                     \n" \
  94 "       stw     %r8,36(%r1)                                     \n" \
  95 "       stw     %r9,40(%r1)                                     \n" \
  96 "       stw     %r10,44(%r1)                                    \n" \
  97 "                                                               \n" \
  98 "       mflr    %r4             /* link register is 'selfpc' */ \n" \
  99 "       stw     %r4,48(%r1)     /* save since bl will scrub  */ \n" \
 100 "       lwz     %r3,68(%r1)     /* get 'frompc' from LR-save */ \n" \
 101 "       bl      __mcount" _PLT "  /* __mcount(frompc, selfpc)*/ \n" \
 102 "       lwz     %r3,68(%r1)                                     \n" \
 103 "       mtlr    %r3             /* restore caller's lr       */ \n" \
 104 "       lwz     %r4,48(%r1)                                     \n" \
 105 "       mtctr   %r4             /* set up ctr for call back  */ \n" \
 106 "                               /* note that blr is not used!*/ \n" \
 107 "       lwz     %r3,16(%r1)     /* restore r3-10 parameters  */ \n" \
 108 "       lwz     %r4,20(%r1)                                     \n" \
 109 "       lwz     %r5,24(%r1)                                     \n" \
 110 "       lwz     %r6,28(%r1)                                     \n" \
 111 "       lwz     %r7,32(%r1)                                     \n" \
 112 "       lwz     %r8,36(%r1)                                     \n" \
 113 "       lwz     %r9,40(%r1)                                     \n" \
 114 "       lwz     %r10,44(%r1)                                    \n" \
 115 "       addi    %r1,%r1,64      /* blow away alloca save area */ \n" \
 116 "       bctr                    /* return with indirect call */ \n" \
 117 "_mcount_end:                           \n" \
 118 "       .size   _mcount,_mcount_end-_mcount");
 119
 120
 121 #ifdef _KERNEL
 122 #define MCOUNT_ENTER(s)         s = intr_disable();
 123 #define MCOUNT_EXIT(s)          intr_restore(s);
 124 #define MCOUNT_DECL(s)          register_t s
 125
 126 void bintr(void);
 127 void btrap(void);
 128 void eintr(void);
 129 void user(void);
 130
 131 #define MCOUNT_FROMPC_USER(pc)                                  \
 132         ((pc < (uintfptr_t)VM_MAXUSER_ADDRESS) ? (uintfptr_t)user : pc)
 133
 134 #define MCOUNT_FROMPC_INTR(pc)                                  \
 135         ((pc >= (uintfptr_t)btrap && pc < (uintfptr_t)eintr) ?  \
 136             ((pc >= (uintfptr_t)bintr) ? (uintfptr_t)bintr :    \
 137                 (uintfptr_t)btrap) : ~0U)
 138
 139
 140 #else   /* !_KERNEL */
 141
 142 typedef u_int   uintfptr_t;
 143
 144 #endif  /* _KERNEL */
 145
 146 #endif /* !_MACHINE_PROFILE_H_ */