Merge branch 'vendor/DIFFUTILS'
[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.28 2004/05/06 02:18:58 njl Exp $
28  */
29
30 /*
31  * Multithreading and Scheduling Services
32  */
33
34 #include "opt_acpi.h"
35 #include <sys/param.h>
36 #include <sys/systm.h>
37 #include <sys/bus.h>
38 #include <sys/interrupt.h>
39 #include <sys/kernel.h>
40 #include <sys/kthread.h>
41 #include <sys/malloc.h>
42 #include <sys/msgport.h>
43 #include <sys/taskqueue.h>
44 #include <machine/clock.h>
45
46 #include <sys/thread2.h>
47 #include <sys/msgport2.h>
48
49 #include "acpi.h"
50 #include "accommon.h"
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     acpi_task_thread(void *arg);
64 static void     acpi_autofree_reply(lwkt_port_t port, lwkt_msg_t msg);
65
66 struct acpi_task {
67     struct lwkt_msg             at_msg;
68     ACPI_OSD_EXEC_CALLBACK      at_function;
69     void                        *at_context;
70     ACPI_EXECUTE_TYPE           at_type;
71 };
72
73 static struct thread *acpi_task_td;
74 struct lwkt_port acpi_afree_rport;
75
76 /*
77  * Initialize the ACPI helper thread.
78  */
79 int
80 acpi_task_thread_init(void)
81 {
82     lwkt_initport_replyonly(&acpi_afree_rport, acpi_autofree_reply);
83     acpi_task_td = kmalloc(sizeof(struct thread), M_DEVBUF, M_INTWAIT | M_ZERO);
84     lwkt_create(acpi_task_thread, NULL, NULL, acpi_task_td, TDF_NOSTART, 0,
85         "acpi_task");
86     return (0);
87 }
88
89 void
90 acpi_task_thread_schedule(void)
91 {
92     lwkt_schedule(acpi_task_td);
93 }
94
95 /*
96  * The ACPI helper thread processes OSD execution callback messages.
97  */
98 static void
99 acpi_task_thread(void *arg)
100 {
101     ACPI_OSD_EXEC_CALLBACK func;
102     struct acpi_task *at;
103
104     lwkt_gettoken(&acpi_token);
105     for (;;) {
106         at = (void *)lwkt_waitport(&curthread->td_msgport, 0);
107         func = at->at_function;
108         func(at->at_context);
109         lwkt_replymsg(&at->at_msg, 0);
110     }
111     lwkt_reltoken(&acpi_token);
112 }
113
114 /*
115  * Queue an ACPI message for execution by allocating a LWKT message structure
116  * and sending the message to the helper thread.  The reply port is setup
117  * to automatically free the message.
118  */
119 ACPI_STATUS
120 AcpiOsExecute(ACPI_EXECUTE_TYPE Type, ACPI_OSD_EXEC_CALLBACK Function,
121               void *Context)
122 {
123     struct acpi_task    *at;
124
125     switch (Type) {
126     case OSL_GLOBAL_LOCK_HANDLER:
127     case OSL_NOTIFY_HANDLER:
128     case OSL_GPE_HANDLER:
129     case OSL_DEBUGGER_EXEC_THREAD:
130     case OSL_EC_POLL_HANDLER:
131     case OSL_EC_BURST_HANDLER:
132         break;
133     default:
134         return_ACPI_STATUS (AE_BAD_PARAMETER);
135     }
136
137     /* Note: Interrupt Context */
138     at = kmalloc(sizeof(*at), M_ACPITASK, M_INTWAIT | M_ZERO);
139     lwkt_initmsg(&at->at_msg, &acpi_afree_rport, 0);
140     at->at_function = Function;
141     at->at_context = Context;
142     at->at_type = Type;
143     lwkt_sendmsg(&acpi_task_td->td_msgport, &at->at_msg);
144     return_ACPI_STATUS (AE_OK);
145 }
146
147 /*
148  * The message's reply port just frees the message.
149  */
150 static void
151 acpi_autofree_reply(lwkt_port_t port, lwkt_msg_t msg)
152 {
153     kfree(msg, M_ACPITASK);
154 }
155
156 UINT64
157 AcpiOsGetTimer (void)
158 {
159     struct timeval  time;
160
161     microtime(&time);
162
163     /* Seconds * 10^7 = 100ns(10^-7), Microseconds(10^-6) * 10^1 = 100ns */
164
165     return (((UINT64) time.tv_sec * 10000000) + ((UINT64) time.tv_usec * 10));
166 }
167
168 void
169 AcpiOsSleep(UINT64 Milliseconds)
170 {
171     int         timo;
172     static int  dummy;
173
174     ACPI_FUNCTION_TRACE((char *)(uintptr_t)__func__);
175
176     timo = Milliseconds * hz / 1000;
177
178     /* 
179      * If requested sleep time is less than our hz resolution, or if
180      * the system is in early boot before the system tick is operational,
181      * use DELAY instead for better granularity.
182      */
183     if (clocks_running == 0) {
184         while (timo > 1000000) {
185             DELAY(1000000);
186             timo -= 1000000;
187         }
188         if (timo)
189             DELAY(timo * 1000);
190     } else if (timo > 0) {
191         tsleep(&dummy, 0, "acpislp", timo);
192     } else {
193         DELAY(Milliseconds * 1000);
194     }
195     return_VOID;
196 }
197
198 void
199 AcpiOsStall(UINT32 Microseconds)
200 {
201     ACPI_FUNCTION_TRACE((char *)(uintptr_t)__func__);
202
203     DELAY(Microseconds);
204     return_VOID;
205 }
206
207 ACPI_THREAD_ID
208 AcpiOsGetThreadId(void)
209 {
210     /* XXX do not add ACPI_FUNCTION_TRACE here, results in recursive call. */
211
212     return ((uintptr_t)curthread);
213 }