166 lines
8.6 KiB
Matlab
166 lines
8.6 KiB
Matlab
tic
|
|
basePath = 'C:\Users\Silas\Documents\MATLAB\Datensätze\sioe_labor\';
|
|
useGui = 0;
|
|
db = DBHandler("pathToDB",[basePath,'silas_labor.db']);
|
|
|
|
toc
|
|
|
|
if useGui
|
|
filterParams = db.promptFilterParameters();
|
|
selectedFields = db.promptSelectFields();
|
|
else
|
|
filterParams = db.tables;
|
|
filterParams.Configurations = struct( ...
|
|
'bitrate', 300e9, ...
|
|
'db_mode', 0, ...
|
|
'fiber_length', 1, ...
|
|
'interference_attenuation', [], ...
|
|
'interference_path_length', [], ...
|
|
'is_mpi', 0, ...
|
|
'pam_level', 4, ...
|
|
'precomp_amp', [], ...
|
|
'rop_attenuation', [], ...
|
|
'symbolrate', [], ...
|
|
'v_awg', [], ...
|
|
'v_bias', [], ...
|
|
'wavelength', 1310 ...
|
|
);
|
|
% filterParams.Runs.run_id = 3303;
|
|
%filterParams.Equalizer.eq_id = equalizer_structure.vnle;
|
|
selectedFields = {'Runs.run_id','Runs.tx_bits_path', 'Runs.tx_symbols_path', 'Runs.rx_sync_path','Runs.rx_raw_path',...
|
|
'Configurations.db_mode','Configurations.pam_level','Configurations.bitrate','Configurations.fiber_length','Configurations.wavelength','Configurations.precomp_amp','BERs.ber'};
|
|
end
|
|
|
|
toc
|
|
|
|
[dataTable,sql_query] = db.queryDB(filterParams, selectedFields);
|
|
[~, uniqueIdx] = unique(dataTable.run_id); % Get unique run_id indices
|
|
dataTable = dataTable(uniqueIdx,:); % Extract unique configurations for each run_id
|
|
fprintf('Found %d entries for requested Configuration. IDs are: %s \n \n',size(dataTable,1),jsonencode(dataTable.run_id(1:min(size(dataTable,1),100))));
|
|
|
|
toc
|
|
|
|
fprintf('Processing: %d%%', 0);
|
|
%2) Process Measurement Config
|
|
for i = 1:size(dataTable,1)
|
|
|
|
fprintf('\b\b\b\b%4d', i); % Backspace 3 characters, then overwrite
|
|
|
|
[~, foundBerFlag] = getBerForRunId(db, dataTable.run_id(i));
|
|
if foundBerFlag
|
|
continue
|
|
end
|
|
|
|
fprintf('\n%s T: %f CURRENT ID: %d == %d KM == %s PAM %d == %d Gbit/s == %d nm %s \n \n', repmat('=', 1, 10), toc/60, dataTable.run_id(i), dataTable.fiber_length(i) ,db_mode(dataTable.db_mode(i)), dataTable.pam_level(i) ,dataTable.bitrate(i).*1e-9,dataTable.wavelength(i), repmat('=', 1, 10)); % Print a blank line, then a thick line of 80 '=' characters, then another blank line
|
|
|
|
% FROM NOW ON, ONE Run_id IS CHOSEN AND WILL BE DSP'd
|
|
|
|
tx_bits = load([basePath, char(dataTable.tx_bits_path(i))]);
|
|
tx_bits = tx_bits.Bits;
|
|
tx_symbols = load([basePath, char(dataTable.tx_symbols_path(i))]);
|
|
tx_symbols = tx_symbols.Symbols;
|
|
rx_sync = load([basePath, char(dataTable.rx_sync_path(i))]);
|
|
rx_sync = rx_sync.S;
|
|
%rx_raw = load([basePath, char(result.rx_raw_path(i))]);
|
|
|
|
ffe_order=[50,0,0];
|
|
vnle_order=[50,7,7];
|
|
dfe_order = [0 0 0];
|
|
|
|
len_tr = 4096*2;
|
|
mu_ffe = [0.0004 0.0004 0.0004];
|
|
mu_dfe = 0.0004;
|
|
mu_dc = 0.05;
|
|
|
|
dfe_ = sum(dfe_order)>0;
|
|
|
|
%Loop through sliced oscilloscope measurement
|
|
parfor o = 1:numel(rx_sync)
|
|
rx_sig = rx_sync{o};
|
|
|
|
M = dataTable.pam_level(i);
|
|
|
|
switch dataTable.db_mode(i)
|
|
|
|
case db_mode.no_db
|
|
|
|
%FFE
|
|
eq_ffe(o) = EQ("Ne",ffe_order,"Nb",dfe_order,"training_length",len_tr,"training_loops",5,"dd_loops",5,"K",2,"DCmu",0.05,"DDmu",[mu_ffe mu_dfe],"DFEmu",0.005,"FFEmu",0,"plotfinal",0,"ideal_dfe",1);
|
|
[eq_sig,eq_noise,ber_ffe(o),totalErrors] = vnle( eq_ffe(o),M,rx_sig,tx_symbols, tx_bits);
|
|
|
|
%VNLE
|
|
eq_vnle(o) = EQ("Ne",vnle_order,"Nb",dfe_order,"training_length",len_tr,"training_loops",5,"dd_loops",5,"K",2,"DCmu",0.05,"DDmu",[mu_ffe mu_dfe],"DFEmu",0.005,"FFEmu",0,"plotfinal",0,"ideal_dfe",1);
|
|
[eq_sig,eq_noise,ber_vnle(o),totalErrors] = vnle(eq_vnle(o),M,rx_sig,tx_symbols, tx_bits);
|
|
|
|
%VNLE + PF + MLSE
|
|
eq_mlse(o) = EQ("Ne",vnle_order,"Nb",dfe_order,"training_length",len_tr,"training_loops",5,"dd_loops",5,"K",2,"DCmu",0.05,"DDmu",[mu_ffe mu_dfe],"DFEmu",0.005,"FFEmu",0,"plotfinal",0,"ideal_dfe",1);
|
|
pf_(o) = Postfilter("ncoeff",2);
|
|
mlse_(o) = MLSE("DIR",[0,0],"duobinary_output",0,"M",[],"trellis_states",[]);
|
|
[eq_sig,eq_noise,ber_mlse(o),totalErrors] = vnle_postfilter_mlse(eq_mlse(o) , pf_(o), mlse_(o),M, rx_sig,tx_symbols, tx_bits);
|
|
|
|
case db_mode.db_precoded
|
|
|
|
%EQ targets DB => less precompensation; pre-coded
|
|
M = dataTable.pam_level(i);
|
|
mlse_db_pre(o) = MLSE("DIR",[1,1],"duobinary_output",1,"M",M,"trellis_states",PAMmapper(M,0).levels);
|
|
eq_db_pre(o) = EQ("Ne",vnle_order,"Nb",dfe_order,"training_length",len_tr,"training_loops",5,"dd_loops",5,"K",2,"DCmu",0.05,"DDmu",[mu_ffe mu_dfe],"DFEmu",0.005,"FFEmu",0,"plotfinal",0,"ideal_dfe",1);
|
|
[eq_sig,eq_noise,ber_db_pre(o),totalErrors] = duobinary_target(eq_db_pre(o), mlse_db_pre(o),M, rx_sig, tx_symbols, tx_bits);
|
|
%->append BER to DB
|
|
|
|
case db_mode.db_encoded
|
|
|
|
%db signaling => db encoded
|
|
M = dataTable.pam_level(i);
|
|
mlse_db_enc(o) = MLSE("DIR",[1,1],"duobinary_output",1,"M",M,"trellis_states",PAMmapper(M,0).levels);
|
|
eq_db_enc(o) = EQ("Ne",vnle_order,"Nb",dfe_order,"training_length",len_tr,"training_loops",5,"dd_loops",5,"K",2,"DCmu",0.05,"DDmu",[mu_ffe mu_dfe],"DFEmu",0.005,"FFEmu",0,"plotfinal",0,"ideal_dfe",1);
|
|
[eq_sig,eq_noise,ber_db_enc(o),totalErrors] = duobinary_signaling(eq_db_enc(o), mlse_db_enc(o),M, rx_sig, tx_symbols, tx_bits);
|
|
%->append BER to DB
|
|
end
|
|
|
|
end
|
|
|
|
for o = 1:numel(rx_sync)
|
|
switch dataTable.db_mode(i)
|
|
|
|
case db_mode.no_db
|
|
|
|
%FFE
|
|
eq_type = equalizer_structure.ffe;
|
|
db.addBEREntry(ber_ffe(o), o, dataTable.run_id(i), eq_ffe(o), dfe_, [], [], eq_type, ffe_order, dfe_order, len_tr, mu_ffe, mu_dfe, mu_dc, "FFE");
|
|
showCurrentMeasurement('EQ', string(eq_type), 'BER',ber_ffe(o), 'Mode', string(db_mode(dataTable.db_mode(i))), 'Len', dataTable.fiber_length(i) ,'PAM' , dataTable.pam_level(i) , 'GBit/s' ,dataTable.bitrate(i).*1e-9, 'Lambda' ,dataTable.wavelength(i) );
|
|
|
|
%VNLE
|
|
eq_type = equalizer_structure.vnle;
|
|
db.addBEREntry(ber_vnle(o), o, dataTable.run_id(i), eq_vnle(o), dfe_, [], [], eq_type, vnle_order, dfe_order, len_tr, mu_ffe, mu_dfe, mu_dc, "VNLE");
|
|
showCurrentMeasurement('EQ', string(eq_type), 'BER',ber_vnle(o), 'Mode', string(db_mode(dataTable.db_mode(i))), 'Len', dataTable.fiber_length(i) ,'PAM' , dataTable.pam_level(i) , 'GBit/s' ,dataTable.bitrate(i).*1e-9, 'Lambda' ,dataTable.wavelength(i) );
|
|
|
|
%MLSE
|
|
eq_type = equalizer_structure.vnle_pf_mlse;
|
|
db.addBEREntry(ber_mlse(o), o, dataTable.run_id(i), eq_mlse(o), dfe_, mlse_(o), pf_(o), eq_type, vnle_order, dfe_order, len_tr, mu_ffe, mu_dfe, mu_dc, "VNLE;PF;MLSE");
|
|
showCurrentMeasurement('EQ', string(eq_type), 'BER',ber_mlse(o), 'Mode', string(db_mode(dataTable.db_mode(i))), 'Len', dataTable.fiber_length(i) ,'PAM' , dataTable.pam_level(i) , 'GBit/s' ,dataTable.bitrate(i).*1e-9, 'Lambda' ,dataTable.wavelength(i) );
|
|
|
|
case db_mode.db_precoded
|
|
|
|
%db_precoded
|
|
eq_type = equalizer_structure.db_precoded;
|
|
db.addBEREntry(ber_db_pre(o), o, dataTable.run_id(i), eq_db_pre(o), dfe_, mlse_db_pre(o), [], eq_type, vnle_order, dfe_order, len_tr, mu_ffe, mu_dfe, mu_dc, "DB Precode;DB Target;MLSE DB Decode;Modulo");
|
|
showCurrentMeasurement('EQ', string(eq_type), 'BER',ber_db_pre(o), 'Mode', string(db_mode(dataTable.db_mode(i))), 'Len', dataTable.fiber_length(i) ,'PAM' , dataTable.pam_level(i) , 'GBit/s' ,dataTable.bitrate(i).*1e-9, 'Lambda' ,dataTable.wavelength(i) );
|
|
|
|
case db_mode.db_encoded
|
|
|
|
%db_encoded
|
|
eq_type = equalizer_structure.db_encoded;
|
|
db.addBEREntry(ber_db_enc(o), o, dataTable.run_id(i), eq_db_enc(o), dfe_, mlse_db_enc(o), [], eq_type, vnle_order, dfe_order, len_tr, mu_ffe, mu_dfe, mu_dc, "DB Precode;DB Encode;DB Target;MLSE DB Decode;Modulo");
|
|
showCurrentMeasurement('EQ', string(eq_type), 'BER',ber_db_enc(o), 'Mode', string(db_mode(dataTable.db_mode(i))), 'Len', dataTable.fiber_length(i) ,'PAM' , dataTable.pam_level(i) , 'GBit/s' ,dataTable.bitrate(i).*1e-9, 'Lambda' ,dataTable.wavelength(i) );
|
|
|
|
end
|
|
|
|
end
|
|
end
|
|
|
|
|
|
fprintf('\n%s SIMULATION COMPLETE AFTER %f MINUTES %s \n \n', repmat('=', 1, 35), toc/60 ,repmat('=', 1, 35)); % Print a blank line, then a thick line of 80 '=' characters, then another blank line
|
|
|
|
|
|
|