drivers/acpi/dispatcher/dsmthdat.c

   1 /*******************************************************************************
   2  *
   3  * Module Name: dsmthdat - control method arguments and local variables
   4  *
   5  ******************************************************************************/
   6
   7 /*
   8  * Copyright (C) 2000 - 2005, R. Byron Moore
   9  * All rights reserved.
  10  *
  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.
  25  *
  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.
  29  *
  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.
  42  */
  43
  44
  45 #include <acpi/acpi.h>
  46 #include <acpi/acdispat.h>
  47 #include <acpi/amlcode.h>
  48 #include <acpi/acnamesp.h>
  49 #include <acpi/acinterp.h>
  50
  51
  52 #define _COMPONENT          ACPI_DISPATCHER
  53          ACPI_MODULE_NAME    ("dsmthdat")
  54
  55
  56 /*******************************************************************************
  57  *
  58  * FUNCTION:    acpi_ds_method_data_init
  59  *
  60  * PARAMETERS:  walk_state          - Current walk state object
  61  *
  62  * RETURN:      Status
  63  *
  64  * DESCRIPTION: Initialize the data structures that hold the method's arguments
  65  *              and locals.  The data struct is an array of NTEs for each.
  66  *              This allows ref_of and de_ref_of to work properly for these
  67  *              special data types.
  68  *
  69  * NOTES:       walk_state fields are initialized to zero by the
  70  *              ACPI_MEM_CALLOCATE().
  71  *
  72  *              A pseudo-Namespace Node is assigned to each argument and local
  73  *              so that ref_of() can return a pointer to the Node.
  74  *
  75  ******************************************************************************/
  76
  77 void
  78 acpi_ds_method_data_init (
  79         struct acpi_walk_state          *walk_state)
  80 {
  81         u32                             i;
  82
  83
  84         ACPI_FUNCTION_TRACE ("ds_method_data_init");
  85
  86
  87         /* Init the method arguments */
  88
  89         for (i = 0; i < ACPI_METHOD_NUM_ARGS; i++) {
  90                 ACPI_MOVE_32_TO_32 (&walk_state->arguments[i].name,
  91                                    NAMEOF_ARG_NTE);
  92                 walk_state->arguments[i].name.integer |= (i << 24);
  93                 walk_state->arguments[i].descriptor   = ACPI_DESC_TYPE_NAMED;
  94                 walk_state->arguments[i].type         = ACPI_TYPE_ANY;
  95                 walk_state->arguments[i].flags        = ANOBJ_END_OF_PEER_LIST | ANOBJ_METHOD_ARG;
  96         }
  97
  98         /* Init the method locals */
  99
 100         for (i = 0; i < ACPI_METHOD_NUM_LOCALS; i++) {
 101                 ACPI_MOVE_32_TO_32 (&walk_state->local_variables[i].name,
 102                                    NAMEOF_LOCAL_NTE);
 103
 104                 walk_state->local_variables[i].name.integer |= (i << 24);
 105                 walk_state->local_variables[i].descriptor  = ACPI_DESC_TYPE_NAMED;
 106                 walk_state->local_variables[i].type        = ACPI_TYPE_ANY;
 107                 walk_state->local_variables[i].flags       = ANOBJ_END_OF_PEER_LIST | ANOBJ_METHOD_LOCAL;
 108         }
 109
 110         return_VOID;
 111 }
 112
 113
 114 /*******************************************************************************
 115  *
 116  * FUNCTION:    acpi_ds_method_data_delete_all
 117  *
 118  * PARAMETERS:  walk_state          - Current walk state object
 119  *
 120  * RETURN:      None
 121  *
 122  * DESCRIPTION: Delete method locals and arguments.  Arguments are only
 123  *              deleted if this method was called from another method.
 124  *
 125  ******************************************************************************/
 126
 127 void
 128 acpi_ds_method_data_delete_all (
 129         struct acpi_walk_state          *walk_state)
 130 {
 131         u32                             index;
 132
 133
 134         ACPI_FUNCTION_TRACE ("ds_method_data_delete_all");
 135
 136
 137         /* Detach the locals */
 138
 139         for (index = 0; index < ACPI_METHOD_NUM_LOCALS; index++) {
 140                 if (walk_state->local_variables[index].object) {
 141                         ACPI_DEBUG_PRINT ((ACPI_DB_EXEC, "Deleting Local%d=%p\n",
 142                                         index, walk_state->local_variables[index].object));
 143
 144                         /* Detach object (if present) and remove a reference */
 145
 146                         acpi_ns_detach_object (&walk_state->local_variables[index]);
 147                 }
 148         }
 149
 150         /* Detach the arguments */
 151
 152         for (index = 0; index < ACPI_METHOD_NUM_ARGS; index++) {
 153                 if (walk_state->arguments[index].object) {
 154                         ACPI_DEBUG_PRINT ((ACPI_DB_EXEC, "Deleting Arg%d=%p\n",
 155                                         index, walk_state->arguments[index].object));
 156
 157                         /* Detach object (if present) and remove a reference */
 158
 159                         acpi_ns_detach_object (&walk_state->arguments[index]);
 160                 }
 161         }
 162
 163         return_VOID;
 164 }
 165
 166
 167 /*******************************************************************************
 168  *
 169  * FUNCTION:    acpi_ds_method_data_init_args
 170  *
 171  * PARAMETERS:  *Params         - Pointer to a parameter list for the method
 172  *              max_param_count - The arg count for this method
 173  *              walk_state      - Current walk state object
 174  *
 175  * RETURN:      Status
 176  *
 177  * DESCRIPTION: Initialize arguments for a method.  The parameter list is a list
 178  *              of ACPI operand objects, either null terminated or whose length
 179  *              is defined by max_param_count.
 180  *
 181  ******************************************************************************/
 182
 183 acpi_status
 184 acpi_ds_method_data_init_args (
 185         union acpi_operand_object       **params,
 186         u32                             max_param_count,
 187         struct acpi_walk_state          *walk_state)
 188 {
 189         acpi_status                     status;
 190         u32                             index = 0;
 191
 192
 193         ACPI_FUNCTION_TRACE_PTR ("ds_method_data_init_args", params);
 194
 195
 196         if (!params) {
 197                 ACPI_DEBUG_PRINT ((ACPI_DB_EXEC, "No param list passed to method\n"));
 198                 return_ACPI_STATUS (AE_OK);
 199         }
 200
 201         /* Copy passed parameters into the new method stack frame  */
 202
 203         while ((index < ACPI_METHOD_NUM_ARGS) && (index < max_param_count) && params[index]) {
 204                 /*
 205                  * A valid parameter.
 206                  * Store the argument in the method/walk descriptor.
 207                  * Do not copy the arg in order to implement call by reference
 208                  */
 209                 status = acpi_ds_method_data_set_value (AML_ARG_OP, index, params[index], walk_state);
 210                 if (ACPI_FAILURE (status)) {
 211                         return_ACPI_STATUS (status);
 212                 }
 213
 214                 index++;
 215         }
 216
 217         ACPI_DEBUG_PRINT ((ACPI_DB_EXEC, "%d args passed to method\n", index));
 218         return_ACPI_STATUS (AE_OK);
 219 }
 220
 221
 222 /*******************************************************************************
 223  *
 224  * FUNCTION:    acpi_ds_method_data_get_node
 225  *
 226  * PARAMETERS:  Opcode              - Either AML_LOCAL_OP or AML_ARG_OP
 227  *              Index               - which local_var or argument whose type
 228  *                                      to get
 229  *              walk_state          - Current walk state object
 230  *
 231  * RETURN:      Get the Node associated with a local or arg.
 232  *
 233  ******************************************************************************/
 234
 235 acpi_status
 236 acpi_ds_method_data_get_node (
 237         u16                             opcode,
 238         u32                             index,
 239         struct acpi_walk_state          *walk_state,
 240         struct acpi_namespace_node      **node)
 241 {
 242         ACPI_FUNCTION_TRACE ("ds_method_data_get_node");
 243
 244
 245         /*
 246          * Method Locals and Arguments are supported
 247          */
 248         switch (opcode) {
 249         case AML_LOCAL_OP:
 250
 251                 if (index > ACPI_METHOD_MAX_LOCAL) {
 252                         ACPI_DEBUG_PRINT ((ACPI_DB_ERROR, "Local index %d is invalid (max %d)\n",
 253                                 index, ACPI_METHOD_MAX_LOCAL));
 254                         return_ACPI_STATUS (AE_AML_INVALID_INDEX);
 255                 }
 256
 257                 /* Return a pointer to the pseudo-node */
 258
 259                 *node = &walk_state->local_variables[index];
 260                 break;
 261
 262         case AML_ARG_OP:
 263
 264                 if (index > ACPI_METHOD_MAX_ARG) {
 265                         ACPI_DEBUG_PRINT ((ACPI_DB_ERROR, "Arg index %d is invalid (max %d)\n",
 266                                 index, ACPI_METHOD_MAX_ARG));
 267                         return_ACPI_STATUS (AE_AML_INVALID_INDEX);
 268                 }
 269
 270                 /* Return a pointer to the pseudo-node */
 271
 272                 *node = &walk_state->arguments[index];
 273                 break;
 274
 275         default:
 276                 ACPI_DEBUG_PRINT ((ACPI_DB_ERROR, "Opcode %d is invalid\n", opcode));
 277                 return_ACPI_STATUS (AE_AML_BAD_OPCODE);
 278         }
 279
 280         return_ACPI_STATUS (AE_OK);
 281 }
 282
 283
 284 /*******************************************************************************
 285  *
 286  * FUNCTION:    acpi_ds_method_data_set_value
 287  *
 288  * PARAMETERS:  Opcode              - Either AML_LOCAL_OP or AML_ARG_OP
 289  *              Index               - which local_var or argument to get
 290  *              Object              - Object to be inserted into the stack entry
 291  *              walk_state          - Current walk state object
 292  *
 293  * RETURN:      Status
 294  *
 295  * DESCRIPTION: Insert an object onto the method stack at entry Opcode:Index.
 296  *              Note: There is no "implicit conversion" for locals.
 297  *
 298  ******************************************************************************/
 299
 300 acpi_status
 301 acpi_ds_method_data_set_value (
 302         u16                             opcode,
 303         u32                             index,
 304         union acpi_operand_object       *object,
 305         struct acpi_walk_state          *walk_state)
 306 {
 307         acpi_status                     status;
 308         struct acpi_namespace_node      *node;
 309
 310
 311         ACPI_FUNCTION_TRACE ("ds_method_data_set_value");
 312
 313
 314         ACPI_DEBUG_PRINT ((ACPI_DB_EXEC,
 315                 "new_obj %p Opcode %X, Refs=%d [%s]\n", object,
 316                 opcode, object->common.reference_count,
 317                 acpi_ut_get_type_name (object->common.type)));
 318
 319         /* Get the namespace node for the arg/local */
 320
 321         status = acpi_ds_method_data_get_node (opcode, index, walk_state, &node);
 322         if (ACPI_FAILURE (status)) {
 323                 return_ACPI_STATUS (status);
 324         }
 325
 326         /*
 327          * Increment ref count so object can't be deleted while installed.
 328          * NOTE: We do not copy the object in order to preserve the call by
 329          * reference semantics of ACPI Control Method invocation.
 330          * (See ACPI specification 2.0_c)
 331          */
 332         acpi_ut_add_reference (object);
 333
 334         /* Install the object */
 335
 336         node->object = object;
 337         return_ACPI_STATUS (status);
 338 }
 339
 340
 341 /*******************************************************************************
 342  *
 343  * FUNCTION:    acpi_ds_method_data_get_type
 344  *
 345  * PARAMETERS:  Opcode              - Either AML_LOCAL_OP or AML_ARG_OP
 346  *              Index               - which local_var or argument whose type
 347  *                                      to get
 348  *              walk_state          - Current walk state object
 349  *
 350  * RETURN:      Data type of current value of the selected Arg or Local
 351  *
 352  ******************************************************************************/
 353 #ifdef ACPI_FUTURE_USAGE
 354 acpi_object_type
 355 acpi_ds_method_data_get_type (
 356         u16                             opcode,
 357         u32                             index,
 358         struct acpi_walk_state          *walk_state)
 359 {
 360         acpi_status                     status;
 361         struct acpi_namespace_node      *node;
 362         union acpi_operand_object       *object;
 363
 364
 365         ACPI_FUNCTION_TRACE ("ds_method_data_get_type");
 366
 367
 368         /* Get the namespace node for the arg/local */
 369
 370         status = acpi_ds_method_data_get_node (opcode, index, walk_state, &node);
 371         if (ACPI_FAILURE (status)) {
 372                 return_VALUE ((ACPI_TYPE_NOT_FOUND));
 373         }
 374
 375         /* Get the object */
 376
 377         object = acpi_ns_get_attached_object (node);
 378         if (!object) {
 379                 /* Uninitialized local/arg, return TYPE_ANY */
 380
 381                 return_VALUE (ACPI_TYPE_ANY);
 382         }
 383
 384         /* Get the object type */
 385
 386         return_VALUE (ACPI_GET_OBJECT_TYPE (object));
 387 }
 388 #endif  /*  ACPI_FUTURE_USAGE  */
 389
 390
 391 /*******************************************************************************
 392  *
 393  * FUNCTION:    acpi_ds_method_data_get_value
 394  *
 395  * PARAMETERS:  Opcode              - Either AML_LOCAL_OP or AML_ARG_OP
 396  *              Index               - which local_var or argument to get
 397  *              walk_state          - Current walk state object
 398  *              *dest_desc          - Ptr to Descriptor into which selected Arg
 399  *                                    or Local value should be copied
 400  *
 401  * RETURN:      Status
 402  *
 403  * DESCRIPTION: Retrieve value of selected Arg or Local from the method frame
 404  *              at the current top of the method stack.
 405  *              Used only in acpi_ex_resolve_to_value().
 406  *
 407  ******************************************************************************/
 408
 409 acpi_status
 410 acpi_ds_method_data_get_value (
 411         u16                             opcode,
 412         u32                             index,
 413         struct acpi_walk_state          *walk_state,
 414         union acpi_operand_object       **dest_desc)
 415 {
 416         acpi_status                     status;
 417         struct acpi_namespace_node      *node;
 418         union acpi_operand_object       *object;
 419
 420
 421         ACPI_FUNCTION_TRACE ("ds_method_data_get_value");
 422
 423
 424         /* Validate the object descriptor */
 425
 426         if (!dest_desc) {
 427                 ACPI_DEBUG_PRINT ((ACPI_DB_ERROR, "Null object descriptor pointer\n"));
 428                 return_ACPI_STATUS (AE_BAD_PARAMETER);
 429         }
 430
 431         /* Get the namespace node for the arg/local */
 432
 433         status = acpi_ds_method_data_get_node (opcode, index, walk_state, &node);
 434         if (ACPI_FAILURE (status)) {
 435                 return_ACPI_STATUS (status);
 436         }
 437
 438         /* Get the object from the node */
 439
 440         object = node->object;
 441
 442         /* Examine the returned object, it must be valid. */
 443
 444         if (!object) {
 445                 /*
 446                  * Index points to uninitialized object.
 447                  * This means that either 1) The expected argument was
 448                  * not passed to the method, or 2) A local variable
 449                  * was referenced by the method (via the ASL)
 450                  * before it was initialized.  Either case is an error.
 451                  */
 452
 453                 /* If slack enabled, init the local_x/arg_x to an Integer of value zero */
 454
 455                 if (acpi_gbl_enable_interpreter_slack) {
 456                         object = acpi_ut_create_internal_object (ACPI_TYPE_INTEGER);
 457                         if (!object) {
 458                                 return_ACPI_STATUS (AE_NO_MEMORY);
 459                         }
 460
 461                         object->integer.value = 0;
 462                         node->object = object;
 463                 }
 464
 465                 /* Otherwise, return the error */
 466
 467                 else switch (opcode) {
 468                 case AML_ARG_OP:
 469
 470                         ACPI_DEBUG_PRINT ((ACPI_DB_ERROR, "Uninitialized Arg[%d] at node %p\n",
 471                                 index, node));
 472
 473                         return_ACPI_STATUS (AE_AML_UNINITIALIZED_ARG);
 474
 475                 case AML_LOCAL_OP:
 476
 477                         ACPI_DEBUG_PRINT ((ACPI_DB_ERROR, "Uninitialized Local[%d] at node %p\n",
 478                                 index, node));
 479
 480                         return_ACPI_STATUS (AE_AML_UNINITIALIZED_LOCAL);
 481
 482                 default:
 483                         ACPI_REPORT_ERROR (("Not Arg/Local opcode: %X\n", opcode));
 484                         return_ACPI_STATUS (AE_AML_INTERNAL);
 485                 }
 486         }
 487
 488         /*
 489          * The Index points to an initialized and valid object.
 490          * Return an additional reference to the object
 491          */
 492         *dest_desc = object;
 493         acpi_ut_add_reference (object);
 494
 495         return_ACPI_STATUS (AE_OK);
 496 }
 497
 498
 499 /*******************************************************************************
 500  *
 501  * FUNCTION:    acpi_ds_method_data_delete_value
 502  *
 503  * PARAMETERS:  Opcode              - Either AML_LOCAL_OP or AML_ARG_OP
 504  *              Index               - which local_var or argument to delete
 505  *              walk_state          - Current walk state object
 506  *
 507  * RETURN:      None
 508  *
 509  * DESCRIPTION: Delete the entry at Opcode:Index on the method stack.  Inserts
 510  *              a null into the stack slot after the object is deleted.
 511  *
 512  ******************************************************************************/
 513
 514 void
 515 acpi_ds_method_data_delete_value (
 516         u16                             opcode,
 517         u32                             index,
 518         struct acpi_walk_state          *walk_state)
 519 {
 520         acpi_status                     status;
 521         struct acpi_namespace_node      *node;
 522         union acpi_operand_object       *object;
 523
 524
 525         ACPI_FUNCTION_TRACE ("ds_method_data_delete_value");
 526
 527
 528         /* Get the namespace node for the arg/local */
 529
 530         status = acpi_ds_method_data_get_node (opcode, index, walk_state, &node);
 531         if (ACPI_FAILURE (status)) {
 532                 return_VOID;
 533         }
 534
 535         /* Get the associated object */
 536
 537         object = acpi_ns_get_attached_object (node);
 538
 539         /*
 540          * Undefine the Arg or Local by setting its descriptor
 541          * pointer to NULL. Locals/Args can contain both
 542          * ACPI_OPERAND_OBJECTS and ACPI_NAMESPACE_NODEs
 543          */
 544         node->object = NULL;
 545
 546         if ((object) &&
 547                 (ACPI_GET_DESCRIPTOR_TYPE (object) == ACPI_DESC_TYPE_OPERAND)) {
 548                 /*
 549                  * There is a valid object.
 550                  * Decrement the reference count by one to balance the
 551                  * increment when the object was stored.
 552                  */
 553                 acpi_ut_remove_reference (object);
 554         }
 555
 556         return_VOID;
 557 }
 558
 559
 560 /*******************************************************************************
 561  *
 562  * FUNCTION:    acpi_ds_store_object_to_local
 563  *
 564  * PARAMETERS:  Opcode              - Either AML_LOCAL_OP or AML_ARG_OP
 565  *              Index               - which local_var or argument to set
 566  *              obj_desc            - Value to be stored
 567  *              walk_state          - Current walk state
 568  *
 569  * RETURN:      Status
 570  *
 571  * DESCRIPTION: Store a value in an Arg or Local.  The obj_desc is installed
 572  *              as the new value for the Arg or Local and the reference count
 573  *              for obj_desc is incremented.
 574  *
 575  ******************************************************************************/
 576
 577 acpi_status
 578 acpi_ds_store_object_to_local (
 579         u16                             opcode,
 580         u32                             index,
 581         union acpi_operand_object       *obj_desc,
 582         struct acpi_walk_state          *walk_state)
 583 {
 584         acpi_status                     status;
 585         struct acpi_namespace_node      *node;
 586         union acpi_operand_object       *current_obj_desc;
 587         union acpi_operand_object       *new_obj_desc;
 588
 589
 590         ACPI_FUNCTION_TRACE ("ds_store_object_to_local");
 591         ACPI_DEBUG_PRINT ((ACPI_DB_EXEC, "Opcode=%X Index=%d Obj=%p\n",
 592                 opcode, index, obj_desc));
 593
 594         /* Parameter validation */
 595
 596         if (!obj_desc) {
 597                 return_ACPI_STATUS (AE_BAD_PARAMETER);
 598         }
 599
 600         /* Get the namespace node for the arg/local */
 601
 602         status = acpi_ds_method_data_get_node (opcode, index, walk_state, &node);
 603         if (ACPI_FAILURE (status)) {
 604                 return_ACPI_STATUS (status);
 605         }
 606
 607         current_obj_desc = acpi_ns_get_attached_object (node);
 608         if (current_obj_desc == obj_desc) {
 609                 ACPI_DEBUG_PRINT ((ACPI_DB_EXEC, "Obj=%p already installed!\n",
 610                         obj_desc));
 611                 return_ACPI_STATUS (status);
 612         }
 613
 614         /*
 615          * If the reference count on the object is more than one, we must
 616          * take a copy of the object before we store.  A reference count
 617          * of exactly 1 means that the object was just created during the
 618          * evaluation of an expression, and we can safely use it since it
 619          * is not used anywhere else.
 620          */
 621         new_obj_desc = obj_desc;
 622         if (obj_desc->common.reference_count > 1) {
 623                 status = acpi_ut_copy_iobject_to_iobject (obj_desc, &new_obj_desc, walk_state);
 624                 if (ACPI_FAILURE (status)) {
 625                         return_ACPI_STATUS (status);
 626                 }
 627         }
 628
 629         /*
 630          * If there is an object already in this slot, we either
 631          * have to delete it, or if this is an argument and there
 632          * is an object reference stored there, we have to do
 633          * an indirect store!
 634          */
 635         if (current_obj_desc) {
 636                 /*
 637                  * Check for an indirect store if an argument
 638                  * contains an object reference (stored as an Node).
 639                  * We don't allow this automatic dereferencing for
 640                  * locals, since a store to a local should overwrite
 641                  * anything there, including an object reference.
 642                  *
 643                  * If both Arg0 and Local0 contain ref_of (Local4):
 644                  *
 645                  * Store (1, Arg0)             - Causes indirect store to local4
 646                  * Store (1, Local0)           - Stores 1 in local0, overwriting
 647                  *                                  the reference to local4
 648                  * Store (1, de_refof (Local0)) - Causes indirect store to local4
 649                  *
 650                  * Weird, but true.
 651                  */
 652                 if (opcode == AML_ARG_OP) {
 653                         /*
 654                          * Make sure that the object is the correct type.  This may be overkill, but
 655                          * it is here because references were NS nodes in the past.  Now they are
 656                          * operand objects of type Reference.
 657                          */
 658                         if (ACPI_GET_DESCRIPTOR_TYPE (current_obj_desc) != ACPI_DESC_TYPE_OPERAND) {
 659                                 ACPI_REPORT_ERROR (("Invalid descriptor type while storing to method arg: [%s]\n",
 660                                                 acpi_ut_get_descriptor_name (current_obj_desc)));
 661                                 return_ACPI_STATUS (AE_AML_INTERNAL);
 662                         }
 663
 664                         /*
 665                          * If we have a valid reference object that came from ref_of(), do the
 666                          * indirect store
 667                          */
 668                         if ((current_obj_desc->common.type == ACPI_TYPE_LOCAL_REFERENCE) &&
 669                                 (current_obj_desc->reference.opcode == AML_REF_OF_OP)) {
 670                                 ACPI_DEBUG_PRINT ((ACPI_DB_EXEC,
 671                                                 "Arg (%p) is an obj_ref(Node), storing in node %p\n",
 672                                                 new_obj_desc, current_obj_desc));
 673
 674                                 /*
 675                                  * Store this object to the Node (perform the indirect store)
 676                                  * NOTE: No implicit conversion is performed, as per the ACPI
 677                                  * specification rules on storing to Locals/Args.
 678                                  */
 679                                 status = acpi_ex_store_object_to_node (new_obj_desc,
 680                                                  current_obj_desc->reference.object, walk_state,
 681                                                  ACPI_NO_IMPLICIT_CONVERSION);
 682
 683                                 /* Remove local reference if we copied the object above */
 684
 685                                 if (new_obj_desc != obj_desc) {
 686                                         acpi_ut_remove_reference (new_obj_desc);
 687                                 }
 688                                 return_ACPI_STATUS (status);
 689                         }
 690                 }
 691
 692                 /*
 693                  * Delete the existing object
 694                  * before storing the new one
 695                  */
 696                 acpi_ds_method_data_delete_value (opcode, index, walk_state);
 697         }
 698
 699         /*
 700          * Install the Obj descriptor (*new_obj_desc) into
 701          * the descriptor for the Arg or Local.
 702          * (increments the object reference count by one)
 703          */
 704         status = acpi_ds_method_data_set_value (opcode, index, new_obj_desc, walk_state);
 705
 706         /* Remove local reference if we copied the object above */
 707
 708         if (new_obj_desc != obj_desc) {
 709                 acpi_ut_remove_reference (new_obj_desc);
 710         }
 711
 712         return_ACPI_STATUS (status);
 713 }
 714
 715