acpica/dispatcher/dswload.c

db2bae30SDana Myers/******************************************************************************
db2bae30SDana Myers *
26f3cdf0SGordon Ross * Module Name: dswload - Dispatcher first pass namespace load callbacks
db2bae30SDana Myers *
db2bae30SDana Myers *****************************************************************************/
db2bae30SDana Myers
26f3cdf0SGordon Ross/*
*385cc6b4SJerry Jelinek * Copyright (C) 2000 - 2016, Intel Corp.
db2bae30SDana Myers * All rights reserved.
db2bae30SDana Myers *
26f3cdf0SGordon Ross * Redistribution and use in source and binary forms, with or without
26f3cdf0SGordon Ross * modification, are permitted provided that the following conditions
26f3cdf0SGordon Ross * are met:
26f3cdf0SGordon Ross * 1. Redistributions of source code must retain the above copyright
26f3cdf0SGordon Ross *    notice, this list of conditions, and the following disclaimer,
26f3cdf0SGordon Ross *    without modification.
26f3cdf0SGordon Ross * 2. Redistributions in binary form must reproduce at minimum a disclaimer
26f3cdf0SGordon Ross *    substantially similar to the "NO WARRANTY" disclaimer below
26f3cdf0SGordon Ross *    ("Disclaimer") and any redistribution must be conditioned upon
26f3cdf0SGordon Ross *    including a substantially similar Disclaimer requirement for further
26f3cdf0SGordon Ross *    binary redistribution.
26f3cdf0SGordon Ross * 3. Neither the names of the above-listed copyright holders nor the names
26f3cdf0SGordon Ross *    of any contributors may be used to endorse or promote products derived
26f3cdf0SGordon Ross *    from this software without specific prior written permission.
db2bae30SDana Myers *
26f3cdf0SGordon Ross * Alternatively, this software may be distributed under the terms of the
26f3cdf0SGordon Ross * GNU General Public License ("GPL") version 2 as published by the Free
26f3cdf0SGordon Ross * Software Foundation.
db2bae30SDana Myers *
26f3cdf0SGordon Ross * NO WARRANTY
26f3cdf0SGordon Ross * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
26f3cdf0SGordon Ross * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
26f3cdf0SGordon Ross * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR
26f3cdf0SGordon Ross * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
26f3cdf0SGordon Ross * HOLDERS OR CONTRIBUTORS BE LIABLE FOR SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26f3cdf0SGordon Ross * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
26f3cdf0SGordon Ross * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
26f3cdf0SGordon Ross * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
26f3cdf0SGordon Ross * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING
26f3cdf0SGordon Ross * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
26f3cdf0SGordon Ross * POSSIBILITY OF SUCH DAMAGES.
26f3cdf0SGordon Ross */
db2bae30SDana Myers
db2bae30SDana Myers#include "acpi.h"
aa2aa9a6SDana Myers#include "accommon.h"
db2bae30SDana Myers#include "acparser.h"
db2bae30SDana Myers#include "amlcode.h"
db2bae30SDana Myers#include "acdispat.h"
db2bae30SDana Myers#include "acinterp.h"
db2bae30SDana Myers#include "acnamesp.h"
db2bae30SDana Myers
db2bae30SDana Myers#ifdef ACPI_ASL_COMPILER
db2bae30SDana Myers#include "acdisasm.h"
db2bae30SDana Myers#endif
db2bae30SDana Myers
db2bae30SDana Myers#define _COMPONENT          ACPI_DISPATCHER
db2bae30SDana Myers        ACPI_MODULE_NAME    ("dswload")
db2bae30SDana Myers
db2bae30SDana Myers
db2bae30SDana Myers/*******************************************************************************
db2bae30SDana Myers *
db2bae30SDana Myers * FUNCTION:    AcpiDsInitCallbacks
db2bae30SDana Myers *
db2bae30SDana Myers * PARAMETERS:  WalkState       - Current state of the parse tree walk
db2bae30SDana Myers *              PassNumber      - 1, 2, or 3
db2bae30SDana Myers *
db2bae30SDana Myers * RETURN:      Status
db2bae30SDana Myers *
db2bae30SDana Myers * DESCRIPTION: Init walk state callbacks
db2bae30SDana Myers *
db2bae30SDana Myers ******************************************************************************/
db2bae30SDana Myers
db2bae30SDana MyersACPI_STATUS
db2bae30SDana MyersAcpiDsInitCallbacks (
db2bae30SDana Myers    ACPI_WALK_STATE         *WalkState,
db2bae30SDana Myers    UINT32                  PassNumber)
db2bae30SDana Myers{
db2bae30SDana Myers
db2bae30SDana Myers    switch (PassNumber)
db2bae30SDana Myers    {
*385cc6b4SJerry Jelinek    case 0:
*385cc6b4SJerry Jelinek
*385cc6b4SJerry Jelinek        /* Parse only - caller will setup callbacks */
*385cc6b4SJerry Jelinek
*385cc6b4SJerry Jelinek        WalkState->ParseFlags         = ACPI_PARSE_LOAD_PASS1 |
*385cc6b4SJerry Jelinek                                        ACPI_PARSE_DELETE_TREE |
*385cc6b4SJerry Jelinek                                        ACPI_PARSE_DISASSEMBLE;
*385cc6b4SJerry Jelinek        WalkState->DescendingCallback = NULL;
*385cc6b4SJerry Jelinek        WalkState->AscendingCallback  = NULL;
*385cc6b4SJerry Jelinek        break;
*385cc6b4SJerry Jelinek
db2bae30SDana Myers    case 1:
*385cc6b4SJerry Jelinek
*385cc6b4SJerry Jelinek        /* Load pass 1 */
*385cc6b4SJerry Jelinek
db2bae30SDana Myers        WalkState->ParseFlags         = ACPI_PARSE_LOAD_PASS1 |
db2bae30SDana Myers                                        ACPI_PARSE_DELETE_TREE;
db2bae30SDana Myers        WalkState->DescendingCallback = AcpiDsLoad1BeginOp;
db2bae30SDana Myers        WalkState->AscendingCallback  = AcpiDsLoad1EndOp;
db2bae30SDana Myers        break;
db2bae30SDana Myers
db2bae30SDana Myers    case 2:
*385cc6b4SJerry Jelinek
*385cc6b4SJerry Jelinek        /* Load pass 2 */
*385cc6b4SJerry Jelinek
db2bae30SDana Myers        WalkState->ParseFlags         = ACPI_PARSE_LOAD_PASS1 |
db2bae30SDana Myers                                        ACPI_PARSE_DELETE_TREE;
db2bae30SDana Myers        WalkState->DescendingCallback = AcpiDsLoad2BeginOp;
db2bae30SDana Myers        WalkState->AscendingCallback  = AcpiDsLoad2EndOp;
db2bae30SDana Myers        break;
db2bae30SDana Myers
db2bae30SDana Myers    case 3:
*385cc6b4SJerry Jelinek
*385cc6b4SJerry Jelinek        /* Execution pass */
*385cc6b4SJerry Jelinek
db2bae30SDana Myers#ifndef ACPI_NO_METHOD_EXECUTION
db2bae30SDana Myers        WalkState->ParseFlags        |= ACPI_PARSE_EXECUTE  |
db2bae30SDana Myers                                        ACPI_PARSE_DELETE_TREE;
db2bae30SDana Myers        WalkState->DescendingCallback = AcpiDsExecBeginOp;
db2bae30SDana Myers        WalkState->AscendingCallback  = AcpiDsExecEndOp;
db2bae30SDana Myers#endif
db2bae30SDana Myers        break;
db2bae30SDana Myers
db2bae30SDana Myers    default:
*385cc6b4SJerry Jelinek
db2bae30SDana Myers        return (AE_BAD_PARAMETER);
db2bae30SDana Myers    }
db2bae30SDana Myers
db2bae30SDana Myers    return (AE_OK);
db2bae30SDana Myers}
db2bae30SDana Myers
db2bae30SDana Myers
db2bae30SDana Myers/*******************************************************************************
db2bae30SDana Myers *
db2bae30SDana Myers * FUNCTION:    AcpiDsLoad1BeginOp
db2bae30SDana Myers *
db2bae30SDana Myers * PARAMETERS:  WalkState       - Current state of the parse tree walk
db2bae30SDana Myers *              OutOp           - Where to return op if a new one is created
db2bae30SDana Myers *
db2bae30SDana Myers * RETURN:      Status
db2bae30SDana Myers *
db2bae30SDana Myers * DESCRIPTION: Descending callback used during the loading of ACPI tables.
db2bae30SDana Myers *
db2bae30SDana Myers ******************************************************************************/
db2bae30SDana Myers
db2bae30SDana MyersACPI_STATUS
db2bae30SDana MyersAcpiDsLoad1BeginOp (
db2bae30SDana Myers    ACPI_WALK_STATE         *WalkState,
db2bae30SDana Myers    ACPI_PARSE_OBJECT       **OutOp)
db2bae30SDana Myers{
db2bae30SDana Myers    ACPI_PARSE_OBJECT       *Op;
db2bae30SDana Myers    ACPI_NAMESPACE_NODE     *Node;
db2bae30SDana Myers    ACPI_STATUS             Status;
db2bae30SDana Myers    ACPI_OBJECT_TYPE        ObjectType;
db2bae30SDana Myers    char                    *Path;
db2bae30SDana Myers    UINT32                  Flags;
db2bae30SDana Myers
db2bae30SDana Myers
db2bae30SDana Myers    ACPI_FUNCTION_TRACE (DsLoad1BeginOp);
db2bae30SDana Myers
db2bae30SDana Myers
db2bae30SDana Myers    Op = WalkState->Op;
db2bae30SDana Myers    ACPI_DEBUG_PRINT ((ACPI_DB_DISPATCH, "Op=%p State=%p\n", Op, WalkState));
db2bae30SDana Myers
db2bae30SDana Myers    /* We are only interested in opcodes that have an associated name */
db2bae30SDana Myers
db2bae30SDana Myers    if (Op)
db2bae30SDana Myers    {
db2bae30SDana Myers        if (!(WalkState->OpInfo->Flags & AML_NAMED))
db2bae30SDana Myers        {
db2bae30SDana Myers            *OutOp = Op;
db2bae30SDana Myers            return_ACPI_STATUS (AE_OK);
db2bae30SDana Myers        }
db2bae30SDana Myers
db2bae30SDana Myers        /* Check if this object has already been installed in the namespace */
db2bae30SDana Myers
db2bae30SDana Myers        if (Op->Common.Node)
db2bae30SDana Myers        {
db2bae30SDana Myers            *OutOp = Op;
db2bae30SDana Myers            return_ACPI_STATUS (AE_OK);
db2bae30SDana Myers        }
db2bae30SDana Myers    }
db2bae30SDana Myers
db2bae30SDana Myers    Path = AcpiPsGetNextNamestring (&WalkState->ParserState);
db2bae30SDana Myers
db2bae30SDana Myers    /* Map the raw opcode into an internal object type */
db2bae30SDana Myers
db2bae30SDana Myers    ObjectType = WalkState->OpInfo->ObjectType;
db2bae30SDana Myers
db2bae30SDana Myers    ACPI_DEBUG_PRINT ((ACPI_DB_DISPATCH,
*385cc6b4SJerry Jelinek        "State=%p Op=%p [%s]\n", WalkState, Op,
*385cc6b4SJerry Jelinek        AcpiUtGetTypeName (ObjectType)));
db2bae30SDana Myers
db2bae30SDana Myers    switch (WalkState->Opcode)
db2bae30SDana Myers    {
db2bae30SDana Myers    case AML_SCOPE_OP:
db2bae30SDana Myers        /*
db2bae30SDana Myers         * The target name of the Scope() operator must exist at this point so
db2bae30SDana Myers         * that we can actually open the scope to enter new names underneath it.
db2bae30SDana Myers         * Allow search-to-root for single namesegs.
db2bae30SDana Myers         */
db2bae30SDana Myers        Status = AcpiNsLookup (WalkState->ScopeInfo, Path, ObjectType,
db2bae30SDana Myers            ACPI_IMODE_EXECUTE, ACPI_NS_SEARCH_PARENT, WalkState, &(Node));
db2bae30SDana Myers#ifdef ACPI_ASL_COMPILER
db2bae30SDana Myers        if (Status == AE_NOT_FOUND)
db2bae30SDana Myers        {
db2bae30SDana Myers            /*
db2bae30SDana Myers             * Table disassembly:
db2bae30SDana Myers             * Target of Scope() not found. Generate an External for it, and
db2bae30SDana Myers             * insert the name into the namespace.
db2bae30SDana Myers             */
*385cc6b4SJerry Jelinek            AcpiDmAddOpToExternalList (Op, Path, ACPI_TYPE_DEVICE, 0, 0);
db2bae30SDana Myers            Status = AcpiNsLookup (WalkState->ScopeInfo, Path, ObjectType,
db2bae30SDana Myers               ACPI_IMODE_LOAD_PASS1, ACPI_NS_SEARCH_PARENT,
db2bae30SDana Myers               WalkState, &Node);
db2bae30SDana Myers        }
db2bae30SDana Myers#endif
db2bae30SDana Myers        if (ACPI_FAILURE (Status))
db2bae30SDana Myers        {
db2bae30SDana Myers            ACPI_ERROR_NAMESPACE (Path, Status);
db2bae30SDana Myers            return_ACPI_STATUS (Status);
db2bae30SDana Myers        }
db2bae30SDana Myers
db2bae30SDana Myers        /*
db2bae30SDana Myers         * Check to make sure that the target is
db2bae30SDana Myers         * one of the opcodes that actually opens a scope
db2bae30SDana Myers         */
db2bae30SDana Myers        switch (Node->Type)
db2bae30SDana Myers        {
db2bae30SDana Myers        case ACPI_TYPE_ANY:
db2bae30SDana Myers        case ACPI_TYPE_LOCAL_SCOPE:         /* Scope  */
db2bae30SDana Myers        case ACPI_TYPE_DEVICE:
db2bae30SDana Myers        case ACPI_TYPE_POWER:
db2bae30SDana Myers        case ACPI_TYPE_PROCESSOR:
db2bae30SDana Myers        case ACPI_TYPE_THERMAL:
db2bae30SDana Myers
db2bae30SDana Myers            /* These are acceptable types */
db2bae30SDana Myers            break;
db2bae30SDana Myers
db2bae30SDana Myers        case ACPI_TYPE_INTEGER:
db2bae30SDana Myers        case ACPI_TYPE_STRING:
db2bae30SDana Myers        case ACPI_TYPE_BUFFER:
db2bae30SDana Myers            /*
26f3cdf0SGordon Ross             * These types we will allow, but we will change the type.
26f3cdf0SGordon Ross             * This enables some existing code of the form:
db2bae30SDana Myers             *
db2bae30SDana Myers             *  Name (DEB, 0)
db2bae30SDana Myers             *  Scope (DEB) { ... }
db2bae30SDana Myers             *
26f3cdf0SGordon Ross             * Note: silently change the type here. On the second pass,
26f3cdf0SGordon Ross             * we will report a warning
db2bae30SDana Myers             */
db2bae30SDana Myers            ACPI_DEBUG_PRINT ((ACPI_DB_INFO,
26f3cdf0SGordon Ross                "Type override - [%4.4s] had invalid type (%s) "
26f3cdf0SGordon Ross                "for Scope operator, changed to type ANY\n",
26f3cdf0SGordon Ross                AcpiUtGetNodeName (Node), AcpiUtGetTypeName (Node->Type)));
db2bae30SDana Myers
db2bae30SDana Myers            Node->Type = ACPI_TYPE_ANY;
db2bae30SDana Myers            WalkState->ScopeInfo->Common.Value = ACPI_TYPE_ANY;
db2bae30SDana Myers            break;
db2bae30SDana Myers
*385cc6b4SJerry Jelinek        case ACPI_TYPE_METHOD:
*385cc6b4SJerry Jelinek            /*
*385cc6b4SJerry Jelinek             * Allow scope change to root during execution of module-level
*385cc6b4SJerry Jelinek             * code. Root is typed METHOD during this time.
*385cc6b4SJerry Jelinek             */
*385cc6b4SJerry Jelinek            if ((Node == AcpiGbl_RootNode) &&
*385cc6b4SJerry Jelinek                (WalkState->ParseFlags & ACPI_PARSE_MODULE_LEVEL))
*385cc6b4SJerry Jelinek            {
*385cc6b4SJerry Jelinek                break;
*385cc6b4SJerry Jelinek            }
*385cc6b4SJerry Jelinek
*385cc6b4SJerry Jelinek            /*lint -fallthrough */
*385cc6b4SJerry Jelinek
db2bae30SDana Myers        default:
db2bae30SDana Myers
db2bae30SDana Myers            /* All other types are an error */
db2bae30SDana Myers
db2bae30SDana Myers            ACPI_ERROR ((AE_INFO,
26f3cdf0SGordon Ross                "Invalid type (%s) for target of "
26f3cdf0SGordon Ross                "Scope operator [%4.4s] (Cannot override)",
26f3cdf0SGordon Ross                AcpiUtGetTypeName (Node->Type), AcpiUtGetNodeName (Node)));
db2bae30SDana Myers
db2bae30SDana Myers            return_ACPI_STATUS (AE_AML_OPERAND_TYPE);
db2bae30SDana Myers        }
db2bae30SDana Myers        break;
db2bae30SDana Myers
db2bae30SDana Myers    default:
db2bae30SDana Myers        /*
db2bae30SDana Myers         * For all other named opcodes, we will enter the name into
db2bae30SDana Myers         * the namespace.
db2bae30SDana Myers         *
db2bae30SDana Myers         * Setup the search flags.
db2bae30SDana Myers         * Since we are entering a name into the namespace, we do not want to
db2bae30SDana Myers         * enable the search-to-root upsearch.
db2bae30SDana Myers         *
db2bae30SDana Myers         * There are only two conditions where it is acceptable that the name
db2bae30SDana Myers         * already exists:
db2bae30SDana Myers         *    1) the Scope() operator can reopen a scoping object that was
db2bae30SDana Myers         *       previously defined (Scope, Method, Device, etc.)
db2bae30SDana Myers         *    2) Whenever we are parsing a deferred opcode (OpRegion, Buffer,
db2bae30SDana Myers         *       BufferField, or Package), the name of the object is already
db2bae30SDana Myers         *       in the namespace.
db2bae30SDana Myers         */
db2bae30SDana Myers        if (WalkState->DeferredNode)
db2bae30SDana Myers        {
db2bae30SDana Myers            /* This name is already in the namespace, get the node */
db2bae30SDana Myers
db2bae30SDana Myers            Node = WalkState->DeferredNode;
db2bae30SDana Myers            Status = AE_OK;
db2bae30SDana Myers            break;
db2bae30SDana Myers        }
db2bae30SDana Myers
db2bae30SDana Myers        /*
db2bae30SDana Myers         * If we are executing a method, do not create any namespace objects
db2bae30SDana Myers         * during the load phase, only during execution.
db2bae30SDana Myers         */
db2bae30SDana Myers        if (WalkState->MethodNode)
db2bae30SDana Myers        {
db2bae30SDana Myers            Node = NULL;
db2bae30SDana Myers            Status = AE_OK;
db2bae30SDana Myers            break;
db2bae30SDana Myers        }
db2bae30SDana Myers
db2bae30SDana Myers        Flags = ACPI_NS_NO_UPSEARCH;
db2bae30SDana Myers        if ((WalkState->Opcode != AML_SCOPE_OP) &&
db2bae30SDana Myers            (!(WalkState->ParseFlags & ACPI_PARSE_DEFERRED_OP)))
db2bae30SDana Myers        {
*385cc6b4SJerry Jelinek            if (WalkState->NamespaceOverride)
*385cc6b4SJerry Jelinek            {
*385cc6b4SJerry Jelinek                Flags |= ACPI_NS_OVERRIDE_IF_FOUND;
*385cc6b4SJerry Jelinek                ACPI_DEBUG_PRINT ((ACPI_DB_DISPATCH, "[%s] Override allowed\n",
*385cc6b4SJerry Jelinek                    AcpiUtGetTypeName (ObjectType)));
*385cc6b4SJerry Jelinek            }
*385cc6b4SJerry Jelinek            else
*385cc6b4SJerry Jelinek            {
db2bae30SDana Myers                Flags |= ACPI_NS_ERROR_IF_FOUND;
db2bae30SDana Myers                ACPI_DEBUG_PRINT ((ACPI_DB_DISPATCH, "[%s] Cannot already exist\n",
db2bae30SDana Myers                    AcpiUtGetTypeName (ObjectType)));
db2bae30SDana Myers            }
*385cc6b4SJerry Jelinek        }
db2bae30SDana Myers        else
db2bae30SDana Myers        {
db2bae30SDana Myers            ACPI_DEBUG_PRINT ((ACPI_DB_DISPATCH,
db2bae30SDana Myers                "[%s] Both Find or Create allowed\n",
db2bae30SDana Myers                AcpiUtGetTypeName (ObjectType)));
db2bae30SDana Myers        }
db2bae30SDana Myers
db2bae30SDana Myers        /*
db2bae30SDana Myers         * Enter the named type into the internal namespace. We enter the name
db2bae30SDana Myers         * as we go downward in the parse tree. Any necessary subobjects that
db2bae30SDana Myers         * involve arguments to the opcode must be created as we go back up the
db2bae30SDana Myers         * parse tree later.
db2bae30SDana Myers         */
db2bae30SDana Myers        Status = AcpiNsLookup (WalkState->ScopeInfo, Path, ObjectType,
db2bae30SDana Myers            ACPI_IMODE_LOAD_PASS1, Flags, WalkState, &Node);
db2bae30SDana Myers        if (ACPI_FAILURE (Status))
db2bae30SDana Myers        {
db2bae30SDana Myers            if (Status == AE_ALREADY_EXISTS)
db2bae30SDana Myers            {
db2bae30SDana Myers                /* The name already exists in this scope */
db2bae30SDana Myers
db2bae30SDana Myers                if (Node->Flags & ANOBJ_IS_EXTERNAL)
db2bae30SDana Myers                {
db2bae30SDana Myers                    /*
db2bae30SDana Myers                     * Allow one create on an object or segment that was
db2bae30SDana Myers                     * previously declared External
db2bae30SDana Myers                     */
db2bae30SDana Myers                    Node->Flags &= ~ANOBJ_IS_EXTERNAL;
db2bae30SDana Myers                    Node->Type = (UINT8) ObjectType;
db2bae30SDana Myers
db2bae30SDana Myers                    /* Just retyped a node, probably will need to open a scope */
db2bae30SDana Myers
db2bae30SDana Myers                    if (AcpiNsOpensScope (ObjectType))
db2bae30SDana Myers                    {
*385cc6b4SJerry Jelinek                        Status = AcpiDsScopeStackPush (
*385cc6b4SJerry Jelinek                            Node, ObjectType, WalkState);
db2bae30SDana Myers                        if (ACPI_FAILURE (Status))
db2bae30SDana Myers                        {
db2bae30SDana Myers                            return_ACPI_STATUS (Status);
db2bae30SDana Myers                        }
db2bae30SDana Myers                    }
db2bae30SDana Myers
db2bae30SDana Myers                    Status = AE_OK;
db2bae30SDana Myers                }
db2bae30SDana Myers            }
db2bae30SDana Myers
db2bae30SDana Myers            if (ACPI_FAILURE (Status))
db2bae30SDana Myers            {
db2bae30SDana Myers                ACPI_ERROR_NAMESPACE (Path, Status);
db2bae30SDana Myers                return_ACPI_STATUS (Status);
db2bae30SDana Myers            }
db2bae30SDana Myers        }
db2bae30SDana Myers        break;
db2bae30SDana Myers    }
db2bae30SDana Myers
db2bae30SDana Myers    /* Common exit */
db2bae30SDana Myers
db2bae30SDana Myers    if (!Op)
db2bae30SDana Myers    {
db2bae30SDana Myers        /* Create a new op */
db2bae30SDana Myers
*385cc6b4SJerry Jelinek        Op = AcpiPsAllocOp (WalkState->Opcode, WalkState->Aml);
db2bae30SDana Myers        if (!Op)
db2bae30SDana Myers        {
db2bae30SDana Myers            return_ACPI_STATUS (AE_NO_MEMORY);
db2bae30SDana Myers        }
db2bae30SDana Myers    }
db2bae30SDana Myers
db2bae30SDana Myers    /* Initialize the op */
db2bae30SDana Myers
db2bae30SDana Myers#if (defined (ACPI_NO_METHOD_EXECUTION) || defined (ACPI_CONSTANT_EVAL_ONLY))
db2bae30SDana Myers    Op->Named.Path = ACPI_CAST_PTR (UINT8, Path);
db2bae30SDana Myers#endif
db2bae30SDana Myers
db2bae30SDana Myers    if (Node)
db2bae30SDana Myers    {
db2bae30SDana Myers        /*
db2bae30SDana Myers         * Put the Node in the "op" object that the parser uses, so we
db2bae30SDana Myers         * can get it again quickly when this scope is closed
db2bae30SDana Myers         */
db2bae30SDana Myers        Op->Common.Node = Node;
db2bae30SDana Myers        Op->Named.Name = Node->Name.Integer;
db2bae30SDana Myers    }
db2bae30SDana Myers
db2bae30SDana Myers    AcpiPsAppendArg (AcpiPsGetParentScope (&WalkState->ParserState), Op);
db2bae30SDana Myers    *OutOp = Op;
db2bae30SDana Myers    return_ACPI_STATUS (Status);
db2bae30SDana Myers}
db2bae30SDana Myers
db2bae30SDana Myers
db2bae30SDana Myers/*******************************************************************************
db2bae30SDana Myers *
db2bae30SDana Myers * FUNCTION:    AcpiDsLoad1EndOp
db2bae30SDana Myers *
db2bae30SDana Myers * PARAMETERS:  WalkState       - Current state of the parse tree walk
db2bae30SDana Myers *
db2bae30SDana Myers * RETURN:      Status
db2bae30SDana Myers *
db2bae30SDana Myers * DESCRIPTION: Ascending callback used during the loading of the namespace,
db2bae30SDana Myers *              both control methods and everything else.
db2bae30SDana Myers *
db2bae30SDana Myers ******************************************************************************/
db2bae30SDana Myers
db2bae30SDana MyersACPI_STATUS
db2bae30SDana MyersAcpiDsLoad1EndOp (
db2bae30SDana Myers    ACPI_WALK_STATE         *WalkState)
db2bae30SDana Myers{
db2bae30SDana Myers    ACPI_PARSE_OBJECT       *Op;
db2bae30SDana Myers    ACPI_OBJECT_TYPE        ObjectType;
db2bae30SDana Myers    ACPI_STATUS             Status = AE_OK;
db2bae30SDana Myers
db2bae30SDana Myers
db2bae30SDana Myers    ACPI_FUNCTION_TRACE (DsLoad1EndOp);
db2bae30SDana Myers
db2bae30SDana Myers
db2bae30SDana Myers    Op = WalkState->Op;
db2bae30SDana Myers    ACPI_DEBUG_PRINT ((ACPI_DB_DISPATCH, "Op=%p State=%p\n", Op, WalkState));
db2bae30SDana Myers
db2bae30SDana Myers    /* We are only interested in opcodes that have an associated name */
db2bae30SDana Myers
db2bae30SDana Myers    if (!(WalkState->OpInfo->Flags & (AML_NAMED | AML_FIELD)))
db2bae30SDana Myers    {
db2bae30SDana Myers        return_ACPI_STATUS (AE_OK);
db2bae30SDana Myers    }
db2bae30SDana Myers
db2bae30SDana Myers    /* Get the object type to determine if we should pop the scope */
db2bae30SDana Myers
db2bae30SDana Myers    ObjectType = WalkState->OpInfo->ObjectType;
db2bae30SDana Myers
db2bae30SDana Myers#ifndef ACPI_NO_METHOD_EXECUTION
db2bae30SDana Myers    if (WalkState->OpInfo->Flags & AML_FIELD)
db2bae30SDana Myers    {
db2bae30SDana Myers        /*
db2bae30SDana Myers         * If we are executing a method, do not create any namespace objects
db2bae30SDana Myers         * during the load phase, only during execution.
db2bae30SDana Myers         */
db2bae30SDana Myers        if (!WalkState->MethodNode)
db2bae30SDana Myers        {
db2bae30SDana Myers            if (WalkState->Opcode == AML_FIELD_OP          ||
db2bae30SDana Myers                WalkState->Opcode == AML_BANK_FIELD_OP     ||
db2bae30SDana Myers                WalkState->Opcode == AML_INDEX_FIELD_OP)
db2bae30SDana Myers            {
db2bae30SDana Myers                Status = AcpiDsInitFieldObjects (Op, WalkState);
db2bae30SDana Myers            }
db2bae30SDana Myers        }
db2bae30SDana Myers        return_ACPI_STATUS (Status);
db2bae30SDana Myers    }
db2bae30SDana Myers
db2bae30SDana Myers    /*
db2bae30SDana Myers     * If we are executing a method, do not create any namespace objects
db2bae30SDana Myers     * during the load phase, only during execution.
db2bae30SDana Myers     */
db2bae30SDana Myers    if (!WalkState->MethodNode)
db2bae30SDana Myers    {
db2bae30SDana Myers        if (Op->Common.AmlOpcode == AML_REGION_OP)
db2bae30SDana Myers        {
db2bae30SDana Myers            Status = AcpiExCreateRegion (Op->Named.Data, Op->Named.Length,
*385cc6b4SJerry Jelinek                (ACPI_ADR_SPACE_TYPE)
*385cc6b4SJerry Jelinek                    ((Op->Common.Value.Arg)->Common.Value.Integer),
db2bae30SDana Myers                WalkState);
db2bae30SDana Myers            if (ACPI_FAILURE (Status))
db2bae30SDana Myers            {
db2bae30SDana Myers                return_ACPI_STATUS (Status);
db2bae30SDana Myers            }
db2bae30SDana Myers        }
db2bae30SDana Myers        else if (Op->Common.AmlOpcode == AML_DATA_REGION_OP)
db2bae30SDana Myers        {
db2bae30SDana Myers            Status = AcpiExCreateRegion (Op->Named.Data, Op->Named.Length,
26f3cdf0SGordon Ross                ACPI_ADR_SPACE_DATA_TABLE, WalkState);
db2bae30SDana Myers            if (ACPI_FAILURE (Status))
db2bae30SDana Myers            {
db2bae30SDana Myers                return_ACPI_STATUS (Status);
db2bae30SDana Myers            }
db2bae30SDana Myers        }
db2bae30SDana Myers    }
db2bae30SDana Myers#endif
db2bae30SDana Myers
db2bae30SDana Myers    if (Op->Common.AmlOpcode == AML_NAME_OP)
db2bae30SDana Myers    {
db2bae30SDana Myers        /* For Name opcode, get the object type from the argument */
db2bae30SDana Myers
db2bae30SDana Myers        if (Op->Common.Value.Arg)
db2bae30SDana Myers        {
db2bae30SDana Myers            ObjectType = (AcpiPsGetOpcodeInfo (
db2bae30SDana Myers                (Op->Common.Value.Arg)->Common.AmlOpcode))->ObjectType;
db2bae30SDana Myers
db2bae30SDana Myers            /* Set node type if we have a namespace node */
db2bae30SDana Myers
db2bae30SDana Myers            if (Op->Common.Node)
db2bae30SDana Myers            {
db2bae30SDana Myers                Op->Common.Node->Type = (UINT8) ObjectType;
db2bae30SDana Myers            }
db2bae30SDana Myers        }
db2bae30SDana Myers    }
db2bae30SDana Myers
db2bae30SDana Myers    /*
db2bae30SDana Myers     * If we are executing a method, do not create any namespace objects
db2bae30SDana Myers     * during the load phase, only during execution.
db2bae30SDana Myers     */
db2bae30SDana Myers    if (!WalkState->MethodNode)
db2bae30SDana Myers    {
db2bae30SDana Myers        if (Op->Common.AmlOpcode == AML_METHOD_OP)
db2bae30SDana Myers        {
db2bae30SDana Myers            /*
db2bae30SDana Myers             * MethodOp PkgLength NameString MethodFlags TermList
db2bae30SDana Myers             *
db2bae30SDana Myers             * Note: We must create the method node/object pair as soon as we
db2bae30SDana Myers             * see the method declaration. This allows later pass1 parsing
db2bae30SDana Myers             * of invocations of the method (need to know the number of
db2bae30SDana Myers             * arguments.)
db2bae30SDana Myers             */
db2bae30SDana Myers            ACPI_DEBUG_PRINT ((ACPI_DB_DISPATCH,
db2bae30SDana Myers                "LOADING-Method: State=%p Op=%p NamedObj=%p\n",
db2bae30SDana Myers                WalkState, Op, Op->Named.Node));
db2bae30SDana Myers
db2bae30SDana Myers            if (!AcpiNsGetAttachedObject (Op->Named.Node))
db2bae30SDana Myers            {
db2bae30SDana Myers                WalkState->Operands[0] = ACPI_CAST_PTR (void, Op->Named.Node);
db2bae30SDana Myers                WalkState->NumOperands = 1;
db2bae30SDana Myers
*385cc6b4SJerry Jelinek                Status = AcpiDsCreateOperands (
*385cc6b4SJerry Jelinek                    WalkState, Op->Common.Value.Arg);
db2bae30SDana Myers                if (ACPI_SUCCESS (Status))
db2bae30SDana Myers                {
db2bae30SDana Myers                    Status = AcpiExCreateMethod (Op->Named.Data,
db2bae30SDana Myers                        Op->Named.Length, WalkState);
db2bae30SDana Myers                }
db2bae30SDana Myers
db2bae30SDana Myers                WalkState->Operands[0] = NULL;
db2bae30SDana Myers                WalkState->NumOperands = 0;
db2bae30SDana Myers
db2bae30SDana Myers                if (ACPI_FAILURE (Status))
db2bae30SDana Myers                {
db2bae30SDana Myers                    return_ACPI_STATUS (Status);
db2bae30SDana Myers                }
db2bae30SDana Myers            }
db2bae30SDana Myers        }
db2bae30SDana Myers    }
db2bae30SDana Myers
db2bae30SDana Myers    /* Pop the scope stack (only if loading a table) */
db2bae30SDana Myers
db2bae30SDana Myers    if (!WalkState->MethodNode &&
db2bae30SDana Myers        AcpiNsOpensScope (ObjectType))
db2bae30SDana Myers    {
db2bae30SDana Myers        ACPI_DEBUG_PRINT ((ACPI_DB_DISPATCH, "(%s): Popping scope for Op %p\n",
db2bae30SDana Myers            AcpiUtGetTypeName (ObjectType), Op));
db2bae30SDana Myers
db2bae30SDana Myers        Status = AcpiDsScopeStackPop (WalkState);
db2bae30SDana Myers    }
db2bae30SDana Myers
db2bae30SDana Myers    return_ACPI_STATUS (Status);
db2bae30SDana Myers}