lab5 task1 done, task2 nearly finished

2026-06-22 22:03:28 +02:00
parent 48793b1532
commit eb4d72c7c2
16 changed files with 2727 additions and 0 deletions
@@ -0,0 +1,106 @@
+function [numPacketErrors, numPacketsSimulated, cfrMagnitudes, rxPower, pathLoss]= simulateTransmission(accessAnalysisResults, cfgEHT, channel, maxChDelay, snr, maxNumErrors, simParameters)
+    numPacketErrors = 0;
+    numPacketsSimulated = 0;
+    cfrMagnitudes = [];
+    rxPower = zeros(size(accessAnalysisResults.elevationAngles));
+    pathLoss = zeros(size(accessAnalysisResults.elevationAngles));
+
+    ofdmInfo = wlanEHTOFDMInfo('EHT-Data', cfgEHT);
+    ind = wlanFieldIndices(cfgEHT);
+
+    stream = RandStream('combRecursive', Seed=simParameters.Seed);
+    stream.Substream = 1;
+    RandStream.setGlobalStream(stream);
+
+    powerOnlySimulation = isempty(snr);
+    if ~powerOnlySimulation
+        snrVal = convertSNR(snr, "snrsc", "snr", FFTLength=ofdmInfo.FFTLength, NumActiveSubcarriers=ofdmInfo.NumTones);
+    end
+
+    if isfield(simParameters, 'TransmitPower')
+        txPower = simParameters.TransmitPower;
+    else
+        txPower = 20;
+    end
+
+    lambda = physconst("lightspeed") / simParameters.CarrierFrequency;
+    includePathLoss = isfield(simParameters, 'IncludeFreeSpacePathLoss') && simParameters.IncludeFreeSpacePathLoss;
+
+    while (powerOnlySimulation || numPacketErrors < maxNumErrors) && numPacketsSimulated < numel(accessAnalysisResults.elevationAngles)
+        numPacketsSimulated = numPacketsSimulated + 1;
+
+        if includePathLoss
+            packetDistance = accessAnalysisResults.distances(numPacketsSimulated);
+            pathLoss(numPacketsSimulated) = 20 * log10(4 * pi * packetDistance / lambda);
+        else
+            pathLoss(numPacketsSimulated) = 0;
+        end
+        rxPower(numPacketsSimulated) = txPower - pathLoss(numPacketsSimulated);
+
+        txPSDU = randi([0 1], psduLength(cfgEHT) * 8, 1);
+        tx = wlanWaveformGenerator(txPSDU, cfgEHT);
+
+        stf = tx(ind.LSTF(1):ind.LSTF(2), :);
+        stfPower = mean(abs(stf(:)).^2);
+        
+        tx = tx * sqrt(10^((txPower - 30) / 10)) / sqrt(stfPower);
+
+        txPad = [tx; zeros(maxChDelay, cfgEHT.NumTransmitAntennas)];
+
+        if powerOnlySimulation
+            continue;
+        end
+
+        packetElevationAngle = accessAnalysisResults.elevationAngles(numPacketsSimulated);
+        channel.SatelliteDopplerShift = dopplerShiftCircularOrbit(packetElevationAngle, simParameters.SatelliteAltitude, simParameters.MobileAltitude, simParameters.CarrierFrequency);
+
+        reset(channel);
+        rx = awgn(channel(txPad) * db2mag(-pathLoss(numPacketsSimulated)), snrVal);
+
+        coarsePacketOffset = wlanPacketDetect(rx, cfgEHT.ChannelBandwidth);
+        if isempty(coarsePacketOffset)
+            numPacketErrors = numPacketErrors + 1;
+            continue;
+        end
+
+        lstf = rx(coarsePacketOffset + (ind.LSTF(1) : ind.LSTF(2)), :);
+        coarseFrequencyOffset = wlanCoarseCFOEstimate(lstf, cfgEHT.ChannelBandwidth);
+        rx = frequencyOffset(rx, simParameters.SampleRate, -coarseFrequencyOffset);
+
+        nonhtfields = rx(coarsePacketOffset + (ind.LSTF(1) : ind.LSIG(2)), :);
+        finePacketOffset = wlanSymbolTimingEstimate(nonhtfields, cfgEHT.ChannelBandwidth);
+
+        packetOffset = coarsePacketOffset + finePacketOffset;
+
+        if packetOffset > maxChDelay
+            numPacketErrors = numPacketErrors + 1;
+            continue;
+        end
+
+        rxLLTF = rx(packetOffset + (ind.LLTF(1) : ind.LLTF(2)), :);
+        fineFrequencyOffset = wlanFineCFOEstimate(rxLLTF, cfgEHT.ChannelBandwidth);
+        rx = frequencyOffset(rx, simParameters.SampleRate, -fineFrequencyOffset);
+
+        rxHELTF = rx(packetOffset + (ind.EHTLTF(1) : ind.EHTLTF(2)), :);
+        heltfDemod = wlanEHTDemodulate(rxHELTF, "EHT-LTF", cfgEHT);
+        [chanEstimate, pilotEstimate] = wlanEHTLTFChannelEstimate(heltfDemod, cfgEHT);
+
+        cfrMagnitudes(:, end + 1) = abs(chanEstimate(:, 1, 1));
+
+        rxData = rx(packetOffset + (ind.EHTData(1) : ind.EHTData(2)), :);
+        demodSym = wlanEHTDemodulate(rxData, "EHT-Data", cfgEHT);
+
+        demodSym = wlanEHTTrackPilotError(demodSym, chanEstimate, cfgEHT, "EHT-Data");
+
+        nVarEst = wlanEHTDataNoiseEstimate(demodSym(ofdmInfo.PilotIndices, :, :),pilotEstimate, cfgEHT);
+
+        demodDataSym = demodSym(ofdmInfo.DataIndices, :, :);
+        chanEstimateData = chanEstimate(ofdmInfo.DataIndices, :, :);
+
+        [eqSym, csi] = wlanEHTEqualize(demodDataSym, chanEstimateData, nVarEst, cfgEHT, 'EHT-Data');
+
+        rxPSDU = wlanEHTDataBitRecover(eqSym, nVarEst, csi, cfgEHT);
+
+        numPacketErrors = numPacketErrors + any(biterr(txPSDU, rxPSDU));
+    end
+end