initial commit
[freebsd-arm:freebsd-arm.git] / cddl / dev / cyclic / i386 / cyclic_machdep.c
1 /*-
2  * Copyright 2006-2008 John Birrell <jb@FreeBSD.org>
3  *
4  * Redistribution and use in source and binary forms, with or without
5  * modification, are permitted provided that the following conditions
6  * are met:
7  * 1. Redistributions of source code must retain the above copyright
8  *    notice, this list of conditions and the following disclaimer.
9  * 2. Redistributions in binary form must reproduce the above copyright
10  *    notice, this list of conditions and the following disclaimer in the
11  *    documentation and/or other materials provided with the distribution.
12  * 
13  * THIS SOFTWARE IS PROVIDED BY AUTHOR AND CONTRIBUTORS ``AS IS'' AND
14  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
15  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
16  * ARE DISCLAIMED.  IN NO EVENT SHALL AUTHOR OR CONTRIBUTORS BE LIABLE
17  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
18  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
19  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
20  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
21  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
22  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
23  * SUCH DAMAGE.
24  *
25  * $FreeBSD$
26  *
27  */
28
29 static void enable(cyb_arg_t);
30 static void disable(cyb_arg_t);
31 static void reprogram(cyb_arg_t, hrtime_t);
32 static void xcall(cyb_arg_t, cpu_t *, cyc_func_t, void *);
33
34 static cyc_backend_t    be      = {
35         NULL,           /* cyb_configure */
36         NULL,           /* cyb_unconfigure */
37         enable,
38         disable,
39         reprogram,
40         xcall,
41         NULL            /* cyb_arg_t cyb_arg */
42 };
43
44 static void
45 cyclic_ap_start(void *dummy)
46 {
47         /* Initialise the rest of the CPUs. */
48         cyclic_mp_init();
49 }
50
51 SYSINIT(cyclic_ap_start, SI_SUB_SMP, SI_ORDER_ANY, cyclic_ap_start, NULL);
52
53 /*
54  *  Machine dependent cyclic subsystem initialisation.
55  */
56 static void
57 cyclic_machdep_init(void)
58 {
59         /* Register the cyclic backend. */
60         cyclic_init(&be);
61 }
62
63 static void
64 cyclic_machdep_uninit(void)
65 {
66         int i;
67
68         for (i = 0; i <= mp_maxid; i++)
69                 /* Reset the cyclic clock callback hook. */
70                 lapic_cyclic_clock_func[i] = NULL;
71
72         /* De-register the cyclic backend. */
73         cyclic_uninit();
74 }
75
76 static hrtime_t exp_due[MAXCPU];
77
78 /*
79  * This function is the one registered by the machine dependent
80  * initialiser as the callback for high speed timer events.
81  */
82 static void
83 cyclic_clock(struct trapframe *frame)
84 {
85         cpu_t *c = &solaris_cpu[curcpu];
86
87         if (c->cpu_cyclic != NULL && gethrtime() >= exp_due[curcpu]) {
88                 if (TRAPF_USERMODE(frame)) {
89                         c->cpu_profile_pc = 0;
90                         c->cpu_profile_upc = TRAPF_PC(frame);
91                 } else {
92                         c->cpu_profile_pc = TRAPF_PC(frame);
93                         c->cpu_profile_upc = 0;
94                 }
95
96                 c->cpu_intr_actv = 1;
97
98                 /* Fire any timers that are due. */
99                 cyclic_fire(c);
100
101                 c->cpu_intr_actv = 0;
102         }
103 }
104
105 static void enable(cyb_arg_t arg)
106 {
107         /* Register the cyclic clock callback function. */
108         lapic_cyclic_clock_func[curcpu] = cyclic_clock;
109 }
110
111 static void disable(cyb_arg_t arg)
112 {
113         /* Reset the cyclic clock callback function. */
114         lapic_cyclic_clock_func[curcpu] = NULL;
115 }
116
117 static void reprogram(cyb_arg_t arg, hrtime_t exp)
118 {
119         exp_due[curcpu] = exp;
120 }
121
122 static void xcall(cyb_arg_t arg, cpu_t *c, cyc_func_t func, void *param)
123 {
124         /*
125          * If the target CPU is the current one, just call the
126          * function. This covers the non-SMP case.
127          */
128         if (c == &solaris_cpu[curcpu])
129                 (*func)(param);
130         else
131                 smp_rendezvous_cpus((cpumask_t) (1 << c->cpuid), NULL,
132                     func, smp_no_rendevous_barrier, param);
133 }