/* Thanks to pinsafe from BangleApps repository */

var Layout = require("Layout");
const BANGLEJS2 = process.env.HWVERSION == 2; // check for bangle 2

var wp = require('Storage').readJSON("waypoints.json", true) || [];
// Use this with corrupted waypoints
//var wp = [];
/* 0 .. DD.ddddd
   1 .. DD MM.mmm'
   2 .. DD MM'ss"
*/
var mode = 1;
var key; /* Shared between functions, typically wp name */
var fix; /* GPS fix */
var cancel_gps;
var gps_start;

function writeWP() {
  require('Storage').writeJSON("waypoints.json", wp);
}

function mainMenu() {
  let textInputInstalled = true;
  try {
    require("textinput")
  } catch(err) {
    textInputInstalled = false;
  }
  var menu = {
    "< Back" : () => load()
  };
  for (let id in wp) {
    let i = id;
    menu[wp[id]["name"]]=()=>{ show(i); };
  }
  if (textInputInstalled && BANGLEJS2) {
    menu["Add"]=addCard;
  }
  menu["Remove"]=removeCard;
  menu["Format"]=setFormat;
  if (textInputInstalled) {
    menu["Mark GPS"]=markGps;
  }
  g.clear();
  E.showMenu(menu);
}

function updateGps() {
  let lat = "lat", lon = "lon", alt = "alt", speed = "speed";
  
  if (cancel_gps)
    return;
  fix = Bangle.getGPSFix();
  
  speed = "no fix for " + (getTime() - gps_start).toFixed(0) + "s";
  
  if (fix && fix.fix && fix.lat) {
    lat = "" + lat(fix.lat);
    lon = "" + lon(fix.lon);
    alt = "alt " + fix.alt.toFixed(0) + "m";
    speed = "speed " + fix.speed.toFixed(1) + "kt";
  }
  
  g.reset().setFont("Vector", 20)
    .setColor(1,1,1)
    .fillRect(0, 0, 176, 120)
    .setColor(0,0,0)
    .drawString(key, 0, 0)
    .drawString(lat, 0, 20)
    .drawString(lon, 0, 40)
    .drawString(alt, 0, 60)
    .drawString(speed, 0, 80);

  setTimeout(updateGps, 100);
}

function stopGps() {
  cancel_gps=true;
  Bangle.setGPSPower(0, "waypoint_editor");
}

function confirmGps(s) {
  key = s;
   var la = new Layout (
     {type:"v", c: [
       {type:"txt", font:"15%", pad:1, fillx:1, filly:1, label:""},
       {type:"txt", font:"15%", pad:1, fillx:1, filly:1, label:""},
       {type:"txt", font:"15%", pad:1, fillx:1, filly:1, label:""},
       {type:"h", c: [
         {type:"btn", font:"15%", pad:1, fillx:1, filly:1, label: "YES", cb:l=>{
           print("should mark", key, fix); createWP(fix.lat, fix.lon, key); cancel_gps=true; mainMenu();
         }},
         {type:"btn", font:"15%", pad:1, fillx:1, filly:1, label: " NO", cb:l=>{ cancel_gps=true; mainMenu(); }}
       ]}
     ], lazy:true});
  g.clear();
  la.render();
  updateGps();
}

function markGps() {
  cancel_gps = false;
  Bangle.setGPSPower(1, "waypoint_editor");
  gps_start = getTime();
  require("textinput").input({text:"wp"}).then(key => {
    confirmGps(key);
  });
}

function setFormat() {
  var la = new Layout (
    {type:"v", c: [
      {type:"txt", font:"15%", pad:1, fillx:1, filly:1, label:"Format"},
      {type:"btn", font:"15%", pad:1, fillx:1, filly:1, label: "DD.dddd", cb:l=>{  mode = 0; mainMenu(); }},
      {type:"btn", font:"15%", pad:1, fillx:1, filly:1, label: "DD MM.mmm'", cb:l=>{  mode = 1; mainMenu(); }},
      {type:"btn", font:"15%", pad:1, fillx:1, filly:1, label: "DD MM'ss"+'"', cb:l=>{  mode = 2; mainMenu(); }},
    ], lazy:true});
  g.clear();
  la.render();
}

function format(x) {
  switch (mode) {
    case 0:
      return "" + x;
    case 1:
      d = Math.floor(x);
      m = x - d;
      m = m*60;
      return "" + d + " " + m + "'";
    case 2:
      d = Math.floor(x);
      m = x - d;
      m = m*60;
      mf = Math.floor(m);
      s = m - mf;
      s = s*60;
      return "" + d + " " + mf + "'" + s + '"';
  }
}
function lat(x) {
  c = "N";
  if (x<0) {
    c = "S";
    x = -x;
  }
  return c+format(x);
}
function lon(x) {
  c = "E";
  if (x<0) {
    c = "W";
    x = -x;
  }
  return c+format(x);
}

function show(pin) {
  var i = wp[pin];
  var l = lat(i["lat"]) + "\n" + lon(i["lon"]);
  E.showPrompt(l,{
    title:i["name"],
    buttons : {"Ok":true}
  }).then(function(v) {
    mainMenu();
  });
}

