]>
git.saurik.com Git - apple/xnu.git/blob - osfmk/kern/mach_clock.c
2 * Copyright (c) 2000-2007 Apple Inc. All rights reserved.
4 * @APPLE_OSREFERENCE_LICENSE_HEADER_START@
6 * This file contains Original Code and/or Modifications of Original Code
7 * as defined in and that are subject to the Apple Public Source License
8 * Version 2.0 (the 'License'). You may not use this file except in
9 * compliance with the License. The rights granted to you under the License
10 * may not be used to create, or enable the creation or redistribution of,
11 * unlawful or unlicensed copies of an Apple operating system, or to
12 * circumvent, violate, or enable the circumvention or violation of, any
13 * terms of an Apple operating system software license agreement.
15 * Please obtain a copy of the License at
16 * http://www.opensource.apple.com/apsl/ and read it before using this file.
18 * The Original Code and all software distributed under the License are
19 * distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
20 * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
21 * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
22 * FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR NON-INFRINGEMENT.
23 * Please see the License for the specific language governing rights and
24 * limitations under the License.
26 * @APPLE_OSREFERENCE_LICENSE_HEADER_END@
32 * Mach Operating System
33 * Copyright (c) 1991,1990,1989,1988 Carnegie Mellon University
34 * All Rights Reserved.
36 * Permission to use, copy, modify and distribute this software and its
37 * documentation is hereby granted, provided that both the copyright
38 * notice and this permission notice appear in all copies of the
39 * software, derivative works or modified versions, and any portions
40 * thereof, and that both notices appear in supporting documentation.
42 * CARNEGIE MELLON ALLOWS FREE USE OF THIS SOFTWARE IN ITS "AS IS"
43 * CONDITION. CARNEGIE MELLON DISCLAIMS ANY LIABILITY OF ANY KIND FOR
44 * ANY DAMAGES WHATSOEVER RESULTING FROM THE USE OF THIS SOFTWARE.
46 * Carnegie Mellon requests users of this software to return to
48 * Software Distribution Coordinator or Software.Distribution@CS.CMU.EDU
49 * School of Computer Science
50 * Carnegie Mellon University
51 * Pittsburgh PA 15213-3890
53 * any improvements or extensions that they make and grant Carnegie Mellon
54 * the rights to redistribute these changes.
60 * Author: Avadis Tevanian, Jr.
67 #include <mach/boolean.h>
68 #include <mach/machine.h>
69 #include <mach/time_value.h>
70 #include <mach/vm_param.h>
71 #include <mach/vm_prot.h>
72 #include <kern/clock.h>
73 #include <kern/cpu_number.h>
74 #include <kern/host.h>
75 #include <kern/lock.h>
76 #include <kern/mach_param.h>
77 #include <kern/misc_protos.h>
78 #include <kern/processor.h>
79 #include <kern/sched.h>
80 #include <kern/sched_prim.h>
81 #include <kern/thread.h>
83 #include <profiling/profile-mk.h>
86 static void prof_tick(boolean_t usermode
, natural_t pc
);
89 #if STAT_TIME || GPROF
91 * Hertz rate clock interrupt servicing. Used to update processor
92 * statistics and perform kernel profiling.
97 __unused natural_t ticks
,
105 __unused natural_t pc
)
108 processor_t processor
= current_processor();
109 thread_t thread
= current_thread();
113 TIMER_BUMP(&thread
->user_timer
, ticks
);
115 state
= &PROCESSOR_DATA(processor
, user_state
);
118 /* If this thread is idling, do not charge that time as system time */
119 if ((thread
->state
& TH_IDLE
) == 0) {
120 TIMER_BUMP(&thread
->system_timer
, ticks
);
123 if (processor
->state
== PROCESSOR_IDLE
)
124 state
= &PROCESSOR_DATA(processor
, idle_state
);
126 state
= &PROCESSOR_DATA(processor
, system_state
);
129 TIMER_BUMP(state
, ticks
);
132 prof_tick(usermode
, pc
);
136 #endif /* STAT_TIME */
145 struct profile_vars
*pv
;
148 pv
= PROFILE_VARS(cpu_number());
152 PROF_CNT_INC(pv
->stats
.user_ticks
);
156 if (current_processor()->state
== CPU_STATE_IDLE
)
157 PROF_CNT_INC(pv
->stats
.idle_ticks
);
159 PROF_CNT_INC(pv
->stats
.kernel_ticks
);
161 if ((prof_uptrint_t
)pc
< _profile_vars
.profil_info
.lowpc
)
162 PROF_CNT_INC(pv
->stats
.too_low
);
164 s
= (prof_uptrint_t
)pc
- _profile_vars
.profil_info
.lowpc
;
165 if (s
< pv
->profil_info
.text_len
) {
166 LHISTCOUNTER
*ptr
= (LHISTCOUNTER
*) pv
->profil_buf
;
167 LPROF_CNT_INC(ptr
[s
/ HISTFRACTION
]);
170 PROF_CNT_INC(pv
->stats
.too_high
);