#include <sstream>
#include <fstream>
#include "dcs_decoder.h"
#include "core/config.h"
#include "common/utils.h"
#include "core/plugin.h"
#include "utils/http.h"
#include "xrit/transport/crc_table.h"
#include "nlohmann/json_utils.h"
#include "logger.h"
#include "core/resources.h"
#include "init.h"

#include "../module_goes_lrit_data_decoder.h"

namespace goes
{
    namespace hrit
    {
        inline std::string bcdDateToString(uint8_t *data)
        {
            struct tm timestruct;
            timestruct.tm_year = ((data[6] & 0xf0) >> 4) * 10 + (data[6] & 0x0f) + 100;
            timestruct.tm_mon = 0;
            timestruct.tm_mday = ((data[5] & 0xf0) >> 4) * 100 + (data[5] & 0x0f) * 10 + ((data[4] & 0xf0) >> 4);
            timestruct.tm_hour = (data[4] & 0x0f) * 10 + ((data[3] & 0xf0) >> 4);
            timestruct.tm_min = (data[3] & 0x0f) * 10 + ((data[2] & 0xf0) >> 4);
            timestruct.tm_sec = (data[2] & 0x0f) * 10 + ((data[1] & 0xf0) >> 4);
            int ms = (data[1] & 0x0f) * 100 + ((data[0] & 0xf0) >> 4) * 10 + (data[0] & 0x0f);

            char return_buffer[20];
            mktime(&timestruct);
            strftime(return_buffer, 20, "%Y-%m-%d %H:%M:%S", &timestruct);
            return std::string(return_buffer) + "." + std::to_string(ms);
        }

        void GOESLRITDataDecoderModule::updateDCPs(DCPUpdateEvent)
        {
            bool update_success = true;
            bool this_success = false;
            std::string file_data;

            logger->info("Updating PDTs and HADS data for DCS processing...");
            std::vector<std::string> pdt_urls = satdump::satdump_cfg.main_cfg["plugin_settings"]["goes_support"]["pdt_urls"];
            for (std::string& pdt_url : pdt_urls)
            {
                if (satdump::perform_http_request(pdt_url, file_data) == 0)
                {
                    std::ofstream save_pdts(satdump::user_path + "/PDTS_COMPRESSED.txt");
                    save_pdts << file_data;
                    save_pdts.close();
                    this_success = true;
                    break;
                }
            }

            if (!this_success)
            {
                logger->warn("Unable to download PDTs!");
                update_success = false;
            }

            this_success = false;
            file_data = "";
            std::vector<std::string> hads_urls = satdump::satdump_cfg.main_cfg["plugin_settings"]["goes_support"]["hads_urls"];
            for (std::string& hads_url : hads_urls)
            {
                if (satdump::perform_http_request(hads_url, file_data) == 0)
                {
                    std::ofstream save_hads(satdump::user_path + "/all_dcp_defs.txt");
                    save_hads << file_data;
                    save_hads.close();
                    this_success = true;
                    break;
                }
            }

            if (!this_success)
            {
                logger->warn("Unable to download HADS data!");
                update_success = false;
            }

            if (update_success)
            {
                satdump::satdump_cfg.main_cfg["plugin_settings"]["goes_support"]["last_pdt_update"] = time(NULL);
                satdump::satdump_cfg.saveUser();

                dcp_mtx.lock();
                dcp_list.clear();
                dcp_mtx.unlock();
                loadDCPs();
            }
        }

        void GOESLRITDataDecoderModule::initDCS()
        {
            if (!parse_dcs)
                return;

            if(shef_codes.empty())
                shef_codes = loadJsonFile(resources::getResourcePath("dcs/shef_codes.json"));

            loadDCPs();
            if (satdump::satdump_cfg.main_cfg["plugin_settings"]["goes_support"]["update_interval"] != -1)
                satdump::taskScheduler->add_task("goes_dcp_updater", std::make_shared<DCPUpdateEvent>(),
                    satdump::satdump_cfg.main_cfg["plugin_settings"]["goes_support"]["last_pdt_update"].get<time_t>(),
                    satdump::satdump_cfg.main_cfg["plugin_settings"]["goes_support"]["update_interval"].get<time_t>());
        }

