//------------------------------------------------------------------------------ // transmitDataMessage() -- send a data message emission; // returns true if the data emission was sent. //------------------------------------------------------------------------------ bool CommRadio::transmitDataMessage(base::Object* const msg) { bool sent = false; // Transmitting, scanning and have an antenna? if(getOwnship() == nullptr) { if (isMessageEnabled(MSG_DEBUG)) { std::cout << "CommRadio ownship == nullptr!" << std::endl; } return sent; } if (msg != nullptr && isTransmitterEnabled() && getAntenna() != nullptr) { // Send the emission to the other player Emission* em = new Emission(); em->setDataMessage(msg); em->setFrequency(getFrequency()); em->setBandwidth(getBandwidth()); em->setPower(getPeakPower()); em->setTransmitLoss(getRfTransmitLoss()); em->setMaxRangeNM(getMaxDetectRange()); em->setTransmitter(this); em->setReturnRequest(false); getAntenna()->rfTransmit(em); em->unref(); sent = true; } return sent; }
EmissionSequence *HMM::sampleFromState(STATE q,int length) const { // Set up roulette wheels int nD=schema.getNumDiscrete(); Array1D<NmerChain*> chains(nD); Array1D<HigherOrderAlphabet> HOA(nD); for(int i=0 ; i<nD ; ++i) { HOA[i]=HigherOrderAlphabet(schema.getAlphabet(i),order+1); chains[i]=HOA[i].constructChain(); } Array2D< Array1D<RouletteWheel> > emitWheels(numStates,nD); for(STATE q=1 ; q<numStates ; ++q){ for(int i=0 ; i<nD ; ++i) { NmerChain &chain=*chains[i]; Array1D<RouletteWheel> &wheelArray=emitWheels[q][i]; Alphabet &alphabet=schema.getAlphabet(i); int radix=alphabet.size(); HigherOrderAlphabet &H=HOA[i]; int numNmers=H.size(); wheelArray.resize(numNmers); for(int nmer=0 ; nmer<numNmers ; ++nmer) { RouletteWheel &wheel=wheelArray[nmer]; for(int r=0 ; r<radix ; ++r) { // r iterations thu 0th order symbols NmerSymbol to=chain.nextNmer(nmer,r); // "to" is a higher order sym while(int(to)>=discreteEmitProb[q][i].size()) to=chain.getSuffix(to); wheel.addSector(exp(discreteEmitProb[q][i][to])); } wheel.doneAddingSectors(); } } } // Perform sampling EmissionSequence *seq=new EmissionSequence(schema); Array1D<Symbol> prevEmissions(nD); prevEmissions.setAllTo(0); // symbol 0 is always the empty string int len=0, nC=schema.getNumContinuous(); for(int j=0 ; j<length ; ++j) { Emission e; e.resize(nD,nC); emissionProb[q].sample(e.getContinuous()); for(int i=0 ; i<nD ; ++i) { NmerSymbol oldNmer=prevEmissions[i]; BaseSymbol s=emitWheels[q][i][oldNmer].spin(); NmerSymbol newNmer=chains[i]->nextNmer(oldNmer,s); e.getDiscrete(i)=newNmer; prevEmissions[i]=newNmer; } seq->append(e); ++len; } for(int i=0 ; i<nD ; ++i) delete chains[i]; // Return sampled sequence return seq; }
//------------------------------------------------------------------------------ // process() -- process the reports //------------------------------------------------------------------------------ void Rwr::process(const LCreal dt) { BaseClass::process(dt); // --- // Process Emissions into tracks // --- for (Emission* em = rptQueue.get(); em != 0; em = rptQueue.get()) { // finished em->unref(); // this undoes the ref() added in Rwr::receive() } }
//------------------------------------------------------------------------------ // killedNotification() -- We were just killed by player 'p' //------------------------------------------------------------------------------ bool Rwr::killedNotification(Player* const p) { // --- // Clear out the queues // --- for (Emission* em = rptQueue.get(); em != 0; em = rptQueue.get()) { em->unref(); } // --- // Make sure our base class knows we're dead. // --- BaseClass::killedNotification(p); return true; }
//------------------------------------------------------------------------------ // receive() -- process received emissions //------------------------------------------------------------------------------ void Radio::receive(const double dt) { BaseClass::receive(dt); // Receiver losses double noise = getRfRecvNoise(); // --- // Process Emissions // --- Emission* em = nullptr; double signal = 0; // Get an emission from the queue base::lock(packetLock); if (np > 0) { np--; // Decrement 'np', now the array index em = packets[np]; signal = signals[np]; } base::unlock(packetLock); while (em != nullptr) { // Signal/Noise (Equation 2-9) double sn = signal / noise; double snDbl = 10.0 * std::log10(sn); // Is S/N above receiver threshold? if ( snDbl >= getRfThreshold() ) { // Report this valid emission to the radio model ... receivedEmissionReport(em); } em->unref(); em = nullptr; // Get another emission from the queue base::lock(packetLock); if (np > 0) { np--; em = packets[np]; signal = signals[np]; } base::unlock(packetLock); } }
double HMM::getEmissionProb(int state,const Emission &x, bool omitContinuous) const { double P=omitContinuous || schema.getNumContinuous()==0 ? 0.0 : emissionProb[state].logDensity(x.getContinuous()); int numDiscrete=schema.getNumDiscrete(); for(int i=0 ; i<numDiscrete ; ++i) { const NmerChain &chain=chains[i]; NmerSymbol s=x.getDiscrete(i); const Array1D<double> &d=discreteEmitProb[state][i]; const int dsize=d.size(); while(int(s)>=dsize) s=chain.getSuffix(s); P+=d[s]; } return P; }
//------------------------------------------------------------------------------ // clearQueues() -- clear out all queues //------------------------------------------------------------------------------ void Antenna::clearQueues() { lcLock(freeEmLock); Emission* em = freeEmStack.pop(); while (em != 0) { em->unref(); em = freeEmStack.pop(); } lcUnlock(freeEmLock); lcLock(inUseEmLock); em = inUseEmQueue.get(); while (em != 0) { em->unref(); em = inUseEmQueue.get(); } lcUnlock(inUseEmLock); }
//------------------------------------------------------------------------------ // clearTracksAndQueues() -- clear out tracks and queues //------------------------------------------------------------------------------ void Radar::clearTracksAndQueues() { // Clear reports lcLock(myLock); for (unsigned int i = 0; i < numReports && i < MAX_REPORTS; i++) { if (reports[i] != nullptr) { reports[i]->unref(); reports[i] = nullptr; } } numReports = 0; lcUnlock(myLock); // --- // Clear out the queues // --- lcLock(myLock); for (Emission* em = rptQueue.get(); em != nullptr; em = rptQueue.get()) { em->unref(); } while (rptSnQueue.isNotEmpty()) { rptSnQueue.get(); } lcUnlock(myLock); }
//------------------------------------------------------------------------------ // process() -- Process phase //------------------------------------------------------------------------------ void Antenna::process(const LCreal dt) { BaseClass::process(dt); // --- // Recycle emissions ... // Update emission queues: from 'in-use' to 'free' // --- if (recycle) { unsigned int n = inUseEmQueue.entries(); for (unsigned int i = 0; i < n; i++) { lcLock(inUseEmLock); Emission* em = inUseEmQueue.get(); lcUnlock(inUseEmLock); if (em != 0 && em->getRefCount() > 1) { // Others are still referencing the emission, put back on in-use queue lcLock(inUseEmLock); inUseEmQueue.put(em); lcUnlock(inUseEmLock); } else if (em != 0 && em->getRefCount() <= 1) { // No one else is referencing the emission, push to the free stack em->clear(); lcLock(freeEmLock); if (freeEmStack.isNotFull()) freeEmStack.push(em); else em->unref(); lcUnlock(freeEmLock); } } } }
//------------------------------------------------------------------------------ // process() -- process the TWS reports //------------------------------------------------------------------------------ void Radar::process(const LCreal dt) { BaseClass::process(dt); // Find the track manager TrackManager* tm = getTrackManager(); if (tm == nullptr) { // No track manager! Then just flush the input queue. lcLock(myLock); for (Emission* em = rptQueue.get(); em != nullptr; em = rptQueue.get()) { em->unref(); rptSnQueue.get(); } lcUnlock(myLock); } // --- // When end of scan, send all unsent reports to the track manager // --- if (endOfScanFlg) { endOfScanFlg = false; lcLock(myLock); for (unsigned int i = 0; i < numReports && i < MAX_REPORTS; i++) { if (tm != nullptr) { tm->newReport(reports[i], rptMaxSn[i]); } reports[i]->unref(); reports[i] = nullptr; rptMaxSn[i] = 0; } numReports = 0; lcUnlock(myLock); } // --- // Process our returned emissions into reports for the track manager // 1) Match each emission with existing reports // 2) On emission/report matches, if the S/N value of the new emission // is greater than the report, use the new emission // 3) Create new reports for unmatched emissions // --- lcLock(myLock); while (rptQueue.isNotEmpty()) { // Get the emission Emission* em = rptQueue.get(); LCreal snDbl = rptSnQueue.get(); if (em != nullptr) { // --- // 1) Match the emission with existing reports // --- int matched = -1; for (unsigned int i = 0; i < numReports && matched < 0; i++) { // Compare targets if ( em->getTarget() == reports[i]->getTarget() ) { // We have a match!!! matched = i; } } // --- // 2) On emission/report match // --- if (matched >= 0) { if (snDbl > rptMaxSn[matched]) { // When the S/N value of the new emission is greater than the report, // we use the new emission reports[matched]->unref(); em->ref(); reports[matched] = em; rptMaxSn[matched] = snDbl; } } // --- // 3) Create a new report entry for the unmatched emission // --- if (matched < 0 && numReports < MAX_REPORTS) { em->ref(); reports[numReports] = em; rptMaxSn[numReports] = snDbl; numReports++; } // finished em->unref(); } } lcUnlock(myLock); }
//------------------------------------------------------------------------------ // receive() -- process received emissions //------------------------------------------------------------------------------ void Radar::receive(const LCreal dt) { BaseClass::receive(dt); // Can't do anything without an antenna if (getAntenna() == nullptr) return; // Clear the next sweep csweep = computeSweepIndex( static_cast<LCreal>(Basic::Angle::R2DCC * getAntenna()->getAzimuth()) ); clearSweep(csweep); // Compute noise level // CGB moved here from RfSystem // Basically, we're simulation Hannen's S/I equation from page 356 of his notes. // Where I is N + J. J is noise from jamming. // Receiver Loss affects the total I, so we have to wait until this point to account for it. const LCreal interference = (getRfRecvNoise() + jamSignal) * getRfReceiveLoss(); const LCreal noise = getRfRecvNoise() * getRfReceiveLoss(); currentJamSignal = jamSignal * getRfReceiveLoss(); int countNumJammedEm = 0; // --- // Process Returned Emissions // --- Emission* em = nullptr; LCreal signal = 0; // Get an emission from the queue lcLock(packetLock); if (np > 0) { np--; // Decrement 'np', now the array index em = packets[np]; signal = signals[np]; } lcUnlock(packetLock); while (em != nullptr) { // exclude noise jammers (accounted for already in RfSystem::rfReceivedEmission) if (em->getTransmitter() == this || (em->isECM() && !em->isECMType(Emission::ECM_NOISE)) ) { // compute the return trip loss ... // Compute signal received LCreal rcs = em->getRCS(); // Signal Equation (Equation 2-7) LCreal rl = em->getRangeLoss(); signal *= (rcs * rl); // Integration gain signal *= rfIGain; // Range attenuation: we don't want the strong signal from short range targets LCreal maxRng = getRange() * Basic::Distance::NM2M; //LCreal maxRng4 = (maxRng*maxRng*maxRng*maxRng); //LCreal rng = (em->getRange()); const LCreal s1 = 1.0; //if (rng > 0) { // LCreal rng4 = (rng*rng*rng*rng); // s1 = (rng4/maxRng4); // if (s1 > 1.0f) s1 = 1.0f; //} signal *= s1; if (signal > 0.0) { // Signal/Noise (Equation 2-9) const LCreal signalToInterferenceRatio = signal / interference; const LCreal signalToInterferenceRatioDbl = 10.0f * lcLog10(signalToInterferenceRatio); const LCreal signalToNoiseRatio = signal / noise; const LCreal signalToNoiseRatioDbl = 10.0f * lcLog10(signalToNoiseRatio); //std::cout << "Radar::receive(" << em->getTarget() << "): "; //std::cout << " pwr=" << em->getPower(); //std::cout << " gain=" << em->getGain(); //std::cout << " rl=" << rl; //std::cout << " rcs=" << rcs; //std::cout << " signal=" << signal; //std::cout << " recvN=" << getRfRecvNoise(); //std::cout << " signalToInterferenceRatio=" << signalToInterferenceRatio; //std::cout << " signalToInterferenceRatioDbl=" << signalToInterferenceRatioDbl; //std::cout << " thrs=" << getRfThreshold(); //std::cout << std::endl; // Is S/N above receiver threshold and within 125% of max range? // CGB, if "signal <= 0.0", then "signalToInterferenceRatioDbl" is probably invalid // we should probably do something smart with "signalToInterferenceRatioDbl" above as well. lcLock(myLock); if (signalToInterferenceRatioDbl >= getRfThreshold() && em->getRange() <= (maxRng*1.25) && rptQueue.isNotFull()) { // send the report to the track manager em->ref(); rptQueue.put(em); rptSnQueue.put(signalToInterferenceRatioDbl); //std::cout << " (" << em->getRange() << ", " << signalToInterferenceRatioDbl << ", " << signalToInterferenceRatio << ", " << signalToInterferenceRatioDbl << ")"; // Save signal for real-beam display int iaz = csweep; int irng = computeRangeIndex( em->getRange() ); sweeps[iaz][irng] += (signalToInterferenceRatioDbl/100.0f); vclos[iaz][irng] = em->getRangeRate(); } else if (signalToInterferenceRatioDbl < getRfThreshold() && signalToNoiseRatioDbl >= getRfThreshold()) { countNumJammedEm++; } lcUnlock(myLock); } } em->unref(); // this unref() undoes the ref() done by RfSystem::rfReceivedEmission em = nullptr; //if (np >= 0 && np < MAX_EMISSIONS) { // packets[np] = 0; // signals[np] = 0; //} // Get another emission from the queue lcLock(packetLock); if (np > 0) { np--; em = packets[np]; signal = signals[np]; } lcUnlock(packetLock); } //std::cout << std::endl; numberOfJammedEmissions = countNumJammedEm; // Set interference signal back to zero jamSignal = 0; }
//------------------------------------------------------------------------------ // transmit() -- send radar emissions //------------------------------------------------------------------------------ void Radar::transmit(const LCreal dt) { BaseClass::transmit(dt); // Transmitting, scanning and have an antenna? if ( !areEmissionsDisabled() && isTransmitting() ) { // Send the emission to the other player Emission* em = new Emission(); em->setFrequency(getFrequency()); em->setBandwidth(getBandwidth()); const LCreal prf1 = getPRF(); em->setPRF(prf1); int pulses = static_cast<int>(prf1 * dt + 0.5); if (pulses == 0) pulses = 1; // at least one em->setPulses(pulses); const LCreal p = getPeakPower(); em->setPower(p); em->setMaxRangeNM(getRange()); em->setPulseWidth(getPulseWidth()); em->setTransmitLoss(getRfTransmitLoss()); em->setReturnRequest( isReceiverEnabled() ); em->setTransmitter(this); getAntenna()->rfTransmit(em); em->unref(); } }
//------------------------------------------------------------------------------ // receive() -- process received emissions //------------------------------------------------------------------------------ void Rwr::receive(const LCreal dt) { BaseClass::receive(dt); // clear the back buffer clearRays(0); // Receiver losses #if 0 LCreal noise = getRfRecvNoise(); #else LCreal noise = getRfRecvNoise() * getRfReceiveLoss(); #endif // Process received emissions TrackManager* tm = getTrackManager(); Emission* em = 0; LCreal signal = 0; // Get an emission from the queue lcLock(packetLock); if (np > 0) { np--; // Decrement 'np', now the array index em = packets[np]; signal = signals[np]; } lcUnlock(packetLock); while (em != 0) { //std::cout << "Rwr::receive(" << em->getOwnship() << "): "; //std::cout << " pwr=" << em->getPower(); //std::cout << " gain=" << em->getGain(); //std::cout << " rl=" << rl; //std::cout << " pulses=" << pulses; //std::cout << " losses=" << losses; //std::cout << " signal=" << signal; //std::cout << " recvN=" << getRfRecvNoise(); //std::cout << " sn=" << sn; //std::cout << " snDbl=" << snDbl; //std::cout << " thrs=" << getRfThreshold(); //std::cout << std::endl; // CGB, if "signal <= 0.0", then "snDbl" is probably invalid if (signal > 0.0 && dt != 0.0) { // Signal over noise (equation 3-5) LCreal sn = signal / noise; LCreal snDbl = 10.0f * lcLog10(sn); // Is S/N above receiver threshold ## dpg -- for now, don't include ECM emissions if (snDbl > getRfThreshold() && !em->isECM() && rptQueue.isNotFull()) { // Send report to the track manager if (tm != 0) { tm->newReport(em, snDbl); } // Get Angle Of Arrival LCreal aoa= em->getAzimuthAoi(); // Store received power for real-beam display LCreal sigDbl = 10.0f * lcLog10(signal); LCreal signal10 = (sigDbl + 50.0f)/50.f; int idx = getRayIndex( static_cast<LCreal>(Basic::Angle::R2DCC * aoa) ); rays[0][idx] = lim01(rays[0][idx] + signal10); //if (idx == 0 && getOwnship()->getID() == 1011) { // std::cout << "sig = " << signal10 << std::endl; //} // Send to the track list processor em->ref(); // ref() for track list processing rptQueue.put(em); } } // finished em->unref(); // this unref() undoes the ref() done by RfSystem::rfReceivedEmission em = 0; // Get another emission from the queue lcLock(packetLock); if (np > 0) { np--; em = packets[np]; signal = signals[np]; } lcUnlock(packetLock); } // Transfer the rays xferRays(); }
//------------------------------------------------------------------------------ // shutdownNotification() //------------------------------------------------------------------------------ bool Rwr::shutdownNotification() { // Clear out the queues for (Emission* em = rptQueue.get(); em != 0; em = rptQueue.get()) { em->unref(); } return BaseClass::shutdownNotification(); }
//------------------------------------------------------------------------------ // deleteData() -- delete member data //------------------------------------------------------------------------------ void Rwr::deleteData() { // Clear out the queues for (Emission* em = rptQueue.get(); em != 0; em = rptQueue.get()) { em->unref(); } }