Merge branch 'for-2.6.26' of master.kernel.org:/pub/scm/linux/kernel/git/jwboyer...
[linux-2.6] / drivers / acpi / executer / exutils.c
1
2 /******************************************************************************
3  *
4  * Module Name: exutils - interpreter/scanner utilities
5  *
6  *****************************************************************************/
7
8 /*
9  * Copyright (C) 2000 - 2008, Intel Corp.
10  * All rights reserved.
11  *
12  * Redistribution and use in source and binary forms, with or without
13  * modification, are permitted provided that the following conditions
14  * are met:
15  * 1. Redistributions of source code must retain the above copyright
16  *    notice, this list of conditions, and the following disclaimer,
17  *    without modification.
18  * 2. Redistributions in binary form must reproduce at minimum a disclaimer
19  *    substantially similar to the "NO WARRANTY" disclaimer below
20  *    ("Disclaimer") and any redistribution must be conditioned upon
21  *    including a substantially similar Disclaimer requirement for further
22  *    binary redistribution.
23  * 3. Neither the names of the above-listed copyright holders nor the names
24  *    of any contributors may be used to endorse or promote products derived
25  *    from this software without specific prior written permission.
26  *
27  * Alternatively, this software may be distributed under the terms of the
28  * GNU General Public License ("GPL") version 2 as published by the Free
29  * Software Foundation.
30  *
31  * NO WARRANTY
32  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
33  * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
34  * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR
35  * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
36  * HOLDERS OR CONTRIBUTORS BE LIABLE FOR SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
37  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
38  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
39  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
40  * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING
41  * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
42  * POSSIBILITY OF SUCH DAMAGES.
43  */
44
45 /*
46  * DEFINE_AML_GLOBALS is tested in amlcode.h
47  * to determine whether certain global names should be "defined" or only
48  * "declared" in the current compilation.  This enhances maintainability
49  * by enabling a single header file to embody all knowledge of the names
50  * in question.
51  *
52  * Exactly one module of any executable should #define DEFINE_GLOBALS
53  * before #including the header files which use this convention.  The
54  * names in question will be defined and initialized in that module,
55  * and declared as extern in all other modules which #include those
56  * header files.
57  */
58
59 #define DEFINE_AML_GLOBALS
60
61 #include <acpi/acpi.h>
62 #include <acpi/acinterp.h>
63 #include <acpi/amlcode.h>
64
65 #define _COMPONENT          ACPI_EXECUTER
66 ACPI_MODULE_NAME("exutils")
67
68 /* Local prototypes */
69 static u32 acpi_ex_digits_needed(acpi_integer value, u32 base);
70
71 #ifndef ACPI_NO_METHOD_EXECUTION
72 /*******************************************************************************
73  *
74  * FUNCTION:    acpi_ex_enter_interpreter
75  *
76  * PARAMETERS:  None
77  *
78  * RETURN:      None
79  *
80  * DESCRIPTION: Enter the interpreter execution region. Failure to enter
81  *              the interpreter region is a fatal system error. Used in
82  *              conjunction with exit_interpreter.
83  *
84  ******************************************************************************/
85
86 void acpi_ex_enter_interpreter(void)
87 {
88         acpi_status status;
89
90         ACPI_FUNCTION_TRACE(ex_enter_interpreter);
91
92         status = acpi_ut_acquire_mutex(ACPI_MTX_INTERPRETER);
93         if (ACPI_FAILURE(status)) {
94                 ACPI_ERROR((AE_INFO,
95                             "Could not acquire AML Interpreter mutex"));
96         }
97
98         return_VOID;
99 }
100
101 /*******************************************************************************
102  *
103  * FUNCTION:    acpi_ex_reacquire_interpreter
104  *
105  * PARAMETERS:  None
106  *
107  * RETURN:      None
108  *
109  * DESCRIPTION: Reacquire the interpreter execution region from within the
110  *              interpreter code. Failure to enter the interpreter region is a
111  *              fatal system error. Used in  conjuction with
112  *              relinquish_interpreter
113  *
114  ******************************************************************************/
115
116 void acpi_ex_reacquire_interpreter(void)
117 {
118         ACPI_FUNCTION_TRACE(ex_reacquire_interpreter);
119
120         /*
121          * If the global serialized flag is set, do not release the interpreter,
122          * since it was not actually released by acpi_ex_relinquish_interpreter.
123          * This forces the interpreter to be single threaded.
124          */
125         if (!acpi_gbl_all_methods_serialized) {
126                 acpi_ex_enter_interpreter();
127         }
128
129         return_VOID;
130 }
131
132 /*******************************************************************************
133  *
134  * FUNCTION:    acpi_ex_exit_interpreter
135  *
136  * PARAMETERS:  None
137  *
138  * RETURN:      None
139  *
140  * DESCRIPTION: Exit the interpreter execution region. This is the top level
141  *              routine used to exit the interpreter when all processing has
142  *              been completed.
143  *
144  ******************************************************************************/
145
146 void acpi_ex_exit_interpreter(void)
147 {
148         acpi_status status;
149
150         ACPI_FUNCTION_TRACE(ex_exit_interpreter);
151
152         status = acpi_ut_release_mutex(ACPI_MTX_INTERPRETER);
153         if (ACPI_FAILURE(status)) {
154                 ACPI_ERROR((AE_INFO,
155                             "Could not release AML Interpreter mutex"));
156         }
157
158         return_VOID;
159 }
160
161 /*******************************************************************************
162  *
163  * FUNCTION:    acpi_ex_relinquish_interpreter
164  *
165  * PARAMETERS:  None
166  *
167  * RETURN:      None
168  *
169  * DESCRIPTION: Exit the interpreter execution region, from within the
170  *              interpreter - before attempting an operation that will possibly
171  *              block the running thread.
172  *
173  * Cases where the interpreter is unlocked internally
174  *      1) Method to be blocked on a Sleep() AML opcode
175  *      2) Method to be blocked on an Acquire() AML opcode
176  *      3) Method to be blocked on a Wait() AML opcode
177  *      4) Method to be blocked to acquire the global lock
178  *      5) Method to be blocked waiting to execute a serialized control method
179  *          that is currently executing
180  *      6) About to invoke a user-installed opregion handler
181  *
182  ******************************************************************************/
183
184 void acpi_ex_relinquish_interpreter(void)
185 {
186         ACPI_FUNCTION_TRACE(ex_relinquish_interpreter);
187
188         /*
189          * If the global serialized flag is set, do not release the interpreter.
190          * This forces the interpreter to be single threaded.
191          */
192         if (!acpi_gbl_all_methods_serialized) {
193                 acpi_ex_exit_interpreter();
194         }
195
196         return_VOID;
197 }
198
199 /*******************************************************************************
200  *
201  * FUNCTION:    acpi_ex_truncate_for32bit_table
202  *
203  * PARAMETERS:  obj_desc        - Object to be truncated
204  *
205  * RETURN:      none
206  *
207  * DESCRIPTION: Truncate an ACPI Integer to 32 bits if the execution mode is
208  *              32-bit, as determined by the revision of the DSDT.
209  *
210  ******************************************************************************/
211
212 void acpi_ex_truncate_for32bit_table(union acpi_operand_object *obj_desc)
213 {
214
215         ACPI_FUNCTION_ENTRY();
216
217         /*
218          * Object must be a valid number and we must be executing
219          * a control method. NS node could be there for AML_INT_NAMEPATH_OP.
220          */
221         if ((!obj_desc) ||
222             (ACPI_GET_DESCRIPTOR_TYPE(obj_desc) != ACPI_DESC_TYPE_OPERAND) ||
223             (ACPI_GET_OBJECT_TYPE(obj_desc) != ACPI_TYPE_INTEGER)) {
224                 return;
225         }
226
227         if (acpi_gbl_integer_byte_width == 4) {
228                 /*
229                  * We are running a method that exists in a 32-bit ACPI table.
230                  * Truncate the value to 32 bits by zeroing out the upper 32-bit field
231                  */
232                 obj_desc->integer.value &= (acpi_integer) ACPI_UINT32_MAX;
233         }
234 }
235
236 /*******************************************************************************
237  *
238  * FUNCTION:    acpi_ex_acquire_global_lock
239  *
240  * PARAMETERS:  field_flags           - Flags with Lock rule:
241  *                                      always_lock or never_lock
242  *
243  * RETURN:      None
244  *
245  * DESCRIPTION: Obtain the ACPI hardware Global Lock, only if the field
246  *              flags specifiy that it is to be obtained before field access.
247  *
248  ******************************************************************************/
249
250 void acpi_ex_acquire_global_lock(u32 field_flags)
251 {
252         acpi_status status;
253
254         ACPI_FUNCTION_TRACE(ex_acquire_global_lock);
255
256         /* Only use the lock if the always_lock bit is set */
257
258         if (!(field_flags & AML_FIELD_LOCK_RULE_MASK)) {
259                 return_VOID;
260         }
261
262         /* Attempt to get the global lock, wait forever */
263
264         status = acpi_ex_acquire_mutex_object(ACPI_WAIT_FOREVER,
265                                               acpi_gbl_global_lock_mutex,
266                                               acpi_os_get_thread_id());
267
268         if (ACPI_FAILURE(status)) {
269                 ACPI_EXCEPTION((AE_INFO, status,
270                                 "Could not acquire Global Lock"));
271         }
272
273         return_VOID;
274 }
275
276 /*******************************************************************************
277  *
278  * FUNCTION:    acpi_ex_release_global_lock
279  *
280  * PARAMETERS:  field_flags           - Flags with Lock rule:
281  *                                      always_lock or never_lock
282  *
283  * RETURN:      None
284  *
285  * DESCRIPTION: Release the ACPI hardware Global Lock
286  *
287  ******************************************************************************/
288
289 void acpi_ex_release_global_lock(u32 field_flags)
290 {
291         acpi_status status;
292
293         ACPI_FUNCTION_TRACE(ex_release_global_lock);
294
295         /* Only use the lock if the always_lock bit is set */
296
297         if (!(field_flags & AML_FIELD_LOCK_RULE_MASK)) {
298                 return_VOID;
299         }
300
301         /* Release the global lock */
302
303         status = acpi_ex_release_mutex_object(acpi_gbl_global_lock_mutex);
304         if (ACPI_FAILURE(status)) {
305
306                 /* Report the error, but there isn't much else we can do */
307
308                 ACPI_EXCEPTION((AE_INFO, status,
309                                 "Could not release Global Lock"));
310         }
311
312         return_VOID;
313 }
314
315 /*******************************************************************************
316  *
317  * FUNCTION:    acpi_ex_digits_needed
318  *
319  * PARAMETERS:  Value           - Value to be represented
320  *              Base            - Base of representation
321  *
322  * RETURN:      The number of digits.
323  *
324  * DESCRIPTION: Calculate the number of digits needed to represent the Value
325  *              in the given Base (Radix)
326  *
327  ******************************************************************************/
328
329 static u32 acpi_ex_digits_needed(acpi_integer value, u32 base)
330 {
331         u32 num_digits;
332         acpi_integer current_value;
333
334         ACPI_FUNCTION_TRACE(ex_digits_needed);
335
336         /* acpi_integer is unsigned, so we don't worry about a '-' prefix */
337
338         if (value == 0) {
339                 return_UINT32(1);
340         }
341
342         current_value = value;
343         num_digits = 0;
344
345         /* Count the digits in the requested base */
346
347         while (current_value) {
348                 (void)acpi_ut_short_divide(current_value, base, &current_value,
349                                            NULL);
350                 num_digits++;
351         }
352
353         return_UINT32(num_digits);
354 }
355
356 /*******************************************************************************
357  *
358  * FUNCTION:    acpi_ex_eisa_id_to_string
359  *
360  * PARAMETERS:  numeric_id      - EISA ID to be converted
361  *              out_string      - Where to put the converted string (8 bytes)
362  *
363  * RETURN:      None
364  *
365  * DESCRIPTION: Convert a numeric EISA ID to string representation
366  *
367  ******************************************************************************/
368
369 void acpi_ex_eisa_id_to_string(u32 numeric_id, char *out_string)
370 {
371         u32 eisa_id;
372
373         ACPI_FUNCTION_ENTRY();
374
375         /* Swap ID to big-endian to get contiguous bits */
376
377         eisa_id = acpi_ut_dword_byte_swap(numeric_id);
378
379         out_string[0] = (char)('@' + (((unsigned long)eisa_id >> 26) & 0x1f));
380         out_string[1] = (char)('@' + ((eisa_id >> 21) & 0x1f));
381         out_string[2] = (char)('@' + ((eisa_id >> 16) & 0x1f));
382         out_string[3] = acpi_ut_hex_to_ascii_char((acpi_integer) eisa_id, 12);
383         out_string[4] = acpi_ut_hex_to_ascii_char((acpi_integer) eisa_id, 8);
384         out_string[5] = acpi_ut_hex_to_ascii_char((acpi_integer) eisa_id, 4);
385         out_string[6] = acpi_ut_hex_to_ascii_char((acpi_integer) eisa_id, 0);
386         out_string[7] = 0;
387 }
388
389 /*******************************************************************************
390  *
391  * FUNCTION:    acpi_ex_unsigned_integer_to_string
392  *
393  * PARAMETERS:  Value           - Value to be converted
394  *              out_string      - Where to put the converted string (8 bytes)
395  *
396  * RETURN:      None, string
397  *
398  * DESCRIPTION: Convert a number to string representation. Assumes string
399  *              buffer is large enough to hold the string.
400  *
401  ******************************************************************************/
402
403 void acpi_ex_unsigned_integer_to_string(acpi_integer value, char *out_string)
404 {
405         u32 count;
406         u32 digits_needed;
407         u32 remainder;
408
409         ACPI_FUNCTION_ENTRY();
410
411         digits_needed = acpi_ex_digits_needed(value, 10);
412         out_string[digits_needed] = 0;
413
414         for (count = digits_needed; count > 0; count--) {
415                 (void)acpi_ut_short_divide(value, 10, &value, &remainder);
416                 out_string[count - 1] = (char)('0' + remainder);
417         }
418 }
419
420 #endif