        void GOESLRITDataDecoderModule::loadDCPs()
        {
            if (!dcp_list.empty())
                return;

            if (std::filesystem::exists(satdump::user_path + "/PDTS_COMPRESSED.txt"))
            {
                logger->info("Loading PDTs...");
                uint16_t field_offsets[] = { 0, 6, 14, 15, 18, 19, 22, 28, 34, 38, 42, 43, 45, 46,
                    47, 78, 85, 93, 94, 108, 124, 125, 126, 132, 156, 176, 196, 226, 237, 238, 239 };

                std::ifstream read_pdts(satdump::user_path + "/PDTS_COMPRESSED.txt");
                std::string pdt_line;
                while (std::getline(read_pdts, pdt_line))
                {
                    try
                    {
                        std::shared_ptr<DCP> new_dcp = std::make_shared<DCP>();

                        // Agency
                        new_dcp->agency = pdt_line.substr(0, 6);

                        // Transmit interval and window (scheduled transmissions only)
                        if (pdt_line[field_offsets[2]] == 'S' || pdt_line[field_offsets[2]] == 'D')
                        {
                            new_dcp->transmit_interval = std::stoi(pdt_line.substr(field_offsets[7], 2)) * 3600 + 
                                std::stoi(pdt_line.substr(field_offsets[7] + 2, 2)) * 60 + 
                                std::stoi(pdt_line.substr(field_offsets[7] + 4, 2));
                            new_dcp->transmit_window = std::stoi(pdt_line.substr(field_offsets[8], 2)) * 60 +
                                std::stoi(pdt_line.substr(field_offsets[8] + 2, 2));
                        }

                        // Data format
                        new_dcp->data_format = pdt_line[field_offsets[10]];

                        // State
                        if (pdt_line.size() >= field_offsets[11])
                            new_dcp->state = pdt_line.substr(field_offsets[11], 2);

                        // Description
                        if (pdt_line.size() >= field_offsets[14])
                        {
                            int desc_last_pos = 0;
                            for (uint16_t last_pos = field_offsets[14]; last_pos < field_offsets[15]; last_pos++)
                                if (pdt_line[last_pos] != ' ')
                                    desc_last_pos = last_pos;
                            if (desc_last_pos != 0)
                            {
                                new_dcp->description = pdt_line.substr(field_offsets[14], desc_last_pos - field_offsets[14] + 1);
                                new_dcp->description.erase(std::remove_if(new_dcp->description.begin(), new_dcp->description.end(),
                                    [](char &c) {return !(*((uint8_t*)&c) < 128); }), new_dcp->description.end());
                            }
                        }

                        // Lat and Lon
                        // This is supposed to be in Degrees, Minutes, and seconds, but some PDTs report it as a decimal.
                        // Often does not report correctly for West or East. These are all upstream errors.
                        if (pdt_line.size() >= field_offsets[16])
                        {
                            // Correct format
                            if (pdt_line[field_offsets[16] + 1] == '0' || (pdt_line[field_offsets[16] + 1] == '1' && pdt_line[field_offsets[16] + 2] < '9'))
                            {
                                new_dcp->lat = std::stof(pdt_line.substr(field_offsets[15] + 1, 2));
                                new_dcp->lat += std::stof(pdt_line.substr(field_offsets[15] + 3, 2)) / 60.0f;
                                new_dcp->lat += std::stof(pdt_line.substr(field_offsets[15] + 5, 2)) / 3600.0f;

                                new_dcp->lon = std::stof(pdt_line.substr(field_offsets[16] + 1, 3));
                                new_dcp->lon += std::stof(pdt_line.substr(field_offsets[16] + 4, 2)) / 60.0f;
                                new_dcp->lon += std::stof(pdt_line.substr(field_offsets[16] + 6, 2)) / 3600.0f;
                            }

                            // Please fix your PDT (but we'll try anyway)
                            else
                            {
                                new_dcp->lat = std::stof(pdt_line.substr(field_offsets[15] + 1, 6)) / 10e3;
                                new_dcp->lon = std::stof(pdt_line.substr(field_offsets[16] + 1, 7)) / 10e4;
                            }

                            if (pdt_line[field_offsets[15]] == '-')
                                new_dcp->lat *= -1;
                            if (pdt_line[field_offsets[16]] == '-')
                                new_dcp->lon *= -1;
                        }

                        // Transmitter Manufacturer
                        if (pdt_line.size() >= field_offsets[18])
                        {
                            int manu_last_pos = 0;
                            for (uint16_t last_pos = field_offsets[18]; last_pos < field_offsets[19]; last_pos++)
                                if (pdt_line[last_pos] != ' ')
                                    manu_last_pos = last_pos;
                            if (manu_last_pos != 0)
                            {
                                new_dcp->manufacturer = pdt_line.substr(field_offsets[18], manu_last_pos - field_offsets[18] + 1);
                                new_dcp->manufacturer.erase(std::remove_if(new_dcp->manufacturer.begin(), new_dcp->manufacturer.end(),
                                    [](char &c) {return !(*((uint8_t*)&c) < 128); }), new_dcp->manufacturer.end());
                            }
                        }

                        // Transmitter Model
                        if (pdt_line.size() >= field_offsets[19])
                        {
                            int model_last_pos = 0;
                            for (uint16_t last_pos = field_offsets[19]; last_pos < field_offsets[20]; last_pos++)
                                if (pdt_line[last_pos] != ' ')
                                    model_last_pos = last_pos;
                            if (model_last_pos != 0)
                            {
                                new_dcp->model = pdt_line.substr(field_offsets[19], model_last_pos - field_offsets[19] + 1);
                                new_dcp->model.erase(std::remove_if(new_dcp->model.begin(), new_dcp->model.end(),
                                    [](char &c) {return !(*((uint8_t*)&c) < 128); }), new_dcp->model.end());
                            }
                        }

                        //NMC Descriptor
                        if (pdt_line.size() >= field_offsets[22])
                        {
                            int nmc_last_pos = 0;
                            for (uint16_t last_pos = field_offsets[22]; last_pos < field_offsets[23]; last_pos++)
                                if (pdt_line[last_pos] != ' ')
                                    nmc_last_pos = last_pos;
                            if (nmc_last_pos != 0)
                            {
                                new_dcp->nmc_descriptor = pdt_line.substr(field_offsets[22], nmc_last_pos - field_offsets[22] + 1);
                                new_dcp->nmc_descriptor.erase(std::remove_if(new_dcp->nmc_descriptor.begin(), new_dcp->nmc_descriptor.end(),
                                    [](char &c) {return !(*((uint8_t*)&c) < 128); }), new_dcp->nmc_descriptor.end());
                            }
                        }

                        // SHEF Codes in this file are mostly wrong - ignore!

                        // Finish up
                        dcp_mtx.lock();
                        dcp_list[std::stoul(pdt_line.substr(field_offsets[1], 8), nullptr, 16)] = new_dcp;
                        dcp_mtx.unlock();
                    }
                    catch (std::exception &e)
                    {
                        logger->warn("Error loading PDT line for DCP processing: %s", e.what());
                    }
                }
            }

            // Load PE info
            if (std::filesystem::exists(satdump::user_path + "/all_dcp_defs.txt"))
            {
                logger->info("Loading HADS data...");
                std::ifstream read_hads(satdump::user_path + "/all_dcp_defs.txt");
                std::string hads_line;
                std::vector<uint16_t> hads_offsets;
                hads_offsets.push_back(0);

                while (std::getline(read_hads, hads_line))
                {
                    std::stringstream hads_stream(hads_line);
                    std::string tmp;
                    std::vector<std::string> hads_tokens;
                    while (std::getline(hads_stream, tmp, '|'))
                    {
                        size_t first_letter = std::string::npos, last_letter = std::string::npos;
                        for (size_t i = 0; i < tmp.size(); i++)
                        {
                            if (first_letter == std::string::npos)
                            {
                                if (tmp[i] == ' ')
                                    continue;
                                first_letter = i;
                            }
                            if (tmp[i] != ' ')
                                last_letter = i;
                        }
                        if (first_letter == std::string::npos)
                            hads_tokens.push_back("");
                        else
                            hads_tokens.push_back(tmp.substr(first_letter, last_letter - first_letter + 1));
                    }

                    try
                    {
                        std::shared_ptr<DCP> this_dcp;
                        uint32_t device_address = std::stoul(hads_tokens[0], nullptr, 16);

                        dcp_mtx.lock();
                        if (dcp_list.count(device_address) > 0)
                            this_dcp = dcp_list[device_address];

                        // DADDs should have all DCPs... but they do not. Fill in extras HADS has
                        else
                        {
                            this_dcp = std::make_shared<DCP>();
                            this_dcp->agency = hads_tokens[2];
                            this_dcp->state = hads_tokens[3];
                            dcp_list[device_address] = this_dcp;

                            // Other info
                            this_dcp->transmit_interval = std::stoi(hads_tokens[8]);
                        }
                        dcp_mtx.unlock();

                        // Latitude
                        std::stringstream degree_stream;
                        std::string degree_str;
                        degree_stream = std::stringstream(hads_tokens[5]);
                        std::getline(degree_stream, degree_str, ' ');
                        this_dcp->lat = std::stof(degree_str);
                        std::getline(degree_stream, degree_str, ' ');
                        this_dcp->lat += (std::stof(degree_str) / 60.0f) * (this_dcp->lat > 0 ? 1 : -1);
                        std::getline(degree_stream, degree_str, ' ');
                        this_dcp->lat += (std::stof(degree_str) / 3600.0f) * (this_dcp->lat > 0 ? 1 : -1);

                        // Longitude
                        degree_stream = std::stringstream(hads_tokens[6]);
                        std::getline(degree_stream, degree_str, ' ');
                        this_dcp->lon = std::stof(degree_str);
                        std::getline(degree_stream, degree_str, ' ');
                        this_dcp->lon += (std::stof(degree_str) / 60.0f) * (this_dcp->lon > 0 ? 1 : -1);
                        std::getline(degree_stream, degree_str, ' ');
                        this_dcp->lon += (std::stof(degree_str) / 3600.0f) * (this_dcp->lon > 0 ? 1 : -1);

                        this_dcp->description = hads_tokens[9];

                        for (size_t i = 11; i < hads_tokens.size() - 5; i += 5)
                        {
                            if (hads_tokens[i] == "")
                                break;

                            PEInfo new_info;
                            new_info.record_interval = std::stoi(hads_tokens[i + 1]);
                            new_info.read_to_transmit_offset = std::stoi(hads_tokens[i + 2]);
                            new_info.base_elevation = std::stoi(hads_tokens[i + 3]);
                            new_info.correction = std::stoi(hads_tokens[i + 4]);

                            if (shef_codes.count(hads_tokens[i]) > 0)
                                new_info.name = shef_codes[hads_tokens[i]];
                            else
                                new_info.name = hads_tokens[i];

                            this_dcp->pe_info.emplace_back(new_info);
                        }
                    }
                    catch (std::exception&)
                    {
                        logger->warn("Error parsing HADS line! Skipping");
                    }
                }
            }
        }

