/*
 * Multipaint.JS - Javascript launcher
 * (C) Copyright 2018 Matti 'ccr' Hämäläinen <ccr@tnsp.org>
 */
var mpMachine = 0, mpUIScale, mpUIForcedWidth, mpUIForcedHeight;
var mpURL;

var mpMachines =
[
  [   0, "C64 hires"          , ],
  [  10, "C64 multicolor"     , ],
  [   6, "ZX Spectrum"        , ],
  [   5, "MSX1 mode 2"        , ],
  [   9, "Plus4 hires"        , ],
  [  19, "Plus4 multicolor"   , ],
  [   2, "Amstrad CPC mode 0" , ],

  [  -1, "Experimental/unsupported modes below" , ],

  [  32, "C64 no limit"       , ],
  [  20, "C64 FLI hires"      , ],
  [  21, "C64 FLI multicolor" , ],
  [   7, "Timex"              , ],
  [   8, "JR200"              , ],
  [  99, "BK-0010"            , ],
//  [  , "" , false ],
];


var mpUIDimensions =
[
  [ -1, -1 ],
  [ 1200, 800 ],
  [ 1600, 800 ],
  [ 1600, 1000 ],
];


var mpUIScales =
[
  2, 3, 1
];

var mpSources =
[
  "buffers.pde",
  "preview.pde",
  "draw_inputs.pde",
  "draw_outputs.pde",
  "draw_smart.pde",
  "events.pde",
  "exporters.pde",
  "interface.pde",
  "multipaint.pde",
];


function stGE(obname)
{
  return document.getElementById(obname);
}


function stCE(obname, obid)
{
  var mob = document.createElement(obname);
  if (obid)
    mob.id = obid;
  return mob;
}


function stClearChildren(obnode)
{
  while (obnode.firstChild)
    obnode.removeChild(obnode.firstChild);
}


function stPRE(mstr)
{
  return mstr.toLowerCase().replace(/[^a-z0-9]/g, "_");
}


function stAddEventOb(obname, evobj, evtype, evcallback, evparam)
{
  if (evobj == null || typeof(evobj) == 'undefined')
  {
    console.log("Event object '"+ obname +"' == null.");
    return;
  }

  evobj.addEventListener(evtype, evcallback, false);
  evobj.evparam = evparam;
}


function stAddEvent(obname, evtype, evcallback, evparam)
{
  stAddEventOb(obname, stGE(obname), evtype, evcallback, evparam);
}


function stGetSelValue(velem, vdef)
{
  if (velem)
    return velem.selectedIndex >= 0 ? velem.options[velem.selectedIndex].value : vdef;
  else
    return vdef;
}


function stCreateSelect(vid, vlist, vcallback)
{
  var vobj = stCE("select", vid);

  for (var n = 0; n < vlist.length; n++)
  {
    var mp = vlist[n];
    var opt = stCE("option");
    vcallback(n, opt, mp);
    vobj.appendChild(opt);
  }

  return vobj;
}


