Home | History | Annotate | Line # | Download | only in compiler
aslanalyze.c revision 1.1.1.4
      1      1.1    jruoho /******************************************************************************
      2      1.1    jruoho  *
      3  1.1.1.2    jruoho  * Module Name: aslanalyze.c - Support functions for parse tree walks
      4      1.1    jruoho  *
      5      1.1    jruoho  *****************************************************************************/
      6      1.1    jruoho 
      7  1.1.1.2    jruoho /*
      8  1.1.1.4  christos  * Copyright (C) 2000 - 2013, Intel Corp.
      9      1.1    jruoho  * All rights reserved.
     10      1.1    jruoho  *
     11  1.1.1.2    jruoho  * Redistribution and use in source and binary forms, with or without
     12  1.1.1.2    jruoho  * modification, are permitted provided that the following conditions
     13  1.1.1.2    jruoho  * are met:
     14  1.1.1.2    jruoho  * 1. Redistributions of source code must retain the above copyright
     15  1.1.1.2    jruoho  *    notice, this list of conditions, and the following disclaimer,
     16  1.1.1.2    jruoho  *    without modification.
     17  1.1.1.2    jruoho  * 2. Redistributions in binary form must reproduce at minimum a disclaimer
     18  1.1.1.2    jruoho  *    substantially similar to the "NO WARRANTY" disclaimer below
     19  1.1.1.2    jruoho  *    ("Disclaimer") and any redistribution must be conditioned upon
     20  1.1.1.2    jruoho  *    including a substantially similar Disclaimer requirement for further
     21  1.1.1.2    jruoho  *    binary redistribution.
     22  1.1.1.2    jruoho  * 3. Neither the names of the above-listed copyright holders nor the names
     23  1.1.1.2    jruoho  *    of any contributors may be used to endorse or promote products derived
     24  1.1.1.2    jruoho  *    from this software without specific prior written permission.
     25  1.1.1.2    jruoho  *
     26  1.1.1.2    jruoho  * Alternatively, this software may be distributed under the terms of the
     27  1.1.1.2    jruoho  * GNU General Public License ("GPL") version 2 as published by the Free
     28  1.1.1.2    jruoho  * Software Foundation.
     29  1.1.1.2    jruoho  *
     30  1.1.1.2    jruoho  * NO WARRANTY
     31  1.1.1.2    jruoho  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
     32  1.1.1.2    jruoho  * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
     33  1.1.1.2    jruoho  * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR
     34  1.1.1.2    jruoho  * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
     35  1.1.1.2    jruoho  * HOLDERS OR CONTRIBUTORS BE LIABLE FOR SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     36  1.1.1.2    jruoho  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     37  1.1.1.2    jruoho  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     38  1.1.1.2    jruoho  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
     39  1.1.1.2    jruoho  * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING
     40  1.1.1.2    jruoho  * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     41  1.1.1.2    jruoho  * POSSIBILITY OF SUCH DAMAGES.
     42  1.1.1.2    jruoho  */
     43      1.1    jruoho 
     44      1.1    jruoho 
     45      1.1    jruoho #include "aslcompiler.h"
     46      1.1    jruoho #include "aslcompiler.y.h"
     47  1.1.1.2    jruoho #include <string.h>
     48  1.1.1.2    jruoho 
     49      1.1    jruoho 
     50      1.1    jruoho #define _COMPONENT          ACPI_COMPILER
     51      1.1    jruoho         ACPI_MODULE_NAME    ("aslanalyze")
     52      1.1    jruoho 
     53      1.1    jruoho 
     54      1.1    jruoho /*******************************************************************************
     55      1.1    jruoho  *
     56      1.1    jruoho  * FUNCTION:    AnIsInternalMethod
     57      1.1    jruoho  *
     58  1.1.1.2    jruoho  * PARAMETERS:  Op                  - Current op
     59      1.1    jruoho  *
     60      1.1    jruoho  * RETURN:      Boolean
     61      1.1    jruoho  *
     62      1.1    jruoho  * DESCRIPTION: Check for an internal control method.
     63      1.1    jruoho  *
     64      1.1    jruoho  ******************************************************************************/
     65      1.1    jruoho 
     66  1.1.1.2    jruoho BOOLEAN
     67      1.1    jruoho AnIsInternalMethod (
     68      1.1    jruoho     ACPI_PARSE_OBJECT       *Op)
     69      1.1    jruoho {
     70      1.1    jruoho 
     71      1.1    jruoho     if ((!ACPI_STRCMP (Op->Asl.ExternalName, "\\_OSI")) ||
     72      1.1    jruoho         (!ACPI_STRCMP (Op->Asl.ExternalName, "_OSI")))
     73      1.1    jruoho     {
     74      1.1    jruoho         return (TRUE);
     75      1.1    jruoho     }
     76      1.1    jruoho 
     77      1.1    jruoho     return (FALSE);
     78      1.1    jruoho }
     79      1.1    jruoho 
     80      1.1    jruoho 
     81      1.1    jruoho /*******************************************************************************
     82      1.1    jruoho  *
     83      1.1    jruoho  * FUNCTION:    AnGetInternalMethodReturnType
     84      1.1    jruoho  *
     85  1.1.1.2    jruoho  * PARAMETERS:  Op                  - Current op
     86      1.1    jruoho  *
     87      1.1    jruoho  * RETURN:      Btype
     88      1.1    jruoho  *
     89      1.1    jruoho  * DESCRIPTION: Get the return type of an internal method
     90      1.1    jruoho  *
     91      1.1    jruoho  ******************************************************************************/
     92      1.1    jruoho 
     93  1.1.1.2    jruoho UINT32
     94      1.1    jruoho AnGetInternalMethodReturnType (
     95      1.1    jruoho     ACPI_PARSE_OBJECT       *Op)
     96      1.1    jruoho {
     97      1.1    jruoho 
     98      1.1    jruoho     if ((!ACPI_STRCMP (Op->Asl.ExternalName, "\\_OSI")) ||
     99      1.1    jruoho         (!ACPI_STRCMP (Op->Asl.ExternalName, "_OSI")))
    100      1.1    jruoho     {
    101      1.1    jruoho         return (ACPI_BTYPE_STRING);
    102      1.1    jruoho     }
    103      1.1    jruoho 
    104      1.1    jruoho     return (0);
    105      1.1    jruoho }
    106      1.1    jruoho 
    107      1.1    jruoho 
    108      1.1    jruoho /*******************************************************************************
    109      1.1    jruoho  *
    110  1.1.1.2    jruoho  * FUNCTION:    AnCheckId
    111      1.1    jruoho  *
    112  1.1.1.2    jruoho  * PARAMETERS:  Op                  - Current parse op
    113  1.1.1.2    jruoho  *              Type                - HID or CID
    114      1.1    jruoho  *
    115  1.1.1.2    jruoho  * RETURN:      None
    116      1.1    jruoho  *
    117  1.1.1.2    jruoho  * DESCRIPTION: Perform various checks on _HID and _CID strings. Only limited
    118  1.1.1.2    jruoho  *              checks can be performed on _CID strings.
    119      1.1    jruoho  *
    120      1.1    jruoho  ******************************************************************************/
    121      1.1    jruoho 
    122  1.1.1.2    jruoho void
    123  1.1.1.2    jruoho AnCheckId (
    124  1.1.1.2    jruoho     ACPI_PARSE_OBJECT       *Op,
    125  1.1.1.2    jruoho     ACPI_NAME               Type)
    126      1.1    jruoho {
    127  1.1.1.2    jruoho     UINT32                  i;
    128  1.1.1.2    jruoho     ACPI_SIZE               Length;
    129      1.1    jruoho 
    130      1.1    jruoho 
    131  1.1.1.2    jruoho     /* Only care about string versions of _HID/_CID (integers are legal) */
    132      1.1    jruoho 
    133  1.1.1.2    jruoho     if (Op->Asl.ParseOpcode != PARSEOP_STRING_LITERAL)
    134      1.1    jruoho     {
    135      1.1    jruoho         return;
    136      1.1    jruoho     }
    137      1.1    jruoho 
    138  1.1.1.2    jruoho     /* For both _HID and _CID, the string must be non-null */
    139      1.1    jruoho 
    140  1.1.1.2    jruoho     Length = strlen (Op->Asl.Value.String);
    141  1.1.1.2    jruoho     if (!Length)
    142      1.1    jruoho     {
    143  1.1.1.2    jruoho         AslError (ASL_ERROR, ASL_MSG_NULL_STRING,
    144  1.1.1.2    jruoho             Op, NULL);
    145  1.1.1.2    jruoho         return;
    146      1.1    jruoho     }
    147      1.1    jruoho 
    148      1.1    jruoho     /*
    149  1.1.1.2    jruoho      * One of the things we want to catch here is the use of a leading
    150  1.1.1.2    jruoho      * asterisk in the string -- an odd construct that certain platform
    151  1.1.1.2    jruoho      * manufacturers are fond of. Technically, a leading asterisk is OK
    152  1.1.1.2    jruoho      * for _CID, but a valid use of this has not been seen.
    153      1.1    jruoho      */
    154  1.1.1.2    jruoho     if (*Op->Asl.Value.String == '*')
    155      1.1    jruoho     {
    156  1.1.1.2    jruoho         AslError (ASL_ERROR, ASL_MSG_LEADING_ASTERISK,
    157  1.1.1.2    jruoho             Op, Op->Asl.Value.String);
    158  1.1.1.2    jruoho         return;
    159      1.1    jruoho     }
    160      1.1    jruoho 
    161  1.1.1.2    jruoho     /* _CID strings are bus-specific, no more checks can be performed */
    162      1.1    jruoho 
    163  1.1.1.2    jruoho     if (Type == ASL_TYPE_CID)
    164      1.1    jruoho     {
    165  1.1.1.2    jruoho         return;
    166      1.1    jruoho     }
    167      1.1    jruoho 
    168  1.1.1.2    jruoho     /* For _HID, all characters must be alphanumeric */
    169      1.1    jruoho 
    170  1.1.1.2    jruoho     for (i = 0; Op->Asl.Value.String[i]; i++)
    171  1.1.1.2    jruoho     {
    172  1.1.1.2    jruoho         if (!isalnum ((int) Op->Asl.Value.String[i]))
    173      1.1    jruoho         {
    174  1.1.1.2    jruoho             AslError (ASL_ERROR, ASL_MSG_ALPHANUMERIC_STRING,
    175  1.1.1.2    jruoho                 Op, Op->Asl.Value.String);
    176  1.1.1.4  christos             return;
    177      1.1    jruoho         }
    178      1.1    jruoho     }
    179      1.1    jruoho 
    180  1.1.1.4  christos     /*
    181  1.1.1.4  christos      * _HID String must be one of these forms:
    182  1.1.1.4  christos      *
    183  1.1.1.4  christos      * "AAA####"    A is an uppercase letter and # is a hex digit
    184  1.1.1.4  christos      * "ACPI####"   # is a hex digit
    185  1.1.1.4  christos      * "NNNN####"   N is an uppercase letter or decimal digit (0-9)
    186  1.1.1.4  christos      *              # is a hex digit (ACPI 5.0)
    187  1.1.1.4  christos      */
    188  1.1.1.2    jruoho     if ((Length < 7) || (Length > 8))
    189  1.1.1.2    jruoho     {
    190  1.1.1.2    jruoho         AslError (ASL_ERROR, ASL_MSG_HID_LENGTH,
    191  1.1.1.2    jruoho             Op, Op->Asl.Value.String);
    192  1.1.1.2    jruoho         return;
    193  1.1.1.2    jruoho     }
    194      1.1    jruoho 
    195  1.1.1.4  christos     /* _HID Length is valid (7 or 8), now check the prefix (first 3 or 4 chars) */
    196      1.1    jruoho 
    197  1.1.1.4  christos     if (Length == 7)
    198  1.1.1.2    jruoho     {
    199  1.1.1.4  christos         /* AAA####: Ensure the alphabetic prefix is all uppercase */
    200  1.1.1.4  christos 
    201  1.1.1.4  christos         for (i = 0; i < 3; i++)
    202  1.1.1.4  christos         {
    203  1.1.1.4  christos             if (!isupper ((int) Op->Asl.Value.String[i]))
    204  1.1.1.4  christos             {
    205  1.1.1.4  christos                 AslError (ASL_ERROR, ASL_MSG_UPPER_CASE,
    206  1.1.1.4  christos                     Op, &Op->Asl.Value.String[i]);
    207  1.1.1.4  christos                 return;
    208  1.1.1.4  christos             }
    209  1.1.1.4  christos         }
    210  1.1.1.4  christos     }
    211  1.1.1.4  christos     else /* Length == 8 */
    212  1.1.1.4  christos     {
    213  1.1.1.4  christos         /*
    214  1.1.1.4  christos          * ACPI#### or NNNN####:
    215  1.1.1.4  christos          * Ensure the prefix contains only uppercase alpha or decimal digits
    216  1.1.1.4  christos          */
    217  1.1.1.4  christos         for (i = 0; i < 4; i++)
    218  1.1.1.4  christos         {
    219  1.1.1.4  christos             if (!isupper ((int) Op->Asl.Value.String[i]) &&
    220  1.1.1.4  christos                 !isdigit ((int) Op->Asl.Value.String[i]))
    221  1.1.1.4  christos             {
    222  1.1.1.4  christos                 AslError (ASL_ERROR, ASL_MSG_HID_PREFIX,
    223  1.1.1.4  christos                     Op, &Op->Asl.Value.String[i]);
    224  1.1.1.4  christos                 return;
    225  1.1.1.4  christos             }
    226  1.1.1.4  christos         }
    227  1.1.1.2    jruoho     }
    228  1.1.1.2    jruoho 
    229  1.1.1.4  christos     /* Remaining characters (suffix) must be hex digits */
    230      1.1    jruoho 
    231  1.1.1.4  christos     for (; i < Length; i++)
    232  1.1.1.2    jruoho     {
    233  1.1.1.4  christos         if (!isxdigit ((int) Op->Asl.Value.String[i]))
    234  1.1.1.2    jruoho         {
    235  1.1.1.4  christos          AslError (ASL_ERROR, ASL_MSG_HID_SUFFIX,
    236  1.1.1.4  christos             Op, &Op->Asl.Value.String[i]);
    237  1.1.1.2    jruoho             break;
    238  1.1.1.2    jruoho         }
    239  1.1.1.2    jruoho     }
    240      1.1    jruoho }
    241      1.1    jruoho 
    242      1.1    jruoho 
    243      1.1    jruoho /*******************************************************************************
    244      1.1    jruoho  *
    245  1.1.1.2    jruoho  * FUNCTION:    AnLastStatementIsReturn
    246      1.1    jruoho  *
    247  1.1.1.2    jruoho  * PARAMETERS:  Op                  - A method parse node
    248      1.1    jruoho  *
    249  1.1.1.2    jruoho  * RETURN:      TRUE if last statement is an ASL RETURN. False otherwise
    250      1.1    jruoho  *
    251  1.1.1.2    jruoho  * DESCRIPTION: Walk down the list of top level statements within a method
    252  1.1.1.2    jruoho  *              to find the last one. Check if that last statement is in
    253  1.1.1.2    jruoho  *              fact a RETURN statement.
    254      1.1    jruoho  *
    255      1.1    jruoho  ******************************************************************************/
    256      1.1    jruoho 
    257  1.1.1.2    jruoho BOOLEAN
    258  1.1.1.2    jruoho AnLastStatementIsReturn (
    259  1.1.1.2    jruoho     ACPI_PARSE_OBJECT       *Op)
    260      1.1    jruoho {
    261  1.1.1.2    jruoho     ACPI_PARSE_OBJECT       *Next;
    262      1.1    jruoho 
    263      1.1    jruoho 
    264  1.1.1.2    jruoho     /* Check if last statement is a return */
    265      1.1    jruoho 
    266  1.1.1.2    jruoho     Next = ASL_GET_CHILD_NODE (Op);
    267  1.1.1.2    jruoho     while (Next)
    268  1.1.1.2    jruoho     {
    269  1.1.1.2    jruoho         if ((!Next->Asl.Next) &&
    270  1.1.1.2    jruoho             (Next->Asl.ParseOpcode == PARSEOP_RETURN))
    271      1.1    jruoho         {
    272  1.1.1.2    jruoho             return (TRUE);
    273      1.1    jruoho         }
    274      1.1    jruoho 
    275  1.1.1.2    jruoho         Next = ASL_GET_PEER_NODE (Next);
    276      1.1    jruoho     }
    277      1.1    jruoho 
    278  1.1.1.2    jruoho     return (FALSE);
    279      1.1    jruoho }
    280      1.1    jruoho 
    281      1.1    jruoho 
    282      1.1    jruoho /*******************************************************************************
    283      1.1    jruoho  *
    284      1.1    jruoho  * FUNCTION:    AnCheckMethodReturnValue
    285      1.1    jruoho  *
    286      1.1    jruoho  * PARAMETERS:  Op                  - Parent
    287      1.1    jruoho  *              OpInfo              - Parent info
    288      1.1    jruoho  *              ArgOp               - Method invocation op
    289      1.1    jruoho  *              RequiredBtypes      - What caller requires
    290      1.1    jruoho  *              ThisNodeBtype       - What this node returns (if anything)
    291      1.1    jruoho  *
    292      1.1    jruoho  * RETURN:      None
    293      1.1    jruoho  *
    294      1.1    jruoho  * DESCRIPTION: Check a method invocation for 1) A return value and if it does
    295      1.1    jruoho  *              in fact return a value, 2) check the type of the return value.
    296      1.1    jruoho  *
    297      1.1    jruoho  ******************************************************************************/
    298      1.1    jruoho 
    299  1.1.1.2    jruoho void
    300      1.1    jruoho AnCheckMethodReturnValue (
    301      1.1    jruoho     ACPI_PARSE_OBJECT       *Op,
    302      1.1    jruoho     const ACPI_OPCODE_INFO  *OpInfo,
    303      1.1    jruoho     ACPI_PARSE_OBJECT       *ArgOp,
    304      1.1    jruoho     UINT32                  RequiredBtypes,
    305      1.1    jruoho     UINT32                  ThisNodeBtype)
    306      1.1    jruoho {
    307      1.1    jruoho     ACPI_PARSE_OBJECT       *OwningOp;
    308      1.1    jruoho     ACPI_NAMESPACE_NODE     *Node;
    309      1.1    jruoho 
    310      1.1    jruoho 
    311      1.1    jruoho     Node = ArgOp->Asl.Node;
    312      1.1    jruoho 
    313      1.1    jruoho 
    314      1.1    jruoho     /* Examine the parent op of this method */
    315      1.1    jruoho 
    316      1.1    jruoho     OwningOp = Node->Op;
    317      1.1    jruoho     if (OwningOp->Asl.CompileFlags & NODE_METHOD_NO_RETVAL)
    318      1.1    jruoho     {
    319      1.1    jruoho         /* Method NEVER returns a value */
    320      1.1    jruoho 
    321      1.1    jruoho         AslError (ASL_ERROR, ASL_MSG_NO_RETVAL, Op, Op->Asl.ExternalName);
    322      1.1    jruoho     }
    323      1.1    jruoho     else if (OwningOp->Asl.CompileFlags & NODE_METHOD_SOME_NO_RETVAL)
    324      1.1    jruoho     {
    325      1.1    jruoho         /* Method SOMETIMES returns a value, SOMETIMES not */
    326      1.1    jruoho 
    327      1.1    jruoho         AslError (ASL_WARNING, ASL_MSG_SOME_NO_RETVAL, Op, Op->Asl.ExternalName);
    328      1.1    jruoho     }
    329      1.1    jruoho     else if (!(ThisNodeBtype & RequiredBtypes))
    330      1.1    jruoho     {
    331      1.1    jruoho         /* Method returns a value, but the type is wrong */
    332      1.1    jruoho 
    333      1.1    jruoho         AnFormatBtype (StringBuffer, ThisNodeBtype);
    334      1.1    jruoho         AnFormatBtype (StringBuffer2, RequiredBtypes);
    335      1.1    jruoho 
    336      1.1    jruoho         /*
    337      1.1    jruoho          * The case where the method does not return any value at all
    338      1.1    jruoho          * was already handled in the namespace cross reference
    339      1.1    jruoho          * -- Only issue an error if the method in fact returns a value,
    340      1.1    jruoho          * but it is of the wrong type
    341      1.1    jruoho          */
    342      1.1    jruoho         if (ThisNodeBtype != 0)
    343      1.1    jruoho         {
    344      1.1    jruoho             sprintf (MsgBuffer,
    345      1.1    jruoho                 "Method returns [%s], %s operator requires [%s]",
    346      1.1    jruoho                 StringBuffer, OpInfo->Name, StringBuffer2);
    347      1.1    jruoho 
    348      1.1    jruoho             AslError (ASL_ERROR, ASL_MSG_INVALID_TYPE, ArgOp, MsgBuffer);
    349      1.1    jruoho         }
    350      1.1    jruoho     }
    351      1.1    jruoho }
    352      1.1    jruoho 
    353      1.1    jruoho 
    354      1.1    jruoho /*******************************************************************************
    355      1.1    jruoho  *
    356      1.1    jruoho  * FUNCTION:    AnIsResultUsed
    357      1.1    jruoho  *
    358  1.1.1.2    jruoho  * PARAMETERS:  Op                  - Parent op for the operator
    359      1.1    jruoho  *
    360      1.1    jruoho  * RETURN:      TRUE if result from this operation is actually consumed
    361      1.1    jruoho  *
    362      1.1    jruoho  * DESCRIPTION: Determine if the function result value from an operator is
    363      1.1    jruoho  *              used.
    364      1.1    jruoho  *
    365      1.1    jruoho  ******************************************************************************/
    366      1.1    jruoho 
    367      1.1    jruoho BOOLEAN
    368      1.1    jruoho AnIsResultUsed (
    369      1.1    jruoho     ACPI_PARSE_OBJECT       *Op)
    370      1.1    jruoho {
    371      1.1    jruoho     ACPI_PARSE_OBJECT       *Parent;
    372      1.1    jruoho 
    373      1.1    jruoho 
    374      1.1    jruoho     switch (Op->Asl.ParseOpcode)
    375      1.1    jruoho     {
    376      1.1    jruoho     case PARSEOP_INCREMENT:
    377      1.1    jruoho     case PARSEOP_DECREMENT:
    378      1.1    jruoho 
    379      1.1    jruoho         /* These are standalone operators, no return value */
    380      1.1    jruoho 
    381      1.1    jruoho         return (TRUE);
    382      1.1    jruoho 
    383      1.1    jruoho     default:
    384  1.1.1.4  christos 
    385      1.1    jruoho         break;
    386      1.1    jruoho     }
    387      1.1    jruoho 
    388      1.1    jruoho     /* Examine parent to determine if the return value is used */
    389      1.1    jruoho 
    390      1.1    jruoho     Parent = Op->Asl.Parent;
    391      1.1    jruoho     switch (Parent->Asl.ParseOpcode)
    392      1.1    jruoho     {
    393      1.1    jruoho     /* If/While - check if the operator is the predicate */
    394      1.1    jruoho 
    395      1.1    jruoho     case PARSEOP_IF:
    396      1.1    jruoho     case PARSEOP_WHILE:
    397      1.1    jruoho 
    398      1.1    jruoho         /* First child is the predicate */
    399      1.1    jruoho 
    400      1.1    jruoho         if (Parent->Asl.Child == Op)
    401      1.1    jruoho         {
    402      1.1    jruoho             return (TRUE);
    403      1.1    jruoho         }
    404      1.1    jruoho         return (FALSE);
    405      1.1    jruoho 
    406      1.1    jruoho     /* Not used if one of these is the parent */
    407      1.1    jruoho 
    408      1.1    jruoho     case PARSEOP_METHOD:
    409      1.1    jruoho     case PARSEOP_DEFINITIONBLOCK:
    410      1.1    jruoho     case PARSEOP_ELSE:
    411      1.1    jruoho 
    412      1.1    jruoho         return (FALSE);
    413      1.1    jruoho 
    414      1.1    jruoho     default:
    415  1.1.1.4  christos 
    416      1.1    jruoho         /* Any other type of parent means that the result is used */
    417      1.1    jruoho 
    418      1.1    jruoho         return (TRUE);
    419      1.1    jruoho     }
    420      1.1    jruoho }
    421      1.1    jruoho 
    422      1.1    jruoho 
    423      1.1    jruoho /*******************************************************************************
    424      1.1    jruoho  *
    425  1.1.1.2    jruoho  * FUNCTION:    ApCheckForGpeNameConflict
    426      1.1    jruoho  *
    427  1.1.1.2    jruoho  * PARAMETERS:  Op                  - Current parse op
    428      1.1    jruoho  *
    429  1.1.1.2    jruoho  * RETURN:      None
    430      1.1    jruoho  *
    431  1.1.1.2    jruoho  * DESCRIPTION: Check for a conflict between GPE names within this scope.
    432  1.1.1.2    jruoho  *              Conflict means two GPE names with the same GPE number, but
    433  1.1.1.2    jruoho  *              different types -- such as _L1C and _E1C.
    434      1.1    jruoho  *
    435      1.1    jruoho  ******************************************************************************/
    436      1.1    jruoho 
    437  1.1.1.2    jruoho void
    438  1.1.1.2    jruoho ApCheckForGpeNameConflict (
    439  1.1.1.2    jruoho     ACPI_PARSE_OBJECT       *Op)
    440      1.1    jruoho {
    441  1.1.1.2    jruoho     ACPI_PARSE_OBJECT       *NextOp;
    442  1.1.1.2    jruoho     UINT32                  GpeNumber;
    443  1.1.1.2    jruoho     char                    Name[ACPI_NAME_SIZE + 1];
    444  1.1.1.2    jruoho     char                    Target[ACPI_NAME_SIZE];
    445      1.1    jruoho 
    446      1.1    jruoho 
    447  1.1.1.2    jruoho     /* Need a null-terminated string version of NameSeg */
    448  1.1.1.2    jruoho 
    449  1.1.1.2    jruoho     ACPI_MOVE_32_TO_32 (Name, &Op->Asl.NameSeg);
    450  1.1.1.2    jruoho     Name[ACPI_NAME_SIZE] = 0;
    451      1.1    jruoho 
    452      1.1    jruoho     /*
    453  1.1.1.2    jruoho      * For a GPE method:
    454  1.1.1.2    jruoho      * 1st char must be underscore
    455  1.1.1.2    jruoho      * 2nd char must be L or E
    456  1.1.1.2    jruoho      * 3rd/4th chars must be a hex number
    457      1.1    jruoho      */
    458  1.1.1.2    jruoho     if ((Name[0] != '_') ||
    459  1.1.1.2    jruoho        ((Name[1] != 'L') && (Name[1] != 'E')))
    460      1.1    jruoho     {
    461  1.1.1.2    jruoho         return;
    462  1.1.1.2    jruoho     }
    463      1.1    jruoho 
    464  1.1.1.2    jruoho     /* Verify 3rd/4th chars are a valid hex value */
    465      1.1    jruoho 
    466  1.1.1.2    jruoho     GpeNumber = ACPI_STRTOUL (&Name[2], NULL, 16);
    467  1.1.1.2    jruoho     if (GpeNumber == ACPI_UINT32_MAX)
    468  1.1.1.2    jruoho     {
    469  1.1.1.2    jruoho         return;
    470      1.1    jruoho     }
    471      1.1    jruoho 
    472      1.1    jruoho     /*
    473  1.1.1.2    jruoho      * We are now sure we have an _Lxx or _Exx.
    474  1.1.1.2    jruoho      * Create the target name that would cause collision (Flip E/L)
    475      1.1    jruoho      */
    476  1.1.1.2    jruoho     ACPI_MOVE_32_TO_32 (Target, Name);
    477      1.1    jruoho 
    478  1.1.1.2    jruoho     /* Inject opposite letter ("L" versus "E") */
    479      1.1    jruoho 
    480  1.1.1.2    jruoho     if (Name[1] == 'L')
    481  1.1.1.2    jruoho     {
    482  1.1.1.2    jruoho         Target[1] = 'E';
    483  1.1.1.2    jruoho     }
    484  1.1.1.2    jruoho     else /* Name[1] == 'E' */
    485  1.1.1.2    jruoho     {
    486  1.1.1.2    jruoho         Target[1] = 'L';
    487  1.1.1.2    jruoho     }
    488      1.1    jruoho 
    489  1.1.1.2    jruoho     /* Search all peers (objects within this scope) for target match */
    490      1.1    jruoho 
    491  1.1.1.2    jruoho     NextOp = Op->Asl.Next;
    492  1.1.1.2    jruoho     while (NextOp)
    493  1.1.1.2    jruoho     {
    494      1.1    jruoho         /*
    495  1.1.1.2    jruoho          * We mostly care about methods, but check Name() constructs also,
    496  1.1.1.2    jruoho          * even though they will get another error for not being a method.
    497  1.1.1.2    jruoho          * All GPE names must be defined as control methods.
    498      1.1    jruoho          */
    499  1.1.1.2    jruoho         if ((NextOp->Asl.ParseOpcode == PARSEOP_METHOD) ||
    500  1.1.1.2    jruoho             (NextOp->Asl.ParseOpcode == PARSEOP_NAME))
    501      1.1    jruoho         {
    502  1.1.1.2    jruoho             if (ACPI_COMPARE_NAME (Target, NextOp->Asl.NameSeg))
    503  1.1.1.2    jruoho             {
    504  1.1.1.2    jruoho                 /* Found both _Exy and _Lxy in the same scope, error */
    505      1.1    jruoho 
    506  1.1.1.2    jruoho                 AslError (ASL_ERROR, ASL_MSG_GPE_NAME_CONFLICT, NextOp,
    507  1.1.1.2    jruoho                     Name);
    508  1.1.1.2    jruoho                 return;
    509  1.1.1.2    jruoho             }
    510      1.1    jruoho         }
    511      1.1    jruoho 
    512  1.1.1.2    jruoho         NextOp = NextOp->Asl.Next;
    513      1.1    jruoho     }
    514      1.1    jruoho 
    515  1.1.1.2    jruoho     /* OK, no conflict found */
    516      1.1    jruoho 
    517  1.1.1.2    jruoho     return;
    518      1.1    jruoho }
    519  1.1.1.3    jruoho 
    520  1.1.1.3    jruoho 
    521  1.1.1.3    jruoho /*******************************************************************************
    522  1.1.1.3    jruoho  *
    523  1.1.1.3    jruoho  * FUNCTION:    ApCheckRegMethod
    524  1.1.1.3    jruoho  *
    525  1.1.1.3    jruoho  * PARAMETERS:  Op                  - Current parse op
    526  1.1.1.3    jruoho  *
    527  1.1.1.3    jruoho  * RETURN:      None
    528  1.1.1.3    jruoho  *
    529  1.1.1.3    jruoho  * DESCRIPTION: Ensure that a _REG method has a corresponding Operation
    530  1.1.1.3    jruoho  *              Region declaration within the same scope. Note: _REG is defined
    531  1.1.1.3    jruoho  *              to have two arguments and must therefore be defined as a
    532  1.1.1.3    jruoho  *              control method.
    533  1.1.1.3    jruoho  *
    534  1.1.1.3    jruoho  ******************************************************************************/
    535  1.1.1.3    jruoho 
    536  1.1.1.3    jruoho void
    537  1.1.1.3    jruoho ApCheckRegMethod (
    538  1.1.1.3    jruoho     ACPI_PARSE_OBJECT       *Op)
    539  1.1.1.3    jruoho {
    540  1.1.1.3    jruoho     ACPI_PARSE_OBJECT       *Next;
    541  1.1.1.3    jruoho     ACPI_PARSE_OBJECT       *Parent;
    542  1.1.1.3    jruoho 
    543  1.1.1.3    jruoho 
    544  1.1.1.3    jruoho     /* We are only interested in _REG methods */
    545  1.1.1.3    jruoho 
    546  1.1.1.3    jruoho     if (!ACPI_COMPARE_NAME (METHOD_NAME__REG, &Op->Asl.NameSeg))
    547  1.1.1.3    jruoho     {
    548  1.1.1.3    jruoho         return;
    549  1.1.1.3    jruoho     }
    550  1.1.1.3    jruoho 
    551  1.1.1.3    jruoho     /* Get the start of the current scope */
    552  1.1.1.3    jruoho 
    553  1.1.1.3    jruoho     Parent = Op->Asl.Parent;
    554  1.1.1.3    jruoho     Next = Parent->Asl.Child;
    555  1.1.1.3    jruoho 
    556  1.1.1.3    jruoho     /* Search entire scope for an operation region declaration */
    557  1.1.1.3    jruoho 
    558  1.1.1.3    jruoho     while (Next)
    559  1.1.1.3    jruoho     {
    560  1.1.1.3    jruoho         if (Next->Asl.ParseOpcode == PARSEOP_OPERATIONREGION)
    561  1.1.1.3    jruoho         {
    562  1.1.1.3    jruoho             return; /* Found region, OK */
    563  1.1.1.3    jruoho         }
    564  1.1.1.3    jruoho 
    565  1.1.1.3    jruoho         Next = Next->Asl.Next;
    566  1.1.1.3    jruoho     }
    567  1.1.1.3    jruoho 
    568  1.1.1.3    jruoho     /* No region found, issue warning */
    569  1.1.1.3    jruoho 
    570  1.1.1.3    jruoho     AslError (ASL_WARNING, ASL_MSG_NO_REGION, Op, NULL);
    571  1.1.1.3    jruoho }
    572