        bool GOESLRITDataDecoderModule::processDCS(uint8_t* data, size_t size)
        {
            DCSFile dcs_file;

            // DCS Header
            dcs_file.name = std::string(&data[0], &data[32]);
            size_t file_size = std::stoull(std::string(&data[32], &data[40]));
            dcs_file.source = std::string(&data[40], &data[44]);
            dcs_file.type = std::string(&data[44], &data[48]);
            // dcs_file.exp_field = std::string(&data[48], &data[60]);
            dcs_file.header_crc_pass =
                (uint32_t)(data[63] << 24 | data[62] << 16 | data[61] << 8 | data[60]) == dcs_crc32.compute(data, 60);

            if (size != file_size)
            {
                logger->warn("Invalid DCS File size! Not parsing");
                return false;
            }

            dcs_file.file_crc_pass =
                (uint32_t)(data[size - 1] << 24 | data[size - 2] << 16 | data[size - 3] << 8 | data[size - 4]) == dcs_crc32.compute(data, size - 4);

            // Trim whitepace
            dcs_file.name.erase(dcs_file.name.find_last_not_of(" ") + 1);
            dcs_file.source.erase(dcs_file.source.find_last_not_of(" ") + 1);
            dcs_file.type.erase(dcs_file.type.find_last_not_of(" ") + 1);
            // dcs_file.exp_field.erase(dcs_file.exp_field.find_last_not_of(" ") + 1);

            // Loop through all blocks
            uint8_t* block_ptr = &data[64];
            while (block_ptr < &data[size - 4])
            {
                // Variables frequently re-used later
                uint16_t block_crc = 0xffff;
                std::stringstream hex_stream;

                // Get Block ID and size
                uint8_t block_id = block_ptr[0];
                size_t block_length = block_ptr[2] << 8 | block_ptr[1];

                // Sanity checks
                if (&block_ptr[block_length] > &data[size - 4])
                {
                    logger->warn("Invalid DCS block length! Skipping remainder of file");
                    return false;
                }
                if (block_length == 5)
                {
                    // Empty file, ignore
                    block_ptr += 5;
                    continue;
                }

                // Calculate Block CRC
                for (uint16_t i = 0; i < block_length - 2; i++)
                    block_crc = (block_crc << 8) ^ satdump::xrit::crc_table[(block_crc >> 8) ^ (uint16_t)block_ptr[i]];
                bool message_crc_pass = (uint16_t)(block_ptr[block_length - 1] << 8 | block_ptr[block_length - 2]) == block_crc;

                // DCP Message Processing
                if (block_id == 1)
                {
                    std::shared_ptr<DCSMessage> dcs_message = std::make_shared<DCSMessage>();
                    dcs_message->header.crc_pass = message_crc_pass;

                    // DCP Sequence Number
                    dcs_message->header.sequence_number = block_ptr[5] << 16 | block_ptr[4] << 8 | block_ptr[3];

                    // Message Flags: Data rate (Unknown, 100, 300, or 1200)
                    if ((block_ptr[6] & 0b111) == 0b001)
                        dcs_message->header.data_rate = "100";
                    else if ((block_ptr[6] & 0b111) == 0b010)
                        dcs_message->header.data_rate = "300";
                    else if ((block_ptr[6] & 0b111) == 0b011)
                        dcs_message->header.data_rate = "1200";
                    else if ((block_ptr[6] & 0b111) == 0b000)
                        dcs_message->header.data_rate = "Undefined";
                    else
                        dcs_message->header.data_rate = "Reserved";

                    // Other Message Flags
                    dcs_message->header.cs_platform = (block_ptr[6] & 0b1000) == 0b1000 ? "CS2" : "CS1";
                    dcs_message->header.parity_errors = (block_ptr[6] & 0b10000) == 0b10000;
                    dcs_message->header.no_eot = (block_ptr[6] & 0b100000) == 0b100000;
                    //Last 2 bits of block_ptr[6] are reserved (should be 0)

                    // Abnormal Received Message Flags
                    dcs_message->header.address_corrected = (block_ptr[7] & 0b1) == 0b1;
                    dcs_message->header.uncorrectable_address = (block_ptr[7] & 0b10) == 0b10;
                    dcs_message->header.invalid_address = (block_ptr[7] & 0b100) == 0b100;
                    dcs_message->header.pdt_incomplete = (block_ptr[7] & 0b1000) == 0b1000;
                    dcs_message->header.timing_error = (block_ptr[7] & 0b10000) == 0b10000;
                    dcs_message->header.unexpected_message = (block_ptr[7] & 0b100000) == 0b100000;
                    dcs_message->header.wrong_channel = (block_ptr[7] & 0b1000000) == 0b1000000;
                    //Last bit of block_ptr[6] is reserved (should be 0)

                    // Address (Hex)
                    hex_stream << std::hex << std::setfill('0')
                        << std::setw(2) << +block_ptr[11]
                        << std::setw(2) << +block_ptr[10]
                        << std::setw(2) << +block_ptr[9]
                        << std::setw(2) << +block_ptr[8];

                    // Address (int)
                    uint32_t address_int = (uint32_t)block_ptr[11] << 24 | (uint32_t)block_ptr[10] << 16 |
                        (uint32_t)block_ptr[9] << 8 | (uint32_t)block_ptr[8];

                    // Skip if we're filtering messages
                    if (filtered_dcps.size() > 0 && filtered_dcps.count(address_int) == 0)
                    {
                        block_ptr += block_length;
                        continue;
                    }

                    // Pull in the DCP, if available
                    dcp_mtx.lock();
                    if (dcp_list.count(address_int) > 0)
                        dcs_message->dcp = dcp_list[address_int];
                    dcp_mtx.unlock();

                    dcs_message->header.corrected_address = hex_stream.str();
                    hex_stream.clear();

                    //Start time, end time, and signal strength
                    dcs_message->header.carrier_start = bcdDateToString(&block_ptr[12]);
                    dcs_message->header.message_end = bcdDateToString(&block_ptr[19]);
                    dcs_message->header.signal_strength = ((block_ptr[27] << 8 | block_ptr[26]) & 0x03ff) / 10.0f; // First 6 bits reserved

                    // Frequency offset. First 2 bits reserved; signed!
                    uint16_t masked_freq_offset_10x = (block_ptr[29] << 8 | block_ptr[28]) & 0x3fff;
                    dcs_message->header.freq_offset = (float)((int)((masked_freq_offset_10x ^ 0x2000) - 0x2000)) / 10.0f;

                    // Phase noise (last 12 bits) and modulation index (first 2 bits). Bits 3-4 reserved
                    dcs_message->header.phase_noise = ((block_ptr[31] << 8 | block_ptr[30]) & 0x0fff) / 100.0f;
                    if ((block_ptr[31] >> 6) == 0b00)
                        dcs_message->header.modulation_index = "Unknown";
                    else if ((block_ptr[31] >> 6) == 0b01)
                        dcs_message->header.modulation_index = "Normal";
                    else if ((block_ptr[31] >> 6) == 0b10)
                        dcs_message->header.modulation_index = "High";
                    else if ((block_ptr[31] >> 6) == 0b11)
                        dcs_message->header.modulation_index = "Low";

                    // Good phase
                    dcs_message->header.good_phase = block_ptr[32] / 2.0f;

                    // Spacecraft ID (first 4 bits) and Channel (last 10 bits). Bits 5-6 reserved
                    dcs_message->header.channel = (block_ptr[34] << 8 | block_ptr[33]) & 0x03ff;
                    if ((block_ptr[34] >> 4) == 0b0000)
                        dcs_message->header.spacecraft = "Unknown";
                    else if ((block_ptr[34] >> 4) == 0b0001)
                        dcs_message->header.spacecraft = "GOES-East";
                    else if ((block_ptr[34] >> 4) == 0b0010)
                        dcs_message->header.spacecraft = "GOES-West";
                    else if ((block_ptr[34] >> 4) == 0b0011)
                        dcs_message->header.spacecraft = "GOES-Central";
                    else if ((block_ptr[34] >> 4) == 0b0100)
                        dcs_message->header.spacecraft = "GOES-Test";
                    else
                        dcs_message->header.spacecraft = "Reserved";

                    // Source ID
                    std::string source_id = std::string(&block_ptr[35], &block_ptr[37]);
                    if (source_id == "UP")
                        dcs_message->header.drgs_source = "NOAA WCDA E/W Prime - Wallops Island, VA";
                    else if (source_id == "UB")
                        dcs_message->header.drgs_source = "NOAA WCDA E/W Backup - Wallops Island, VA";
                    else if (source_id == "NP")
                        dcs_message->header.drgs_source = "NOAA NSOF E/W Prime - Suitland, MD";
                    else if (source_id == "NB")
                        dcs_message->header.drgs_source = "NOAA NSOF E/W Backup - Suitland, MD";
                    else if (source_id == "XE")
                        dcs_message->header.drgs_source = "USGS EDDN East - EROS, Sioux Falls, SD";
                    else if (source_id == "XW")
                        dcs_message->header.drgs_source = "USGS EDDN West - EROS, Sioux Falls, SD";
                    else if (source_id == "RE")
                        dcs_message->header.drgs_source = "USACE MVR East - Rock Island, IL";
                    else if (source_id == "RW")
                        dcs_message->header.drgs_source = "USACE MVR West - Rock Island, IL";
                    else if (source_id == "d1")
                        dcs_message->header.drgs_source = "NIFC Unit 1 West - Boise, ID";
                    else if (source_id == "d2")
                        dcs_message->header.drgs_source = "NIFC Unit 2 West - Boise, ID";
                    else if (source_id == "LE")
                        dcs_message->header.drgs_source = "USACE LRD East - Cincinnati, OH";
                    else if (source_id == "SF")
                        dcs_message->header.drgs_source = "SFWMD East - Palm Beach, FL";
                    else if (source_id == "OW")
                        dcs_message->header.drgs_source = "USACE NOW - Omaha, NE";
                    else
                        dcs_message->header.drgs_source = "Unknown - " + source_id;

                    //std::string source_secondary = std::string(&block_ptr[37], &block_ptr[39]);

                    dcs_message->header.type_id = block_ptr[39] & 0x3f;

                    // Initial body parsing
                    bool found_beginning = false;
                    hex_stream << std::hex << std::setfill('0') << std::setw(2) << +block_ptr[39];
                    for (size_t i = 40; i < block_length - 2; i++)
                    {
                        // Save raw data as hex
                        hex_stream << std::setw(2) << +block_ptr[i];

                        // Modified ascii to ascii
                        if (!found_beginning && block_ptr[i] == 0x20)
                            continue;
                        found_beginning = true;
                        dcs_message->data_ascii += block_ptr[i] & 0x7F;
                    }

                    dcs_message->data_raw = hex_stream.str();
                    hex_stream.clear();

                    // Parse known message types
                    if (dcs_message->data_ascii.empty())
                    {
                        // Do nothing
                    }

                    // PRS Messages - modified SHEF
                    else if (dcs_message->data_ascii.substr(0, 4) == ":PRS" && dcs_message->data_ascii.size() > 3)
                    {
                        // Ignore for now...
                    }

                    // SHEF
                    else if (dcs_message->data_ascii[0] == ':' && dcs_message->data_ascii.size() > 1)
                    {
                        std::stringstream message_stream(dcs_message->data_ascii);
                        std::string instrument_string;
                        while (std::getline(message_stream, instrument_string, ':'))
                        {
                            if (instrument_string.empty())
                                continue;

                            std::stringstream value_stream(instrument_string);
                            std::vector<std::string> value_strings;
                            std::string tmp_value;
                            while (std::getline(value_stream, tmp_value, ' '))
                            {
                                if (tmp_value.empty())
                                    continue;

                                bool is_number = true;
                                if (value_strings.size() == 1 && value_stream.peek() != EOF)
                                {
                                    for (size_t i = 0; i < tmp_value.size(); i++)
                                    {
                                        if (!((tmp_value[i] >= '0' && tmp_value[i] <= '9') ||
                                            (tmp_value.size() > 1 && (tmp_value[i] == '-' || tmp_value[i] == '.'))))
                                        {
                                            is_number = false;
                                            break;
                                        }
                                    }
                                }

                                if (is_number)
                                    value_strings.push_back(tmp_value);
                                else
                                    value_strings[0] += " " + tmp_value;
                            }

                            if (value_strings.size() == 0)
                                continue;

                            DCSValue new_value;
                            std::string sensor_label = value_strings[0];
                            std::string sensor_suffix;
                            if (sensor_label.size() == 3 && sensor_label[0] >= 'A' && sensor_label[0] <= 'Z' &&
                                sensor_label[1] >= 'A' && sensor_label[1] <= 'Z' &&
                                sensor_label[2] >= '0' && sensor_label[2] <= '9')
                            {
                                sensor_suffix = " #";
                                sensor_suffix.push_back(sensor_label[2]);
                                sensor_label = sensor_label.substr(0, sensor_label.size() - 1);
                            }

                            if (shef_codes.count(sensor_label) > 0)
                                new_value.name = shef_codes[sensor_label] + sensor_suffix;
                            else
                                new_value.name = value_strings[0];

                            // Header with no body
                            if (value_strings.size() < 2)
                                continue;

                            // Simple header/value
                            else if (value_strings.size() == 2)
                                new_value.values.push_back(value_strings[1]);

                            // Standard value
                            else
                            {
                                size_t val_offset = 2;
                                try
                                {
                                    new_value.reading_age = std::stoi(value_strings[1]);
                                    if (value_strings[2][0] == '#' && value_strings[2].size() > 1)
                                    {
                                        val_offset++;
                                        new_value.interval = std::stoi(value_strings[2].substr(1, value_strings[2].size() - 1));
                                    }
                                }
                                catch (std::exception &)
                                {
                                    continue;
                                }

                                while (val_offset < value_strings.size())
                                    new_value.values.push_back(value_strings[val_offset++]);
                            }

                            dcs_message->data_values.emplace_back(new_value);
                        }

                        if (dcs_message->data_values.size() > 0)
                            dcs_message->data_type = "SHEF";
                    }

                    // Pseudobinary B
                    else if (dcs_message->data_ascii[0] == 'B' && (dcs_message->data_ascii[1] == '1' ||
                        dcs_message->data_ascii[1] == '2' || dcs_message->data_ascii[1] == '3' ||
                        dcs_message->data_ascii[1] == '4' || dcs_message->data_ascii[1] == 'C')
                        && dcs_message->data_ascii.size() > 4)
                    {
                        // Pseudobinary B and D can only be decoded if we know what data to expect.
                        // 
                        // - Type D is not used on platforms listed in HADS as of November 2024,
                        //   so no point in decoding it here.
                        // - BS* seems to be similar to BC*, but the values are interleaved. We'd
                        //   need to know how many of each to expect, which we don't. So, no
                        //   decoding for BS* Pseudobinary files unfortunately!

                        if (dcs_message->dcp != nullptr && dcs_message->dcp->pe_info.size() > 0)
                        {
                            size_t num_physical_elements = dcs_message->dcp->pe_info.size();
                            if (dcs_message->data_ascii[1] == 'C' && dcs_message->dcp->pe_info.back().name == "Voltage - battery (volt)")
                                num_physical_elements--;

                            int data_bytes = dcs_message->data_ascii.size() - 4;
                            size_t data_end = dcs_message->data_ascii.find_first_of(' ');
                            if (data_end != std::string::npos)
                                data_bytes -= dcs_message->data_ascii.size() - data_end;

                            if (data_bytes % (num_physical_elements * 3) == 0)
                            {
                                dcs_message->data_type = "Pseudobinary B";
                                int sensor_offset = 3;

                                std::string pseudo_string = dcs_message->data_ascii;
                                std::replace(pseudo_string.begin(), pseudo_string.end(), '?', (char)0x7f); //Del

                                for (size_t pe_count = 0; pe_count < num_physical_elements; pe_count++)
                                {
                                    DCSValue new_value;
                                    new_value.reading_age = pseudo_string[2] - 0x40;
                                    new_value.name = dcs_message->dcp->pe_info[pe_count].name;
                                    new_value.interval = dcs_message->dcp->pe_info[pe_count].record_interval;
                                    for (size_t i = 0; i < data_bytes / num_physical_elements / 3; i++)
                                    {
                                        // No reading
                                        if (pseudo_string.substr(sensor_offset + (3 * i), 3) == "///")
                                        {
                                            new_value.values.emplace_back("0");
                                            continue;
                                        }

                                        uint32_t val_int = (uint32_t)(pseudo_string[sensor_offset + (3 * i) + 2] - 0x40) |
                                            (uint32_t)((pseudo_string[sensor_offset + (3 * i) + 1] - 0x40) << 6) |
                                            (uint32_t)((pseudo_string[sensor_offset + (3 * i)] - 0x40) << 12);

                                        new_value.values.emplace_back(std::to_string((float)((int)((val_int ^ 0x20000) - 0x20000)) / 100.0f));
                                    }

                                    sensor_offset += data_bytes / num_physical_elements;
                                    dcs_message->data_values.emplace_back(new_value);
                                }

                                // Get Battery Value
                                if (dcs_message->data_ascii[1] != 'C')
                                {
                                    DCSValue battery_value;
                                    battery_value.reading_age = dcs_message->data_ascii[2] - 0x40;
                                    battery_value.name = "Voltage - battery (volt)";
                                    battery_value.values.emplace_back(std::to_string((float)(dcs_message->data_ascii[sensor_offset] - 0x40) * 0.234 + 10.6));
                                    dcs_message->data_values.emplace_back(battery_value);
                                }

                                // BC Battery value - reverse engineered equation. Seems good with wide range of sample values
                                else if (dcs_message->dcp->pe_info.back().name == "Voltage - battery (volt)")
                                {
                                    DCSValue battery_value;
                                    battery_value.reading_age = dcs_message->data_ascii[2] - 0x40;
                                    battery_value.name = "Voltage - battery (volt)";
                                    battery_value.values.emplace_back(std::to_string((float)(dcs_message->data_ascii[sensor_offset] - 0x40) * 0.313 + 0.285));
                                    dcs_message->data_values.emplace_back(battery_value);
                                }
                            }
                        }
                    }

                    // Pseudobinary C
                    // Rarely used, but only pseudobinary format that
                    // can be accurately decoded without DCP info
                    else if (dcs_message->data_ascii[0] == 'C' && (dcs_message->data_ascii[1] == '1' ||
                        dcs_message->data_ascii[1] == '2' || dcs_message->data_ascii[1] == '3' ||
                        dcs_message->data_ascii[1] == '4') && dcs_message->data_ascii[2] == '+' && dcs_message->data_ascii.size() > 13)
                    {
                        size_t end_of_data = dcs_message->data_ascii.find_last_of('.');
                        if (end_of_data != std::string::npos)
                        {
                            dcs_message->data_type = "Pseudobinary C";

                            std::string pseudo_string = dcs_message->data_ascii.substr(3, end_of_data - 3);
                            std::replace(pseudo_string.begin(), pseudo_string.end(), '?', (char)0x7f); //Del

                            std::stringstream message_stream(pseudo_string);
                            std::string instrument_string;
                            while (std::getline(message_stream, instrument_string, '+'))
                            {
                                DCSValue new_value;
                                new_value.name = "Sensor " + std::to_string((int)(instrument_string[0] - 0x40));

                                // Skipping Day of year

                                // Minute of day to compute reading age
                                uint16_t recorded_minute = (((uint16_t)instrument_string[3] - 0x40) << 6) | (instrument_string[4] - 0x40);
                                uint16_t transmission_minute = ((block_ptr[16] & 0x0f) * 10 + ((block_ptr[15] & 0xf0) >> 4)) * 60 +
                                    (block_ptr[15] & 0x0f) * 10 + ((block_ptr[14] & 0xf0) >> 4);
                                new_value.reading_age = transmission_minute - recorded_minute;

                                // Interval
                                new_value.interval = (((uint16_t)instrument_string[5] - 0x40) << 6) | (instrument_string[6] - 0x40);

                                // Reading values
                                for (size_t i = 7; i + 2 < instrument_string.size(); i += 3)
                                {
                                    // No reading
                                    if (instrument_string.substr(i, 3) == "///")
                                    {
                                        new_value.values.emplace_back("0");
                                        continue;
                                    }

                                    uint32_t val_int = (uint32_t)(instrument_string[i + 2] - 0x40) |
                                        (uint32_t)((instrument_string[i + 1] - 0x40) << 6) |
                                        (uint32_t)((instrument_string[i] - 0x40) << 12);

                                    new_value.values.emplace_back(std::to_string((float)((int)((val_int ^ 0x20000) - 0x20000)) / 100.0f));
                                }

                                dcs_message->data_values.emplace_back(new_value);
                            }

                            if (dcs_message->dcp != nullptr)
                            {
                                size_t i = 0;
                                for (PEInfo &pe_info : dcs_message->dcp->pe_info)
                                {
                                    if (i >= dcs_message->data_values.size())
                                        break;
                                    dcs_message->data_values[i].name = pe_info.name;
                                    i++;
                                }
                            }

                            // Get Battery Value
                            if (end_of_data < dcs_message->data_ascii.size() - 1)
                            {
                                DCSValue battery_value;
                                battery_value.name = "Voltage - battery (volt)";
                                battery_value.values.emplace_back(std::to_string((float)(dcs_message->data_ascii[end_of_data + 1] - 0x40) * 0.234 + 10.6));
                                dcs_message->data_values.emplace_back(battery_value);
                            }
                        }
                    }

                    // Pseudobinary 2 (B Random)
                    else if (dcs_message->data_ascii[0] == '2' && dcs_message->data_ascii.size() > 7 && (dcs_message->data_ascii.size() - 5) % 3 == 0)
                    {
                        int data_bytes = dcs_message->data_ascii.size() - 5;
                        if (dcs_message->dcp != nullptr && dcs_message->dcp->pe_info.size() > 0 && data_bytes / dcs_message->dcp->pe_info.size() / 3 > 0 &&
                            data_bytes % (dcs_message->dcp->pe_info.size() * 3) == 0)
                        {
                            dcs_message->data_type = "Pseudobinary 2";
                            int sensor_offset = 2;

                            std::string pseudo_string = dcs_message->data_ascii;
                            std::replace(pseudo_string.begin(), pseudo_string.end(), '?', (char)0x7f); //Del

                            for (size_t pe_count = 0; pe_count < dcs_message->dcp->pe_info.size(); pe_count++)
                            {
                                DCSValue new_value;
                                new_value.reading_age = pseudo_string[1] - 0x40;
                                new_value.name = dcs_message->dcp->pe_info[pe_count].name;
                                new_value.interval = dcs_message->dcp->pe_info[pe_count].record_interval;
                                for (size_t i = 0; i < data_bytes / dcs_message->dcp->pe_info.size() / 3; i++)
                                {
                                    // No reading
                                    if (pseudo_string.substr(sensor_offset + (3 * i), 3) == "///")
                                    {
                                        new_value.values.emplace_back("0");
                                        continue;
                                    }

                                    uint32_t val_int = (uint32_t)(pseudo_string[sensor_offset + (3 * i) + 2] - 0x40) |
                                        (uint32_t)((pseudo_string[sensor_offset + (3 * i) + 1] - 0x40) << 6) |
                                        (uint32_t)((pseudo_string[sensor_offset + (3 * i)] - 0x40) << 12);

                                    new_value.values.emplace_back(std::to_string((float)((int)((val_int ^ 0x20000) - 0x20000)) / 100.0f));
                                }

                                sensor_offset += data_bytes / dcs_message->dcp->pe_info.size();
                                dcs_message->data_values.emplace_back(new_value);
                            }

                            // Transmission count
                            {
                                DCSValue transmission_count;
                                transmission_count.name = "Transmissions since reboot";
                                transmission_count.values.emplace_back(std::to_string((uint16_t)((dcs_message->data_ascii[sensor_offset] - 0x40) << 6 |
                                    (dcs_message->data_ascii[sensor_offset + 1] - 0x40))));
                                dcs_message->data_values.emplace_back(transmission_count);
                            }

                            // Get Battery Value
                            {
                                DCSValue battery_value;
                                battery_value.name = "Voltage - battery (volt)";
                                battery_value.values.emplace_back(std::to_string((float)(dcs_message->data_ascii[sensor_offset + 2] - 0x40) * 0.234 + 10.6));
                                dcs_message->data_values.emplace_back(battery_value);
                            }
                        }
                    }

                    // ASCII Files
                    else if (dcs_message->data_ascii.substr(0, 2) == "\r\n")
                    {
                        dcs_message->data_type = "ASCII";

                        // Check for column/row data - requires dcp info!
                        if (dcs_message->dcp != nullptr && dcs_message->dcp->pe_info.size() > 0 &&
                            dcs_message->data_ascii.find_first_not_of("0123456789-. \r\n") == std::string::npos)
                        {
                            std::vector<std::vector<std::string>> column_matrix;
                            std::string filtered_ascii_data = dcs_message->data_ascii;
                            filtered_ascii_data.erase(std::remove(filtered_ascii_data.begin(), filtered_ascii_data.end(), '\r'), filtered_ascii_data.end());
                            std::stringstream ascii_linestream(filtered_ascii_data);
                            std::string ascii_line;

                            while (std::getline(ascii_linestream, ascii_line))
                            {
                                if (ascii_line.empty())
                                    continue;

                                column_matrix.emplace_back(std::vector<std::string>());
                                std::stringstream value_stream(ascii_line);
                                std::string value_string;

                                while (std::getline(value_stream, value_string, ' '))
                                {
                                    if (value_string.empty())
                                        continue;

                                    column_matrix.back().emplace_back(value_string);
                                }
                            }

                            // Values are each on their own line
                            if (column_matrix.size() == dcs_message->dcp->pe_info.size())
                            {
                                dcs_message->data_type = "ASCII Rows";

                                for (size_t i = 0; i < column_matrix.size(); i++)
                                {
                                    DCSValue new_value;
                                    new_value.name = dcs_message->dcp->pe_info[i].name;
                                    for (size_t j = 0; j < column_matrix[i].size(); j++)
                                        new_value.values.push_back(column_matrix[i][j]);

                                    dcs_message->data_values.emplace_back(new_value);
                                }
                            }

                            // Values are in their own column, with the occasional exception of battery
                            else if (column_matrix.size() > 0 && (column_matrix[0].size() == dcs_message->dcp->pe_info.size() ||
                                (column_matrix.back().size() == dcs_message->dcp->pe_info.size() &&
                                    column_matrix[0].size() == column_matrix.back().size() - 1)))
                            {
                                dcs_message->data_type = "ASCII Columns";

                                for (size_t i = 0; i < column_matrix[0].size(); i++)
                                {
                                    DCSValue new_value;
                                    new_value.name = dcs_message->dcp->pe_info[i].name;
                                    for (size_t j = 0; j < column_matrix.size(); j++)
                                        if (i < column_matrix[j].size())
                                            new_value.values.push_back(column_matrix[j][i]);

                                    dcs_message->data_values.emplace_back(new_value);
                                }

                                if (column_matrix[0].size() == column_matrix.back().size() - 1)
                                {
                                    DCSValue trailing_value;
                                    trailing_value.name = dcs_message->dcp->pe_info.back().name;
                                    trailing_value.values.push_back(column_matrix.back().back());
                                    dcs_message->data_values.emplace_back(trailing_value);
                                }
                            }
                        }
                    }

                    dcs_file.blocks.push_back(dcs_message);
                    if (is_gui)
                    {
                        ui_dcs_mtx.lock();
                        ui_dcs_messages.push_front(dcs_message);
                        ui_dcs_mtx.unlock();
                    }
                }

                // Missed Message Processing
                else if (block_id == 2)
                {
                    std::shared_ptr<MissedMessage> missed_message = std::make_shared<MissedMessage>();
                    missed_message->header.crc_pass = message_crc_pass;

                    // DCP Sequence Number
                    missed_message->header.sequence_number = block_ptr[5] << 16 | block_ptr[4] << 8 | block_ptr[3];

                    // Message Flags: Data rate (Unknown, 100, 300, or 1200)
                    // First 5 bits not used
                    if ((block_ptr[6] & 0b111) == 0b001)
                        missed_message->header.data_rate = "100";
                    else if ((block_ptr[6] & 0b111) == 0b010)
                        missed_message->header.data_rate = "300";
                    else if ((block_ptr[6] & 0b111) == 0b011)
                        missed_message->header.data_rate = "1200";
                    else if ((block_ptr[6] & 0b111) == 0b000)
                        missed_message->header.data_rate = "Undefined";
                    else
                        missed_message->header.data_rate = "Reserved";

                    // Address (Hex)
                    hex_stream << std::hex << std::setfill('0')
                        << std::setw(2) << +block_ptr[10]
                        << std::setw(2) << +block_ptr[9]
                        << std::setw(2) << +block_ptr[8]
                        << std::setw(2) << +block_ptr[7];

                    // Address (int)
                    uint32_t address_int = (uint32_t)block_ptr[10] << 24 | (uint32_t)block_ptr[9] << 16 |
                        (uint32_t)block_ptr[8] << 8 | (uint32_t)block_ptr[7];

                    // Skip if we're filtering messages
                    if (filtered_dcps.size() > 0 && filtered_dcps.count(address_int) == 0)
                    {
                        block_ptr += block_length;
                        continue;
                    }

                    // Pull in DCP, if available
                    dcp_mtx.lock();
                    if (dcp_list.count(address_int) > 0)
                        missed_message->dcp = dcp_list[address_int];
                    dcp_mtx.unlock();

                    missed_message->header.platform_address = hex_stream.str();
                    hex_stream.clear();

                    // Window start and end
                    missed_message->header.window_start = bcdDateToString(&block_ptr[11]);
                    missed_message->header.window_end = bcdDateToString(&block_ptr[18]);

                    // Spacecraft ID (first 4 bits) and Channel (last 10 bits). Bits 5-6 reserved
                    missed_message->header.channel = (block_ptr[26] << 8 | block_ptr[25]) & 0x03ff;
                    if ((block_ptr[26] >> 4) == 0b0000)
                        missed_message->header.spacecraft = "Unknown";
                    else if ((block_ptr[26] >> 4) == 0b0001)
                        missed_message->header.spacecraft = "GOES-East";
                    else if ((block_ptr[26] >> 4) == 0b0010)
                        missed_message->header.spacecraft = "GOES-West";
                    else if ((block_ptr[26] >> 4) == 0b0011)
                        missed_message->header.spacecraft = "GOES-Central";
                    else if ((block_ptr[26] >> 4) == 0b0100)
                        missed_message->header.spacecraft = "GOES-Test";
                    else
                        missed_message->header.spacecraft = "Reserved";

                    dcs_file.blocks.emplace_back(missed_message);
                }

                // Unknown block
                else
                    logger->warn("Unknown Block ID %hu, skipping", block_id);

                block_ptr += block_length;
            }

            // Write out data
            // Do not save if filtering and all blocks are filtered out
            if (filtered_dcps.empty() || dcs_file.blocks.size() > 0)
            {
                logger->info("Writing file " + directory + "/DCS/" + dcs_file.name + ".json" + "...");
                nlohmann::ordered_json export_json = dcs_file;
                std::ofstream json_writer(directory + "/DCS/" + dcs_file.name + ".json");
                json_writer << export_json.dump(4);
                json_writer.close();
            }

            // Remove old messages from UI
            if (is_gui)
            {
                ui_dcs_mtx.lock();
                while (ui_dcs_messages.size() > 1000)
                    ui_dcs_messages.pop_back();
                ui_dcs_mtx.unlock();
            }

            return true;
        }

