acpica.library: Initial import of Intel ACPICA, v20131115
[AROS.git] / arch / all-pc / acpica / source / compiler / aslprepkg.c
blobd32b1f24bd07c257241d424fbca657e80362a881
1 /******************************************************************************
3 * Module Name: aslprepkg - support for ACPI predefined name package objects
5 *****************************************************************************/
7 /*
8 * Copyright (C) 2000 - 2013, Intel Corp.
9 * All rights reserved.
11 * Redistribution and use in source and binary forms, with or without
12 * modification, are permitted provided that the following conditions
13 * are met:
14 * 1. Redistributions of source code must retain the above copyright
15 * notice, this list of conditions, and the following disclaimer,
16 * without modification.
17 * 2. Redistributions in binary form must reproduce at minimum a disclaimer
18 * substantially similar to the "NO WARRANTY" disclaimer below
19 * ("Disclaimer") and any redistribution must be conditioned upon
20 * including a substantially similar Disclaimer requirement for further
21 * binary redistribution.
22 * 3. Neither the names of the above-listed copyright holders nor the names
23 * of any contributors may be used to endorse or promote products derived
24 * from this software without specific prior written permission.
26 * Alternatively, this software may be distributed under the terms of the
27 * GNU General Public License ("GPL") version 2 as published by the Free
28 * Software Foundation.
30 * NO WARRANTY
31 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
32 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
33 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR
34 * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
35 * HOLDERS OR CONTRIBUTORS BE LIABLE FOR SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
36 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
37 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
38 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
39 * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING
40 * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
41 * POSSIBILITY OF SUCH DAMAGES.
44 #include "aslcompiler.h"
45 #include "aslcompiler.y.h"
46 #include "acpredef.h"
49 #define _COMPONENT ACPI_COMPILER
50 ACPI_MODULE_NAME ("aslprepkg")
53 /* Local prototypes */
55 static void
56 ApCheckPackageElements (
57 const char *PredefinedName,
58 ACPI_PARSE_OBJECT *Op,
59 UINT8 Type1,
60 UINT32 Count1,
61 UINT8 Type2,
62 UINT32 Count2);
64 static void
65 ApCheckPackageList (
66 const char *PredefinedName,
67 ACPI_PARSE_OBJECT *ParentOp,
68 const ACPI_PREDEFINED_INFO *Package,
69 UINT32 StartIndex,
70 UINT32 Count);
72 static void
73 ApPackageTooSmall (
74 const char *PredefinedName,
75 ACPI_PARSE_OBJECT *Op,
76 UINT32 Count,
77 UINT32 ExpectedCount);
79 static void
80 ApZeroLengthPackage (
81 const char *PredefinedName,
82 ACPI_PARSE_OBJECT *Op);
84 static void
85 ApPackageTooLarge (
86 const char *PredefinedName,
87 ACPI_PARSE_OBJECT *Op,
88 UINT32 Count,
89 UINT32 ExpectedCount);
92 /*******************************************************************************
94 * FUNCTION: ApCheckPackage
96 * PARAMETERS: ParentOp - Parser op for the package
97 * Predefined - Pointer to package-specific info for
98 * the method
100 * RETURN: None
102 * DESCRIPTION: Top-level validation for predefined name return package
103 * objects.
105 ******************************************************************************/
107 void
108 ApCheckPackage (
109 ACPI_PARSE_OBJECT *ParentOp,
110 const ACPI_PREDEFINED_INFO *Predefined)
112 ACPI_PARSE_OBJECT *Op;
113 const ACPI_PREDEFINED_INFO *Package;
114 ACPI_STATUS Status;
115 UINT32 ExpectedCount;
116 UINT32 Count;
117 UINT32 i;
120 /* The package info for this name is in the next table entry */
122 Package = Predefined + 1;
124 /* First child is the package length */
126 Op = ParentOp->Asl.Child;
127 Count = (UINT32) Op->Asl.Value.Integer;
130 * Many of the variable-length top-level packages are allowed to simply
131 * have zero elements. This allows the BIOS to tell the host that even
132 * though the predefined name/method exists, the feature is not supported.
133 * Other package types require one or more elements. In any case, there
134 * is no need to continue validation.
136 if (!Count)
138 switch (Package->RetInfo.Type)
140 case ACPI_PTYPE1_FIXED:
141 case ACPI_PTYPE1_OPTION:
142 case ACPI_PTYPE2_PKG_COUNT:
143 case ACPI_PTYPE2_REV_FIXED:
145 ApZeroLengthPackage (Predefined->Info.Name, ParentOp);
146 break;
148 case ACPI_PTYPE1_VAR:
149 case ACPI_PTYPE2:
150 case ACPI_PTYPE2_COUNT:
151 case ACPI_PTYPE2_FIXED:
152 case ACPI_PTYPE2_MIN:
153 case ACPI_PTYPE2_FIX_VAR:
154 default:
156 break;
159 return;
162 /* Get the first element of the package */
164 Op = Op->Asl.Next;
166 /* Decode the package type */
168 switch (Package->RetInfo.Type)
170 case ACPI_PTYPE1_FIXED:
172 * The package count is fixed and there are no sub-packages
174 * If package is too small, exit.
175 * If package is larger than expected, issue warning but continue
177 ExpectedCount = Package->RetInfo.Count1 + Package->RetInfo.Count2;
178 if (Count < ExpectedCount)
180 goto PackageTooSmall;
182 else if (Count > ExpectedCount)
184 ApPackageTooLarge (Predefined->Info.Name, ParentOp,
185 Count, ExpectedCount);
188 /* Validate all elements of the package */
190 ApCheckPackageElements (Predefined->Info.Name, Op,
191 Package->RetInfo.ObjectType1, Package->RetInfo.Count1,
192 Package->RetInfo.ObjectType2, Package->RetInfo.Count2);
193 break;
195 case ACPI_PTYPE1_VAR:
197 * The package count is variable, there are no sub-packages,
198 * and all elements must be of the same type
200 for (i = 0; i < Count; i++)
202 ApCheckObjectType (Predefined->Info.Name, Op,
203 Package->RetInfo.ObjectType1, i);
204 Op = Op->Asl.Next;
206 break;
208 case ACPI_PTYPE1_OPTION:
210 * The package count is variable, there are no sub-packages.
211 * There are a fixed number of required elements, and a variable
212 * number of optional elements.
214 * Check if package is at least as large as the minimum required
216 ExpectedCount = Package->RetInfo3.Count;
217 if (Count < ExpectedCount)
219 goto PackageTooSmall;
222 /* Variable number of sub-objects */
224 for (i = 0; i < Count; i++)
226 if (i < Package->RetInfo3.Count)
228 /* These are the required package elements (0, 1, or 2) */
230 ApCheckObjectType (Predefined->Info.Name, Op,
231 Package->RetInfo3.ObjectType[i], i);
233 else
235 /* These are the optional package elements */
237 ApCheckObjectType (Predefined->Info.Name, Op,
238 Package->RetInfo3.TailObjectType, i);
240 Op = Op->Asl.Next;
242 break;
244 case ACPI_PTYPE2_REV_FIXED:
246 /* First element is the (Integer) revision */
248 ApCheckObjectType (Predefined->Info.Name, Op,
249 ACPI_RTYPE_INTEGER, 0);
251 Op = Op->Asl.Next;
252 Count--;
254 /* Examine the sub-packages */
256 ApCheckPackageList (Predefined->Info.Name, Op,
257 Package, 1, Count);
258 break;
260 case ACPI_PTYPE2_PKG_COUNT:
262 /* First element is the (Integer) count of sub-packages to follow */
264 Status = ApCheckObjectType (Predefined->Info.Name, Op,
265 ACPI_RTYPE_INTEGER, 0);
267 /* We must have an integer count from above (otherwise, use Count) */
269 if (ACPI_SUCCESS (Status))
272 * Count cannot be larger than the parent package length, but
273 * allow it to be smaller. The >= accounts for the Integer above.
275 ExpectedCount = (UINT32) Op->Asl.Value.Integer;
276 if (ExpectedCount >= Count)
278 goto PackageTooSmall;
281 Count = ExpectedCount;
284 Op = Op->Asl.Next;
286 /* Examine the sub-packages */
288 ApCheckPackageList (Predefined->Info.Name, Op,
289 Package, 1, Count);
290 break;
292 case ACPI_PTYPE2:
293 case ACPI_PTYPE2_FIXED:
294 case ACPI_PTYPE2_MIN:
295 case ACPI_PTYPE2_COUNT:
296 case ACPI_PTYPE2_FIX_VAR:
298 * These types all return a single Package that consists of a
299 * variable number of sub-Packages.
302 /* Examine the sub-packages */
304 ApCheckPackageList (Predefined->Info.Name, Op,
305 Package, 0, Count);
306 break;
308 default:
309 return;
312 return;
314 PackageTooSmall:
315 ApPackageTooSmall (Predefined->Info.Name, ParentOp,
316 Count, ExpectedCount);
320 /*******************************************************************************
322 * FUNCTION: ApCheckPackageElements
324 * PARAMETERS: PredefinedName - Name of the predefined object
325 * Op - Parser op for the package
326 * Type1 - Object type for first group
327 * Count1 - Count for first group
328 * Type2 - Object type for second group
329 * Count2 - Count for second group
331 * RETURN: None
333 * DESCRIPTION: Validate all elements of a package. Works with packages that
334 * are defined to contain up to two groups of different object
335 * types.
337 ******************************************************************************/
339 static void
340 ApCheckPackageElements (
341 const char *PredefinedName,
342 ACPI_PARSE_OBJECT *Op,
343 UINT8 Type1,
344 UINT32 Count1,
345 UINT8 Type2,
346 UINT32 Count2)
348 UINT32 i;
352 * Up to two groups of package elements are supported by the data
353 * structure. All elements in each group must be of the same type.
354 * The second group can have a count of zero.
356 * Aborts check upon a NULL package element, as this means (at compile
357 * time) that the remainder of the package elements are also NULL
358 * (This is the only way to create NULL package elements.)
360 for (i = 0; (i < Count1) && Op; i++)
362 ApCheckObjectType (PredefinedName, Op, Type1, i);
363 Op = Op->Asl.Next;
366 for (i = 0; (i < Count2) && Op; i++)
368 ApCheckObjectType (PredefinedName, Op, Type2, (i + Count1));
369 Op = Op->Asl.Next;
374 /*******************************************************************************
376 * FUNCTION: ApCheckPackageList
378 * PARAMETERS: PredefinedName - Name of the predefined object
379 * ParentOp - Parser op of the parent package
380 * Package - Package info for this predefined name
381 * StartIndex - Index in parent package where list begins
382 * ParentCount - Element count of parent package
384 * RETURN: None
386 * DESCRIPTION: Validate the individual package elements for a predefined name.
387 * Handles the cases where the predefined name is defined as a
388 * Package of Packages (subpackages). These are the types:
390 * ACPI_PTYPE2
391 * ACPI_PTYPE2_FIXED
392 * ACPI_PTYPE2_MIN
393 * ACPI_PTYPE2_COUNT
394 * ACPI_PTYPE2_FIX_VAR
396 ******************************************************************************/
398 static void
399 ApCheckPackageList (
400 const char *PredefinedName,
401 ACPI_PARSE_OBJECT *ParentOp,
402 const ACPI_PREDEFINED_INFO *Package,
403 UINT32 StartIndex,
404 UINT32 ParentCount)
406 ACPI_PARSE_OBJECT *SubPackageOp = ParentOp;
407 ACPI_PARSE_OBJECT *Op;
408 ACPI_STATUS Status;
409 UINT32 Count;
410 UINT32 ExpectedCount;
411 UINT32 i;
412 UINT32 j;
416 * Validate each subpackage in the parent Package
418 * Note: We ignore NULL package elements on the assumption that
419 * they will be initialized by the BIOS or other ASL code.
421 for (i = 0; (i < ParentCount) && SubPackageOp; i++)
423 /* Each object in the list must be of type Package */
425 Status = ApCheckObjectType (PredefinedName, SubPackageOp,
426 ACPI_RTYPE_PACKAGE, i + StartIndex);
427 if (ACPI_FAILURE (Status))
429 goto NextSubpackage;
432 /* Examine the different types of expected subpackages */
434 Op = SubPackageOp->Asl.Child;
436 /* First child is the package length */
438 Count = (UINT32) Op->Asl.Value.Integer;
439 Op = Op->Asl.Next;
441 /* The subpackage must have at least one element */
443 if (!Count)
445 ApZeroLengthPackage (PredefinedName, SubPackageOp);
446 goto NextSubpackage;
450 * Decode the package type.
451 * PTYPE2 indicates that a "package of packages" is expected for
452 * this name. The various flavors of PTYPE2 indicate the number
453 * and format of the subpackages.
455 switch (Package->RetInfo.Type)
457 case ACPI_PTYPE2:
458 case ACPI_PTYPE2_PKG_COUNT:
459 case ACPI_PTYPE2_REV_FIXED:
461 /* Each subpackage has a fixed number of elements */
463 ExpectedCount = Package->RetInfo.Count1 + Package->RetInfo.Count2;
464 if (Count < ExpectedCount)
466 ApPackageTooSmall (PredefinedName, SubPackageOp,
467 Count, ExpectedCount);
468 break;
471 ApCheckPackageElements (PredefinedName, Op,
472 Package->RetInfo.ObjectType1, Package->RetInfo.Count1,
473 Package->RetInfo.ObjectType2, Package->RetInfo.Count2);
474 break;
476 case ACPI_PTYPE2_FIX_VAR:
478 * Each subpackage has a fixed number of elements and an
479 * optional element
481 ExpectedCount = Package->RetInfo.Count1 + Package->RetInfo.Count2;
482 if (Count < ExpectedCount)
484 ApPackageTooSmall (PredefinedName, SubPackageOp,
485 Count, ExpectedCount);
486 break;
489 ApCheckPackageElements (PredefinedName, Op,
490 Package->RetInfo.ObjectType1, Package->RetInfo.Count1,
491 Package->RetInfo.ObjectType2,
492 Count - Package->RetInfo.Count1);
493 break;
495 case ACPI_PTYPE2_FIXED:
497 /* Each sub-package has a fixed length */
499 ExpectedCount = Package->RetInfo2.Count;
500 if (Count < ExpectedCount)
502 ApPackageTooSmall (PredefinedName, SubPackageOp,
503 Count, ExpectedCount);
504 break;
507 /* Check each object/type combination */
509 for (j = 0; j < ExpectedCount; j++)
511 ApCheckObjectType (PredefinedName, Op,
512 Package->RetInfo2.ObjectType[j], j);
514 Op = Op->Asl.Next;
516 break;
518 case ACPI_PTYPE2_MIN:
520 /* Each sub-package has a variable but minimum length */
522 ExpectedCount = Package->RetInfo.Count1;
523 if (Count < ExpectedCount)
525 ApPackageTooSmall (PredefinedName, SubPackageOp,
526 Count, ExpectedCount);
527 break;
530 /* Check the type of each sub-package element */
532 ApCheckPackageElements (PredefinedName, Op,
533 Package->RetInfo.ObjectType1, Count, 0, 0);
534 break;
536 case ACPI_PTYPE2_COUNT:
538 * First element is the (Integer) count of elements, including
539 * the count field (the ACPI name is NumElements)
541 Status = ApCheckObjectType (PredefinedName, Op,
542 ACPI_RTYPE_INTEGER, 0);
544 /* We must have an integer count from above (otherwise, use Count) */
546 if (ACPI_SUCCESS (Status))
549 * Make sure package is large enough for the Count and is
550 * is as large as the minimum size
552 ExpectedCount = (UINT32) Op->Asl.Value.Integer;
554 if (Count < ExpectedCount)
556 ApPackageTooSmall (PredefinedName, SubPackageOp,
557 Count, ExpectedCount);
558 break;
560 else if (Count > ExpectedCount)
562 ApPackageTooLarge (PredefinedName, SubPackageOp,
563 Count, ExpectedCount);
566 /* Some names of this type have a minimum length */
568 if (Count < Package->RetInfo.Count1)
570 ExpectedCount = Package->RetInfo.Count1;
571 ApPackageTooSmall (PredefinedName, SubPackageOp,
572 Count, ExpectedCount);
573 break;
576 Count = ExpectedCount;
579 /* Check the type of each sub-package element */
581 Op = Op->Asl.Next;
582 ApCheckPackageElements (PredefinedName, Op,
583 Package->RetInfo.ObjectType1, (Count - 1), 0, 0);
584 break;
586 default:
587 break;
590 NextSubpackage:
591 SubPackageOp = SubPackageOp->Asl.Next;
596 /*******************************************************************************
598 * FUNCTION: ApPackageTooSmall
600 * PARAMETERS: PredefinedName - Name of the predefined object
601 * Op - Current parser op
602 * Count - Actual package element count
603 * ExpectedCount - Expected package element count
605 * RETURN: None
607 * DESCRIPTION: Issue error message for a package that is smaller than
608 * required.
610 ******************************************************************************/
612 static void
613 ApPackageTooSmall (
614 const char *PredefinedName,
615 ACPI_PARSE_OBJECT *Op,
616 UINT32 Count,
617 UINT32 ExpectedCount)
620 sprintf (MsgBuffer, "%s: length %u, required minimum is %u",
621 PredefinedName, Count, ExpectedCount);
623 AslError (ASL_ERROR, ASL_MSG_RESERVED_PACKAGE_LENGTH, Op, MsgBuffer);
627 /*******************************************************************************
629 * FUNCTION: ApZeroLengthPackage
631 * PARAMETERS: PredefinedName - Name of the predefined object
632 * Op - Current parser op
634 * RETURN: None
636 * DESCRIPTION: Issue error message for a zero-length package (a package that
637 * is required to have a non-zero length). Variable length
638 * packages seem to be allowed to have zero length, however.
639 * Even if not allowed, BIOS code does it.
641 ******************************************************************************/
643 static void
644 ApZeroLengthPackage (
645 const char *PredefinedName,
646 ACPI_PARSE_OBJECT *Op)
649 sprintf (MsgBuffer, "%s: length is zero", PredefinedName);
651 AslError (ASL_ERROR, ASL_MSG_RESERVED_PACKAGE_LENGTH, Op, MsgBuffer);
655 /*******************************************************************************
657 * FUNCTION: ApPackageTooLarge
659 * PARAMETERS: PredefinedName - Name of the predefined object
660 * Op - Current parser op
661 * Count - Actual package element count
662 * ExpectedCount - Expected package element count
664 * RETURN: None
666 * DESCRIPTION: Issue a remark for a package that is larger than expected.
668 ******************************************************************************/
670 static void
671 ApPackageTooLarge (
672 const char *PredefinedName,
673 ACPI_PARSE_OBJECT *Op,
674 UINT32 Count,
675 UINT32 ExpectedCount)
678 sprintf (MsgBuffer, "%s: length is %u, only %u required",
679 PredefinedName, Count, ExpectedCount);
681 AslError (ASL_REMARK, ASL_MSG_RESERVED_PACKAGE_LENGTH, Op, MsgBuffer);