/* IBM_PROLOG_BEGIN_TAG */ /* This is an automatically generated prolog. */ /* */ /* $Source: src/usr/diag/prdf/common/plat/pegasus/prdfP8Pll.C $ */ /* */ /* OpenPOWER HostBoot Project */ /* */ /* Contributors Listed Below - COPYRIGHT 2012,2015 */ /* [+] International Business Machines Corp. */ /* */ /* */ /* Licensed under the Apache License, Version 2.0 (the "License"); */ /* you may not use this file except in compliance with the License. */ /* You may obtain a copy of the License at */ /* */ /* http://www.apache.org/licenses/LICENSE-2.0 */ /* */ /* Unless required by applicable law or agreed to in writing, software */ /* distributed under the License is distributed on an "AS IS" BASIS, */ /* WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or */ /* implied. See the License for the specific language governing */ /* permissions and limitations under the License. */ /* */ /* IBM_PROLOG_END_TAG */ /** * @file prdfP8PLL.C * @brief chip Plug-in code for proc pll support */ #include #include #include #include #include #include #include #include #include #include #include #include #include using namespace TARGETING; namespace PRDF { using namespace PLL; using namespace PlatServices; namespace Proc { /** * @brief this is to get a list of pll error * register data to work on * @param i_chip P8 chip * @param o_pllErrRegList Pll Err Reg list * @note */ void GetProcPllErrRegList(ExtensibleChip * i_chip, P8DataBundle::ProcPllErrRegList& o_pllErrRegList) { #define PRDF_FUNC "[Proc::GetProcPllErrRegList] " o_pllErrRegList.clear(); P8DataBundle::PllErrReg entry; do { // PB entry.chip = i_chip; entry.type = P8DataBundle::PB; entry.errReg = i_chip->getRegister("PB_ERROR_REG"); entry.configReg = i_chip->getRegister("PB_CONFIG_REG"); o_pllErrRegList.push_back( entry ); // ABUS entry.chip = i_chip; entry.type = P8DataBundle::ABUS; entry.errReg = i_chip->getRegister("ABUS_ERROR_REG"); entry.configReg = i_chip->getRegister("ABUS_CONFIG_REG"); o_pllErrRegList.push_back( entry ); // EX TargetHandleList exList = getConnected( i_chip->GetChipHandle(), TYPE_EX); ExtensibleChip * exChip; TargetHandleList::iterator itr = exList.begin(); for( ; itr != exList.end(); ++itr) { PRDF_DTRAC(PRDF_FUNC "EX: 0x%.8X", getHuid(*itr)); exChip = (ExtensibleChip *)systemPtr->GetChip( *itr ); if( NULL == exChip ) continue; entry.chip = exChip; entry.type = P8DataBundle::EX; entry.errReg = exChip->getRegister("EX_ERROR_REG"); entry.configReg = exChip->getRegister("EX_CONFIG_REG"); o_pllErrRegList.push_back( entry ); } } while(0); #undef PRDF_FUNC } /** * @brief Query the PLL chip for a Proc PLL error * @param i_chip P8 chip * @param o_result set to true in the presence of PLL error * @returns Failure or Success of query. * @note */ int32_t QueryProcPll( ExtensibleChip * i_chip, bool & o_result) { #define PRDF_FUNC "[Proc::QueryProcPll] " int32_t rc = SUCCESS; o_result = false; MODEL procModel = getProcModel( i_chip->GetChipHandle() ); // Next check for the error reg bits in the chiplets P8DataBundle * procdb = getDataBundle( i_chip ); P8DataBundle::ProcPllErrRegList & procPllErrRegList = procdb->getProcPllErrRegList(); // Always get a list here since this is the entry point GetProcPllErrRegList( i_chip, procPllErrRegList ); do { for(P8DataBundle::ProcPllErrRegListIter itr = procPllErrRegList.begin(); itr != procPllErrRegList.end(); ++itr) { rc = (*itr).errReg->Read(); if (rc != SUCCESS) { PRDF_ERR(PRDF_FUNC "ERROR_REG read failed" "for chip: 0x%08x, type: 0x%08x", (*itr).chip->GetId(), (*itr).type); break; } rc = (*itr).configReg->Read(); if (rc != SUCCESS) { PRDF_ERR(PRDF_FUNC "CONFIG_REG read failed" "for chip: 0x%08x, type: 0x%08x", (*itr).chip->GetId(), (*itr).type); break; } if( P8DataBundle::PB == (*itr).type ) { if(( (*itr).errReg->IsBitSet(PB_DMI_LEFT_PLL_ERROR) && !(*itr).configReg->IsBitSet(PLL_ERROR_MASK) ) || (( MODEL_VENICE == procModel) && ( (*itr).errReg->IsBitSet(PB_DMI_RIGHT_PLL_ERROR) && !(*itr).configReg->IsBitSet(PLL_ERROR_MASK) ))) { o_result = true; break; } } else if((*itr).errReg->IsBitSet(PLL_ERROR_BIT) && !(*itr).configReg->IsBitSet(PLL_ERROR_MASK)) { o_result = true; break; } } } while(0); // clear the PLL Err Reg list if no pll error was found if(false == o_result) { procPllErrRegList.clear(); } if( rc != SUCCESS ) { PRDF_ERR(PRDF_FUNC "failed for proc: 0x%.8X", i_chip->GetId()); } return rc; #undef PRDF_FUNC } PRDF_PLUGIN_DEFINE_NS( NaplesProc, Proc, QueryProcPll ); PRDF_PLUGIN_DEFINE_NS( MuranoVeniceProc, Proc, QueryProcPll ); /** * @brief Query the PLL chip for a PLL error on P8 * @param i_chip P8 Pci chip * @param o_result set to true in the presence of PLL error * @returns Failure or Success of query. * @note */ int32_t QueryPll( ExtensibleChip * i_chip, bool & o_result) { #define PRDF_FUNC "[Proc::QueryPll] " int32_t rc = SUCCESS; o_result = false; SCAN_COMM_REGISTER_CLASS * TP_LFIR = i_chip->getRegister("TP_LFIR"); SCAN_COMM_REGISTER_CLASS * TP_LFIRmask = i_chip->getRegister("TP_LFIR_MASK"); do { rc = TP_LFIR->Read(); if (rc != SUCCESS) { PRDF_ERR(PRDF_FUNC "TP_LFIR read failed" "for 0x%08x", i_chip->GetId()); break; } rc = TP_LFIRmask->Read(); if (rc != SUCCESS) { PRDF_ERR(PRDF_FUNC "TP_LFIR_MASK read failed" "for 0x%08x", i_chip->GetId()); break; } if (( TP_LFIRmask->IsBitSet(PLL_DETECT_P8) ) || ( ! TP_LFIR->IsBitSet(PLL_DETECT_P8) )) { // if global pll bit is not set, break out break; } rc = QueryProcPll( i_chip, o_result ); if ((rc != SUCCESS) || (true == o_result)) break; } while(0); if( rc != SUCCESS ) { PRDF_ERR(PRDF_FUNC "failed for proc: 0x%.8X", i_chip->GetId()); } return rc; #undef PRDF_FUNC } PRDF_PLUGIN_DEFINE_NS( NaplesProc, Proc, QueryPll ); PRDF_PLUGIN_DEFINE_NS( MuranoVeniceProc, Proc, QueryPll ); /** * @brief Clear the PLL error for P8 Plugin * @param i_chip P8 chip * @param i_sc The step code data struct * @returns Failure or Success of query. */ int32_t ClearPll( ExtensibleChip * i_chip, STEP_CODE_DATA_STRUCT & i_sc) { #define PRDF_FUNC "[Proc::ClearPll] " int32_t rc = SUCCESS; if (CHECK_STOP != i_sc.service_data->getPrimaryAttnType()) { // Clear proc osc error reg bits P8DataBundle * procdb = getDataBundle( i_chip ); P8DataBundle::ProcPllErrRegList & procPllErrRegList = procdb->getProcPllErrRegList(); if( procPllErrRegList.empty() ) { GetProcPllErrRegList( i_chip, procPllErrRegList ); } int32_t tmpRC = SUCCESS; for(P8DataBundle::ProcPllErrRegListIter itr = procPllErrRegList.begin(); itr != procPllErrRegList.end(); ++itr) { (*itr).errReg->ClearBit(PLL_ERROR_BIT); if( P8DataBundle::PB == (*itr).type ) { (*itr).errReg->ClearBit(PB_DMI_LEFT_PLL_ERROR); } tmpRC = (*itr).errReg->Write(); if (tmpRC != SUCCESS) { PRDF_ERR(PRDF_FUNC "ERROR_REG write failed" "for chip: 0x%08x, type: 0x%08x", (*itr).chip->GetId(), (*itr).type); rc |= tmpRC; } } // Clear TP_LFIR SCAN_COMM_REGISTER_CLASS * TP_LFIRand = i_chip->getRegister("TP_LFIR_AND"); TP_LFIRand->setAllBits(); TP_LFIRand->ClearBit(PLL_DETECT_P8); tmpRC = TP_LFIRand->Write(); if (tmpRC != SUCCESS) { PRDF_ERR(PRDF_FUNC "TP_LFIR_AND write failed" "for chip: 0x%08x", i_chip->GetId()); rc |= tmpRC; } // Need to clear the PLL Err Reg list so it can // be populated with fresh data on the next analysis // can do this in error case to save some space procPllErrRegList.clear(); } if( rc != SUCCESS ) { PRDF_ERR(PRDF_FUNC "failed for proc: 0x%.8X", i_chip->GetId()); } return rc; #undef PRDF_FUNC } PRDF_PLUGIN_DEFINE_NS( NaplesProc, Proc, ClearPll ); PRDF_PLUGIN_DEFINE_NS( MuranoVeniceProc, Proc, ClearPll ); /** * @brief Mask the PLL error for P8 Plugin * @param i_chip P8 chip * @param i_sc The step code data struct * @returns Failure or Success of query. * @note */ int32_t MaskPll( ExtensibleChip * i_chip, STEP_CODE_DATA_STRUCT & i_sc ) { #define PRDF_FUNC "[Proc::MaskPll] " int32_t rc = SUCCESS; if (CHECK_STOP != i_sc.service_data->getPrimaryAttnType()) { int32_t tmpRC = SUCCESS; P8DataBundle * procdb = getDataBundle( i_chip ); P8DataBundle::ProcPllErrRegList & procPllErrRegList = procdb->getProcPllErrRegList(); if( procPllErrRegList.empty() ) { GetProcPllErrRegList( i_chip, procPllErrRegList ); } for(P8DataBundle::ProcPllErrRegListIter itr = procPllErrRegList.begin(); itr != procPllErrRegList.end(); ++itr) { // Error is already fenced if( (*itr).configReg->IsBitSet(PLL_ERROR_MASK) ) { continue; } (*itr).configReg->SetBit(PLL_ERROR_MASK); tmpRC = (*itr).configReg->Write(); if (tmpRC != SUCCESS) { PRDF_ERR(PRDF_FUNC "CONFIG_REG write failed" "for chip: 0x%08x, type: 0x%08x", (*itr).chip->GetId(), (*itr).type); rc |= tmpRC; } } // Need to clear the PLL Err Reg list so it can // be populated with fresh data on the next analysis // can do this in error case to save some space procPllErrRegList.clear(); // Since TP_LFIR bit is the collection of all of the // pll error reg bits, we can't mask it or we will not // see any PLL errors reported from the error regs } // if not checkstop if( rc != SUCCESS ) { PRDF_ERR(PRDF_FUNC "failed for proc: 0x%.8X", i_chip->GetId()); } return rc; #undef PRDF_FUNC } PRDF_PLUGIN_DEFINE_NS( NaplesProc, Proc, MaskPll ); PRDF_PLUGIN_DEFINE_NS( MuranoVeniceProc, Proc, MaskPll ); /** * @brief Optional plugin function called after analysis is complete but * before PRD exits. * @param i_chip P8 chip. * @param i_sc The step code data struct. * @note This is especially useful for any analysis that still needs to be * done after the framework clears the FIR bits that were at attention. * @return SUCCESS. */ int32_t PllPostAnalysis( ExtensibleChip * i_chip, STEP_CODE_DATA_STRUCT & i_sc ) { #define PRDF_FUNC "[Proc::PllPostAnalysis] " // Need to clear the PLL Err Reg list so it can // be populated with fresh data on the next analysis P8DataBundle * procdb = getDataBundle( i_chip ); P8DataBundle::ProcPllErrRegList & procPllErrRegList = procdb->getProcPllErrRegList(); procPllErrRegList.clear(); return SUCCESS; #undef PRDF_FUNC } PRDF_PLUGIN_DEFINE_NS( NaplesProc, Proc, PllPostAnalysis ); PRDF_PLUGIN_DEFINE_NS( MuranoVeniceProc, Proc, PllPostAnalysis ); /** * @brief capture additional PLL FFDC * @param i_chip P8 chip * @param i_sc service data collector * @returns Success */ int32_t capturePllFfdc( ExtensibleChip * i_chip, STEP_CODE_DATA_STRUCT & io_sc ) { #define PRDF_FUNC "[Proc::capturePllFfdc] " // Add FSI status reg captureFsiStatusReg( i_chip, io_sc ); // Add EX scom data TargetHandleList exList = getConnected( i_chip->GetChipHandle(), TYPE_EX); ExtensibleChip * exChip; TargetHandleList::iterator itr = exList.begin(); for( ; itr != exList.end(); ++itr) { exChip = (ExtensibleChip *)systemPtr->GetChip(*itr); if( NULL == exChip ) continue; exChip->CaptureErrorData( io_sc.service_data->GetCaptureData(), Util::hashString("PllFIRs")); } return SUCCESS; #undef PRDF_FUNC } PRDF_PLUGIN_DEFINE_NS( NaplesProc, Proc, capturePllFfdc ); PRDF_PLUGIN_DEFINE_NS( MuranoVeniceProc, Proc, capturePllFfdc ); /** * @brief Check PCB Slave internal parity errors * @param i_chip P8 chip * @param o_parityErr true for parity error, false otherwise * @param io_sc service data collector * @returns FAIL or SUCCESS */ int32_t CheckParityErr( ExtensibleChip * i_chip, bool & o_parityErr, STEP_CODE_DATA_STRUCT & io_sc ) { #define PRDF_FUNC "[Proc::CheckParityErr] " int32_t rc = SUCCESS; o_parityErr = false; P8DataBundle * procdb = getDataBundle( i_chip ); P8DataBundle::ProcPllErrRegList & procPllErrRegList = procdb->getProcPllErrRegList(); do { // First check PCI chiplet SCAN_COMM_REGISTER_CLASS * pciErrReg = i_chip->getRegister("PCI_ERROR_REG"); SCAN_COMM_REGISTER_CLASS * pciConfigReg = i_chip->getRegister("PCI_CONFIG_REG"); rc = pciErrReg->Read(); if (rc != SUCCESS) { PRDF_ERR(PRDF_FUNC "PCI_ERROR_REG read failed" "for 0x%08x", i_chip->GetId()); break; } rc = pciConfigReg->Read(); if (rc != SUCCESS) { PRDF_ERR(PRDF_FUNC "PCI_CONFIG_REG read failed" "for 0x%08x", i_chip->GetId()); break; } if(pciErrReg->IsBitSet(PARITY_ERROR_BIT) && !pciConfigReg->IsBitSet(PARITY_ERROR_MASK)) { o_parityErr = true; break; } // Next check other chiplets // Always get a list here since this is the entry point GetProcPllErrRegList( i_chip, procPllErrRegList ); for(P8DataBundle::ProcPllErrRegListIter itr = procPllErrRegList.begin(); itr != procPllErrRegList.end(); ++itr) { rc = (*itr).errReg->Read(); if (rc != SUCCESS) { PRDF_ERR(PRDF_FUNC "ERROR_REG read failed" "for chip: 0x%08x, type: 0x%08x", (*itr).chip->GetId(), (*itr).type); break; } rc = (*itr).configReg->Read(); if (rc != SUCCESS) { PRDF_ERR(PRDF_FUNC "CONFIG_REG read failed" "for chip: 0x%08x, type: 0x%08x", (*itr).chip->GetId(), (*itr).type); break; } if((*itr).errReg->IsBitSet(PARITY_ERROR_BIT) && !(*itr).configReg->IsBitSet(PARITY_ERROR_MASK)) { o_parityErr = true; break; } } } while(0); if( ! o_parityErr ) { PRDF_ERR(PRDF_FUNC "no parity error found for proc: 0x%.8X", i_chip->GetId()); } if( rc != SUCCESS ) { PRDF_ERR(PRDF_FUNC "failed for proc: 0x%.8X", i_chip->GetId()); } return rc; #undef PRDF_FUNC } /** * @brief Mask the PCB Slave internal parity error * @param i_chip P8 chip * @param i_sc The step code data struct * @returns Failure or Success */ int32_t MaskParityErr( ExtensibleChip * i_chip, STEP_CODE_DATA_STRUCT & i_sc) { #define PRDF_FUNC "[Proc::MaskParityErr] " int32_t rc = SUCCESS; if (CHECK_STOP != i_sc.service_data->getPrimaryAttnType()) { // fence off proc osc error reg bits P8DataBundle * procdb = getDataBundle( i_chip ); P8DataBundle::ProcPllErrRegList & procPllErrRegList = procdb->getProcPllErrRegList(); int32_t tmpRC = SUCCESS; if( procPllErrRegList.empty() ) { GetProcPllErrRegList( i_chip, procPllErrRegList ); } for(P8DataBundle::ProcPllErrRegListIter itr = procPllErrRegList.begin(); itr != procPllErrRegList.end(); ++itr) { // Error is already fenced if( (*itr).configReg->IsBitSet(PARITY_ERROR_MASK) ) { continue; } if( (*itr).errReg->IsBitSet(PARITY_ERROR_BIT) ) { (*itr).configReg->SetBit(PARITY_ERROR_MASK); tmpRC = (*itr).configReg->Write(); if (tmpRC != SUCCESS) { PRDF_ERR(PRDF_FUNC "CONFIG_REG write failed" "for chip: 0x%08x, type: 0x%08x", (*itr).chip->GetId(), (*itr).type); rc |= tmpRC; } } } // fence off pci parity error SCAN_COMM_REGISTER_CLASS * pciErrReg = i_chip->getRegister("PCI_ERROR_REG"); SCAN_COMM_REGISTER_CLASS * pciConfigReg = i_chip->getRegister("PCI_CONFIG_REG"); if(pciErrReg->IsBitSet(PARITY_ERROR_BIT) && !pciConfigReg->IsBitSet(PARITY_ERROR_MASK)) { pciConfigReg->SetBit(PARITY_ERROR_MASK); tmpRC = pciConfigReg->Write(); if (tmpRC != SUCCESS) { PRDF_ERR(PRDF_FUNC "PCI_CONFIG_REG write failed" "for 0x%08x", i_chip->GetId()); rc |= tmpRC; } } // Since TP_LFIR bit is the collection of all of the // pll error reg bits, we can't mask it or we will not // see any PLL errors reported from the error regs } // if not checkstop if( rc != SUCCESS ) { PRDF_ERR(PRDF_FUNC "failed for proc: 0x%.8X", i_chip->GetId()); } return rc; #undef PRDF_FUNC } /** * @brief Clear the Parity errors * @param i_chip P8 chip * @param i_sc The step code data struct * @returns Failure or Success */ int32_t ClearParityErr( ExtensibleChip * i_chip, STEP_CODE_DATA_STRUCT & i_sc) { #define PRDF_FUNC "[Proc::ClearParityErr] " int32_t rc = SUCCESS; if (CHECK_STOP != i_sc.service_data->getPrimaryAttnType()) { // Clear proc osc error reg bits P8DataBundle * procdb = getDataBundle( i_chip ); P8DataBundle::ProcPllErrRegList & procPllErrRegList = procdb->getProcPllErrRegList(); if( procPllErrRegList.empty() ) { GetProcPllErrRegList( i_chip, procPllErrRegList ); } int32_t tmpRC = SUCCESS; for(P8DataBundle::ProcPllErrRegListIter itr = procPllErrRegList.begin(); itr != procPllErrRegList.end(); ++itr) { (*itr).errReg->ClearBit(PARITY_ERROR_BIT); tmpRC = (*itr).errReg->Write(); if (tmpRC != SUCCESS) { PRDF_ERR(PRDF_FUNC "ERROR_REG write failed" "for chip: 0x%08x, type: 0x%08x", (*itr).chip->GetId(), (*itr).type); rc |= tmpRC; } } // Clear pci parity error SCAN_COMM_REGISTER_CLASS * pciErrReg = i_chip->getRegister("PCI_ERROR_REG"); pciErrReg->ClearBit(PARITY_ERROR_BIT); tmpRC = pciErrReg->Write(); if (tmpRC != SUCCESS) { PRDF_ERR(PRDF_FUNC "PCI_ERROR_REG write failed" "for 0x%08x", i_chip->GetId()); rc |= tmpRC; } // Clear TP_LFIR SCAN_COMM_REGISTER_CLASS * TP_LFIR_and = i_chip->getRegister("TP_LFIR_AND"); TP_LFIR_and->setAllBits(); // Parity error also feeds into this LFIR TP_LFIR_and->ClearBit(PLL_DETECT_P8); tmpRC = TP_LFIR_and->Write(); if (tmpRC != SUCCESS) { PRDF_ERR(PRDF_FUNC "TP_LFIR_AND write failed" "for 0x%08x", i_chip->GetId()); rc |= tmpRC; } } if( rc != SUCCESS ) { PRDF_ERR(PRDF_FUNC "failed for proc: 0x%.8X", i_chip->GetId()); } return rc; #undef PRDF_FUNC } /** * @brief analyze PCB Slave internal parity errors * @param i_chip P8 chip * @param io_sc service data collector * @returns Failure or Success */ int32_t AnalyzeParityErr( ExtensibleChip * i_chip, STEP_CODE_DATA_STRUCT & io_sc ) { #define PRDF_FUNC "[Proc::AnalyzeParityErr] " int32_t rc = SUCCESS; bool found = false; do { rc = CheckParityErr(i_chip, found, io_sc); if (rc != SUCCESS) break; if(found) { if(io_sc.service_data->IsAtThreshold()) { MaskParityErr( i_chip, io_sc ); } ClearParityErr( i_chip, io_sc ); } } while(0); // clear the PLL Err Reg list P8DataBundle * procdb = getDataBundle( i_chip ); P8DataBundle::ProcPllErrRegList & procPllErrRegList = procdb->getProcPllErrRegList(); procPllErrRegList.clear(); if( rc != SUCCESS ) { PRDF_ERR(PRDF_FUNC "failed for proc: 0x%.8X", i_chip->GetId()); } return rc; #undef PRDF_FUNC } PRDF_PLUGIN_DEFINE_NS( NaplesProc, Proc, AnalyzeParityErr ); PRDF_PLUGIN_DEFINE_NS( MuranoVeniceProc, Proc, AnalyzeParityErr ); } // end namespace Proc } // end namespace PRDF