# HG changeset patch
# User Matti Hamalainen <ccr@tnsp.org>
# Date 1535045026 -10800
# Node ID b36cfb497223cf6689a8cfc0372a278d769da951
# Parent  d67a79d6e11cc15323a623aa54aef8967808c72f
Move file related functions to files.pde

diff -r d67a79d6e11c -r b36cfb497223 files.pde
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/files.pde	Thu Aug 23 20:23:46 2018 +0300
@@ -0,0 +1,258 @@
+boolean mpHaveLocalStorage()
+{
+    var test = 'mpLSTest';
+    try {
+        localStorage.setItem(test, test);
+        if (localStorage.getItem(test) == test)
+        {
+            localStorage.removeItem(test);
+            return true;
+        }
+    }
+    catch (e) {
+        return false;
+    }
+    return false;
+}
+
+
+function mpLoadFileSelector(fmtname, fmtexts, fcallback)
+{
+    var mpUI = stGE("mpUI");
+    if (mpUI)
+    {
+        stClearChildren(mpUI);
+        mpUI.style.background = "red";
+        mpUI.style.padding = "0.5em";
+
+        mobj = stCE("input", "mpFileSelector");
+        mobj.type = "file";
+        mobj.name = "name";
+        mobj.multiple = false;
+
+        if (fmtexts != null)
+            mobj.accept = fmtexts;
+
+        stAddEventOb(mobj.name, mobj, "change",
+            function(evt)
+            {
+                var files = evt.target.files;
+                if (files.length > 0)
+                {
+                    var freader = new FileReader();
+
+                    freader.onloadend = (function(theFile) {
+                        fcallback(theFile, new Uint8Array(freader.result));
+                    });
+
+                    freader.readAsArrayBuffer(files[0]);
+                }
+                stClearChildren(mpUI);
+                mpUI.style.background = null;
+            });
+
+        mpUI.appendChild(mobj);
+
+        mobj = stCE("span", "mpFileInfo");
+        mobj.innerHTML = "Load / import an '<b>"+ fmtname +"</b>' file.";
+        mpUI.appendChild(mobj);
+    }
+    else
+        return null;
+}
+
+
+//
+// Basically the same as Processing loadBytes(), but it seems
+// that Processing.JS's loadBytes() is broken at least in v1.4.8
+// and does not return byte-clean data. So roll a replacement of
+// our own design. --ccr
+//
+byte[] mpLoadBinaryFile(String url)
+{
+    var xhr = new XMLHttpRequest();
+    xhr.open("GET", url, false);
+    xhr.overrideMimeType("text/plain; charset=x-user-defined");
+    xhr.setRequestHeader("If-Modified-Since", "Fri, 01 Jan 1960 00:00:00 GMT");
+    xhr.send(null);
+
+    if (xhr.status !== 200 && xhr.status !== 0)
+        return null;
+
+    var string = xhr.responseText;
+    byte[] ret = new byte[string.length];
+
+    for (var i = 0; i < string.length; i++)
+    {
+        ret[i] = string.charCodeAt(i) & 0xff;
+    }
+
+    return ret;
+}
+
+
+Blob mpMakeBinaryBlob(byte[] data)
+{
+    var blob = null;
+    if (data == null)
+        return null;
+
+    if (typeof(data) == "string")
+        blob = new Blob([data], {type: "application/octet-stream"});
+    else
+    if (typeof(data) == "object")
+        blob = new Blob([new Uint8Array(data)], {type: "application/octet-stream"});
+
+    return blob;
+}
+
+
+//
+// "Save" a byte array to file. Basically creates a blob URI
+// and dumps it in the DOM, giving user a download.
+//
+boolean mpSaveBinaryFile(String name, byte[] data)
+{
+    var blob = mpMakeBinaryBlob(data);
+    if (blob == null)
+    {
+        console.log("Could not create BLOB from data.");
+        return false;
+    }
+
+    var url = window.URL.createObjectURL(blob);
+    if (url == null)
+    {
+        console.log("Could not create URL from BLOB object.");
+        return false;
+    }
+
+    var alink = stCE("a");
+    var mpUI = stGE("mpUI");
+    stClearChildren(mpUI);
+    mpUI.appendChild(alink);
+
+    alink.style = "display: none";
+    alink.href = url;
+    alink.download = name;
+    alink.click();
+
+    window.URL.revokeObjectURL(url);
+    return true;
+}
+
+
+// bordh/v = 64, 32, omag = 1
+void mpSavePNGImage(String name, int fmt, boolean border, int bordh, int bordv, int omag)
+{
+    PImage simg = mpRenderImage(border, bordh, bordv, omag);
+//    if (g_data[int('Q')] == 0)
+
+    if (simg !== null)
+    {
+        // XXX TODO .. actually save the image, something like ..
+        //simg.canvas.toBlob(function(idata){ mpSaveBinaryFile(name, idata); }, "image/png", 0.95);
+    }
+}
+
+
+int mpLoadPNGImage(String name)
+{
+    PImage simg = null;
+    if (simg == null)
+        return -1;
+
+    int lefth = g_farge;
+    int righth = g_backg;
+    storeparameters();
+
+    g_data[int('d')] = 0;
+    g_data[int('t')] = 0;
+    g_data[int('b')] = 1; //old IQ
+
+    if (!mpImportFromImage(simg))
+        return -2;
+
+    restoreparameters();
+    refreshpalette();
+    refresh();
+    g_boxreconstruct = 2;
+    selectcolor(0, lefth);
+    selectcolor(1, righth);
+    return 0;
+}
+
+
+byte[] mpGetNativeImage()
+{
+    //save the picture page g_map[], make sure some essential parameters are correct
+    g_map[3] = byte(g_machine);
+    g_map[5] = byte(MX);
+    g_map[7] = byte(MY);
+
+    return g_map;
+}
+
+
+int mpSetNativeImage(byte[] data, boolean noError)
+{
+    if (data == null)
+        return -1;
+
+    if (data[3] != g_machine && !noError)
+        return -2;
+
+    store_undo();
+
+    g_map = data;
+
+    refreshpalette();
+    consistency();
+    g_farge = int(g_realfront);
+    g_ofarge = g_farge;
+    g_backg = int(g_realback);
+    sussborder();
+
+    return 0;
+}
+
+
+int mpLoadNativeImage(String name, boolean noError)
+{
+    return mpSetNativeImage(
+        mpLoadBinaryFile(name), noError);
+}
+
+
+boolean mpLoadPalette(String fname)
+{
+    if (g_map[13] != C64)
+    {
+        return false;
+    }
+
+    byte fdata[] = mpLoadbinaryFile(fname);
+    if (fdata == null ||
+        fdata.length != 772 ||
+        fdata[0x301] != byte(0x10) ||
+        fdata[0x302] != byte(0xff) ||
+        fdata[0x303] != byte(0xff))
+    {
+        return false;
+    }
+
+    for (int n = 0; n < 16; n++)
+    {
+        makecolor(n,
+            int(fdata[n * 3]),
+            int(fdata[n * 3 + 1]),
+            int(fdata[n * 3 + 2]));
+    }
+
+    mpSetUIColors();
+
+    sussborder();
+    refresh_all();
+
+    return true;
+}
diff -r d67a79d6e11c -r b36cfb497223 mpui.js
--- a/mpui.js	Thu Aug 23 18:35:13 2018 +0300
+++ b/mpui.js	Thu Aug 23 20:23:46 2018 +0300
@@ -44,6 +44,7 @@
 var mpSources =
 [
   "buffers.pde",
+  "files.pde",
   "preview.pde",
   "draw_inputs.pde",
   "draw_outputs.pde",
diff -r d67a79d6e11c -r b36cfb497223 multipaint.pde
--- a/multipaint.pde	Thu Aug 23 18:35:13 2018 +0300
+++ b/multipaint.pde	Thu Aug 23 20:23:46 2018 +0300
@@ -287,266 +287,6 @@
 }
 
 
