Move all sources to src/

1 files changed, 323 insertions, 0 deletions

diff --git a/src/fig0_21.cpp b/src/fig0_21.cpp
new file mode 100644
index 0000000..69f18b9
--- /dev/null
+++ b/src/fig0_21.cpp
@@ -0,0 +1,323 @@
+/*
+    Copyright (C) 2014 CSP Innovazione nelle ICT s.c.a r.l. (http://www.csp.it/)
+    Copyright (C) 2016 Matthias P. Braendli (http://www.opendigitalradio.org)
+    Copyright (C) 2015 Data Path
+
+    This program is free software: you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation, either version 3 of the License, or
+    (at your option) any later version.
+
+    This program is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+    Authors:
+         Sergio Sagliocco <sergio.sagliocco@csp.it>
+         Matthias P. Braendli <matthias@mpb.li>
+                   / |  |-  ')|)  |-|_ _ (|,_   .|  _  ,_ \
+         Data Path \(|(||_(|/_| (||_||(a)_||||(|||.(_()|||/
+
+*/
+
+#include "figs.hpp"
+#include <cstdio>
+#include <cstring>
+#include <map>
+#include <unordered_set>
+
+static std::unordered_set<int> regions_seen;
+
+bool fig0_21_is_complete(int region_id)
+{
+    bool complete = regions_seen.count(region_id);
+
+    if (complete) {
+        regions_seen.clear();
+    }
+    else {
+        regions_seen.insert(region_id);
+    }
+
+    return complete;
+}
+
+
+// FIG 0/21 Frequency Information
+// ETSI EN 300 401 8.1.8
+bool fig0_21(fig0_common_t& fig0, int indent)
+{
+    float freq;
+    uint32_t ifreq;
+    uint64_t key;
+    uint16_t RegionId, Id_field;
+    uint8_t i = 1, j, k, Length_FI_list, RandM, Length_Freq_list, Control_field;
+    uint8_t Control_field_trans_mode, Id_field2;
+    char tmpbuf[256];
+    char desc[256];
+    bool Continuity_flag;
+    uint8_t* f = fig0.f;
+    bool complete = false;
+
+    while (i < (fig0.figlen - 1)) {
+        // iterate over frequency information
+        // decode RegionId, Length of FI list
+        RegionId  =  (f[i] << 3) | (f[i+1] >> 5);
+        complete |= fig0_21_is_complete(RegionId);
+        Length_FI_list  = (f[i+1] & 0x1F);
+        sprintf(desc, "RegionId=0x%03x", RegionId);
+        printbuf(desc, indent+1, NULL, 0);
+        i += 2;
+        if ((i + Length_FI_list) <= fig0.figlen) {
+            j = i;
+            while ((j + 2) < (i + Length_FI_list)) {
+                // iterate over FI list x
+                // decode Id field, R&M, Continuity flag, Length of Freq list
+                Id_field = (f[j] << 8) | f[j+1];
+                RandM = f[j+2] >> 4;
+                Continuity_flag = (f[j+2] >> 3) & 0x01;
+                Length_Freq_list = f[j+2] & 0x07;
+                sprintf(desc, "Id_field=");
+                switch (RandM) {
+                    case 0x0:
+                    case 0x1:
+                        strcat(desc, "EId");
+                        break;
+                    case 0x6:
+                        strcat(desc, "DRM Service Id");
+                        break;
+                    case 0x8:
+                        strcat(desc, "RDS PI");
+                        break;
+                    case 0x9:
+                    case 0xa:
+                    case 0xc:
+                        strcat(desc, "Dummy");
+                        break;
+                    case 0xe:
+                        strcat(desc, "AMSS Service Id");
+                        break;
+                    default:
+                        strcat(desc, "invalid");
+                        break;
+                }
+                sprintf(tmpbuf, "=0x%X, R&M=0x%1x", Id_field, RandM);
+                strcat(desc, tmpbuf);
+                switch (RandM) {
+                    case 0x0:
+                        strcat(desc, "=DAB ensemble, no local windows");
+                        break;
+                    case 0x6:
+                        strcat(desc, "=DRM");
+                        break;
+                    case 0x8:
+                        strcat(desc, "=FM with RDS");
+                        break;
+                    case 0x9:
+                        strcat(desc, "=FM without RDS");
+                        break;
+                    case 0xa:
+                        strcat(desc, "=AM (MW in 9 kHz steps & LW)");
+                        break;
+                    case 0xc:
+                        strcat(desc, "=AM (MW in 5 kHz steps & SW)");
+                        break;
+                    case 0xe:
+                        strcat(desc, "=AMSS");
+                        break;
+                    default:
+                        strcat(desc, "=Rfu");
+                        break;
+                }
+                sprintf(tmpbuf, ", Continuity flag=%d", Continuity_flag);
+                strcat(desc, tmpbuf);
+                if ((fig0.oe() == 0) || ((fig0.oe() == 1) && (RandM != 0x6) && \
+                            ((RandM < 0x8) || (RandM > 0xa)) && (RandM != 0xc) && (RandM != 0xe))) {
+                    if (Continuity_flag == 0) {
+                        switch (RandM) {
+                            case 0x0:
+                            case 0x1:
+                                strcat(desc, "=continuous output not expected");
+                                break;
+                            case 0x6:
+                                strcat(desc, "=no compensating time delay on DRM audio signal");
+                                break;
+                            case 0x8:
+                            case 0x9:
+                                strcat(desc, "=no compensating time delay on FM audio signal");
+                                break;
+                            case 0xa:
+                            case 0xc:
+                            case 0xe:
+                                strcat(desc, "=no compensating time delay on AM audio signal");
+                                break;
+                            default:
+                                strcat(desc, "=Rfu");
+                                break;
+                        }
+                    }
+                    else {  // Continuity_flag == 1
+                        switch (RandM) {
+                            case 0x0:
+                            case 0x1:
+                                strcat(desc, "=continuous output possible");
+                                break;
+                            case 0x6:
+                                strcat(desc, "=compensating time delay on DRM audio signal");
+                                break;
+                            case 0x8:
+                            case 0x9:
+                                strcat(desc, "=compensating time delay on FM audio signal");
+                                break;
+                            case 0xa:
+                            case 0xc:
+                            case 0xe:
+                                strcat(desc, "=compensating time delay on AM audio signal");
+                                break;
+                            default:
+                                strcat(desc, "=Rfu");
+                                break;
+                        }
+                    }
+                }
+                else {  // fig0.oe() == 1
+                    strcat(desc, "=reserved for future addition");
+                }
+                key = ((uint64_t)fig0.oe() << 32) | ((uint64_t)fig0.pd() << 31) | \
+                      ((uint64_t)RegionId << 20) | ((uint64_t)Id_field << 4) | \
+                      (uint64_t)RandM;
+                sprintf(tmpbuf, ", database key=0x%09" PRId64, key);
+                // CEI Change Event Indication
+                if (Length_Freq_list == 0) {
+                    strcat(tmpbuf, ", CEI");
+                }
+                strcat(desc, tmpbuf);
+                printbuf(desc, indent+2, NULL, 0);
+                j += 3; // add header
+
+                k = j;
+                switch (RandM) {
+                    case 0x0:
+                    case 0x1:
+                        while((k + 2) < (j + Length_Freq_list)) {
+                            // iteration over Freq list
+                            ifreq = (((uint32_t)(f[k] & 0x07) << 16) | ((uint32_t)f[k+1] << 8) | (uint32_t)f[k+2]) * 16;
+                            if (ifreq != 0) {
+                                Control_field = (f[k] >> 3);
+                                Control_field_trans_mode = (Control_field >> 1) & 0x07;
+                                if ((Control_field & 0x10) == 0) {
+                                    sprintf(desc, "%d KHz, ", ifreq);
+                                    if ((Control_field & 0x01) == 0) {
+                                        strcat(desc, "geographically adjacent area, ");
+                                    }
+                                    else {  // (Control_field & 0x01) == 1
+                                        strcat(desc, "no geographically adjacent area, ");
+                                    }
+                                    if (Control_field_trans_mode == 0) {
+                                        strcat(desc, "no transmission mode signalled");
+                                    }
+                                    else if (Control_field_trans_mode <= 4) {
+                                        sprintf(tmpbuf, "transmission mode %d", Control_field_trans_mode);
+                                        strcat(desc, tmpbuf);
+                                    }
+                                    else {  // Control_field_trans_mode > 4
+                                        sprintf(tmpbuf, "invalid transmission mode 0x%x", Control_field_trans_mode);
+                                        strcat(desc, tmpbuf);
+                                    }
+                                }
+                                else {  // (Control_field & 0x10) == 0x10
+                                    sprintf(desc, "%d KHz, invalid Control field b23 0x%x", ifreq, Control_field);
+                                }
+                            }
+                            else {
+                                sprintf(desc, "Frequency not to be used (0)");
+                            }
+                            printbuf(desc, indent+3, NULL, 0);
+                            k += 3;
+                        }
+                        break;
+                    case 0x8:
+                    case 0x9:
+                    case 0xa:
+                        while(k < (j + Length_Freq_list)) {
+                            // iteration over Freq list
+                            if (f[k] != 0) {    // freq != 0
+                                if (RandM == 0xa) {
+                                    if (f[k] < 16) {
+                                        ifreq = (144 + ((uint32_t)f[k] * 9));
+                                    }
+                                    else {  // f[k] >= 16
+                                        ifreq = (387 + ((uint32_t)f[k] * 9));
+                                    }
+                                    sprintf(desc, "%d KHz", ifreq);
+                                }
+                                else {  // RandM == 8 or 9
+                                    freq = (87.5 + ((float)f[k] * 0.1));
+                                    sprintf(desc, "%.1f MHz", freq);
+                                }
+                            }
+                            else {
+                                sprintf(desc, "Frequency not to be used (0)");
+                            }
+                            printbuf(desc, indent+3, NULL, 0);
+                            k++;
+                        }
+                        break;
+                    case 0xc:
+                        while((k + 1) < (j + Length_Freq_list)) {
+                            // iteration over Freq list
+                            ifreq = (((uint32_t)f[k] << 8) | (uint32_t)f[k+1]) * 5;
+                            if (ifreq != 0) {
+                                sprintf(desc, "%d KHz", ifreq);
+                            }
+                            else {
+                                sprintf(desc, "Frequency not to be used (0)");
+                            }
+                            printbuf(desc, indent+3, NULL, 0);
+                            k += 2;
+                        }
+                        break;
+                    case 0x6:
+                    case 0xe:
+                        while((k + 2) < (j + Length_Freq_list)) {
+                            // iteration over Freq list
+                            Id_field2 = f[k];
+                            ifreq = ((((uint32_t)f[k+1] & 0x7f) << 8) | (uint32_t)f[k+2]);
+                            if (ifreq != 0) {
+                                sprintf(desc, "%d KHz", ifreq);
+                            }
+                            else {
+                                sprintf(desc, "Frequency not to be used (0)");
+                            }
+                            if (RandM == 0x6) {
+                                sprintf(tmpbuf, ", DRM Service Id 0x%X", Id_field2);
+                                strcat(desc, tmpbuf);
+                            }
+                            else if (RandM == 0xe) {
+                                sprintf(tmpbuf, ", AMSS Service Id 0x%X", Id_field2);
+                                strcat(desc, tmpbuf);
+                            }
+                            if ((f[k+1] & 0x80) == 0x80) {
+                                sprintf(tmpbuf, ", invalid Rfu b15 set to 1 instead of 0");
+                                strcat(desc, tmpbuf);
+                            }
+                            printbuf(desc, indent+3, NULL, 0);
+                            k += 3;
+                        }
+                        break;
+                    default:
+                        break;
+                }
+                j += Length_Freq_list;
+            }
+            i += Length_FI_list;
+        }
+    }
+
+    return complete;
+}
+