Add additional sanity checks, remove unused arguments to vm_page_startup().
[dragonfly.git] / sys / dev / acpica / Osd / OsdSchedule.c
1 /*-
2  * Copyright (c) 2000 Michael Smith
3  * Copyright (c) 2000 BSDi
4  * All rights reserved.
5  *
6  * Redistribution and use in source and binary forms, with or without
7  * modification, are permitted provided that the following conditions
8  * are met:
9  * 1. Redistributions of source code must retain the above copyright
10  *    notice, this list of conditions and the following disclaimer.
11  * 2. Redistributions in binary form must reproduce the above copyright
12  *    notice, this list of conditions and the following disclaimer in the
13  *    documentation and/or other materials provided with the distribution.
14  *
15  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
16  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
17  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
18  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
19  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
20  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
21  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
22  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
23  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
24  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
25  * SUCH DAMAGE.
26  *
27  *      $FreeBSD: src/sys/dev/acpica/Osd/OsdSchedule.c,v 1.23.6.1 2003/08/22 20:49:21 jhb Exp $
28  *      $DragonFly: src/sys/dev/acpica/Osd/Attic/OsdSchedule.c,v 1.3 2004/05/05 22:18:09 dillon Exp $ 
29  */
30
31 /*
32  * 6.3 : Scheduling services
33  */
34
35 #include "acpi.h"
36
37 #include "opt_acpi.h"
38 #include <sys/param.h>
39 #include <sys/systm.h>
40 #include <sys/bus.h>
41 #include <sys/interrupt.h>
42 #include <sys/kernel.h>
43 #include <sys/kthread.h>
44 #include <sys/malloc.h>
45 #include <sys/proc.h>
46 #include <sys/taskqueue.h>
47 #include <machine/clock.h>
48
49 #include <sys/bus.h>
50
51 #include <dev/acpica/acpivar.h>
52
53 #define _COMPONENT      ACPI_OS_SERVICES
54 ACPI_MODULE_NAME("SCHEDULE")
55
56 /*
57  * This is a little complicated due to the fact that we need to build and then
58  * free a 'struct task' for each task we enqueue.
59  */
60
61 MALLOC_DEFINE(M_ACPITASK, "acpitask", "ACPI deferred task");
62
63 static void     AcpiOsExecuteQueue(void *arg, int pending);
64
65 struct acpi_task {
66     struct task                 at_task;
67     OSD_EXECUTION_CALLBACK      at_function;
68     void                        *at_context;
69 };
70
71 struct acpi_task_queue {
72     STAILQ_ENTRY(acpi_task_queue) at_q;
73     struct acpi_task            *at;
74 };
75
76 #if defined(__FreeBSD__) && __FreeBSD_version >= 500000
77 /*
78  * Private task queue definition for ACPI
79  */
80 TASKQUEUE_DECLARE(acpi);
81 static void     *taskqueue_acpi_ih;
82
83 static void
84 taskqueue_acpi_enqueue(void *context)
85 {  
86     swi_sched(taskqueue_acpi_ih, 0);
87 }
88
89 static void
90 taskqueue_acpi_run(void *dummy)
91 {
92     taskqueue_run(taskqueue_acpi);
93 }
94
95 TASKQUEUE_DEFINE(acpi, taskqueue_acpi_enqueue, 0,
96                  swi_add(NULL, "acpitaskq", taskqueue_acpi_run, NULL,
97                      SWI_TQ, 0, &taskqueue_acpi_ih));
98
99 #ifdef ACPI_USE_THREADS
100 STAILQ_HEAD(, acpi_task_queue) acpi_task_queue;
101 static struct mtx       acpi_task_mtx;
102
103 static void
104 acpi_task_thread(void *arg)
105 {
106     struct acpi_task_queue      *atq;
107     OSD_EXECUTION_CALLBACK      Function;
108     void                        *Context;
109
110     for (;;) {
111         mtx_lock(&acpi_task_mtx);
112         if ((atq = STAILQ_FIRST(&acpi_task_queue)) == NULL) {
113             msleep(&acpi_task_queue, &acpi_task_mtx, PCATCH, "actask", 0);
114             mtx_unlock(&acpi_task_mtx);
115             continue;
116         }
117
118         STAILQ_REMOVE_HEAD(&acpi_task_queue, at_q);
119         mtx_unlock(&acpi_task_mtx);
120
121         Function = (OSD_EXECUTION_CALLBACK)atq->at->at_function;
122         Context = atq->at->at_context;
123
124         mtx_lock(&Giant);
125         Function(Context);
126
127         free(atq->at, M_ACPITASK);
128         free(atq, M_ACPITASK);
129         mtx_unlock(&Giant);
130     }
131
132     kthread_exit(0);
133 }
134
135 int
136 acpi_task_thread_init(void)
137 {
138     int         i, err;
139     struct proc *acpi_kthread_proc;
140
141     err = 0;
142     STAILQ_INIT(&acpi_task_queue);
143     mtx_init(&acpi_task_mtx, "ACPI task", NULL, MTX_DEF);
144
145     for (i = 0; i < ACPI_MAX_THREADS; i++) {
146         err = kthread_create(acpi_task_thread, NULL, &acpi_kthread_proc,
147                              0, 0, "acpi_task%d", i);
148         if (err != 0) {
149             printf("%s: kthread_create failed(%d)\n", __func__, err);
150             break;
151         }
152     }
153     return (err);
154 }
155 #endif
156 #endif
157
158 ACPI_STATUS
159 AcpiOsQueueForExecution(UINT32 Priority, OSD_EXECUTION_CALLBACK Function, void *Context)
160 {
161     struct acpi_task    *at;
162     int pri;
163
164     ACPI_FUNCTION_TRACE((char *)(uintptr_t)__func__);
165
166     if (Function == NULL)
167         return_ACPI_STATUS(AE_BAD_PARAMETER);
168
169     /* note: Interrupt Context */
170     at = malloc(sizeof(*at), M_ACPITASK, M_INTWAIT | M_ZERO);
171     at->at_function = Function;
172     at->at_context = Context;
173
174     switch (Priority) {
175     case OSD_PRIORITY_GPE:
176         pri = 4;
177         break;
178     case OSD_PRIORITY_HIGH:
179         pri = 3;
180         break;
181     case OSD_PRIORITY_MED:
182         pri = 2;
183         break;
184     case OSD_PRIORITY_LO:
185         pri = 1;
186         break;
187     default:
188         free(at, M_ACPITASK);
189         return_ACPI_STATUS(AE_BAD_PARAMETER);
190     }
191     TASK_INIT(&at->at_task, pri, AcpiOsExecuteQueue, at);
192
193 #if defined(__DragonFly__) || __FreeBSD_version < 500000
194     taskqueue_enqueue(taskqueue_swi, (struct task *)at);
195 #else
196     taskqueue_enqueue(taskqueue_acpi, (struct task *)at);
197 #endif
198     return_ACPI_STATUS(AE_OK);
199 }
200
201 static void
202 AcpiOsExecuteQueue(void *arg, int pending)
203 {
204     struct acpi_task            *at;
205     struct acpi_task_queue      *atq;
206     OSD_EXECUTION_CALLBACK      Function;
207     void                        *Context;
208
209     ACPI_FUNCTION_TRACE((char *)(uintptr_t)__func__);
210
211     at = (struct acpi_task *)arg;
212     atq = NULL;
213     Function = NULL;
214     Context = NULL;
215
216 #ifdef ACPI_USE_THREADS
217     atq = malloc(sizeof(*atq), M_ACPITASK, M_INTWAIT);
218     atq->at = at;
219
220     mtx_lock(&acpi_task_mtx);
221     STAILQ_INSERT_TAIL(&acpi_task_queue, atq, at_q);
222     mtx_unlock(&acpi_task_mtx);
223     wakeup_one(&acpi_task_queue);
224 #else
225     Function = (OSD_EXECUTION_CALLBACK)at->at_function;
226     Context = at->at_context;
227
228     Function(Context);
229     free(at, M_ACPITASK);
230 #endif
231
232     return_VOID;
233 }
234
235 /*
236  * We don't have any sleep granularity better than hz, so
237  * make do with that.
238  */
239 void
240 AcpiOsSleep (UINT32 Seconds, UINT32 Milliseconds)
241 {
242     int         timo;
243     static int  dummy;
244
245     ACPI_FUNCTION_TRACE((char *)(uintptr_t)__func__);
246
247     timo = (Seconds * hz) + Milliseconds * hz / 1000;
248     if (timo == 0)
249         timo = 1;
250     tsleep(&dummy, 0, "acpislp", timo);
251     return_VOID;
252 }
253
254 void
255 AcpiOsStall (UINT32 Microseconds)
256 {
257     ACPI_FUNCTION_TRACE((char *)(uintptr_t)__func__);
258
259     DELAY(Microseconds);
260     return_VOID;
261 }
262
263 UINT32
264 AcpiOsGetThreadId (void)
265 {
266     struct proc *p;
267     /* XXX do not add FUNCTION_TRACE here, results in recursive call */
268
269     p = curproc;
270 #if defined(__DragonFly__) || __FreeBSD_version < 500000
271     if (p == NULL)
272         p = &proc0;
273 #endif
274     KASSERT(p != NULL, ("%s: curproc is NULL!", __func__));
275     return(p->p_pid + 1);       /* can't return 0 */
276 }