Annotation of XNU/osfmk/ppc/Performance.s, revision 1.1.1.1

1.1       root        1: /*
                      2:  * Copyright (c) 2000 Apple Computer, Inc. All rights reserved.
                      3:  *
                      4:  * @APPLE_LICENSE_HEADER_START@
                      5:  * 
                      6:  * The contents of this file constitute Original Code as defined in and
                      7:  * are subject to the Apple Public Source License Version 1.1 (the
                      8:  * "License").  You may not use this file except in compliance with the
                      9:  * License.  Please obtain a copy of the License at
                     10:  * http://www.apple.com/publicsource and read it before using this file.
                     11:  * 
                     12:  * This Original Code and all software distributed under the License are
                     13:  * distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, EITHER
                     14:  * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
                     15:  * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
                     16:  * FITNESS FOR A PARTICULAR PURPOSE OR NON-INFRINGEMENT.  Please see the
                     17:  * License for the specific language governing rights and limitations
                     18:  * under the License.
                     19:  * 
                     20:  * @APPLE_LICENSE_HEADER_END@
                     21:  */
                     22: /*
                     23:  * @OSF_COPYRIGHT_INTERNAL_USE_ONLY@
                     24:  */
                     25: 
                     26: /*                                                                                                                                                                                     
                     27:        Performance.s 
                     28: 
                     29:        Handle things that should are related to the hardware performance monitor
                     30: 
                     31:        Lovingly crafted by Bill Angell using traditional methods and only natural or recycled materials.
                     32:        No more than 7500 chinchillas were killed in the production of the code.
                     33: 
                     34: */
                     35: 
                     36: #include <ppc/asm.h>
                     37: #include <ppc/proc_reg.h>
                     38: #include <ppc/POWERMAC/mp/MPPlugIn.h>
                     39: #include <ppc/exception.h>
                     40: #include <ppc/Performance.h>
                     41: #include <mach/machine/vm_param.h>
                     42: #include <assym.s>
                     43: 
                     44: #if PERF_HIST
                     45: /*
                     46:  *                     This routine is used to interface to the performance monitor
                     47:  */
                     48: 
                     49: ENTRY(PerfCtl, TAG_NO_FRAME_USED)
                     50: 
                     51:                        lis             r0,PerfCtlCall@h                                /* Get the top part of the SC number */
                     52:                        ori             r0,r0,PerfCtlCall@l                             /* and the bottom part */
                     53:                        sc                                                                              /* Do it to it */
                     54:                        blr                                                                             /* Bye bye, Birdie... */
                     55:                        
                     56: 
                     57: ENTRY(PerfCtlLL, TAG_NO_FRAME_USED)
                     58: 
                     59:                        cmplwi  r3,maxPerf                                              /* See if we are within range */
                     60:                        mflr    r11                                                             /* Get the return point */
                     61:                        li              r3,0                                                    /* Show failure */
                     62:                        bgelrl-                                                                 /* Load up current address and, also, leave if out of range */
                     63: prfBase:       mflr    r12                                                             /* Get our address */
                     64:                        rlwinm  r10,r3,2,0,31                                   /* Get displacement into branch table */
                     65:                        addi    r12,r12,prfBrnch-prfBase                /* Point to the branch address */
                     66:                        add             r12,r12,r10                                             /* Point to the branch */
                     67:                        mtlr    r12                                                             /* Get it in the link register */
                     68:                        blr                                                                             /* Vector to the specific performance command... */
                     69:                        
                     70: prfBrnch:      b               prfClear                                                /* Clear the histogram table */
                     71:                        b               prfStart                                                /* Start the performance monitor */
                     72:                        b               prfStop                                                 /* Stop the performance monitor */
                     73:                        b               prfMap                                                  /* Map the histogram into an address space */
                     74:                        .equ    maxPerf, (.-prfBrnch)/4                 /* Set the highest valid address */
                     75:                        
                     76: /*
                     77:  *                     Clear the monitor histogram
                     78:  */
                     79: prfClear:
                     80:                        li              r4,PMIhist@l                                    /* We know this to be in page 0, so no need for the high part */
                     81:                        lis             r8,PMIHIST_SIZE@h                               /* Get high half of the table size */
                     82:                        lwz             r4,0(r4)                                                /* Get the real address of the histgram */
                     83:                        ori             r8,r8,PMIHIST_SIZE@l                    /* Get the low half of the table size */
                     84:                        li              r6,32                                                   /* Get a displacement */
                     85:                        li              r3,1                                                    /* Set up a good return code */
                     86:                        mtlr    r11                                                             /* Restore the return address */
                     87:                                                
                     88: clrloop:       subi    r8,r8,32                                                /* Back off a cache line */
                     89:                        dcbz    0,r4                                                    /* Do the even line */
                     90:                        sub.    r8,r8,r6                                                /* Back off a second time (we only do this to generate a CR */
                     91:                        dcbz    r6,r4                                                   /* Clear the even line */
                     92:                        addi    r4,r4,64                                                /* Move up to every other line */
                     93:                        bgt+    clrloop                                                 /* Go until we've done it all... */
                     94: 
                     95:                        blr                                                                             /* Leave... */
                     96:                        
                     97: /*
                     98:  *                     Start the monitor histogram
                     99:  */
                    100:  prfStart:
                    101:                        mtlr    r11                                                             /* Restore the return address */
                    102:                        blr                                                                             /* Return... */
                    103:                        
                    104: /*
                    105:  *                     Stop the monitor histogram
                    106:  */
                    107:  prfStop:
                    108:                        mtlr    r11                                                             /* Restore the return address */
                    109:                        blr                                                                             /* Return... */
                    110:                        
                    111: /*
                    112:  *                     Maps the monitor histogram into another address space
                    113:  */
                    114:  prfMap:
                    115:                        mtlr    r11                                                             /* Restore the return address */
                    116:                        blr                                                                             /* Return... */
                    117: 
                    118: #endif
                    119: 

unix.superglobalmegacorp.com

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.