-boolean mpHaveLocalStorage()
-{
-    var test = 'mpLSTest';
-    try {
-        localStorage.setItem(test, test);
-        if (localStorage.getItem(test) == test)
-        {
-            localStorage.removeItem(test);
-            return true;
-        }
-    }
-    catch (e) {
-        return false;
-    }
-    return false;
-}
-
-
-function mpLoadFileSelector(fmtname, fmtexts, fcallback)
-{
-    var mpUI = stGE("mpUI");
-    if (mpUI)
-    {
-        stClearChildren(mpUI);
-        mpUI.style.background = "red";
-        mpUI.style.padding = "0.5em";
-
-        mobj = stCE("input", "mpFileSelector");
-        mobj.type = "file";
-        mobj.name = "name";
-        mobj.multiple = false;
-
-        if (fmtexts != null)
-            mobj.accept = fmtexts;
-
-        stAddEventOb(mobj.name, mobj, "change",
-            function(evt)
-            {
-                var files = evt.target.files;
-                if (files.length > 0)
-                {
-                    var freader = new FileReader();
-
-                    freader.onloadend = (function(theFile) {
-                        fcallback(theFile, new Uint8Array(freader.result));
-                    });
-
-                    freader.readAsArrayBuffer(files[0]);
-                }
-                stClearChildren(mpUI);
-                mpUI.style.background = null;
-            });
-
-        mpUI.appendChild(mobj);
-
-        mobj = stCE("span", "mpFileInfo");
-        mobj.innerHTML = "Load / import an '<b>"+ fmtname +"</b>' file.";
-        mpUI.appendChild(mobj);
-    }
-    else
-        return null;
-}
-
-
-//
-// Basically the same as Processing loadBytes(), but it seems
-// that Processing.JS's loadBytes() is broken at least in v1.4.8
-// and does not return byte-clean data. So roll a replacement of
-// our own design. --ccr
-//
-byte[] mpLoadBinaryFile(String url)
-{
-    var xhr = new XMLHttpRequest();
-    xhr.open("GET", url, false);
-    xhr.overrideMimeType("text/plain; charset=x-user-defined");
-    xhr.setRequestHeader("If-Modified-Since", "Fri, 01 Jan 1960 00:00:00 GMT");
-    xhr.send(null);
-
-    if (xhr.status !== 200 && xhr.status !== 0)
-        return null;
-
-    var string = xhr.responseText;
-    byte[] ret = new byte[string.length];
-
-    for (var i = 0; i < string.length; i++)
-    {
-        ret[i] = string.charCodeAt(i) & 0xff;
-    }
-
-    return ret;
-}
-
-
-Blob mpMakeBinaryBlob(byte[] data)
-{
-    var blob = null;
-    if (data == null)
-        return null;
-
-    if (typeof(data) == "string")
-        blob = new Blob([data], {type: "application/octet-stream"});
-    else
-    if (typeof(data) == "object")
-        blob = new Blob([new Uint8Array(data)], {type: "application/octet-stream"});
-
-    return blob;
-}
-
-
-//
-// "Save" a byte array to file. Basically creates a blob URI
-// and dumps it in the DOM, giving user a download.
-//
-boolean mpSaveBinaryFile(String name, byte[] data)
-{
-    var blob = mpMakeBinaryBlob(data);
-    if (blob == null)
-    {
-        console.log("Could not create BLOB from data.");
-        return false;
-    }
-
-    var url = window.URL.createObjectURL(blob);
-    if (url == null)
-    {
-        console.log("Could not create URL from BLOB object.");
-        return false;
-    }
-
-    var alink = stCE("a");
-    var mpUI = stGE("mpUI");
-    stClearChildren(mpUI);
-    mpUI.appendChild(alink);
-
-    alink.style = "display: none";
-    alink.href = url;
-    alink.download = name;
-    alink.click();
-
-    window.URL.revokeObjectURL(url);
-    return true;
-}
-
-
-// bordh/v = 64, 32, omag = 1
-void mpSavePNGImage(String name, int fmt, boolean border, int bordh, int bordv, int omag)
-{
-    PImage simg = mpRenderImage(border, bordh, bordv, omag);
-//    if (g_data[int('Q')] == 0)
-
-    if (simg !== null)
-    {
-        // XXX TODO .. actually save the image, something like ..
-        //simg.canvas.toBlob(function(idata){ mpSaveBinaryFile(name, idata); }, "image/png", 0.95);
-    }
-}
-
-
-int mpLoadPNGImage(String name)
-{
-    PImage simg = null;
-    if (simg == null)
-        return -1;
-
-    int lefth = g_farge;
-    int righth = g_backg;
-    storeparameters();
-
-    g_data[int('d')] = 0;
-    g_data[int('t')] = 0;
-    g_data[int('b')] = 1; //old IQ
-
-    if (!mpImportFromImage(simg))
-        return -2;
-
-    restoreparameters();
-    refreshpalette();
-    refresh();
-    g_boxreconstruct = 2;
-    selectcolor(0, lefth);
-    selectcolor(1, righth);
-    return 0;
-}
-
-
-byte[] mpGetNativeImage()
-{
-    //save the picture page g_map[], make sure some essential parameters are correct
-    g_map[3] = byte(g_machine);
-    g_map[5] = byte(MX);
-    g_map[7] = byte(MY);
-
-    return g_map;
-}
-
-
-int mpSetNativeImage(byte[] data, boolean noError)
-{
-    if (data == null)
-        return -1;
-
-    if (data[3] != g_machine && !noError)
-        return -2;
-
-    store_undo();
-
-    g_map = data;
-
-    refreshpalette();
-    consistency();
-    g_farge = int(g_realfront);
-    g_ofarge = g_farge;
-    g_backg = int(g_realback);
-    sussborder();
-
-    return 0;
-}
-
-
-int mpLoadNativeImage(String name, boolean noError)
-{
-    return mpSetNativeImage(
-        mpLoadBinaryFile(name), noError);
-}
-
-
-boolean mpLoadPalette(String fname)
-{
-    if (g_map[13] != C64)
-    {
-        return false;
-    }
-
-    byte fdata[] = mpLoadbinaryFile(fname);
-    if (fdata == null ||
-        fdata.length != 772 ||
-        fdata[0x301] != byte(0x10) ||
-        fdata[0x302] != byte(0xff) ||
-        fdata[0x303] != byte(0xff))
-    {
-        return false;
-    }
-
-    for (int n = 0; n < 16; n++)
-    {
-        makecolor(n,
-            int(fdata[n * 3]),
-            int(fdata[n * 3 + 1]),
-            int(fdata[n * 3 + 2]));
-    }
-
-    mpSetUIColors();
-
-    sussborder();
-    refresh_all();
-
-    return true;
-}
-
-
 void draw()
 {
     if (!focused)