xref: /onnv-gate/usr/src/uts/intel/io/acpica/executer/exfield.c (revision 7851:e828bbb1689c)
1*7851SDana.Myers@Sun.COM /******************************************************************************
2*7851SDana.Myers@Sun.COM  *
3*7851SDana.Myers@Sun.COM  * Module Name: exfield - ACPI AML (p-code) execution - field manipulation
4*7851SDana.Myers@Sun.COM  *              $Revision: 1.133 $
5*7851SDana.Myers@Sun.COM  *
6*7851SDana.Myers@Sun.COM  *****************************************************************************/
7*7851SDana.Myers@Sun.COM 
8*7851SDana.Myers@Sun.COM /******************************************************************************
9*7851SDana.Myers@Sun.COM  *
10*7851SDana.Myers@Sun.COM  * 1. Copyright Notice
11*7851SDana.Myers@Sun.COM  *
12*7851SDana.Myers@Sun.COM  * Some or all of this work - Copyright (c) 1999 - 2008, Intel Corp.
13*7851SDana.Myers@Sun.COM  * All rights reserved.
14*7851SDana.Myers@Sun.COM  *
15*7851SDana.Myers@Sun.COM  * 2. License
16*7851SDana.Myers@Sun.COM  *
17*7851SDana.Myers@Sun.COM  * 2.1. This is your license from Intel Corp. under its intellectual property
18*7851SDana.Myers@Sun.COM  * rights.  You may have additional license terms from the party that provided
19*7851SDana.Myers@Sun.COM  * you this software, covering your right to use that party's intellectual
20*7851SDana.Myers@Sun.COM  * property rights.
21*7851SDana.Myers@Sun.COM  *
22*7851SDana.Myers@Sun.COM  * 2.2. Intel grants, free of charge, to any person ("Licensee") obtaining a
23*7851SDana.Myers@Sun.COM  * copy of the source code appearing in this file ("Covered Code") an
24*7851SDana.Myers@Sun.COM  * irrevocable, perpetual, worldwide license under Intel's copyrights in the
25*7851SDana.Myers@Sun.COM  * base code distributed originally by Intel ("Original Intel Code") to copy,
26*7851SDana.Myers@Sun.COM  * make derivatives, distribute, use and display any portion of the Covered
27*7851SDana.Myers@Sun.COM  * Code in any form, with the right to sublicense such rights; and
28*7851SDana.Myers@Sun.COM  *
29*7851SDana.Myers@Sun.COM  * 2.3. Intel grants Licensee a non-exclusive and non-transferable patent
30*7851SDana.Myers@Sun.COM  * license (with the right to sublicense), under only those claims of Intel
31*7851SDana.Myers@Sun.COM  * patents that are infringed by the Original Intel Code, to make, use, sell,
32*7851SDana.Myers@Sun.COM  * offer to sell, and import the Covered Code and derivative works thereof
33*7851SDana.Myers@Sun.COM  * solely to the minimum extent necessary to exercise the above copyright
34*7851SDana.Myers@Sun.COM  * license, and in no event shall the patent license extend to any additions
35*7851SDana.Myers@Sun.COM  * to or modifications of the Original Intel Code.  No other license or right
36*7851SDana.Myers@Sun.COM  * is granted directly or by implication, estoppel or otherwise;
37*7851SDana.Myers@Sun.COM  *
38*7851SDana.Myers@Sun.COM  * The above copyright and patent license is granted only if the following
39*7851SDana.Myers@Sun.COM  * conditions are met:
40*7851SDana.Myers@Sun.COM  *
41*7851SDana.Myers@Sun.COM  * 3. Conditions
42*7851SDana.Myers@Sun.COM  *
43*7851SDana.Myers@Sun.COM  * 3.1. Redistribution of Source with Rights to Further Distribute Source.
44*7851SDana.Myers@Sun.COM  * Redistribution of source code of any substantial portion of the Covered
45*7851SDana.Myers@Sun.COM  * Code or modification with rights to further distribute source must include
46*7851SDana.Myers@Sun.COM  * the above Copyright Notice, the above License, this list of Conditions,
47*7851SDana.Myers@Sun.COM  * and the following Disclaimer and Export Compliance provision.  In addition,
48*7851SDana.Myers@Sun.COM  * Licensee must cause all Covered Code to which Licensee contributes to
49*7851SDana.Myers@Sun.COM  * contain a file documenting the changes Licensee made to create that Covered
50*7851SDana.Myers@Sun.COM  * Code and the date of any change.  Licensee must include in that file the
51*7851SDana.Myers@Sun.COM  * documentation of any changes made by any predecessor Licensee.  Licensee
52*7851SDana.Myers@Sun.COM  * must include a prominent statement that the modification is derived,
53*7851SDana.Myers@Sun.COM  * directly or indirectly, from Original Intel Code.
54*7851SDana.Myers@Sun.COM  *
55*7851SDana.Myers@Sun.COM  * 3.2. Redistribution of Source with no Rights to Further Distribute Source.
56*7851SDana.Myers@Sun.COM  * Redistribution of source code of any substantial portion of the Covered
57*7851SDana.Myers@Sun.COM  * Code or modification without rights to further distribute source must
58*7851SDana.Myers@Sun.COM  * include the following Disclaimer and Export Compliance provision in the
59*7851SDana.Myers@Sun.COM  * documentation and/or other materials provided with distribution.  In
60*7851SDana.Myers@Sun.COM  * addition, Licensee may not authorize further sublicense of source of any
61*7851SDana.Myers@Sun.COM  * portion of the Covered Code, and must include terms to the effect that the
62*7851SDana.Myers@Sun.COM  * license from Licensee to its licensee is limited to the intellectual
63*7851SDana.Myers@Sun.COM  * property embodied in the software Licensee provides to its licensee, and
64*7851SDana.Myers@Sun.COM  * not to intellectual property embodied in modifications its licensee may
65*7851SDana.Myers@Sun.COM  * make.
66*7851SDana.Myers@Sun.COM  *
67*7851SDana.Myers@Sun.COM  * 3.3. Redistribution of Executable. Redistribution in executable form of any
68*7851SDana.Myers@Sun.COM  * substantial portion of the Covered Code or modification must reproduce the
69*7851SDana.Myers@Sun.COM  * above Copyright Notice, and the following Disclaimer and Export Compliance
70*7851SDana.Myers@Sun.COM  * provision in the documentation and/or other materials provided with the
71*7851SDana.Myers@Sun.COM  * distribution.
72*7851SDana.Myers@Sun.COM  *
73*7851SDana.Myers@Sun.COM  * 3.4. Intel retains all right, title, and interest in and to the Original
74*7851SDana.Myers@Sun.COM  * Intel Code.
75*7851SDana.Myers@Sun.COM  *
76*7851SDana.Myers@Sun.COM  * 3.5. Neither the name Intel nor any other trademark owned or controlled by
77*7851SDana.Myers@Sun.COM  * Intel shall be used in advertising or otherwise to promote the sale, use or
78*7851SDana.Myers@Sun.COM  * other dealings in products derived from or relating to the Covered Code
79*7851SDana.Myers@Sun.COM  * without prior written authorization from Intel.
80*7851SDana.Myers@Sun.COM  *
81*7851SDana.Myers@Sun.COM  * 4. Disclaimer and Export Compliance
82*7851SDana.Myers@Sun.COM  *
83*7851SDana.Myers@Sun.COM  * 4.1. INTEL MAKES NO WARRANTY OF ANY KIND REGARDING ANY SOFTWARE PROVIDED
84*7851SDana.Myers@Sun.COM  * HERE.  ANY SOFTWARE ORIGINATING FROM INTEL OR DERIVED FROM INTEL SOFTWARE
85*7851SDana.Myers@Sun.COM  * IS PROVIDED "AS IS," AND INTEL WILL NOT PROVIDE ANY SUPPORT,  ASSISTANCE,
86*7851SDana.Myers@Sun.COM  * INSTALLATION, TRAINING OR OTHER SERVICES.  INTEL WILL NOT PROVIDE ANY
87*7851SDana.Myers@Sun.COM  * UPDATES, ENHANCEMENTS OR EXTENSIONS.  INTEL SPECIFICALLY DISCLAIMS ANY
88*7851SDana.Myers@Sun.COM  * IMPLIED WARRANTIES OF MERCHANTABILITY, NONINFRINGEMENT AND FITNESS FOR A
89*7851SDana.Myers@Sun.COM  * PARTICULAR PURPOSE.
90*7851SDana.Myers@Sun.COM  *
91*7851SDana.Myers@Sun.COM  * 4.2. IN NO EVENT SHALL INTEL HAVE ANY LIABILITY TO LICENSEE, ITS LICENSEES
92*7851SDana.Myers@Sun.COM  * OR ANY OTHER THIRD PARTY, FOR ANY LOST PROFITS, LOST DATA, LOSS OF USE OR
93*7851SDana.Myers@Sun.COM  * COSTS OF PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES, OR FOR ANY INDIRECT,
94*7851SDana.Myers@Sun.COM  * SPECIAL OR CONSEQUENTIAL DAMAGES ARISING OUT OF THIS AGREEMENT, UNDER ANY
95*7851SDana.Myers@Sun.COM  * CAUSE OF ACTION OR THEORY OF LIABILITY, AND IRRESPECTIVE OF WHETHER INTEL
96*7851SDana.Myers@Sun.COM  * HAS ADVANCE NOTICE OF THE POSSIBILITY OF SUCH DAMAGES.  THESE LIMITATIONS
97*7851SDana.Myers@Sun.COM  * SHALL APPLY NOTWITHSTANDING THE FAILURE OF THE ESSENTIAL PURPOSE OF ANY
98*7851SDana.Myers@Sun.COM  * LIMITED REMEDY.
99*7851SDana.Myers@Sun.COM  *
100*7851SDana.Myers@Sun.COM  * 4.3. Licensee shall not export, either directly or indirectly, any of this
101*7851SDana.Myers@Sun.COM  * software or system incorporating such software without first obtaining any
102*7851SDana.Myers@Sun.COM  * required license or other approval from the U. S. Department of Commerce or
103*7851SDana.Myers@Sun.COM  * any other agency or department of the United States Government.  In the
104*7851SDana.Myers@Sun.COM  * event Licensee exports any such software from the United States or
105*7851SDana.Myers@Sun.COM  * re-exports any such software from a foreign destination, Licensee shall
106*7851SDana.Myers@Sun.COM  * ensure that the distribution and export/re-export of the software is in
107*7851SDana.Myers@Sun.COM  * compliance with all laws, regulations, orders, or other restrictions of the
108*7851SDana.Myers@Sun.COM  * U.S. Export Administration Regulations. Licensee agrees that neither it nor
109*7851SDana.Myers@Sun.COM  * any of its subsidiaries will export/re-export any technical data, process,
110*7851SDana.Myers@Sun.COM  * software, or service, directly or indirectly, to any country for which the
111*7851SDana.Myers@Sun.COM  * United States government or any agency thereof requires an export license,
112*7851SDana.Myers@Sun.COM  * other governmental approval, or letter of assurance, without first obtaining
113*7851SDana.Myers@Sun.COM  * such license, approval or letter.
114*7851SDana.Myers@Sun.COM  *
115*7851SDana.Myers@Sun.COM  *****************************************************************************/
116*7851SDana.Myers@Sun.COM 
117*7851SDana.Myers@Sun.COM 
118*7851SDana.Myers@Sun.COM #define __EXFIELD_C__
119*7851SDana.Myers@Sun.COM 
120*7851SDana.Myers@Sun.COM #include "acpi.h"
121*7851SDana.Myers@Sun.COM #include "acdispat.h"
122*7851SDana.Myers@Sun.COM #include "acinterp.h"
123*7851SDana.Myers@Sun.COM 
124*7851SDana.Myers@Sun.COM 
125*7851SDana.Myers@Sun.COM #define _COMPONENT          ACPI_EXECUTER
126*7851SDana.Myers@Sun.COM         ACPI_MODULE_NAME    ("exfield")
127*7851SDana.Myers@Sun.COM 
128*7851SDana.Myers@Sun.COM 
129*7851SDana.Myers@Sun.COM /*******************************************************************************
130*7851SDana.Myers@Sun.COM  *
131*7851SDana.Myers@Sun.COM  * FUNCTION:    AcpiExReadDataFromField
132*7851SDana.Myers@Sun.COM  *
133*7851SDana.Myers@Sun.COM  * PARAMETERS:  WalkState           - Current execution state
134*7851SDana.Myers@Sun.COM  *              ObjDesc             - The named field
135*7851SDana.Myers@Sun.COM  *              RetBufferDesc       - Where the return data object is stored
136*7851SDana.Myers@Sun.COM  *
137*7851SDana.Myers@Sun.COM  * RETURN:      Status
138*7851SDana.Myers@Sun.COM  *
139*7851SDana.Myers@Sun.COM  * DESCRIPTION: Read from a named field.  Returns either an Integer or a
140*7851SDana.Myers@Sun.COM  *              Buffer, depending on the size of the field.
141*7851SDana.Myers@Sun.COM  *
142*7851SDana.Myers@Sun.COM  ******************************************************************************/
143*7851SDana.Myers@Sun.COM 
144*7851SDana.Myers@Sun.COM ACPI_STATUS
145*7851SDana.Myers@Sun.COM AcpiExReadDataFromField (
146*7851SDana.Myers@Sun.COM     ACPI_WALK_STATE         *WalkState,
147*7851SDana.Myers@Sun.COM     ACPI_OPERAND_OBJECT     *ObjDesc,
148*7851SDana.Myers@Sun.COM     ACPI_OPERAND_OBJECT     **RetBufferDesc)
149*7851SDana.Myers@Sun.COM {
150*7851SDana.Myers@Sun.COM     ACPI_STATUS             Status;
151*7851SDana.Myers@Sun.COM     ACPI_OPERAND_OBJECT     *BufferDesc;
152*7851SDana.Myers@Sun.COM     ACPI_SIZE               Length;
153*7851SDana.Myers@Sun.COM     void                    *Buffer;
154*7851SDana.Myers@Sun.COM 
155*7851SDana.Myers@Sun.COM 
156*7851SDana.Myers@Sun.COM     ACPI_FUNCTION_TRACE_PTR (ExReadDataFromField, ObjDesc);
157*7851SDana.Myers@Sun.COM 
158*7851SDana.Myers@Sun.COM 
159*7851SDana.Myers@Sun.COM     /* Parameter validation */
160*7851SDana.Myers@Sun.COM 
161*7851SDana.Myers@Sun.COM     if (!ObjDesc)
162*7851SDana.Myers@Sun.COM     {
163*7851SDana.Myers@Sun.COM         return_ACPI_STATUS (AE_AML_NO_OPERAND);
164*7851SDana.Myers@Sun.COM     }
165*7851SDana.Myers@Sun.COM     if (!RetBufferDesc)
166*7851SDana.Myers@Sun.COM     {
167*7851SDana.Myers@Sun.COM         return_ACPI_STATUS (AE_BAD_PARAMETER);
168*7851SDana.Myers@Sun.COM     }
169*7851SDana.Myers@Sun.COM 
170*7851SDana.Myers@Sun.COM     if (ACPI_GET_OBJECT_TYPE (ObjDesc) == ACPI_TYPE_BUFFER_FIELD)
171*7851SDana.Myers@Sun.COM     {
172*7851SDana.Myers@Sun.COM         /*
173*7851SDana.Myers@Sun.COM          * If the BufferField arguments have not been previously evaluated,
174*7851SDana.Myers@Sun.COM          * evaluate them now and save the results.
175*7851SDana.Myers@Sun.COM          */
176*7851SDana.Myers@Sun.COM         if (!(ObjDesc->Common.Flags & AOPOBJ_DATA_VALID))
177*7851SDana.Myers@Sun.COM         {
178*7851SDana.Myers@Sun.COM             Status = AcpiDsGetBufferFieldArguments (ObjDesc);
179*7851SDana.Myers@Sun.COM             if (ACPI_FAILURE (Status))
180*7851SDana.Myers@Sun.COM             {
181*7851SDana.Myers@Sun.COM                 return_ACPI_STATUS (Status);
182*7851SDana.Myers@Sun.COM             }
183*7851SDana.Myers@Sun.COM         }
184*7851SDana.Myers@Sun.COM     }
185*7851SDana.Myers@Sun.COM     else if ((ACPI_GET_OBJECT_TYPE (ObjDesc) == ACPI_TYPE_LOCAL_REGION_FIELD) &&
186*7851SDana.Myers@Sun.COM              (ObjDesc->Field.RegionObj->Region.SpaceId == ACPI_ADR_SPACE_SMBUS))
187*7851SDana.Myers@Sun.COM     {
188*7851SDana.Myers@Sun.COM         /*
189*7851SDana.Myers@Sun.COM          * This is an SMBus read.  We must create a buffer to hold the data
190*7851SDana.Myers@Sun.COM          * and directly access the region handler.
191*7851SDana.Myers@Sun.COM          */
192*7851SDana.Myers@Sun.COM         BufferDesc = AcpiUtCreateBufferObject (ACPI_SMBUS_BUFFER_SIZE);
193*7851SDana.Myers@Sun.COM         if (!BufferDesc)
194*7851SDana.Myers@Sun.COM         {
195*7851SDana.Myers@Sun.COM             return_ACPI_STATUS (AE_NO_MEMORY);
196*7851SDana.Myers@Sun.COM         }
197*7851SDana.Myers@Sun.COM 
198*7851SDana.Myers@Sun.COM         /* Lock entire transaction if requested */
199*7851SDana.Myers@Sun.COM 
200*7851SDana.Myers@Sun.COM         AcpiExAcquireGlobalLock (ObjDesc->CommonField.FieldFlags);
201*7851SDana.Myers@Sun.COM 
202*7851SDana.Myers@Sun.COM         /*
203*7851SDana.Myers@Sun.COM          * Perform the read.
204*7851SDana.Myers@Sun.COM          * Note: Smbus protocol value is passed in upper 16-bits of Function
205*7851SDana.Myers@Sun.COM          */
206*7851SDana.Myers@Sun.COM         Status = AcpiExAccessRegion (ObjDesc, 0,
207*7851SDana.Myers@Sun.COM                     ACPI_CAST_PTR (ACPI_INTEGER, BufferDesc->Buffer.Pointer),
208*7851SDana.Myers@Sun.COM                     ACPI_READ | (ObjDesc->Field.Attribute << 16));
209*7851SDana.Myers@Sun.COM         AcpiExReleaseGlobalLock (ObjDesc->CommonField.FieldFlags);
210*7851SDana.Myers@Sun.COM         goto Exit;
211*7851SDana.Myers@Sun.COM     }
212*7851SDana.Myers@Sun.COM 
213*7851SDana.Myers@Sun.COM     /*
214*7851SDana.Myers@Sun.COM      * Allocate a buffer for the contents of the field.
215*7851SDana.Myers@Sun.COM      *
216*7851SDana.Myers@Sun.COM      * If the field is larger than the size of an ACPI_INTEGER, create
217*7851SDana.Myers@Sun.COM      * a BUFFER to hold it.  Otherwise, use an INTEGER.  This allows
218*7851SDana.Myers@Sun.COM      * the use of arithmetic operators on the returned value if the
219*7851SDana.Myers@Sun.COM      * field size is equal or smaller than an Integer.
220*7851SDana.Myers@Sun.COM      *
221*7851SDana.Myers@Sun.COM      * Note: Field.length is in bits.
222*7851SDana.Myers@Sun.COM      */
223*7851SDana.Myers@Sun.COM     Length = (ACPI_SIZE) ACPI_ROUND_BITS_UP_TO_BYTES (ObjDesc->Field.BitLength);
224*7851SDana.Myers@Sun.COM     if (Length > AcpiGbl_IntegerByteWidth)
225*7851SDana.Myers@Sun.COM     {
226*7851SDana.Myers@Sun.COM         /* Field is too large for an Integer, create a Buffer instead */
227*7851SDana.Myers@Sun.COM 
228*7851SDana.Myers@Sun.COM         BufferDesc = AcpiUtCreateBufferObject (Length);
229*7851SDana.Myers@Sun.COM         if (!BufferDesc)
230*7851SDana.Myers@Sun.COM         {
231*7851SDana.Myers@Sun.COM             return_ACPI_STATUS (AE_NO_MEMORY);
232*7851SDana.Myers@Sun.COM         }
233*7851SDana.Myers@Sun.COM         Buffer = BufferDesc->Buffer.Pointer;
234*7851SDana.Myers@Sun.COM     }
235*7851SDana.Myers@Sun.COM     else
236*7851SDana.Myers@Sun.COM     {
237*7851SDana.Myers@Sun.COM         /* Field will fit within an Integer (normal case) */
238*7851SDana.Myers@Sun.COM 
239*7851SDana.Myers@Sun.COM         BufferDesc = AcpiUtCreateInternalObject (ACPI_TYPE_INTEGER);
240*7851SDana.Myers@Sun.COM         if (!BufferDesc)
241*7851SDana.Myers@Sun.COM         {
242*7851SDana.Myers@Sun.COM             return_ACPI_STATUS (AE_NO_MEMORY);
243*7851SDana.Myers@Sun.COM         }
244*7851SDana.Myers@Sun.COM 
245*7851SDana.Myers@Sun.COM         Length = AcpiGbl_IntegerByteWidth;
246*7851SDana.Myers@Sun.COM         BufferDesc->Integer.Value = 0;
247*7851SDana.Myers@Sun.COM         Buffer = &BufferDesc->Integer.Value;
248*7851SDana.Myers@Sun.COM     }
249*7851SDana.Myers@Sun.COM 
250*7851SDana.Myers@Sun.COM     ACPI_DEBUG_PRINT ((ACPI_DB_BFIELD,
251*7851SDana.Myers@Sun.COM         "FieldRead [TO]:   Obj %p, Type %X, Buf %p, ByteLen %X\n",
252*7851SDana.Myers@Sun.COM         ObjDesc, ACPI_GET_OBJECT_TYPE (ObjDesc), Buffer, (UINT32) Length));
253*7851SDana.Myers@Sun.COM     ACPI_DEBUG_PRINT ((ACPI_DB_BFIELD,
254*7851SDana.Myers@Sun.COM         "FieldRead [FROM]: BitLen %X, BitOff %X, ByteOff %X\n",
255*7851SDana.Myers@Sun.COM         ObjDesc->CommonField.BitLength,
256*7851SDana.Myers@Sun.COM         ObjDesc->CommonField.StartFieldBitOffset,
257*7851SDana.Myers@Sun.COM         ObjDesc->CommonField.BaseByteOffset));
258*7851SDana.Myers@Sun.COM 
259*7851SDana.Myers@Sun.COM     /* Lock entire transaction if requested */
260*7851SDana.Myers@Sun.COM 
261*7851SDana.Myers@Sun.COM     AcpiExAcquireGlobalLock (ObjDesc->CommonField.FieldFlags);
262*7851SDana.Myers@Sun.COM 
263*7851SDana.Myers@Sun.COM     /* Read from the field */
264*7851SDana.Myers@Sun.COM 
265*7851SDana.Myers@Sun.COM     Status = AcpiExExtractFromField (ObjDesc, Buffer, (UINT32) Length);
266*7851SDana.Myers@Sun.COM     AcpiExReleaseGlobalLock (ObjDesc->CommonField.FieldFlags);
267*7851SDana.Myers@Sun.COM 
268*7851SDana.Myers@Sun.COM 
269*7851SDana.Myers@Sun.COM Exit:
270*7851SDana.Myers@Sun.COM     if (ACPI_FAILURE (Status))
271*7851SDana.Myers@Sun.COM     {
272*7851SDana.Myers@Sun.COM         AcpiUtRemoveReference (BufferDesc);
273*7851SDana.Myers@Sun.COM     }
274*7851SDana.Myers@Sun.COM     else
275*7851SDana.Myers@Sun.COM     {
276*7851SDana.Myers@Sun.COM         *RetBufferDesc = BufferDesc;
277*7851SDana.Myers@Sun.COM     }
278*7851SDana.Myers@Sun.COM 
279*7851SDana.Myers@Sun.COM     return_ACPI_STATUS (Status);
280*7851SDana.Myers@Sun.COM }
281*7851SDana.Myers@Sun.COM 
282*7851SDana.Myers@Sun.COM 
283*7851SDana.Myers@Sun.COM /*******************************************************************************
284*7851SDana.Myers@Sun.COM  *
285*7851SDana.Myers@Sun.COM  * FUNCTION:    AcpiExWriteDataToField
286*7851SDana.Myers@Sun.COM  *
287*7851SDana.Myers@Sun.COM  * PARAMETERS:  SourceDesc          - Contains data to write
288*7851SDana.Myers@Sun.COM  *              ObjDesc             - The named field
289*7851SDana.Myers@Sun.COM  *              ResultDesc          - Where the return value is returned, if any
290*7851SDana.Myers@Sun.COM  *
291*7851SDana.Myers@Sun.COM  * RETURN:      Status
292*7851SDana.Myers@Sun.COM  *
293*7851SDana.Myers@Sun.COM  * DESCRIPTION: Write to a named field
294*7851SDana.Myers@Sun.COM  *
295*7851SDana.Myers@Sun.COM  ******************************************************************************/
296*7851SDana.Myers@Sun.COM 
297*7851SDana.Myers@Sun.COM ACPI_STATUS
298*7851SDana.Myers@Sun.COM AcpiExWriteDataToField (
299*7851SDana.Myers@Sun.COM     ACPI_OPERAND_OBJECT     *SourceDesc,
300*7851SDana.Myers@Sun.COM     ACPI_OPERAND_OBJECT     *ObjDesc,
301*7851SDana.Myers@Sun.COM     ACPI_OPERAND_OBJECT     **ResultDesc)
302*7851SDana.Myers@Sun.COM {
303*7851SDana.Myers@Sun.COM     ACPI_STATUS             Status;
304*7851SDana.Myers@Sun.COM     UINT32                  Length;
305*7851SDana.Myers@Sun.COM     void                    *Buffer;
306*7851SDana.Myers@Sun.COM     ACPI_OPERAND_OBJECT     *BufferDesc;
307*7851SDana.Myers@Sun.COM 
308*7851SDana.Myers@Sun.COM 
309*7851SDana.Myers@Sun.COM     ACPI_FUNCTION_TRACE_PTR (ExWriteDataToField, ObjDesc);
310*7851SDana.Myers@Sun.COM 
311*7851SDana.Myers@Sun.COM 
312*7851SDana.Myers@Sun.COM     /* Parameter validation */
313*7851SDana.Myers@Sun.COM 
314*7851SDana.Myers@Sun.COM     if (!SourceDesc || !ObjDesc)
315*7851SDana.Myers@Sun.COM     {
316*7851SDana.Myers@Sun.COM         return_ACPI_STATUS (AE_AML_NO_OPERAND);
317*7851SDana.Myers@Sun.COM     }
318*7851SDana.Myers@Sun.COM 
319*7851SDana.Myers@Sun.COM     if (ACPI_GET_OBJECT_TYPE (ObjDesc) == ACPI_TYPE_BUFFER_FIELD)
320*7851SDana.Myers@Sun.COM     {
321*7851SDana.Myers@Sun.COM         /*
322*7851SDana.Myers@Sun.COM          * If the BufferField arguments have not been previously evaluated,
323*7851SDana.Myers@Sun.COM          * evaluate them now and save the results.
324*7851SDana.Myers@Sun.COM          */
325*7851SDana.Myers@Sun.COM         if (!(ObjDesc->Common.Flags & AOPOBJ_DATA_VALID))
326*7851SDana.Myers@Sun.COM         {
327*7851SDana.Myers@Sun.COM             Status = AcpiDsGetBufferFieldArguments (ObjDesc);
328*7851SDana.Myers@Sun.COM             if (ACPI_FAILURE (Status))
329*7851SDana.Myers@Sun.COM             {
330*7851SDana.Myers@Sun.COM                 return_ACPI_STATUS (Status);
331*7851SDana.Myers@Sun.COM             }
332*7851SDana.Myers@Sun.COM         }
333*7851SDana.Myers@Sun.COM     }
334*7851SDana.Myers@Sun.COM     else if ((ACPI_GET_OBJECT_TYPE (ObjDesc) == ACPI_TYPE_LOCAL_REGION_FIELD) &&
335*7851SDana.Myers@Sun.COM              (ObjDesc->Field.RegionObj->Region.SpaceId == ACPI_ADR_SPACE_SMBUS))
336*7851SDana.Myers@Sun.COM     {
337*7851SDana.Myers@Sun.COM         /*
338*7851SDana.Myers@Sun.COM          * This is an SMBus write.  We will bypass the entire field mechanism
339*7851SDana.Myers@Sun.COM          * and handoff the buffer directly to the handler.
340*7851SDana.Myers@Sun.COM          *
341*7851SDana.Myers@Sun.COM          * Source must be a buffer of sufficient size (ACPI_SMBUS_BUFFER_SIZE).
342*7851SDana.Myers@Sun.COM          */
343*7851SDana.Myers@Sun.COM         if (ACPI_GET_OBJECT_TYPE (SourceDesc) != ACPI_TYPE_BUFFER)
344*7851SDana.Myers@Sun.COM         {
345*7851SDana.Myers@Sun.COM             ACPI_ERROR ((AE_INFO, "SMBus write requires Buffer, found type %s",
346*7851SDana.Myers@Sun.COM                 AcpiUtGetObjectTypeName (SourceDesc)));
347*7851SDana.Myers@Sun.COM 
348*7851SDana.Myers@Sun.COM             return_ACPI_STATUS (AE_AML_OPERAND_TYPE);
349*7851SDana.Myers@Sun.COM         }
350*7851SDana.Myers@Sun.COM 
351*7851SDana.Myers@Sun.COM         if (SourceDesc->Buffer.Length < ACPI_SMBUS_BUFFER_SIZE)
352*7851SDana.Myers@Sun.COM         {
353*7851SDana.Myers@Sun.COM             ACPI_ERROR ((AE_INFO,
354*7851SDana.Myers@Sun.COM                 "SMBus write requires Buffer of length %X, found length %X",
355*7851SDana.Myers@Sun.COM                 ACPI_SMBUS_BUFFER_SIZE, SourceDesc->Buffer.Length));
356*7851SDana.Myers@Sun.COM 
357*7851SDana.Myers@Sun.COM             return_ACPI_STATUS (AE_AML_BUFFER_LIMIT);
358*7851SDana.Myers@Sun.COM         }
359*7851SDana.Myers@Sun.COM 
360*7851SDana.Myers@Sun.COM         BufferDesc = AcpiUtCreateBufferObject (ACPI_SMBUS_BUFFER_SIZE);
361*7851SDana.Myers@Sun.COM         if (!BufferDesc)
362*7851SDana.Myers@Sun.COM         {
363*7851SDana.Myers@Sun.COM             return_ACPI_STATUS (AE_NO_MEMORY);
364*7851SDana.Myers@Sun.COM         }
365*7851SDana.Myers@Sun.COM 
366*7851SDana.Myers@Sun.COM         Buffer = BufferDesc->Buffer.Pointer;
367*7851SDana.Myers@Sun.COM         ACPI_MEMCPY (Buffer, SourceDesc->Buffer.Pointer,
368*7851SDana.Myers@Sun.COM             ACPI_SMBUS_BUFFER_SIZE);
369*7851SDana.Myers@Sun.COM 
370*7851SDana.Myers@Sun.COM         /* Lock entire transaction if requested */
371*7851SDana.Myers@Sun.COM 
372*7851SDana.Myers@Sun.COM         AcpiExAcquireGlobalLock (ObjDesc->CommonField.FieldFlags);
373*7851SDana.Myers@Sun.COM 
374*7851SDana.Myers@Sun.COM         /*
375*7851SDana.Myers@Sun.COM          * Perform the write (returns status and perhaps data in the
376*7851SDana.Myers@Sun.COM          * same buffer)
377*7851SDana.Myers@Sun.COM          * Note: SMBus protocol type is passed in upper 16-bits of Function.
378*7851SDana.Myers@Sun.COM          */
379*7851SDana.Myers@Sun.COM         Status = AcpiExAccessRegion (ObjDesc, 0,
380*7851SDana.Myers@Sun.COM                         (ACPI_INTEGER *) Buffer,
381*7851SDana.Myers@Sun.COM                         ACPI_WRITE | (ObjDesc->Field.Attribute << 16));
382*7851SDana.Myers@Sun.COM         AcpiExReleaseGlobalLock (ObjDesc->CommonField.FieldFlags);
383*7851SDana.Myers@Sun.COM 
384*7851SDana.Myers@Sun.COM         *ResultDesc = BufferDesc;
385*7851SDana.Myers@Sun.COM         return_ACPI_STATUS (Status);
386*7851SDana.Myers@Sun.COM     }
387*7851SDana.Myers@Sun.COM 
388*7851SDana.Myers@Sun.COM     /* Get a pointer to the data to be written */
389*7851SDana.Myers@Sun.COM 
390*7851SDana.Myers@Sun.COM     switch (ACPI_GET_OBJECT_TYPE (SourceDesc))
391*7851SDana.Myers@Sun.COM     {
392*7851SDana.Myers@Sun.COM     case ACPI_TYPE_INTEGER:
393*7851SDana.Myers@Sun.COM         Buffer = &SourceDesc->Integer.Value;
394*7851SDana.Myers@Sun.COM         Length = sizeof (SourceDesc->Integer.Value);
395*7851SDana.Myers@Sun.COM         break;
396*7851SDana.Myers@Sun.COM 
397*7851SDana.Myers@Sun.COM     case ACPI_TYPE_BUFFER:
398*7851SDana.Myers@Sun.COM         Buffer = SourceDesc->Buffer.Pointer;
399*7851SDana.Myers@Sun.COM         Length = SourceDesc->Buffer.Length;
400*7851SDana.Myers@Sun.COM         break;
401*7851SDana.Myers@Sun.COM 
402*7851SDana.Myers@Sun.COM     case ACPI_TYPE_STRING:
403*7851SDana.Myers@Sun.COM         Buffer = SourceDesc->String.Pointer;
404*7851SDana.Myers@Sun.COM         Length = SourceDesc->String.Length;
405*7851SDana.Myers@Sun.COM         break;
406*7851SDana.Myers@Sun.COM 
407*7851SDana.Myers@Sun.COM     default:
408*7851SDana.Myers@Sun.COM         return_ACPI_STATUS (AE_AML_OPERAND_TYPE);
409*7851SDana.Myers@Sun.COM     }
410*7851SDana.Myers@Sun.COM 
411*7851SDana.Myers@Sun.COM     ACPI_DEBUG_PRINT ((ACPI_DB_BFIELD,
412*7851SDana.Myers@Sun.COM         "FieldWrite [FROM]: Obj %p (%s:%X), Buf %p, ByteLen %X\n",
413*7851SDana.Myers@Sun.COM         SourceDesc, AcpiUtGetTypeName (ACPI_GET_OBJECT_TYPE (SourceDesc)),
414*7851SDana.Myers@Sun.COM         ACPI_GET_OBJECT_TYPE (SourceDesc), Buffer, Length));
415*7851SDana.Myers@Sun.COM 
416*7851SDana.Myers@Sun.COM     ACPI_DEBUG_PRINT ((ACPI_DB_BFIELD,
417*7851SDana.Myers@Sun.COM         "FieldWrite [TO]:   Obj %p (%s:%X), BitLen %X, BitOff %X, ByteOff %X\n",
418*7851SDana.Myers@Sun.COM         ObjDesc, AcpiUtGetTypeName (ACPI_GET_OBJECT_TYPE (ObjDesc)),
419*7851SDana.Myers@Sun.COM         ACPI_GET_OBJECT_TYPE (ObjDesc),
420*7851SDana.Myers@Sun.COM         ObjDesc->CommonField.BitLength,
421*7851SDana.Myers@Sun.COM         ObjDesc->CommonField.StartFieldBitOffset,
422*7851SDana.Myers@Sun.COM         ObjDesc->CommonField.BaseByteOffset));
423*7851SDana.Myers@Sun.COM 
424*7851SDana.Myers@Sun.COM     /* Lock entire transaction if requested */
425*7851SDana.Myers@Sun.COM 
426*7851SDana.Myers@Sun.COM     AcpiExAcquireGlobalLock (ObjDesc->CommonField.FieldFlags);
427*7851SDana.Myers@Sun.COM 
428*7851SDana.Myers@Sun.COM     /* Write to the field */
429*7851SDana.Myers@Sun.COM 
430*7851SDana.Myers@Sun.COM     Status = AcpiExInsertIntoField (ObjDesc, Buffer, Length);
431*7851SDana.Myers@Sun.COM     AcpiExReleaseGlobalLock (ObjDesc->CommonField.FieldFlags);
432*7851SDana.Myers@Sun.COM 
433*7851SDana.Myers@Sun.COM     return_ACPI_STATUS (Status);
434*7851SDana.Myers@Sun.COM }
435*7851SDana.Myers@Sun.COM 
436*7851SDana.Myers@Sun.COM 
437