function mpShowLauncher()
{
  var mpCanvas = stGE("mpCanvas");
  mpCanvas.style.display = "none";

  var mpUI = stGE("mpUI");
  mobj = stCE("h2");
  mobj.textContent = "Multipaint.JS"
  mpUI.appendChild(mobj);

  var mdiv = stCE("div", "mmachine");
  mpUI.appendChild(mdiv);

  mobj = stCE("p");
  mobj.textContent = "Choose your target machine:";
  mdiv.appendChild(mobj);


  mdiv.appendChild(stCreateSelect("machineID", mpMachines,
    function (vn, vopt, val) {
      if (val[0] < 0)
        vopt.disabled = true;
      else
        vopt.value = val[0];

      vopt.textContent = val[1];
    }));

  mobj = stCE("button", "selectID");
  mobj.textContent = "RUN";
  stAddEventOb(mobj.name, mobj, "click", mpLauncherDone);
  mdiv.appendChild(mobj);


  mdiv = stCE("div", "mdimensions");
  mpUI.appendChild(mdiv);

  mobj = stCE("p");
  mobj.textContent = "Choose optional UI size:";
  mdiv.appendChild(mobj);

  mdiv.appendChild(stCreateSelect("dimensionsID", mpUIDimensions,
    function (vn, vopt, val) { vopt.value = vn; vopt.textContent = (vn == 0) ? "DEFAULT" : val[0] +" x "+ val[1]; }));

  mdiv.appendChild(stCreateSelect("scalesID", mpUIScales,
    function (vn, vopt, val) { vopt.value = val; vopt.textContent = " x "+ val; }));


  mobj = stCE("div");
  mobj.innerHTML =
    "<p><b>Things of note:</b></p>"+
    "<ul>"+
    "<li>Save ('S') and Load ('L') save to/load from <a href=\"https://en.wikipedia.org/wiki/Web_storage\">browser local storage</a> "+
    "(there can be only one \"save\" per machine type, so be careful.)</li>"+
    "<li>Each machine type has its own local storage save space.</li>"+
    "<li>Save as ('s') and Load from ('l') export and import Multipaint workfiles.</li>"+
    "<li>When loading/importing, you click on the load icon (or press key) and a HTML file selector button will appear "+
    "ON THE BOTTOM. You need to click that, too. Sorry, that can't be automated because of pop-up blocking etc.</li>"+
    "</ul>"+
    "<p><b>Existing problems:</b></p>"+
    "<ul>"+
    "<li>All of Multipaint v1.8.2018 changes have been integrated, "+
    "but there are no UI widgets for changing some settings, "+
    "loading of alternate palettes, etc. (yet.. might take time to implement these.)</li>"+
    "<li>Source code export is not guaranteed to work (it is enabled now, though.)</li>"+
    "<li>PNG/JPEG import/export does not work.</li>"+
    "<li>The 'magnify' tool works oddly, though I think this issue may exist in the original as well.</li>"+
    "<li>The preview window seems to be buggy for multicolor bitmaps.</li>"+
    "<li>There may be other bugs .. though I've also fixed few bugs that exist in original Multipaint.</li>"+
    "</ul>"+
    "<p>You can also view the <a href=\"https://tnsp.org/hg/forks/multipaint-js/\">Mercurial repository for this project</a>.</p>";

  mpUI.appendChild(mobj);

  mobj = stCE("hr");
  mpUI.appendChild(mobj);
}


function mpLauncherDone()
{
  // Get selected values from DOM elements
  var mpUI = stGE("mpUI");
  mpMachine = stGetSelValue(stGE("machineID"), 0);

  var index = stGetSelValue(stGE("dimensionsID"), -1);
  if (index > 0)
  {
    mpUIForcedWidth = mpUIDimensions[index][0];
    mpUIForcedHeight = mpUIDimensions[index][1];
  }
  else
    mpUIForcedWidth = mpUIForcedHeight = 0;

  mpUIScale = stGetSelValue(stGE("scalesID"), -1);

  stClearChildren(mpUI);

  // Initialize the canvas etc.
  var mpCanvas = stGE("mpCanvas");
  mpCanvas.style.display = "block";

  window.location.href = mpURL +"?"+ mpMachine.toString() +":"+ mpUIForcedWidth +":"+ mpUIForcedHeight +":"+ mpUIScale;

  mpRunSketch(mpCanvas);
}


function mpStart()
{
  stGE("mpNote").innerHTML =
    "<a href=\"http://multipaint.kameli.net/\">Multipaint</a> (C) 2016-2018 <b>Tero 'Dr. TerrorZ' Heikkinen</b>, "+
    "ProcessingJS port and modifications by <b>Matti 'ccr' Hämäläinen</b> (2018)";

  // Check for URL parameters
  var slink = window.location.href;
  var spos, found = false;
  if ((spos = slink.indexOf("?")) >= 0)
  {
    var sargs = unescape(slink.substr(spos + 1)).split(":");
    mpURL = slink.substr(0, spos);
    mpMachine = parseInt(sargs[0]);
    found = true;

    if (sargs.length >= 3)
    {
      mpUIForcedWidth = parseInt(sargs[1]);
      mpUIForcedHeight = parseInt(sargs[2]);
    }
    if (sargs.length >= 4)
      mpUIScale = parseInt(sargs[3]);
  }
  else
    mpURL = slink;

  // Either run sketch or show the launcher
  if (found)
  {
    mpRunSketch(stGE("mpCanvas"));
  }
  else
  {
    stAddEventOb("DOM", document, "DOMContentLoaded", mpShowLauncher);
  }
}