function showNumpad(text, key_, callback) {
  key = key_;
  E.showMenu();
  function addDigit(digit) {
    key+=digit;
    if (1) {
      l = text[key.length];
      switch (l) {
        case '.': case ' ': case "'":
          key+=l;
          break;
        case 'd': case 'D': default:
          break;
      }
    }
    Bangle.buzz(20);
    update();
  }
  function update() {
    g.reset();
    g.clearRect(0,0,g.getWidth(),23);
    s = key + text.substr(key.length, 999);
    g.setFont("Vector:24").setFontAlign(1,0).drawString(s,g.getWidth(),12);
  }
  ds="12%";
  var numPad = new Layout ({
      type:"v", c: [{
        type:"v", c: [
          {type:"", height:24},
          {type:"h",filly:1, c: [
            {type:"btn", font:ds, width:58, label:"7", cb:l=>{addDigit("7");}},
            {type:"btn", font:ds, width:58, label:"8", cb:l=>{addDigit("8");}},
            {type:"btn", font:ds, width:58, label:"9", cb:l=>{addDigit("9");}}
          ]},
          {type:"h",filly:1, c: [
            {type:"btn", font:ds, width:58, label:"4", cb:l=>{addDigit("4");}},
            {type:"btn", font:ds, width:58, label:"5", cb:l=>{addDigit("5");}},
            {type:"btn", font:ds, width:58, label:"6", cb:l=>{addDigit("6");}}
          ]},
          {type:"h",filly:1, c: [
            {type:"btn", font:ds, width:58, label:"1", cb:l=>{addDigit("1");}},
            {type:"btn", font:ds, width:58, label:"2", cb:l=>{addDigit("2");}},
            {type:"btn", font:ds, width:58, label:"3", cb:l=>{addDigit("3");}}
          ]},
          {type:"h",filly:1, c: [
            {type:"btn", font:ds, width:58, label:"0", cb:l=>{addDigit("0");}},
            {type:"btn", font:ds, width:58, label:"C", cb:l=>{key=key.slice(0,-1); update();}},
            {type:"btn", font:ds, width:58, id:"OK", label:"OK", cb:callback}
          ]}
        ]}
      ], lazy:true});
  g.clear();
  numPad.render();  
  update();
}

function removeCard() {
  var menu = {
    "" : {title : "Select WP"},
    "< Back" : mainMenu
  };
  if (Object.keys(wp).length==0) Object.assign(menu, {"No WPs":""});
  else {
    wp.forEach((val, card) => {
      const name = wp[card].name;
      menu[name]=()=>{
        E.showPrompt(name,{
          title:"Delete",
        }).then(function(v) {
          if (v) {
            wp.splice(card, 1);
            writeWP();
            mainMenu();
          } else {
            mainMenu();
          }
        });
      };
    });
  }
  E.showMenu(menu);
}

function ask01(t, cb) {
  var la = new Layout (
        {type:"v", c: [
          {type:"txt", font:"15%", pad:1, fillx:1, filly:1, label:"Select"},
          {type:"btn", font:"15%", pad:1, fillx:1, filly:1, label: t[0], cb:l=>{ cb(1); }},
          {type:"btn", font:"15%", pad:1, fillx:1, filly:1, label: t[1], cb:l=>{ cb(-1); }},
        ], lazy:true});
  g.clear();
  la.render();
}

function askCoordinate(t1, t2, callback) {
  //let sign = 1;
  ask01(t1, function(sign) {
      switch (mode) {
        case 0: s = "DDD.dddd"; break;
        case 1: s = "DDD MM.mmm"; break;
        case 2: s = "DDD MM'ss"+'"'; break;
      }
      showNumpad(s, t2, function() {
      switch (mode) {
        case 0:
          res = parseFloat(key);
          break;
        case 1:
          d = parseInt(key.substr(0, 3));
          m = parseFloat(key.substr(3,99));
          res = d + m/60.0;
          break;
        case 2:
          d = parseInt(key.substr(0, 3));
          m = parseInt(key.substr(4, 2));
          s = parseInt(key.substr(7, 2));
          res = d + m/60.0 + s/3600.0;
      }
      res = sign * res;
      print("Coordinate", res);
      callback(res);
    });
  });
}

function askPosition(callback) {
  askCoordinate("NS", "0", function(lat) {
    askCoordinate("EW", "", function(lon) {
        callback(lat, lon);
    });
  });
}

function createWP(lat, lon, name) {
  let n = {};
  n["name"] = name;
  n["lat"] = lat;
  n["lon"] = lon;
  wp.push(n);
  print("add -- waypoints", wp);
  writeWP();
}

function addCardName(name) {
  g.clear();
  askPosition(function(lat, lon) {
    print("position -- ", lat, lon);
    createWP(lat, lon, result);
    mainMenu();
  });
}

function addCard() {
  require("textinput").input({text:"wp"}).then(key => {
    result = key;
    if (wp[result]!=undefined) {
            E.showMenu();
            var alreadyExists = new Layout (
              {type:"v", c: [
                {type:"txt", font:Math.min(15,100/result.length)+"%", pad:1, fillx:1, filly:1, label:result},
                {type:"txt", font:"12%", pad:1, fillx:1, filly:1, label:"already exists."},
                {type:"h", c: [
                  {type:"btn", font:"10%", pad:1, fillx:1, filly:1, label: "REPLACE", cb:l=>{addCardName(result);}},
                  {type:"btn", font:"10%", pad:1, fillx:1, filly:1, label: "CANCEL", cb:l=>{mainMenu();}}
                ]}
              ], lazy:true});
            g.clear();
            alreadyExists.render();
    }
    addCardName(result);
  });
}

g.reset();
mainMenu();