Leaked source code of windows server 2003
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 
 
 
 
 

1701 lines
48 KiB

/*** pnpmacro.c - Parse PNP Macro terms
*
* Copyright (c) 1996,1997 Microsoft Corporation
* Author: Michael Tsang (MikeTs)
* Created: 05/05/97
*
* MODIFICATION HISTORY
*/
#include "pch.h"
RESFIELD IRQFields[] =
{
"_INT", 1*8 + 0, 16,
"_HE", 3*8 + 0, 1,
"_LL", 3*8 + 3, 1,
"_SHR", 3*8 + 4, 1,
NULL, 0, 0
};
RESFIELD IRQNoFlagsFields[] =
{
"_INT", 1*8 + 0, 16,
NULL, 0, 0
};
RESFIELD DMAFields[] =
{
"_DMA", 1*8 + 0, 8,
"_SIZ", 2*8 + 0, 2,
"_BM", 2*8 + 2, 1,
"_TYP", 2*8 + 5, 2,
NULL, 0, 0
};
RESFIELD IOFields[] =
{
"_DEC", 1*8 + 0, 1,
"_MIN", 2*8 + 0, 16,
"_MAX", 4*8 + 0, 16,
"_ALN", 6*8 + 0, 8,
"_LEN", 7*8 + 0, 8,
NULL, 0, 0
};
RESFIELD FixedIOFields[] =
{
"_BAS", 1*8 + 0, 16,
"_LEN", 3*8 + 0, 8,
NULL, 0, 0
};
RESFIELD Mem24Fields[] =
{
"_RW", 3*8 + 0, 1,
"_MIN", 4*8 + 0, 16,
"_MAX", 6*8 + 0, 16,
"_ALN", 8*8 + 0, 16,
"_LEN", 10*8+ 0, 16,
NULL, 0, 0
};
RESFIELD Mem32Fields[] =
{
"_RW", 3*8 + 0, 1,
"_MIN", 4*8 + 0, 32,
"_MAX", 8*8 + 0, 32,
"_ALN", 12*8+ 0, 32,
"_LEN", 16*8+ 0, 32,
NULL, 0, 0
};
RESFIELD FixedMem32Fields[] =
{
"_RW", 3*8 + 0, 1,
"_BAS", 4*8 + 0, 32,
"_LEN", 8*8 + 0, 32,
NULL, 0, 0
};
RESFIELD GenFlagFields[] =
{
"_DEC", 4*8 + 1, 1,
"_MIF", 4*8 + 2, 1,
"_MAF", 4*8 + 3, 1,
NULL, 0, 0
};
RESFIELD MemTypeFields[] =
{
"_RW", 5*8 + 0, 1,
"_MEM", 5*8 + 1, 3,
NULL, 0, 0
};
RESFIELD IOTypeFields[] =
{
"_RNG", 5*8 + 0, 2,
NULL, 0, 0
};
RESFIELD DWordFields[] =
{
"_GRA", 6*8 + 0, 32,
"_MIN", 10*8+ 0, 32,
"_MAX", 14*8+ 0, 32,
"_TRA", 18*8+ 0, 32,
"_LEN", 22*8+ 0, 32,
NULL, 0, 0
};
RESFIELD WordFields[] =
{
"_GRA", 6*8 + 0, 16,
"_MIN", 8*8 + 0, 16,
"_MAX", 10*8+ 0, 16,
"_TRA", 12*8+ 0, 16,
"_LEN", 14*8+ 0, 16,
NULL, 0, 0
};
RESFIELD QWordFields[] =
{
"_GRA", 6*8 + 0, 64,
"_MIN", 14*8+ 0, 64,
"_MAX", 22*8+ 0, 64,
"_TRA", 30*8+ 0, 64,
"_LEN", 38*8+ 0, 64,
NULL, 0, 0
};
RESFIELD IRQExFields[] =
{
"_HE", 3*8 + 1, 1,
"_LL", 3*8 + 2, 1,
"_SHR", 3*8 + 3, 1,
NULL, 0, 0
};
ULONG dwResBitOffset = 0;
/***LP XferCodeToBuff - Transfer code object tree to buffer
*
* ENTRY
* pbBuff -> buffer
* pdwcb -> length
* pcCode -> code object tree
*
* EXIT-SUCCESS
* returns ASLERR_NONE
* EXIT-FAILURE
* returns negative error code
*/
int LOCAL XferCodeToBuff(PBYTE pbBuff, PDWORD pdwcb, PCODEOBJ pcCode)
{
int rc = ASLERR_NONE;
DWORD dwLen;
int iLen;
PCODEOBJ pc, pcNext;
ENTER((2, "XferCodeToBuff(pbBuff=%x,Len=%x,pcCode=%x,CodeType=%x)\n",
pbBuff, *pdwcb, pcCode, pcCode->dwCodeType));
switch (pcCode->dwCodeType)
{
case CODETYPE_ASLTERM:
if (pcCode->dwCodeValue != OP_NONE)
{
iLen = OPCODELEN(pcCode->dwCodeValue);
memcpy(&pbBuff[*pdwcb], &pcCode->dwCodeValue, iLen);
*pdwcb += (DWORD)iLen;
if ((TermTable[pcCode->dwTermIndex].dwfTerm & TF_PACKAGE_LEN) &&
((rc = EncodePktLen(pcCode->dwCodeLen, &dwLen, &iLen)) ==
ASLERR_NONE))
{
memcpy(&pbBuff[*pdwcb], &dwLen, iLen);
*pdwcb += (DWORD)iLen;
}
if ((rc == ASLERR_NONE) && (pcCode->pbDataBuff != NULL))
{
int i;
for (i = 0, pc = (PCODEOBJ)pcCode->pbDataBuff;
i < (int)pcCode->dwDataLen;
++i)
{
if ((rc = XferCodeToBuff(pbBuff, pdwcb, &pc[i])) !=
ASLERR_NONE)
{
break;
}
}
if (rc == ASLERR_NONE)
{
MEMFREE(pcCode->pbDataBuff);
pcCode->pbDataBuff = NULL;
}
}
}
if (rc == ASLERR_NONE)
{
for (pc = pcCode->pcFirstChild; pc != NULL; pc = pcNext)
{
if ((rc = XferCodeToBuff(pbBuff, pdwcb, pc)) != ASLERR_NONE)
break;
//
// Am I the only one left in the list?
//
if (pc->list.plistNext == &pc->list)
pcNext = NULL;
else
pcNext = (PCODEOBJ)pc->list.plistNext;
ListRemoveEntry(&pc->list,
(PPLIST)&pcCode->pcFirstChild);
MEMFREE(pc);
}
}
break;
case CODETYPE_DATAOBJ:
case CODETYPE_STRING:
case CODETYPE_QWORD:
memcpy(&pbBuff[*pdwcb], pcCode->pbDataBuff, pcCode->dwDataLen);
*pdwcb += pcCode->dwDataLen;
break;
case CODETYPE_INTEGER:
memcpy(&pbBuff[*pdwcb], &pcCode->dwCodeValue, pcCode->dwDataLen);
*pdwcb += pcCode->dwDataLen;
break;
case CODETYPE_KEYWORD:
case CODETYPE_UNKNOWN:
break;
default:
ERROR(("XferCodeToBuff: unexpected code object type - %d",
pcCode->dwCodeType));
rc = ASLERR_INTERNAL_ERROR;
}
EXIT((2, "XferCodeToBuff=%x (Len=%x)\n", rc, *pdwcb));
return rc;
} //XferCodeToBuff
/***LP ResourceTemplate - Start of PNP Resource Template
*
* ENTRY
* ptoken -> token stream
* fActionFL - TRUE if this is a fixed list action
*
* EXIT-SUCCESS
* returns ASLERR_NONE
* EXIT-FAILURE
* returns negative error code
*/
int LOCAL ResourceTemplate(PTOKEN ptoken, BOOL fActionFL)
{
int rc = ASLERR_NONE;
PCODEOBJ pcData;
ENTER((1, "ResourceTemplate(ptoken=%p,fActionFL=%d)\n", ptoken, fActionFL));
DEREF(ptoken);
if (fActionFL)
{
dwResBitOffset = 0;
}
else
{
if ((pcData = (PCODEOBJ)MEMALLOC(sizeof(CODEOBJ))) == NULL)
{
ERROR(("ResourceTemplate: failed to allocate buffer object"));
rc = ASLERR_OUT_OF_MEM;
}
else
{
memset(pcData, 0, sizeof(CODEOBJ));
pcData->dwCodeType = CODETYPE_DATAOBJ;
if (gpcodeScope->dwCodeLen <= 0x3f)
pcData->dwDataLen = gpcodeScope->dwCodeLen - 1;
else if (gpcodeScope->dwCodeLen <= 0xfff)
pcData->dwDataLen = gpcodeScope->dwCodeLen - 2;
else if (gpcodeScope->dwCodeLen <= 0xfffff)
pcData->dwDataLen = gpcodeScope->dwCodeLen - 3;
else
pcData->dwDataLen = gpcodeScope->dwCodeLen - 4;
pcData->dwDataLen += 2; //add length of EndTag
if ((pcData->pbDataBuff = MEMALLOC(pcData->dwDataLen)) == NULL)
{
ERROR(("ResourceTemplate: failed to allocate data buffer"));
rc = ASLERR_OUT_OF_MEM;
}
else
{
PCODEOBJ pc, pcNext;
DWORD dwcb = 0;
for (pc = gpcodeScope->pcFirstChild; pc != NULL; pc = pcNext)
{
if ((rc = XferCodeToBuff(pcData->pbDataBuff, &dwcb, pc)) !=
ASLERR_NONE)
{
break;
}
//
// Am I the only one left in the list?
//
if (pc->list.plistNext == &pc->list)
pcNext = NULL;
else
pcNext = (PCODEOBJ)pc->list.plistNext;
ListRemoveEntry(&pc->list,
(PPLIST)&gpcodeScope->pcFirstChild);
MEMFREE(pc);
}
if (rc == ASLERR_NONE)
{
pcData->pbDataBuff[dwcb] = 0x79; //EndTag
dwcb++;
//
// Generate a zero-checksum EndTag because the ASL code
// will probably change the resources anyway.
//
pcData->pbDataBuff[dwcb] = 0;
pcData->pcParent = gpcodeScope;
ListInsertTail(&pcData->list,
(PPLIST)&gpcodeScope->pcFirstChild);
ASSERT(dwcb + 1 == pcData->dwDataLen);
pcData->dwCodeLen = pcData->dwDataLen;
pcData->bCodeChkSum = ComputeDataChkSum(pcData->pbDataBuff,
pcData->dwDataLen);
if ((gpcodeScope->pbDataBuff = MEMALLOC(sizeof(CODEOBJ))) ==
NULL)
{
ERROR(("ResourceTemplate: failed to allocate buffer argument object"));
rc = ASLERR_OUT_OF_MEM;
}
else
{
memset(gpcodeScope->pbDataBuff, 0, sizeof(CODEOBJ));
if ((rc = MakeIntData(pcData->dwDataLen,
(PCODEOBJ)gpcodeScope->pbDataBuff))
== ASLERR_NONE)
{
gpcodeScope->dwDataLen = 1;
gpcodeScope->dwCodeLen = 0;
gpcodeScope->bCodeChkSum = 0;
ComputeChkSumLen(gpcodeScope);
}
}
}
}
}
}
EXIT((1, "ResourceTemplate=%d\n", rc));
return rc;
} //ResourceTemplate
/***LP AddSmallOffset - Add code length to cumulative bit offset
*
* ENTRY
* ptoken -> token stream
* fActionFL - TRUE if this is a fixed list action
*
* EXIT-SUCCESS
* returns ASLERR_NONE
* EXIT-FAILURE
* returns negative error code
*/
int LOCAL AddSmallOffset(PTOKEN ptoken, BOOL fActionFL)
{
int rc = ASLERR_NONE;
ENTER((1, "AddSmallOffset(ptoken=%p,fActionFL=%d)\n",
ptoken, fActionFL));
DEREF(ptoken);
DEREF(fActionFL);
ASSERT(fActionFL == TRUE);
ASSERT((gpcodeScope->dwCodeValue & 0x80) == 0);
dwResBitOffset += ((gpcodeScope->dwCodeValue & 0x07) + 1)*8;
EXIT((1, "AddSmallOffset=%d\n", rc));
return rc;
} //AddSmallOffset
/***LP StartDependentFn - Start of Dependent Function
*
* ENTRY
* ptoken -> token stream
* fActionFL - TRUE if this is a fixed list action
*
* EXIT-SUCCESS
* returns ASLERR_NONE
* EXIT-FAILURE
* returns negative error code
*/
int LOCAL StartDependentFn(PTOKEN ptoken, BOOL fActionFL)
{
int rc = ASLERR_NONE;
PCODEOBJ pArgs;
ENTER((1, "StartDependentFn(ptoken=%p,fActionFL=%d)\n", ptoken, fActionFL));
DEREF(fActionFL);
ASSERT(fActionFL == TRUE);
pArgs = (PCODEOBJ)gpcodeScope->pbDataBuff;
if (pArgs[0].dwCodeValue > 2)
{
PrintTokenErr(ptoken, "Arg0 should be between 0-2", TRUE);
rc = ASLERR_SYNTAX;
}
else if (pArgs[1].dwCodeValue > 2)
{
PrintTokenErr(ptoken, "Arg1 should be between 0-2", TRUE);
rc = ASLERR_SYNTAX;
}
else
{
pArgs[0].dwCodeValue |= pArgs[1].dwCodeValue << 2;
pArgs[0].bCodeChkSum = (BYTE)pArgs[0].dwCodeValue;
gpcodeScope->dwDataLen = 1;
ASSERT((gpcodeScope->dwCodeValue & 0x80) == 0);
dwResBitOffset += ((gpcodeScope->dwCodeValue & 0x07) + 1)*8;
}
EXIT((1, "StartDependentFn=%d\n", rc));
return rc;
} //StartDependentFn
/***LP IRQDesc - IRQ resource descriptor
*
* ENTRY
* ptoken -> token stream
* fActionFL - TRUE if this is a fixed list action
*
* EXIT-SUCCESS
* returns ASLERR_NONE
* EXIT-FAILURE
* returns negative error code
*/
int LOCAL IRQDesc(PTOKEN ptoken, BOOL fActionFL)
{
int rc = ASLERR_NONE;
PCODEOBJ pArgs;
DWORD dwLen, dwIRQ = 0, dw;
PCODEOBJ pc;
#define MAX_IRQ 0x0f
ENTER((1, "IRQDesc(ptoken=%p,fActionFL=%d)\n", ptoken, fActionFL));
DEREF(fActionFL);
ASSERT(fActionFL == FALSE);
pArgs = (PCODEOBJ)gpcodeScope->pbDataBuff;
if (gpcodeScope->dwDataLen == 4) //IRQ
{
dwLen = 3;
if ((rc = SetDefMissingKW(&pArgs[2], ID_EXCLUSIVE)) == ASLERR_NONE)
{
EncodeKeywords(pArgs, 0x07, 0);
if ((pArgs[0].dwCodeValue & (_LL | _HE)) == (_LL | _HE))
{
PrintTokenErr(ptoken,
"Illegal combination of interrupt level and trigger mode",
TRUE);
rc = ASLERR_SYNTAX;
}
}
}
else //IRQNoFlags
{
ASSERT(gpcodeScope->dwDataLen == 1);
dwLen = 2;
}
if (rc == ASLERR_NONE)
{
pc = gpcodeScope->pcFirstChild;
if (pc != NULL)
{
ASSERT(pc->dwCodeType == CODETYPE_DATAOBJ);
for (dw = 0; dw < pc->dwDataLen; ++dw)
{
if (pc->pbDataBuff[dw] > MAX_IRQ)
{
PrintTokenErr(ptoken, "Invalid IRQ number", TRUE);
rc = ASLERR_SYNTAX;
break;
}
else
{
dwIRQ |= 1 << pc->pbDataBuff[dw];
}
}
if (rc == ASLERR_NONE)
{
MEMFREE(pc->pbDataBuff);
pc->pbDataBuff = NULL;
}
}
else if ((pc = MEMALLOC(sizeof(CODEOBJ))) != NULL)
{
memset(pc, 0, sizeof(CODEOBJ));
pc->pcParent = gpcodeScope;
ListInsertTail(&pc->list, (PPLIST)&gpcodeScope->pcFirstChild);
}
else
{
ERROR(("IRQDesc: failed to allocate DMA descriptor"));
rc = ASLERR_OUT_OF_MEM;
}
if (rc == ASLERR_NONE)
{
PCODEOBJ pa;
if (dwLen == 3)
dwIRQ |= (pArgs[0].dwCodeValue & 0xff) << 16;
SetIntObject(pc, dwIRQ, dwLen);
pa = &pArgs[gpcodeScope->dwDataLen == 4? 3: 0];
if (pa->dwCodeType == CODETYPE_STRING)
{
PNSOBJ pns;
if ((rc = CreateNameSpaceObj(ptoken, (PSZ)pa->pbDataBuff,
gpnsCurrentScope, gpnsCurrentOwner,
&pns, NSF_EXIST_ERR)) ==
ASLERR_NONE)
{
pns->ObjData.dwDataType = OBJTYPE_PNP_RES;
rc = CreateResFields(ptoken, pns,
gpcodeScope->dwDataLen == 4?
IRQFields: IRQNoFlagsFields);
}
MEMFREE(pa->pbDataBuff);
memset(pa, 0, sizeof(CODEOBJ));
}
if (rc == ASLERR_NONE)
{
gpcodeScope->dwDataLen = 0;
MEMFREE(gpcodeScope->pbDataBuff);
gpcodeScope->pbDataBuff = NULL;
gpcodeScope->dwCodeLen = 0;
gpcodeScope->bCodeChkSum = 0;
ComputeChkSumLen(gpcodeScope);
ASSERT((gpcodeScope->dwCodeValue & 0x80) == 0);
dwResBitOffset += ((gpcodeScope->dwCodeValue & 0x07) + 1)*8;
}
}
}
EXIT((1, "IRQDesc=%d\n", rc));
return rc;
} //IRQDesc
/***LP DMADesc - DMA resource descriptor
*
* ENTRY
* ptoken -> token stream
* fActionFL - TRUE if this is a fixed list action
*
* EXIT-SUCCESS
* returns ASLERR_NONE
* EXIT-FAILURE
* returns negative error code
*/
int LOCAL DMADesc(PTOKEN ptoken, BOOL fActionFL)
{
int rc = ASLERR_NONE;
PCODEOBJ pArgs;
DWORD dwDMA = 0, dw;
PCODEOBJ pc;
#define MAX_DMA 0x07
ENTER((1, "DMADesc(ptoken=%p,fActionFL=%d)\n", ptoken, fActionFL));
DEREF(fActionFL);
ASSERT(fActionFL == FALSE);
pArgs = (PCODEOBJ)gpcodeScope->pbDataBuff;
EncodeKeywords(pArgs, 0x07, 0);
pc = gpcodeScope->pcFirstChild;
if (pc != NULL)
{
ASSERT(pc->dwCodeType == CODETYPE_DATAOBJ);
for (dw = 0; dw < pc->dwDataLen; ++dw)
{
if (pc->pbDataBuff[dw] > MAX_DMA)
{
PrintTokenErr(ptoken, "Invalid DMA number", TRUE);
rc = ASLERR_SYNTAX;
break;
}
else
{
dwDMA |= 1 << pc->pbDataBuff[dw];
}
}
if (rc == ASLERR_NONE)
{
MEMFREE(pc->pbDataBuff);
pc->pbDataBuff = NULL;
}
}
else if ((pc = MEMALLOC(sizeof(CODEOBJ))) != NULL)
{
memset(pc, 0, sizeof(CODEOBJ));
pc->pcParent = gpcodeScope;
ListInsertTail(&pc->list, (PPLIST)&gpcodeScope->pcFirstChild);
}
else
{
ERROR(("DMADesc: failed to allocate DMA descriptor"));
rc = ASLERR_OUT_OF_MEM;
}
if (rc == ASLERR_NONE)
{
dwDMA |= (pArgs[0].dwCodeValue & 0xff) << 8;
SetIntObject(pc, dwDMA, sizeof(WORD));
if (pArgs[3].dwCodeType == CODETYPE_STRING)
{
PNSOBJ pns;
if ((rc = CreateNameSpaceObj(ptoken, (PSZ)pArgs[3].pbDataBuff,
gpnsCurrentScope, gpnsCurrentOwner,
&pns, NSF_EXIST_ERR)) ==
ASLERR_NONE)
{
pns->ObjData.dwDataType = OBJTYPE_PNP_RES;
rc = CreateResFields(ptoken, pns, DMAFields);
}
MEMFREE(pArgs[3].pbDataBuff);
memset(&pArgs[3], 0, sizeof(CODEOBJ));
}
if (rc == ASLERR_NONE)
{
gpcodeScope->dwDataLen = 0;
MEMFREE(gpcodeScope->pbDataBuff);
gpcodeScope->pbDataBuff = NULL;
gpcodeScope->dwCodeLen = 0;
gpcodeScope->bCodeChkSum = 0;
ComputeChkSumLen(gpcodeScope);
ASSERT((gpcodeScope->dwCodeValue & 0x80) == 0);
dwResBitOffset += ((gpcodeScope->dwCodeValue & 0x07) + 1)*8;
}
}
EXIT((1, "DMADesc=%d\n", rc));
return rc;
} //DMADesc
/***LP IODesc - IO resource descriptor
*
* ENTRY
* ptoken -> token stream
* fActionFL - TRUE if this is a fixed list action
*
* EXIT-SUCCESS
* returns ASLERR_NONE
* EXIT-FAILURE
* returns negative error code
*/
int LOCAL IODesc(PTOKEN ptoken, BOOL fActionFL)
{
int rc = ASLERR_NONE;
PCODEOBJ pArgs;
ENTER((1, "IODesc(ptoken=%p,fActionFL=%d)\n", ptoken, fActionFL));
DEREF(ptoken);
DEREF(fActionFL);
ASSERT(fActionFL == TRUE);
pArgs = (PCODEOBJ)gpcodeScope->pbDataBuff;
EncodeKeywords(pArgs, 0x01, 0);
if (pArgs[5].dwCodeType == CODETYPE_STRING)
{
PNSOBJ pns;
if ((rc = CreateNameSpaceObj(ptoken, (PSZ)pArgs[5].pbDataBuff,
gpnsCurrentScope, gpnsCurrentOwner,
&pns, NSF_EXIST_ERR)) ==
ASLERR_NONE)
{
pns->ObjData.dwDataType = OBJTYPE_PNP_RES;
rc = CreateResFields(ptoken, pns, IOFields);
}
MEMFREE(pArgs[5].pbDataBuff);
memset(&pArgs[5], 0, sizeof(CODEOBJ));
}
if (rc == ASLERR_NONE)
{
ASSERT((gpcodeScope->dwCodeValue & 0x80) == 0);
dwResBitOffset += ((gpcodeScope->dwCodeValue & 0x07) + 1)*8;
}
EXIT((1, "IODesc=%d\n", rc));
return rc;
} //IODesc
/***LP FixedIODesc - FixedIO resource descriptor
*
* ENTRY
* ptoken -> token stream
* fActionFL - TRUE if this is a fixed list action
*
* EXIT-SUCCESS
* returns ASLERR_NONE
* EXIT-FAILURE
* returns negative error code
*/
int LOCAL FixedIODesc(PTOKEN ptoken, BOOL fActionFL)
{
int rc = ASLERR_NONE;
PCODEOBJ pArgs = (PCODEOBJ)gpcodeScope->pbDataBuff;
ENTER((1, "FixedIODesc(ptoken=%p,fActionFL=%d)\n", ptoken, fActionFL));
DEREF(ptoken);
DEREF(fActionFL);
ASSERT(fActionFL == TRUE);
if (pArgs[2].dwCodeType == CODETYPE_STRING)
{
PNSOBJ pns;
if ((rc = CreateNameSpaceObj(ptoken, (PSZ)pArgs[2].pbDataBuff,
gpnsCurrentScope, gpnsCurrentOwner,
&pns, NSF_EXIST_ERR)) ==
ASLERR_NONE)
{
pns->ObjData.dwDataType = OBJTYPE_PNP_RES;
rc = CreateResFields(ptoken, pns, FixedIOFields);
}
MEMFREE(pArgs[2].pbDataBuff);
memset(&pArgs[2], 0, sizeof(CODEOBJ));
}
if (rc == ASLERR_NONE)
{
ASSERT((gpcodeScope->dwCodeValue & 0x80) == 0);
dwResBitOffset += ((gpcodeScope->dwCodeValue & 0x07) + 1)*8;
}
EXIT((1, "FixedIODesc=%d\n", rc));
return rc;
} //FixedIODesc
/***LP VendorDesc - Vendor-defined resource
*
* ENTRY
* ptoken -> token stream
* dwMaxSize - 0x07 if short resource, 0xffff if long resource
*
* EXIT-SUCCESS
* returns ASLERR_NONE
* EXIT-FAILURE
* returns negative error code
*/
int LOCAL VendorDesc(PTOKEN ptoken, DWORD dwMaxSize)
{
int rc = ASLERR_NONE;
PCODEOBJ pc;
PBYTE pbOldBuff = NULL;
DWORD dwOldLen = 0;
#define SHORT_MAX_SIZE 0x07
#define LONG_MAX_SIZE 0xffff
ENTER((1, "VendorDesc(ptoken=%p,MaxSize=%d)\n", ptoken, dwMaxSize));
ASSERT((dwMaxSize == SHORT_MAX_SIZE) || (dwMaxSize == LONG_MAX_SIZE));
pc = gpcodeScope->pcFirstChild;
if (pc != NULL)
{
ASSERT(pc->dwCodeType == CODETYPE_DATAOBJ);
if (pc->dwDataLen > dwMaxSize)
{
PrintTokenErr(ptoken, "Vendor resource data can only be up to "
"7 bytes for short descriptor and 64K-1 bytes for "
"long descriptor", TRUE);
rc = ASLERR_SYNTAX;
}
else
{
pbOldBuff = pc->pbDataBuff;
dwOldLen = pc->dwDataLen;
}
}
else if ((pc = MEMALLOC(sizeof(CODEOBJ))) != NULL)
{
memset(pc, 0, sizeof(CODEOBJ));
pc->pcParent = gpcodeScope;
ListInsertTail(&pc->list, (PPLIST)&gpcodeScope->pcFirstChild);
}
else
{
ERROR(("VendorDesc: failed to allocate vendor-defined resource object"));
rc = ASLERR_OUT_OF_MEM;
}
if (rc == ASLERR_NONE)
{
int i;
pc->dwCodeType = CODETYPE_DATAOBJ;
if (dwMaxSize == SHORT_MAX_SIZE)
pc->dwDataLen = dwOldLen + 1;
else
pc->dwDataLen = dwOldLen + sizeof(WORD);
if ((pc->pbDataBuff = MEMALLOC(pc->dwDataLen)) != NULL)
{
PCODEOBJ pArgs = (PCODEOBJ)gpcodeScope->pbDataBuff;
if (dwMaxSize == SHORT_MAX_SIZE)
{
pc->pbDataBuff[0] = (BYTE)(0x70 | dwOldLen);
i = 1;
}
else
{
*((PWORD)&pc->pbDataBuff[0]) = (WORD)dwOldLen;
i = sizeof(WORD);
}
if (pbOldBuff != NULL)
{
memcpy(&pc->pbDataBuff[i], pbOldBuff, dwOldLen);
MEMFREE(pbOldBuff);
}
pc->dwCodeLen = pc->dwDataLen;
pc->bCodeChkSum = ComputeDataChkSum((PBYTE)&pc->pbDataBuff,
pc->dwCodeLen);
if (pArgs[0].dwCodeType == CODETYPE_STRING)
{
PNSOBJ pns;
if ((rc = CreateNameSpaceObj(ptoken, (PSZ)pArgs[0].pbDataBuff,
gpnsCurrentScope, gpnsCurrentOwner,
&pns, NSF_EXIST_ERR)) ==
ASLERR_NONE)
{
pns->ObjData.dwDataType = OBJTYPE_RES_FIELD;
pns->ObjData.uipDataValue = dwResBitOffset +
(dwMaxSize == SHORT_MAX_SIZE?
8: 8*3);
pns->ObjData.dwDataLen = 8*dwOldLen;
}
MEMFREE(pArgs[0].pbDataBuff);
memset(&pArgs[0], 0, sizeof(CODEOBJ));
}
if (rc == ASLERR_NONE)
{
gpcodeScope->dwDataLen = 0;
MEMFREE(gpcodeScope->pbDataBuff);
gpcodeScope->pbDataBuff = NULL;
gpcodeScope->dwCodeLen = 0;
gpcodeScope->bCodeChkSum = 0;
ComputeChkSumLen(gpcodeScope);
if (dwMaxSize == SHORT_MAX_SIZE)
{
dwResBitOffset += ((pc->pbDataBuff[0] & 0x07) + 1)*8;
}
else
{
dwResBitOffset += (*((PWORD)&pc->pbDataBuff[0]) + 3)*8;
}
}
}
else
{
ERROR(("VendorDesc: failed to allocate vendor-defined resource buffer"));
rc = ASLERR_OUT_OF_MEM;
}
}
EXIT((1, "VendorDesc=%d\n", rc));
return rc;
} //VendorDesc
/***LP VendorShort - Vendor-defined short resource
*
* ENTRY
* ptoken -> token stream
* fActionFL - TRUE if this is a fixed list action
*
* EXIT-SUCCESS
* returns ASLERR_NONE
* EXIT-FAILURE
* returns negative error code
*/
int LOCAL VendorShort(PTOKEN ptoken, BOOL fActionFL)
{
int rc;
ENTER((1, "VendorShort(ptoken=%p,fActionFL=%d)\n", ptoken, fActionFL));
DEREF(fActionFL);
ASSERT(fActionFL == FALSE);
rc = VendorDesc(ptoken, 0x07);
EXIT((1, "VendorShort=%d\n", rc));
return rc;
} //VendorShort
/***LP InsertDescLength - Insert long descriptor length
*
* ENTRY
* pcode -> code object
* dwDescLen - length of descriptor
*
* EXIT-SUCCESS
* returns ASLERR_NONE
* EXIT-FAILURE
* returns negative error code
*/
int LOCAL InsertDescLength(PCODEOBJ pcode, DWORD dwDescLen)
{
int rc;
PCODEOBJ pNewArgs;
ENTER((2, "InsertDescLength(pcode=%x,DescLen=%d)\n", pcode, dwDescLen));
if ((pNewArgs = MEMALLOC((pcode->dwDataLen + 1)*sizeof(CODEOBJ))) != NULL)
{
memcpy(&pNewArgs[1], pcode->pbDataBuff,
pcode->dwDataLen*sizeof(CODEOBJ));
memset(&pNewArgs[0], 0, sizeof(CODEOBJ));
SetIntObject(&pNewArgs[0], dwDescLen, sizeof(WORD));
MEMFREE(pcode->pbDataBuff);
pcode->dwDataLen++;
pcode->pbDataBuff = (PBYTE)pNewArgs;
rc = ASLERR_NONE;
}
else
{
ERROR(("InsertDescLength: failed to allocate new argument objects"));
rc = ASLERR_OUT_OF_MEM;
}
EXIT((2, "InsertDescLength=%d\n", rc));
return rc;
} //InsertDescLength
/***LP Memory24Desc - 24-bit memory resource descriptor
*
* ENTRY
* ptoken -> token stream
* fActionFL - TRUE if this is a fixed list action
*
* EXIT-SUCCESS
* returns ASLERR_NONE
* EXIT-FAILURE
* returns negative error code
*/
int LOCAL Memory24Desc(PTOKEN ptoken, BOOL fActionFL)
{
int rc = ASLERR_NONE;
PCODEOBJ pArgs;
ENTER((1, "Memory24Desc(ptoken=%p,fActionFL=%d)\n", ptoken, fActionFL));
DEREF(ptoken);
DEREF(fActionFL);
ASSERT(fActionFL == TRUE);
pArgs = (PCODEOBJ)gpcodeScope->pbDataBuff;
EncodeKeywords(pArgs, 0x01, 0);
if (pArgs[5].dwCodeType == CODETYPE_STRING)
{
PNSOBJ pns;
if ((rc = CreateNameSpaceObj(ptoken, (PSZ)pArgs[5].pbDataBuff,
gpnsCurrentScope, gpnsCurrentOwner,
&pns, NSF_EXIST_ERR)) ==
ASLERR_NONE)
{
pns->ObjData.dwDataType = OBJTYPE_PNP_RES;
rc = CreateResFields(ptoken, pns, Mem24Fields);
}
MEMFREE(pArgs[5].pbDataBuff);
memset(&pArgs[5], 0, sizeof(CODEOBJ));
}
if ((rc == ASLERR_NONE) &&
((rc = InsertDescLength(gpcodeScope, 9)) == ASLERR_NONE))
{
dwResBitOffset += 12*8;
}
EXIT((1, "Memory24Desc=%d\n", rc));
return rc;
} //Memory24Desc
/***LP VendorLong - Vendor-defined long resource
*
* ENTRY
* ptoken -> token stream
* fActionFL - TRUE if this is a fixed list action
*
* EXIT-SUCCESS
* returns ASLERR_NONE
* EXIT-FAILURE
* returns negative error code
*/
int LOCAL VendorLong(PTOKEN ptoken, BOOL fActionFL)
{
int rc;
ENTER((1, "VendorLong(ptoken=%p,fActionFL=%d)\n", ptoken, fActionFL));
DEREF(fActionFL);
ASSERT(fActionFL == FALSE);
rc = VendorDesc(ptoken, 0xffff);
EXIT((1, "VendorLong=%d\n", rc));
return rc;
} //VendorLong
/***LP Memory32Desc - 32-bit memory resource descriptor
*
* ENTRY
* ptoken -> token stream
* fActionFL - TRUE if this is a fixed list action
*
* EXIT-SUCCESS
* returns ASLERR_NONE
* EXIT-FAILURE
* returns negative error code
*/
int LOCAL Memory32Desc(PTOKEN ptoken, BOOL fActionFL)
{
int rc = ASLERR_NONE;
PCODEOBJ pArgs;
ENTER((1, "Memory32Desc(ptoken=%p,fActionFL=%d)\n", ptoken, fActionFL));
DEREF(ptoken);
DEREF(fActionFL);
ASSERT(fActionFL == TRUE);
pArgs = (PCODEOBJ)gpcodeScope->pbDataBuff;
EncodeKeywords(pArgs, 0x01, 0);
if (pArgs[5].dwCodeType == CODETYPE_STRING)
{
PNSOBJ pns;
if ((rc = CreateNameSpaceObj(ptoken, (PSZ)pArgs[5].pbDataBuff,
gpnsCurrentScope, gpnsCurrentOwner,
&pns, NSF_EXIST_ERR)) ==
ASLERR_NONE)
{
pns->ObjData.dwDataType = OBJTYPE_PNP_RES;
rc = CreateResFields(ptoken, pns, Mem32Fields);
}
MEMFREE(pArgs[5].pbDataBuff);
memset(&pArgs[5], 0, sizeof(CODEOBJ));
}
if ((rc == ASLERR_NONE) &&
((rc = InsertDescLength(gpcodeScope, 17)) == ASLERR_NONE))
{
dwResBitOffset += 20*8;
}
EXIT((1, "Memory32Desc=%d\n", rc));
return rc;
} //Memory32Desc
/***LP FixedMemory32Desc - 32-bit fixed memory resource descriptor
*
* ENTRY
* ptoken -> token stream
* fActionFL - TRUE if this is a fixed list action
*
* EXIT-SUCCESS
* returns ASLERR_NONE
* EXIT-FAILURE
* returns negative error code
*/
int LOCAL FixedMemory32Desc(PTOKEN ptoken, BOOL fActionFL)
{
int rc = ASLERR_NONE;
PCODEOBJ pArgs;
ENTER((1, "FixedMemory32Desc(ptoken=%p,fActionFL=%d)\n", ptoken, fActionFL));
DEREF(ptoken);
DEREF(fActionFL);
ASSERT(fActionFL == TRUE);
pArgs = (PCODEOBJ)gpcodeScope->pbDataBuff;
EncodeKeywords(pArgs, 0x01, 0);
if (pArgs[3].dwCodeType == CODETYPE_STRING)
{
PNSOBJ pns;
if ((rc = CreateNameSpaceObj(ptoken, (PSZ)pArgs[3].pbDataBuff,
gpnsCurrentScope, gpnsCurrentOwner,
&pns, NSF_EXIST_ERR)) ==
ASLERR_NONE)
{
pns->ObjData.dwDataType = OBJTYPE_PNP_RES;
rc = CreateResFields(ptoken, pns, FixedMem32Fields);
}
MEMFREE(pArgs[3].pbDataBuff);
memset(&pArgs[3], 0, sizeof(CODEOBJ));
}
if ((rc == ASLERR_NONE) &&
((rc = InsertDescLength(gpcodeScope, 9)) == ASLERR_NONE))
{
dwResBitOffset += 12*8;
}
EXIT((1, "FixedMemory32Desc=%d\n", rc));
return rc;
} //FixedMemory32Desc
#define RESTYPE_MEM 0
#define RESTYPE_IO 1
#define RESTYPE_BUSNUM 2
/***LP MemSpaceDesc - Memory space descriptor
*
* ENTRY
* ptoken -> TOKEN
* dwMinLen - minimum descriptor length
* ResFields -> resource fields table
*
* EXIT-SUCCESS
* returns ASLERR_NONE
* EXIT-FAILURE
* returns negative error code
*/
int LOCAL MemSpaceDesc(PTOKEN ptoken, DWORD dwMinLen, PRESFIELD ResFields)
{
int rc;
PCODEOBJ pArgs;
ENTER((1, "MemSpaceDesc(ptoken=%p,MinLen=%d,ResFields=%p)\n",
ptoken, dwMinLen, ResFields));
pArgs = (PCODEOBJ)gpcodeScope->pbDataBuff;
if (((rc = SetDefMissingKW(&pArgs[0], ID_RESCONSUMER)) == ASLERR_NONE) &&
((rc = SetDefMissingKW(&pArgs[1], ID_POSDECODE)) == ASLERR_NONE) &&
((rc = SetDefMissingKW(&pArgs[2], ID_MINNOTFIXED)) == ASLERR_NONE) &&
((rc = SetDefMissingKW(&pArgs[3], ID_MAXNOTFIXED)) == ASLERR_NONE) &&
((rc = SetDefMissingKW(&pArgs[4], ID_NONCACHEABLE)) == ASLERR_NONE))
{
EncodeKeywords(pArgs, 0x0f, 2);
EncodeKeywords(pArgs, 0x30, 3);
SetIntObject(&pArgs[1], RESTYPE_MEM, sizeof(BYTE));
if (!(pArgs[11].dwfCode & CF_MISSING_ARG))
dwMinLen++;
if (!(pArgs[12].dwfCode & CF_MISSING_ARG))
{
ASSERT(pArgs[12].dwCodeType == CODETYPE_STRING);
dwMinLen += pArgs[12].dwDataLen;
}
SetIntObject(&pArgs[0], dwMinLen, sizeof(WORD));
if (pArgs[13].dwCodeType == CODETYPE_STRING)
{
PNSOBJ pns;
if ((rc = CreateNameSpaceObj(ptoken, (PSZ)pArgs[13].pbDataBuff,
gpnsCurrentScope, gpnsCurrentOwner,
&pns, NSF_EXIST_ERR)) ==
ASLERR_NONE)
{
pns->ObjData.dwDataType = OBJTYPE_PNP_RES;
if (((rc = CreateResFields(ptoken, pns, GenFlagFields)) ==
ASLERR_NONE) &&
((rc = CreateResFields(ptoken, pns, MemTypeFields)) ==
ASLERR_NONE))
{
rc = CreateResFields(ptoken, pns, ResFields);
}
}
MEMFREE(pArgs[13].pbDataBuff);
memset(&pArgs[13], 0, sizeof(CODEOBJ));
}
if (rc == ASLERR_NONE)
{
dwResBitOffset += (dwMinLen + 3)*8;
}
}
EXIT((1, "MemSpaceDesc=%d\n", rc));
return rc;
} //MemSpaceDesc
/***LP IOSpaceDesc - IO space descriptor
*
* ENTRY
* ptoken -> TOKEN
* dwMinLen - minimum descriptor length
* ResFields -> resource fields table
*
* EXIT-SUCCESS
* returns ASLERR_NONE
* EXIT-FAILURE
* returns negative error code
*/
int LOCAL IOSpaceDesc(PTOKEN ptoken, DWORD dwMinLen, PRESFIELD ResFields)
{
int rc;
PCODEOBJ pArgs;
ENTER((2, "IOSpaceDesc(ptoken=%p,MinLen=%d,ResFields=%p)\n",
ptoken, dwMinLen, ResFields));
pArgs = (PCODEOBJ)gpcodeScope->pbDataBuff;
if (((rc = SetDefMissingKW(&pArgs[0], ID_RESCONSUMER)) == ASLERR_NONE) &&
((rc = SetDefMissingKW(&pArgs[1], ID_MINNOTFIXED)) == ASLERR_NONE) &&
((rc = SetDefMissingKW(&pArgs[2], ID_MAXNOTFIXED)) == ASLERR_NONE) &&
((rc = SetDefMissingKW(&pArgs[3], ID_POSDECODE)) == ASLERR_NONE) &&
((rc = SetDefMissingKW(&pArgs[4], ID_ENTIRERNG)) == ASLERR_NONE))
{
EncodeKeywords(pArgs, 0x0f, 2);
EncodeKeywords(pArgs, 0x10, 3);
SetIntObject(&pArgs[1], RESTYPE_IO, sizeof(BYTE));
if (!(pArgs[10].dwfCode & CF_MISSING_ARG))
dwMinLen++;
if (!(pArgs[11].dwfCode & CF_MISSING_ARG))
{
ASSERT(pArgs[11].dwCodeType == CODETYPE_STRING);
dwMinLen += pArgs[11].dwDataLen;
}
SetIntObject(&pArgs[0], dwMinLen, sizeof(WORD));
if (pArgs[12].dwCodeType == CODETYPE_STRING)
{
PNSOBJ pns;
if ((rc = CreateNameSpaceObj(ptoken, (PSZ)pArgs[12].pbDataBuff,
gpnsCurrentScope, gpnsCurrentOwner,
&pns, NSF_EXIST_ERR)) ==
ASLERR_NONE)
{
pns->ObjData.dwDataType = OBJTYPE_PNP_RES;
if (((rc = CreateResFields(ptoken, pns, GenFlagFields)) ==
ASLERR_NONE) &&
((rc = CreateResFields(ptoken, pns, MemTypeFields)) ==
ASLERR_NONE))
{
rc = CreateResFields(ptoken, pns, ResFields);
}
}
MEMFREE(pArgs[12].pbDataBuff);
memset(&pArgs[12], 0, sizeof(CODEOBJ));
}
if (rc == ASLERR_NONE)
{
dwResBitOffset += (dwMinLen + 3)*8;
}
}
EXIT((2, "IOSpaceDesc=%d\n", rc));
return rc;
} //IOSpaceDesc
/***LP DWordMemDesc - DWord memory descriptor
*
* ENTRY
* ptoken -> token stream
* fActionFL - TRUE if this is a fixed list action
*
* EXIT-SUCCESS
* returns ASLERR_NONE
* EXIT-FAILURE
* returns negative error code
*/
int LOCAL DWordMemDesc(PTOKEN ptoken, BOOL fActionFL)
{
int rc;
ENTER((1, "DWordMemDesc(ptoken=%p,fActionFL=%d)\n", ptoken, fActionFL));
DEREF(ptoken);
DEREF(fActionFL);
ASSERT(fActionFL == TRUE);
rc = MemSpaceDesc(ptoken, 23, DWordFields);
EXIT((1, "DWordMemDesc=%d\n", rc));
return rc;
} //DWordMemDesc
/***LP DWordIODesc - DWord IO descriptor
*
* ENTRY
* ptoken -> token stream
* fActionFL - TRUE if this is a fixed list action
*
* EXIT-SUCCESS
* returns ASLERR_NONE
* EXIT-FAILURE
* returns negative error code
*/
int LOCAL DWordIODesc(PTOKEN ptoken, BOOL fActionFL)
{
int rc;
ENTER((1, "DWordIODesc(ptoken=%p,fActionFL=%d)\n", ptoken, fActionFL));
DEREF(ptoken);
DEREF(fActionFL);
ASSERT(fActionFL == TRUE);
rc = IOSpaceDesc(ptoken, 23, DWordFields);
EXIT((1, "DWordIODesc=%d\n", rc));
return rc;
} //DWordIODesc
/***LP WordIODesc - Word IO descriptor
*
* ENTRY
* ptoken -> token stream
* fActionFL - TRUE if this is a fixed list action
*
* EXIT-SUCCESS
* returns ASLERR_NONE
* EXIT-FAILURE
* returns negative error code
*/
int LOCAL WordIODesc(PTOKEN ptoken, BOOL fActionFL)
{
int rc;
ENTER((1, "WordIODesc(ptoken=%p,fActionFL=%d)\n", ptoken, fActionFL));
DEREF(ptoken);
DEREF(fActionFL);
ASSERT(fActionFL == TRUE);
rc = IOSpaceDesc(ptoken, 13, WordFields);
EXIT((1, "WordIODesc=%d\n", rc));
return rc;
} //WordIODesc
/***LP WordBusNumDesc - Word BusNum descriptor
*
* ENTRY
* ptoken -> token stream
* fActionFL - TRUE if this is a fixed list action
*
* EXIT-SUCCESS
* returns ASLERR_NONE
* EXIT-FAILURE
* returns negative error code
*/
int LOCAL WordBusNumDesc(PTOKEN ptoken, BOOL fActionFL)
{
int rc;
PCODEOBJ pArgs;
ENTER((1, "WordBusNumDesc(ptoken=%p,fActionFL=%d)\n", ptoken, fActionFL));
DEREF(ptoken);
DEREF(fActionFL);
ASSERT(fActionFL == TRUE);
pArgs = (PCODEOBJ)gpcodeScope->pbDataBuff;
if (((rc = SetDefMissingKW(&pArgs[0], ID_RESCONSUMER)) == ASLERR_NONE) &&
((rc = SetDefMissingKW(&pArgs[1], ID_MINNOTFIXED)) == ASLERR_NONE) &&
((rc = SetDefMissingKW(&pArgs[2], ID_MAXNOTFIXED)) == ASLERR_NONE) &&
((rc = SetDefMissingKW(&pArgs[3], ID_POSDECODE)) == ASLERR_NONE))
{
DWORD dwLen;
EncodeKeywords(pArgs, 0x0f, 2);
SetIntObject(&pArgs[1], RESTYPE_BUSNUM, sizeof(BYTE));
SetIntObject(&pArgs[3], 0, sizeof(BYTE));
dwLen = 13;
if (!(pArgs[9].dwfCode & CF_MISSING_ARG))
dwLen++;
if (!(pArgs[10].dwfCode & CF_MISSING_ARG))
{
ASSERT(pArgs[10].dwCodeType == CODETYPE_STRING);
dwLen += pArgs[10].dwDataLen;
}
SetIntObject(&pArgs[0], dwLen, sizeof(WORD));
if (pArgs[11].dwCodeType == CODETYPE_STRING)
{
PNSOBJ pns;
if ((rc = CreateNameSpaceObj(ptoken, (PSZ)pArgs[11].pbDataBuff,
gpnsCurrentScope, gpnsCurrentOwner,
&pns, NSF_EXIST_ERR)) ==
ASLERR_NONE)
{
pns->ObjData.dwDataType = OBJTYPE_PNP_RES;
if ((rc = CreateResFields(ptoken, pns, GenFlagFields)) ==
ASLERR_NONE)
{
rc = CreateResFields(ptoken, pns, WordFields);
}
}
MEMFREE(pArgs[11].pbDataBuff);
memset(&pArgs[11], 0, sizeof(CODEOBJ));
}
if (rc == ASLERR_NONE)
{
dwResBitOffset += (dwLen + 3)*8;
}
}
EXIT((1, "WordBusNumDesc=%d\n", rc));
return rc;
} //WordBusNumDesc
/***LP InterruptDesc - Extended Interrupt resource descriptor
*
* ENTRY
* ptoken -> token stream
* fActionFL - TRUE if this is a fixed list action
*
* EXIT-SUCCESS
* returns ASLERR_NONE
* EXIT-FAILURE
* returns negative error code
*/
int LOCAL InterruptDesc(PTOKEN ptoken, BOOL fActionFL)
{
int rc = ASLERR_NONE;
PCODEOBJ pArgs;
PCODEOBJ pc;
ENTER((1, "InterruptDesc(ptoken=%p,fActionFL=%d)\n", ptoken, fActionFL));
DEREF(fActionFL);
ASSERT(fActionFL == FALSE);
pArgs = (PCODEOBJ)gpcodeScope->pbDataBuff;
pc = gpcodeScope->pcFirstChild;
if (((rc = SetDefMissingKW(&pArgs[0], ID_RESCONSUMER)) == ASLERR_NONE) &&
((rc = SetDefMissingKW(&pArgs[3], ID_EXCLUSIVE)) == ASLERR_NONE))
{
if (pArgs[1].dwCodeValue == ID_EDGE)
pArgs[1].dwCodeValue = ID_EXT_EDGE;
else if (pArgs[1].dwCodeValue == ID_LEVEL)
pArgs[1].dwCodeValue = ID_EXT_LEVEL;
if (pArgs[2].dwCodeValue == ID_ACTIVEHI)
pArgs[2].dwCodeValue = ID_EXT_ACTIVEHI;
else if (pArgs[2].dwCodeValue == ID_ACTIVELO)
pArgs[2].dwCodeValue = ID_EXT_ACTIVELO;
if (pArgs[3].dwCodeValue == ID_SHARED)
pArgs[3].dwCodeValue = ID_EXT_SHARED;
else if (pArgs[3].dwCodeValue == ID_EXCLUSIVE)
pArgs[3].dwCodeValue = ID_EXT_EXCLUSIVE;
if (((rc = LookupIDIndex(pArgs[1].dwCodeValue, &pArgs[1].dwTermIndex))
== ASLERR_NONE) &&
((rc = LookupIDIndex(pArgs[2].dwCodeValue, &pArgs[2].dwTermIndex))
== ASLERR_NONE) &&
((rc = LookupIDIndex(pArgs[3].dwCodeValue, &pArgs[3].dwTermIndex))
== ASLERR_NONE))
{
EncodeKeywords(pArgs, 0x0f, 1);
{
DWORD dwNumIRQs = 0;
DWORD dwLen;
if (pc != NULL)
{
ASSERT(pc->dwCodeType == CODETYPE_DATAOBJ);
dwNumIRQs = pc->dwDataLen/sizeof(DWORD);
}
SetIntObject(&pArgs[2], dwNumIRQs, sizeof(BYTE));
memcpy(&pArgs[3], pc, sizeof(CODEOBJ));
MEMFREE(pc);
gpcodeScope->pcFirstChild = NULL;
dwLen = 2 + dwNumIRQs*sizeof(DWORD);
if (!(pArgs[4].dwfCode & CF_MISSING_ARG))
dwLen++;
if (!(pArgs[5].dwfCode & CF_MISSING_ARG))
{
ASSERT(pArgs[5].dwCodeType == CODETYPE_STRING);
dwLen += pArgs[5].dwDataLen;
}
SetIntObject(&pArgs[0], dwLen, sizeof(WORD));
if (pArgs[6].dwCodeType == CODETYPE_STRING)
{
PNSOBJ pns;
static RESFIELD IRQTabFields[] =
{
"_INT", 5*8 + 0, 0,
NULL, 0, 0
};
IRQTabFields[0].dwBitSize = dwNumIRQs*32;
if ((rc = CreateNameSpaceObj(ptoken,
(PSZ)pArgs[6].pbDataBuff,
gpnsCurrentScope,
gpnsCurrentOwner,
&pns, NSF_EXIST_ERR)) ==
ASLERR_NONE)
{
pns->ObjData.dwDataType = OBJTYPE_PNP_RES;
if ((rc = CreateResFields(ptoken, pns, IRQExFields)) ==
ASLERR_NONE)
{
rc = CreateResFields(ptoken, pns, IRQTabFields);
}
}
MEMFREE(pArgs[6].pbDataBuff);
memset(&pArgs[6], 0, sizeof(CODEOBJ));
}
if (rc == ASLERR_NONE)
{
gpcodeScope->dwCodeLen = 0;
gpcodeScope->bCodeChkSum = 0;
ComputeChkSumLen(gpcodeScope);
dwResBitOffset = (dwLen + 3)*8;
}
}
}
}
EXIT((1, "InterruptDesc=%d\n", rc));
return rc;
} //InterruptDesc
/***LP QWordMemDesc - QWord memory descriptor
*
* ENTRY
* ptoken -> token stream
* fActionFL - TRUE if this is a fixed list action
*
* EXIT-SUCCESS
* returns ASLERR_NONE
* EXIT-FAILURE
* returns negative error code
*/
int LOCAL QWordMemDesc(PTOKEN ptoken, BOOL fActionFL)
{
int rc;
ENTER((1, "QWordMemDesc(ptoken=%p,fActionFL=%d)\n", ptoken, fActionFL));
DEREF(ptoken);
DEREF(fActionFL);
ASSERT(fActionFL == TRUE);
rc = MemSpaceDesc(ptoken, 43, QWordFields);
EXIT((1, "QWordMemDesc=%d\n", rc));
return rc;
} //QWordMemDesc
/***LP QWordIODesc - QWord IO descriptor
*
* ENTRY
* ptoken -> token stream
* fActionFL - TRUE if this is a fixed list action
*
* EXIT-SUCCESS
* returns ASLERR_NONE
* EXIT-FAILURE
* returns negative error code
*/
int LOCAL QWordIODesc(PTOKEN ptoken, BOOL fActionFL)
{
int rc;
ENTER((1, "QWordIODesc(ptoken=%p,fActionFL=%d)\n", ptoken, fActionFL));
DEREF(ptoken);
DEREF(fActionFL);
ASSERT(fActionFL == TRUE);
rc = IOSpaceDesc(ptoken, 43, QWordFields);
EXIT((1, "QWordIODesc=%d\n", rc));
return rc;
} //QWordIODesc
/***LP CreateResFields - Create resource fields
*
* ENTRY
* ptoken -> TOKEN
* pnsParent -> parent object
* prf -> resource fields table
*
* EXIT-SUCCESS
* returns ASLERR_NONE
* EXIT-FAILURE
* returns negative error code
*/
int LOCAL CreateResFields(PTOKEN ptoken, PNSOBJ pnsParent, PRESFIELD prf)
{
int rc = ASLERR_NONE;
int i;
PNSOBJ pns;
ENTER((2, "CreateResFields(ptoken=%p,pnsParent=%s,prf=%p)\n",
ptoken, GetObjectPath(pnsParent), prf));
for (i = 0; prf[i].pszName != NULL; ++i)
{
if ((rc = CreateNameSpaceObj(ptoken, prf[i].pszName, pnsParent,
gpnsCurrentOwner, &pns, NSF_EXIST_ERR))
== ASLERR_NONE)
{
pns->ObjData.dwDataType = OBJTYPE_RES_FIELD;
pns->ObjData.uipDataValue = dwResBitOffset + prf[i].dwBitOffset;
pns->ObjData.dwDataLen = prf[i].dwBitSize;
}
}
EXIT((2, "CreateResFields=%d\n", rc));
return rc;
} //CreateResFields