portapack-mayhem/firmware/application/apps/ui_whipcalc.cpp

/*
 * Copyright (C) 2015 Jared Boone, ShareBrained Technology, Inc.
 * Copyright (C) 2016 Furrtek
 *
 * This file is part of PortaPack.
 *
 * 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 2, 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; see the file COPYING.  If not, write to
 * the Free Software Foundation, Inc., 51 Franklin Street,
 * Boston, MA 02110-1301, USA.
 */

#include "ui_whipcalc.hpp"

#include "ch.h"
#include "portapack.hpp"
#include "event_m0.hpp"

#include <cstring>

using namespace portapack;

namespace ui {

void WhipCalcView::focus() {
    field_frequency.focus();
}

void WhipCalcView::update_result() {
    double length, calclength, divider;
    console.clear(true);
    divider = ((double)options_type.selected_index_value() / 8.0);

    // Antenna lengths fields
    if (field_frequency.value() > 0) {
        // Metric
        length = (speed_of_light_mps / (double)field_frequency.value()) * divider;
        auto m = to_string_dec_int((int)length, 0);
        // auto cm = to_string_dec_int(int(length * 100.0) % 100, 2);
        // auto mm = to_string_dec_int(int(length * 1000.0) % 10, 1);
        calclength = get_decimals(length, 100);  // cm
        auto cm = to_string_dec_int(int(calclength), 0);
        auto mm = to_string_dec_int(int(get_decimals(calclength, 10, true)), 0);
        text_result_metric.set(m + "m " + cm + "." + mm + "cm");

        // Imperial
        calclength = (speed_of_light_fps / (double)field_frequency.value()) * divider;
        auto feet = to_string_dec_int(int(calclength), 0);
        calclength = get_decimals(calclength, 12);  // inches
        auto inch = to_string_dec_int(int(calclength), 0);
        auto inch_c = to_string_dec_int(int(get_decimals(calclength, 10, true)), 0);
        text_result_imperial.set(feet + "ft " + inch + "." + inch_c + "in");
    } else {
        text_result_metric.set("infinity+");
        text_result_imperial.set("infinity+");
        return;
    }

    uint8_t ant_count = 9;                      // Shown antennas counter
    length *= 1000;                             // Get length in mm needed to extend the antenna
    for (antenna_entry antenna : antenna_db) {  // go thru all antennas available
        uint16_t element, refined_quarter = 0;
        for (element = 0; element < antenna.elements.size(); element++) {
            if (length == antenna.elements[element])  // Exact element in length
            {
                element++;  // Real element is +1  (zero based vector)
                break;      // Done with this ant
            } else if (length < antenna.elements[element]) {
                double remain, this_element, quarter = 0;
                remain = length - antenna.elements[element - 1];                           // mm needed from this element to reach length
                this_element = antenna.elements[element] - antenna.elements[element - 1];  // total mm on this element
                quarter = (remain * 4) / this_element;                                     // havoc & portack ended on this int(quarter) resolution.
                if (quarter - int(quarter) > 0.5) {                                        // rounding gave a measure closer to next quarter
                    refined_quarter = int(quarter) + 1;
                    if (refined_quarter == 4) {  // rounding gave a measure closer to next element
                        refined_quarter = 0;
                        element++;
                    }
                } else {
                    refined_quarter = int(quarter);
                }
                break;  // Done with this ant
            }
        }
        /*if (!ant_count)
                {
                        console.write(" and more ...");
                        break;
                }*/
        console.write(antenna.label + ": " + to_string_dec_int(element, 1) + frac_str[refined_quarter] + " elements\n");
        ant_count--;  // For now, just showing all.
    }
}

WhipCalcView::WhipCalcView(NavigationView& nav) {
    add_children({&labels,
                  //&antennas_on_memory,
                  &field_frequency,
                  &options_type,
                  &text_result_metric,
                  &text_result_imperial,
                  &console,
                  &button_exit});

    File antennas_file;
    auto error = antennas_file.open("WHIPCALC/ANTENNAS.TXT");

    if (!error.is_valid()) {
        std::string line;
        char one_char[1];
        for (size_t pointer = 0; pointer < antennas_file.size(); pointer++) {
            antennas_file.seek(pointer);
            antennas_file.read(one_char, 1);
            if ((int)one_char[0] >= ' ')
                line += one_char[0];         // Add it to the textline
            else if (one_char[0] == '\n') {  // New Line
                txtline_process(line);       // make sense of this textline
                line.clear();                // Ready for next textline
            }
        }
        if (line.length() > 0)
            txtline_process(line);  // Last line had no newline at end ?
    }

    if (!antenna_db.size())
        add_default_antenna();
    // antennas_on_memory.set(to_string_dec_int(antenna_db.size(),0) + " antennas");	//tell user

    options_type.set_selected_index(2);  // Quarter wave
    options_type.on_change = [this](size_t, OptionsField::value_t) {
        this->update_result();
    };

    field_frequency.set_step(1000000);  // 1MHz step
    field_frequency.on_change = [this](rf::Frequency) {
        this->update_result();
    };
    field_frequency.on_edit = [this, &nav]() {
        // TODO: Provide separate modal method/scheme?
        auto new_view = nav.push<FrequencyKeypadView>(transmitter_model.tuning_frequency());
        new_view->on_changed = [this](rf::Frequency f) {
            this->field_frequency.set_value(f);
            this->update_result();
        };
    };

    button_exit.on_select = [this, &nav](Button&) {
        nav.pop();
    };

    field_frequency.set_value(transmitter_model.tuning_frequency());
}

void ui::WhipCalcView::txtline_process(std::string& line) {
    if (line.find("#") != std::string::npos)
        return;  // Line is just a comment

    char separator = ',';
    size_t previous = 0;
    uint16_t value = 0;
    antenna_entry new_antenna;
    size_t current = line.find(separator);

    while (current != std::string::npos) {
        if (!previous)
            new_antenna.label.assign(line, 0, current);  // antenna label
        else {
            value = std::stoi(line.substr(previous, current - previous));
            if (!value) return;                     // No element length? abort antenna
            new_antenna.elements.push_back(value);  // Store this new element
        }
        previous = current + 1;
        current = line.find(separator, previous);  // Search for next space delimiter
    }

    if (!previous) return;                                         // Not even a label ? drop this antenna!
    value = std::stoi(line.substr(previous, current - previous));  // Last element

    if (!value) return;
    new_antenna.elements.push_back(value);
    antenna_db.push_back(new_antenna);  // Add this antenna
}

void ui::WhipCalcView::add_default_antenna() {
    antenna_db.push_back({"ANT500", {185, 315, 450, 586, 724, 862}});  // store a default ant500
}
}  // namespace ui