virtual bool interpretCommand(RiaSocketServer* server, const QList<QByteArray>& args, QDataStream& socketStream) { int caseId = args[1].toInt(); RimEclipseCase* rimCase = server->findReservoir(caseId); if (!rimCase) { server->errorMessageDialog()->showMessage(RiaSocketServer::tr("ResInsight SocketServer: \n") + RiaSocketServer::tr("Could not find the case with ID : \"%1\"").arg(caseId)); return true; } std::vector<QString> wellNames; const cvf::Collection<RigSingleWellResultsData>& wells = rimCase->reservoirData()->wellResults(); for (size_t wIdx = 0; wIdx < wells.size(); ++wIdx) { wellNames.push_back(wells[wIdx]->m_wellName); } quint64 byteCount = sizeof(quint64); quint64 wellCount = wellNames.size(); for (size_t wIdx = 0; wIdx < wellCount; wIdx++) { byteCount += wellNames[wIdx].size() * sizeof(QChar); } socketStream << byteCount; socketStream << wellCount; for (size_t wIdx = 0; wIdx < wellCount; wIdx++) { socketStream << wellNames[wIdx]; } return true; }
virtual bool interpretCommand(RiaSocketServer* server, const QList<QByteArray>& args, QDataStream& socketStream) { int caseId = args[1].toInt(); QString wellName = args[2]; RimEclipseCase* rimCase = server->findReservoir(caseId); if (!rimCase) { server->errorMessageDialog()->showMessage(RiaSocketServer::tr("ResInsight SocketServer: \n") + RiaSocketServer::tr("Could not find the case with ID : \"%1\"").arg(caseId)); return true; } // Create a list of all the requested time steps std::vector<size_t> requestedTimesteps; //First find the well result for the correct well const cvf::Collection<RigSingleWellResultsData>& allWellRes = rimCase->reservoirData()->wellResults(); cvf::ref<RigSingleWellResultsData> currentWellResult; for (size_t tsIdx = 0; tsIdx < allWellRes.size(); ++tsIdx) { if (allWellRes[tsIdx]->m_wellName == wellName) { currentWellResult = allWellRes[tsIdx]; break; } } if (currentWellResult.isNull()) { server->errorMessageDialog()->showMessage( RiaSocketServer::tr("ResInsight SocketServer: \n") + RiaSocketServer::tr("Could not find the well with name : \"%1\"").arg(wellName)); return true; } if (args.size() <= 3) { // Select all timesteps. for (size_t tsIdx = 0; tsIdx < currentWellResult->m_resultTimeStepIndexToWellTimeStepIndex.size(); ++tsIdx) { requestedTimesteps.push_back(tsIdx); } } else { bool timeStepReadError = false; for (int argIdx = 3; argIdx < args.size(); ++argIdx) { bool conversionOk = false; int tsIdx = args[argIdx].toInt(&conversionOk); if (conversionOk) { requestedTimesteps.push_back(tsIdx); } else { timeStepReadError = true; } } if (timeStepReadError) { server->errorMessageDialog()->showMessage(RiaSocketServer::tr("ResInsight SocketServer: riGetGridProperty : \n") + RiaSocketServer::tr("An error occured while interpreting the requested timesteps.")); } } std::vector<QString> wellTypes; std::vector<qint32> wellStatuses; for (size_t tsIdx = 0; tsIdx < requestedTimesteps.size(); ++tsIdx) { QString wellType = "NotDefined"; qint32 wellStatus = 0; if (currentWellResult->hasWellResult(tsIdx)) { switch(currentWellResult->wellResultFrame(tsIdx).m_productionType) { case RigWellResultFrame::PRODUCER: wellType = "Producer"; break; case RigWellResultFrame::OIL_INJECTOR: wellType = "OilInjector"; break; case RigWellResultFrame::WATER_INJECTOR: wellType = "WaterInjector"; break; case RigWellResultFrame::GAS_INJECTOR: wellType = "GasInjector"; break; } wellStatus = currentWellResult->wellResultFrame(tsIdx).m_isOpen ? 1 : 0; } wellTypes.push_back(wellType); wellStatuses.push_back(wellStatus); } quint64 byteCount = sizeof(quint64); quint64 timeStepCount = wellTypes.size(); for (size_t tsIdx = 0; tsIdx < timeStepCount; tsIdx++) { byteCount += wellTypes[tsIdx].size() * sizeof(QChar); byteCount += sizeof(qint32); } socketStream << byteCount; socketStream << timeStepCount; for (size_t tsIdx = 0; tsIdx < timeStepCount; tsIdx++) { socketStream << wellTypes[tsIdx]; socketStream << wellStatuses[tsIdx]; } return true; }
virtual bool interpretCommand(RiaSocketServer* server, const QList<QByteArray>& args, QDataStream& socketStream) { int caseId = args[1].toInt(); QString wellName = args[2]; size_t timeStepIdx = args[3].toInt() - 1; // Interpret timeStepIdx from octave as 1-based RimEclipseCase* rimCase = server->findReservoir(caseId); if (!rimCase) { server->errorMessageDialog()->showMessage(RiaSocketServer::tr("ResInsight SocketServer: \n") + RiaSocketServer::tr("Could not find the case with ID : \"%1\"").arg(caseId)); socketStream << (quint64)0; return true; } const cvf::Collection<RigSingleWellResultsData>& allWellRes = rimCase->reservoirData()->wellResults(); cvf::ref<RigSingleWellResultsData> currentWellResult; for (size_t cIdx = 0; cIdx < allWellRes.size(); ++cIdx) { if (allWellRes[cIdx]->m_wellName == wellName) { currentWellResult = allWellRes[cIdx]; break; } } if (currentWellResult.isNull()) { server->errorMessageDialog()->showMessage( RiaSocketServer::tr("ResInsight SocketServer: \n") + RiaSocketServer::tr("Could not find the well with name : \"%1\"").arg(wellName)); socketStream << (quint64)0; return true; } if (!currentWellResult->hasWellResult(timeStepIdx)) { socketStream << (quint64)0; return true; } std::vector<qint32> cellIs; std::vector<qint32> cellJs; std::vector<qint32> cellKs; std::vector<qint32> gridIndices; std::vector<qint32> cellStatuses; std::vector<qint32> branchIds; std::vector<qint32> segmentIds; // Fetch results const RigWellResultFrame& wellResFrame = currentWellResult->wellResultFrame(timeStepIdx); std::vector<RigGridBase*> grids; rimCase->reservoirData()->allGrids(&grids); for (size_t bIdx = 0; bIdx < wellResFrame.m_wellResultBranches.size(); ++bIdx) { const std::vector<RigWellResultPoint>& branchResPoints = wellResFrame.m_wellResultBranches[bIdx].m_branchResultPoints; for (size_t rpIdx = 0; rpIdx < branchResPoints.size(); ++rpIdx) { const RigWellResultPoint& resPoint = branchResPoints[rpIdx]; if (resPoint.isCell()) { size_t i; size_t j; size_t k; size_t gridIdx = resPoint.m_gridIndex ; grids[gridIdx]->ijkFromCellIndex(resPoint.m_gridCellIndex, &i, &j, &k); bool isOpen = resPoint.m_isOpen; int branchId = resPoint.m_ertBranchId; int segmentId = resPoint.m_ertSegmentId; cellIs .push_back( static_cast<qint32>(i + 1) ); // NB: 1-based index in Octave cellJs .push_back( static_cast<qint32>(j + 1) ); // NB: 1-based index in Octave cellKs .push_back( static_cast<qint32>(k + 1) ); // NB: 1-based index in Octave gridIndices .push_back( static_cast<qint32>(gridIdx) ); cellStatuses.push_back( static_cast<qint32>(isOpen) ); branchIds .push_back( branchId ); segmentIds .push_back( segmentId); } } } quint64 byteCount = sizeof(quint64); quint64 cellCount = cellIs.size(); byteCount += cellCount*( 7 * sizeof(qint32)); socketStream << byteCount; socketStream << cellCount; for (size_t cIdx = 0; cIdx < cellCount; cIdx++) { socketStream << cellIs[cIdx]; socketStream << cellJs[cIdx]; socketStream << cellKs[cIdx]; socketStream << gridIndices[cIdx]; socketStream << cellStatuses[cIdx]; socketStream << branchIds[cIdx]; socketStream << segmentIds[cIdx]; } return true; }
//-------------------------------------------------------------------------------------------------- /// //-------------------------------------------------------------------------------------------------- void RimEclipseStatisticsCaseEvaluator::evaluateForResults(const QList<ResSpec>& resultSpecification) { CVF_ASSERT(m_destinationCase); // First build the destination result data structures to receive the statistics for (int i = 0; i < resultSpecification.size(); i++) { RifReaderInterface::PorosityModelResultType poroModel = resultSpecification[i].m_poroModel; RimDefines::ResultCatType resultType = resultSpecification[i].m_resType; QString resultName = resultSpecification[i].m_resVarName; size_t activeCellCount = m_destinationCase->activeCellInfo(poroModel)->reservoirActiveCellCount(); RigCaseCellResultsData* destCellResultsData = m_destinationCase->results(poroModel); // Placeholder data used to be created here, // this is now moved to RimIdenticalGridCaseGroup::loadMainCaseAndActiveCellInfo() // Create new result data structures to contain the statistical values std::vector<QString> statisticalResultNames; statisticalResultNames.push_back(createResultNameMin(resultName)); statisticalResultNames.push_back(createResultNameMax(resultName)); statisticalResultNames.push_back(createResultNameMean(resultName)); statisticalResultNames.push_back(createResultNameDev(resultName)); statisticalResultNames.push_back(createResultNameRange(resultName)); if (m_statisticsConfig.m_calculatePercentiles) { statisticalResultNames.push_back(createResultNamePVal(resultName, m_statisticsConfig.m_pMinPos)); statisticalResultNames.push_back(createResultNamePVal(resultName, m_statisticsConfig.m_pMidPos)); statisticalResultNames.push_back(createResultNamePVal(resultName, m_statisticsConfig.m_pMaxPos)); } if (activeCellCount > 0) { for (size_t i = 0; i < statisticalResultNames.size(); ++i) { addNamedResult(destCellResultsData, resultType, statisticalResultNames[i], activeCellCount); } } } // Start the loop that calculates the statistics caf::ProgressInfo progressInfo(m_timeStepIndices.size(), "Computing Statistics"); for (size_t timeIndicesIdx = 0; timeIndicesIdx < m_timeStepIndices.size(); timeIndicesIdx++) { size_t timeStepIdx = m_timeStepIndices[timeIndicesIdx]; for (size_t gridIdx = 0; gridIdx < m_destinationCase->gridCount(); gridIdx++) { RigGridBase* grid = m_destinationCase->grid(gridIdx); for (int resSpecIdx = 0; resSpecIdx < resultSpecification.size(); resSpecIdx++) { RifReaderInterface::PorosityModelResultType poroModel = resultSpecification[resSpecIdx].m_poroModel; RimDefines::ResultCatType resultType = resultSpecification[resSpecIdx].m_resType; QString resultName = resultSpecification[resSpecIdx].m_resVarName; size_t activeCellCount = m_destinationCase->activeCellInfo(poroModel)->reservoirActiveCellCount(); if (activeCellCount == 0) continue; RigCaseCellResultsData* destCellResultsData = m_destinationCase->results(poroModel); size_t dataAccessTimeStepIndex = timeStepIdx; // Always evaluate statistics once, and always use time step index zero if (resultType == RimDefines::STATIC_NATIVE) { if (timeIndicesIdx > 0) continue; dataAccessTimeStepIndex = 0; } // Build data access objects for source scalar results cvf::Collection<RigResultAccessor> sourceDataAccessList; for (size_t caseIdx = 0; caseIdx < m_sourceCases.size(); caseIdx++) { RimEclipseCase* sourceCase = m_sourceCases.at(caseIdx); // Trigger loading of dataset sourceCase->results(poroModel)->findOrLoadScalarResultForTimeStep(resultType, resultName, dataAccessTimeStepIndex); cvf::ref<RigResultAccessor> resultAccessor = RigResultAccessorFactory::createResultAccessor(sourceCase->reservoirData(), gridIdx, poroModel, dataAccessTimeStepIndex, resultName, resultType); if (resultAccessor.notNull()) { sourceDataAccessList.push_back(resultAccessor.p()); } } // Build data access objects for destination scalar results // Find the created result container, if any, and put its resultAccessor into the enum indexed destination collection cvf::Collection<RigResultModifier> destinationDataAccessList; std::vector<QString> statisticalResultNames(STAT_PARAM_COUNT); statisticalResultNames[MIN] = createResultNameMin(resultName); statisticalResultNames[MAX] = createResultNameMax(resultName); statisticalResultNames[RANGE] = createResultNameRange(resultName); statisticalResultNames[MEAN] = createResultNameMean(resultName); statisticalResultNames[STDEV] = createResultNameDev(resultName); statisticalResultNames[PMIN] = createResultNamePVal(resultName, m_statisticsConfig.m_pMinPos); statisticalResultNames[PMID] = createResultNamePVal(resultName, m_statisticsConfig.m_pMidPos); statisticalResultNames[PMAX] = createResultNamePVal(resultName, m_statisticsConfig.m_pMaxPos); for (size_t stIdx = 0; stIdx < statisticalResultNames.size(); ++stIdx) { size_t scalarResultIndex = destCellResultsData->findScalarResultIndex(resultType, statisticalResultNames[stIdx]); cvf::ref<RigResultModifier> resultModifier = RigResultModifierFactory::createResultModifier(m_destinationCase, grid->gridIndex(), poroModel, dataAccessTimeStepIndex, scalarResultIndex); destinationDataAccessList.push_back(resultModifier.p()); } std::vector<double> statParams(STAT_PARAM_COUNT, HUGE_VAL); std::vector<double> values(sourceDataAccessList.size(), HUGE_VAL); // Loop over the cells in the grid, get the case values, and calculate the cell statistics #pragma omp parallel for schedule(dynamic) firstprivate(statParams, values) for (int cellIdx = 0; static_cast<size_t>(cellIdx) < grid->cellCount(); cellIdx++) { size_t reservoirCellIndex = grid->reservoirCellIndex(cellIdx); if (m_destinationCase->activeCellInfo(poroModel)->isActive(reservoirCellIndex)) { // Extract the cell values from each of the cases and assemble them into one vector bool foundAnyValidValues = false; for (size_t caseIdx = 0; caseIdx < sourceDataAccessList.size(); caseIdx++) { double val = sourceDataAccessList.at(caseIdx)->cellScalar(cellIdx); values[caseIdx] = val; if (val != HUGE_VAL) { foundAnyValidValues = true; } } // Do the real statistics calculations if (foundAnyValidValues) { RigStatisticsMath::calculateBasicStatistics(values, &statParams[MIN], &statParams[MAX], &statParams[RANGE], &statParams[MEAN], &statParams[STDEV]); // Calculate percentiles if (m_statisticsConfig.m_calculatePercentiles ) { if (m_statisticsConfig.m_pValMethod == RimEclipseStatisticsCase::NEAREST_OBSERVATION) { std::vector<double> pValPoss; pValPoss.push_back(m_statisticsConfig.m_pMinPos); pValPoss.push_back(m_statisticsConfig.m_pMidPos); pValPoss.push_back(m_statisticsConfig.m_pMaxPos); std::vector<double> pVals = RigStatisticsMath::calculateNearestRankPercentiles(values, pValPoss); statParams[PMIN] = pVals[0]; statParams[PMID] = pVals[1]; statParams[PMAX] = pVals[2]; } else if (m_statisticsConfig.m_pValMethod == RimEclipseStatisticsCase::HISTOGRAM_ESTIMATED) { std::vector<size_t> histogram; RigHistogramCalculator histCalc(statParams[MIN], statParams[MAX], 100, &histogram); histCalc.addData(values); statParams[PMIN] = histCalc.calculatePercentil(m_statisticsConfig.m_pMinPos); statParams[PMID] = histCalc.calculatePercentil(m_statisticsConfig.m_pMidPos); statParams[PMAX] = histCalc.calculatePercentil(m_statisticsConfig.m_pMaxPos); } else if (m_statisticsConfig.m_pValMethod == RimEclipseStatisticsCase::INTERPOLATED_OBSERVATION) { std::vector<double> pValPoss; pValPoss.push_back(m_statisticsConfig.m_pMinPos); pValPoss.push_back(m_statisticsConfig.m_pMidPos); pValPoss.push_back(m_statisticsConfig.m_pMaxPos); std::vector<double> pVals = RigStatisticsMath::calculateInterpolatedPercentiles(values, pValPoss); statParams[PMIN] = pVals[0]; statParams[PMID] = pVals[1]; statParams[PMAX] = pVals[2]; } else { CVF_ASSERT(false); } } } // Set the results into the results data structures for (size_t stIdx = 0; stIdx < statParams.size(); ++stIdx) { if (destinationDataAccessList[stIdx].notNull()) { destinationDataAccessList[stIdx]->setCellScalar(cellIdx, statParams[stIdx]); } } } } } } // When one time step is completed, free memory and clean up // Microsoft note: On Windows, the maximum number of files open at the same time is 512 // http://msdn.microsoft.com/en-us/library/kdfaxaay%28vs.71%29.aspx for (size_t caseIdx = 0; caseIdx < m_sourceCases.size(); caseIdx++) { RimEclipseCase* eclipseCase = m_sourceCases.at(caseIdx); if (!eclipseCase->reservoirViews.size()) { eclipseCase->results(RifReaderInterface::MATRIX_RESULTS)->cellResults()->freeAllocatedResultsData(); eclipseCase->results(RifReaderInterface::FRACTURE_RESULTS)->cellResults()->freeAllocatedResultsData(); } // Todo : These calls really do nothing right now the access actually closes automatically in ert i belive ... eclipseCase->results(RifReaderInterface::MATRIX_RESULTS)->readerInterface()->close(); eclipseCase->results(RifReaderInterface::FRACTURE_RESULTS)->readerInterface()->close(); } progressInfo.setProgress(timeIndicesIdx); } }