        void GOESLRITDataDecoderModule::drawDCSUI()
        {
            is_gui = true;
            ImGui::SetNextWindowSize(ImVec2(600 * ui_scale, 300 * ui_scale), ImGuiCond_Appearing);
            if (ImGui::Begin("DCS Viewer"))
            {
                ImGui::BeginTabBar("##dcsmessagestabbar");
                if (ImGui::BeginTabItem("Parsed Values"))
                {
                    ImGui::TextColored(style::theme.yellow, "%s", "Note:");
                    ImGui::SameLine();
                    ImGui::PushTextWrapPos(ImGui::GetContentRegionMax().x);
                    ImGui::TextUnformatted("Due to the variability of data on DCS, this decoder can only make a \"best effort\" attempt to decode data. Validate data before use.");
                    ImGui::PopTextWrapPos();

                    ImGui::BeginTable("##dcsparsedtable", 6, ImGuiTableFlags_Borders | ImGuiTableFlags_RowBg | ImGuiTableFlags_SizingFixedFit);
                    ImGui::TableSetupColumn("", ImGuiTableColumnFlags_NoResize, 20 * ui_scale);
                    ImGui::TableSetupColumn("Address", ImGuiTableColumnFlags_NoResize, 75 * ui_scale);
                    ImGui::TableSetupColumn("Name", ImGuiTableColumnFlags_NoResize, 200 * ui_scale);
                    ImGui::TableSetupColumn("Lat", ImGuiTableColumnFlags_NoResize, 50 * ui_scale);
                    ImGui::TableSetupColumn("Lon", ImGuiTableColumnFlags_NoResize, 50 * ui_scale);
                    ImGui::TableSetupColumn("Sensor Values", ImGuiTableColumnFlags_None, -1);
                    ImGui::TableHeadersRow();

                    ui_dcs_mtx.lock();
                    for (size_t i = 0; i < ui_dcs_messages.size(); i++)
                    {
                        if (ui_dcs_messages[i]->data_values.size() == 0)
                            continue;

                        ImGui::TableNextRow();
                        ImGui::TableSetColumnIndex(0);
                        if (ImGui::Button(std::string("+##" + std::to_string(i)).c_str()))
                            focused_dcs_message = ui_dcs_messages[i];
                        ImGui::TableSetColumnIndex(1);
                        ImGui::TextColored(style::theme.lavender, "%s", ui_dcs_messages[i]->header.corrected_address.c_str());

                        if (ui_dcs_messages[i]->dcp != nullptr)
                        {
                            ImGui::TableSetColumnIndex(2);
                            ImGui::TextColored(style::theme.yellow, "%s", ui_dcs_messages[i]->dcp->description.c_str());
                            ImGui::SetItemTooltip("%s", ui_dcs_messages[i]->dcp->description.c_str());
                            ImGui::TableSetColumnIndex(3);
                            ImGui::TextColored(style::theme.green, "%.2f", ui_dcs_messages[i]->dcp->lat);
                            ImGui::TableSetColumnIndex(4);
                            ImGui::TextColored(style::theme.green, "%.2f", ui_dcs_messages[i]->dcp->lon);
                        }

                        ImGui::TableSetColumnIndex(5);
                        for (DCSValue& val : ui_dcs_messages[i]->data_values)
                        {
                            ImGui::BulletText("%s:", val.name.c_str());
                            for (std::string& val_record : val.values)
                            {
                                ImGui::SameLine();
                                ImGui::TextDisabled("%s", val_record.c_str());
                            }

                        }
                    }

                    ui_dcs_mtx.unlock();
                    ImGui::EndTable();
                    ImGui::EndTabItem();
                }

                if (ImGui::BeginTabItem("Other ASCII"))
                {
                    ImGui::BeginTable("##dcsasciitable", 6, ImGuiTableFlags_Borders | ImGuiTableFlags_RowBg | ImGuiTableFlags_SizingFixedFit);
                    ImGui::TableSetupColumn("", ImGuiTableColumnFlags_NoResize, 20 * ui_scale);
                    ImGui::TableSetupColumn("Address", ImGuiTableColumnFlags_NoResize, 75 * ui_scale);
                    ImGui::TableSetupColumn("Name", ImGuiTableColumnFlags_NoResize, 200 * ui_scale);
                    ImGui::TableSetupColumn("Lat", ImGuiTableColumnFlags_NoResize, 50 * ui_scale);
                    ImGui::TableSetupColumn("Lon", ImGuiTableColumnFlags_NoResize, 50 * ui_scale);
                    ImGui::TableSetupColumn("ASCII Data", ImGuiTableColumnFlags_None, -1);
                    ImGui::TableHeadersRow();

                    ui_dcs_mtx.lock();
                    for (size_t i = 0; i < ui_dcs_messages.size(); i++)
                    {
                        if (ui_dcs_messages[i]->data_type != "ASCII")
                            continue;

                        ImGui::TableNextRow();
                        ImGui::TableSetColumnIndex(0);
                        if (ImGui::Button(std::string("+##" + std::to_string(i)).c_str()))
                            focused_dcs_message = ui_dcs_messages[i];
                        ImGui::TableSetColumnIndex(1);
                        ImGui::TextColored(style::theme.lavender, "%s", ui_dcs_messages[i]->header.corrected_address.c_str());

                        if (ui_dcs_messages[i]->dcp != nullptr)
                        {
                            ImGui::TableSetColumnIndex(2);
                            ImGui::TextColored(style::theme.yellow, "%s", ui_dcs_messages[i]->dcp->description.c_str());
                            ImGui::SetItemTooltip("%s", ui_dcs_messages[i]->dcp->description.c_str());
                            ImGui::TableSetColumnIndex(3);
                            ImGui::TextColored(style::theme.green, "%.2f", ui_dcs_messages[i]->dcp->lat);
                            ImGui::TableSetColumnIndex(4);
                            ImGui::TextColored(style::theme.green, "%.2f", ui_dcs_messages[i]->dcp->lon);
                        }

                        ImGui::TableSetColumnIndex(5);
                        ImGui::TextUnformatted(ui_dcs_messages[i]->data_ascii.c_str() + 2);
                    }

                    ui_dcs_mtx.unlock();
                    ImGui::EndTable();
                    ImGui::EndTabItem();
                }

                if (ImGui::BeginTabItem("All Messages"))
                {
                    float wrap_pos = ImGui::GetContentRegionMax().x;
                    ImGui::BeginTable("##dcsmessagetable", 6, ImGuiTableFlags_Borders | ImGuiTableFlags_RowBg | ImGuiTableFlags_SizingFixedFit);
                    ImGui::TableSetupColumn("", ImGuiTableColumnFlags_NoResize, 20 * ui_scale);
                    ImGui::TableSetupColumn("Address", ImGuiTableColumnFlags_NoResize, 75 * ui_scale);
                    ImGui::TableSetupColumn("Name", ImGuiTableColumnFlags_NoResize, 200 * ui_scale);
                    ImGui::TableSetupColumn("Lat", ImGuiTableColumnFlags_NoResize, 50 * ui_scale);
                    ImGui::TableSetupColumn("Lon", ImGuiTableColumnFlags_NoResize, 50 * ui_scale);
                    ImGui::TableSetupColumn("Message", ImGuiTableColumnFlags_None, -1);
                    ImGui::TableHeadersRow();

                    ui_dcs_mtx.lock();
                    for (size_t i = 0; i < ui_dcs_messages.size(); i++)
                    {
                        ImGui::TableNextRow();
                        ImGui::TableSetColumnIndex(0);
                        if (ImGui::Button(std::string("+##" + std::to_string(i)).c_str()))
                            focused_dcs_message = ui_dcs_messages[i];
                        ImGui::TableSetColumnIndex(1);
                        ImGui::TextColored(style::theme.lavender, "%s", ui_dcs_messages[i]->header.corrected_address.c_str());

                        if (ui_dcs_messages[i]->dcp != nullptr)
                        {
                            ImGui::TableSetColumnIndex(2);
                            ImGui::TextColored(style::theme.yellow, "%s", ui_dcs_messages[i]->dcp->description.c_str());
                            ImGui::SetItemTooltip("%s", ui_dcs_messages[i]->dcp->description.c_str());
                            ImGui::TableSetColumnIndex(3);
                            ImGui::TextColored(style::theme.green, "%.2f", ui_dcs_messages[i]->dcp->lat);
                            ImGui::TableSetColumnIndex(4);
                            ImGui::TextColored(style::theme.green, "%.2f", ui_dcs_messages[i]->dcp->lon);
                        }

                        ImGui::TableSetColumnIndex(5);
                        ImGui::PushTextWrapPos(wrap_pos);
                        ImGui::TextUnformatted(ui_dcs_messages[i]->data_ascii.c_str());
                        ImGui::PopTextWrapPos();
                    }

                    ui_dcs_mtx.unlock();
                    ImGui::EndTable();
                    ImGui::EndTabItem();
                }
                ImGui::EndTabBar();
            }
            ImGui::End();

            if (focused_dcs_message != nullptr)
            {
                bool keep_open = true;
                ImGui::SetNextWindowSize(ImVec2(0.0f, ImGui::GetMainViewport()->Size.y / 2.0), ImGuiCond_Appearing);
                if (ImGui::Begin("DCS Message Details", &keep_open))
                {
                    float wrap_pos = ImGui::GetContentRegionMax().x;

                    ImGui::SeparatorText("Header");
                    ImGui::BulletText("Address");
                    ImGui::SameLine();
                    ImGui::TextDisabled("%s", focused_dcs_message->header.corrected_address.c_str());
                    ImGui::BulletText("Channel");
                    ImGui::SameLine();
                    ImGui::TextDisabled("%hu", focused_dcs_message->header.channel);
                    ImGui::BulletText("Data Rate");
                    ImGui::SameLine();
                    ImGui::TextDisabled("%s", focused_dcs_message->header.data_rate.c_str());
                    ImGui::BulletText("Sequence Number");
                    ImGui::SameLine();
                    ImGui::TextDisabled("%u", focused_dcs_message->header.sequence_number);
                    ImGui::BulletText("CS Platform");
                    ImGui::SameLine();
                    ImGui::TextDisabled("%s", focused_dcs_message->header.cs_platform.c_str());
                    ImGui::BulletText("DRGS Source");
                    ImGui::SameLine();
                    ImGui::TextDisabled("%s", focused_dcs_message->header.drgs_source.c_str());
                    ImGui::BulletText("Receiving Spacecraft");
                    ImGui::SameLine();
                    ImGui::TextDisabled("%s", focused_dcs_message->header.spacecraft.c_str());
                    ImGui::BulletText("Carrier Start");
                    ImGui::SameLine();
                    ImGui::TextDisabled("%s", focused_dcs_message->header.carrier_start.c_str());
                    ImGui::BulletText("Message End");
                    ImGui::SameLine();
                    ImGui::TextDisabled("%s", focused_dcs_message->header.message_end.c_str());
                    ImGui::BulletText("Message Type ID");
                    ImGui::SameLine();
                    ImGui::TextDisabled("%d", focused_dcs_message->header.type_id);
                    ImGui::BulletText("Frequency Offset");
                    ImGui::SameLine();
                    ImGui::TextDisabled("%.2f", focused_dcs_message->header.freq_offset);
                    ImGui::BulletText("Good Phase");
                    ImGui::SameLine();
                    ImGui::TextDisabled("%.2f", focused_dcs_message->header.good_phase);
                    ImGui::BulletText("Phase Noise");
                    ImGui::SameLine();
                    ImGui::TextDisabled("%.2f", focused_dcs_message->header.phase_noise);
                    ImGui::BulletText("Signal Strength");
                    ImGui::SameLine();
                    ImGui::TextDisabled("%.2f", focused_dcs_message->header.signal_strength);
                    ImGui::BulletText("Modulation Index");
                    ImGui::SameLine();
                    ImGui::TextDisabled("%s", focused_dcs_message->header.modulation_index.c_str());
                    ImGui::BulletText("Address Corrected");
                    ImGui::SameLine();
                    ImGui::TextDisabled("%s", focused_dcs_message->header.address_corrected ? "Yes" : "No");
                    ImGui::BulletText("Invalid Address");
                    ImGui::SameLine();
                    ImGui::TextDisabled("%s", focused_dcs_message->header.invalid_address ? "Yes" : "No");
                    ImGui::BulletText("Uncorrectable Address");
                    ImGui::SameLine();
                    ImGui::TextDisabled("%s", focused_dcs_message->header.uncorrectable_address ? "Yes" : "No");
                    ImGui::BulletText("CRC Pass");
                    ImGui::SameLine();
                    ImGui::TextDisabled("%s", focused_dcs_message->header.crc_pass ? "Yes" : "No");
                    ImGui::BulletText("No EOT");
                    ImGui::SameLine();
                    ImGui::TextDisabled("%s", focused_dcs_message->header.no_eot ? "Yes" : "No");
                    ImGui::BulletText("Parity Errors");
                    ImGui::SameLine();
                    ImGui::TextDisabled("%s", focused_dcs_message->header.parity_errors ? "Yes" : "No");
                    ImGui::BulletText("PDT Incomplete");
                    ImGui::SameLine();
                    ImGui::TextDisabled("%s", focused_dcs_message->header.pdt_incomplete ? "Yes" : "No");
                    ImGui::BulletText("Timing Error");
                    ImGui::SameLine();
                    ImGui::TextDisabled("%s", focused_dcs_message->header.timing_error ? "Yes" : "No");
                    ImGui::BulletText("Unexpected Message");
                    ImGui::SameLine();
                    ImGui::TextDisabled("%s", focused_dcs_message->header.unexpected_message ? "Yes" : "No");

                    if (focused_dcs_message->dcp != nullptr)
                    {
                        ImGui::SeparatorText("DCP Info");
                        ImGui::BulletText("Agency");
                        ImGui::SameLine();
                        ImGui::TextDisabled("%s", focused_dcs_message->dcp->agency.c_str());
                        ImGui::BulletText("Data Format");
                        ImGui::SameLine();
                        ImGui::TextDisabled("%hhu", (uint8_t)focused_dcs_message->dcp->data_format);
                        ImGui::BulletText("Description");
                        ImGui::SameLine();
                        ImGui::TextDisabled("%s", focused_dcs_message->dcp->description.c_str());
                        ImGui::BulletText("Latitude");
                        ImGui::SameLine();
                        ImGui::TextDisabled("%.2f", focused_dcs_message->dcp->lat);
                        ImGui::BulletText("Longitude");
                        ImGui::SameLine();
                        ImGui::TextDisabled("%.2f", focused_dcs_message->dcp->lon);
                        ImGui::BulletText("Manufacturer");
                        ImGui::SameLine();
                        ImGui::TextDisabled("%s", focused_dcs_message->dcp->manufacturer.c_str());
                        ImGui::BulletText("Model");
                        ImGui::SameLine();
                        ImGui::TextDisabled("%s", focused_dcs_message->dcp->model.c_str());
                        ImGui::BulletText("NMC Descriptor");
                        ImGui::SameLine();
                        ImGui::TextDisabled("%s", focused_dcs_message->dcp->nmc_descriptor.c_str());
                        ImGui::BulletText("State");
                        ImGui::SameLine();
                        ImGui::TextDisabled("%s", focused_dcs_message->dcp->state.c_str());
                        ImGui::BulletText("Transmit Interval (Seconds)");
                        ImGui::SameLine();
                        ImGui::TextDisabled("%d", focused_dcs_message->dcp->transmit_interval);
                        ImGui::BulletText("Transmit Window Size (seconds)");
                        ImGui::SameLine();
                        ImGui::TextDisabled("%d", focused_dcs_message->dcp->transmit_window);

                        if (focused_dcs_message->dcp->pe_info.size() > 0)
                        {
                            ImGui::SeparatorText("Physical Elements");
                            for (PEInfo &this_pe : focused_dcs_message->dcp->pe_info)
                            {
                                ImGui::Spacing();
                                ImGui::TextUnformatted(this_pe.name.c_str());
                                ImGui::BulletText("Base Elevation");
                                ImGui::SameLine();
                                ImGui::TextDisabled("%.2f", this_pe.base_elevation);
                                ImGui::BulletText("Correction");
                                ImGui::SameLine();
                                ImGui::TextDisabled("%.2f", this_pe.correction);
                                ImGui::BulletText("Read to transmit offset (minutes)");
                                ImGui::SameLine();
                                ImGui::TextDisabled("%d", this_pe.read_to_transmit_offset);
                                ImGui::BulletText("Record Interval (minutes)");
                                ImGui::SameLine();
                                ImGui::TextDisabled("%d", this_pe.record_interval);
                            }
                        }
                    }

                    ImGui::PushTextWrapPos(wrap_pos);
                    ImGui::SeparatorText("Data (Hex)");
                    ImGui::TextUnformatted(focused_dcs_message->data_raw.c_str());
                    ImGui::SeparatorText("Data (Ascii)");
                    ImGui::TextUnformatted(focused_dcs_message->data_ascii.c_str());
                    ImGui::SeparatorText("Data Type");
                    ImGui::TextUnformatted(focused_dcs_message->data_type.c_str());
                    ImGui::PopTextWrapPos();

                    if (focused_dcs_message->data_values.size() > 0)
                    {
                        ImGui::SeparatorText("Parsed Data Values");
                        for (DCSValue &this_value : focused_dcs_message->data_values)
                        {
                            ImGui::Spacing();
                            ImGui::TextUnformatted(this_value.name.c_str());
                            ImGui::BulletText("Value");
                            for (std::string &this_reading : this_value.values)
                            {
                                ImGui::SameLine();
                                ImGui::TextDisabled("%s", this_reading.c_str());
                            }

                            ImGui::BulletText("Newest Reading Age (Minutes)");
                            ImGui::SameLine();
                            ImGui::TextDisabled("%d", this_value.reading_age);
                            ImGui::BulletText("Reading Interval (Minutes)");
                            ImGui::SameLine();
                            ImGui::TextDisabled("%d", this_value.interval);
                        }
                    }
                }
                ImGui::End();

                if (!keep_open)
                    focused_dcs_message = nullptr;
            }
        }
    }
}