/**
 * Copyright 2015, 2017 IBM Corp.
 *
 * Licensed under the Apache License, Version 2.0 (the "License");
 * you may not use this file except in compliance with the License.
 * You may obtain a copy of the License at
 *
 * http://www.apache.org/licenses/LICENSE-2.0
 *
 * Unless required by applicable law or agreed to in writing, software
 * distributed under the License is distributed on an "AS IS" BASIS,
 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
 * See the License for the specific language governing permissions and
 * limitations under the License.
 **/

module.exports = function(RED) {
    "use strict";
    var path = require("path");
    var express = require("express");
    var io = require('socket.io');
    var socket;

    var WorldMap = function(n) {
        RED.nodes.createNode(this,n);
        if (!socket) {
            var fullPath = path.posix.join(RED.settings.httpNodeRoot, 'worldmap', 'socket.io');
            socket = io.listen(RED.server, {path:fullPath});
        }
        this.lat = n.lat || "";
        this.lon = n.lon || "";
        this.zoom = n.zoom || "";
        this.layer = n.layer || "";
        this.cluster = n.cluster || "";
        this.maxage = n.maxage || "";
        this.showmenu = n.usermenu || "show";
        this.panit = n.panit || "false";
        var node = this;
        //node.log("Serving map from "+__dirname+" as "+RED.settings.httpNodeRoot.slice(0,-1)+"/worldmap");
        RED.httpNode.use("/worldmap", express.static(__dirname + '/worldmap'));
        // add the cgi module for serving local maps....
        RED.httpNode.use("/cgi-bin/mapserv", require('cgi')(__dirname + '/mapserv'));

        var callback = function(client) {
            client.setMaxListeners(0);
            node.status({fill:"green",shape:"dot",text:"connected "+socket.engine.clientsCount});
            function handler(msg) {
                client.emit("worldmapdata",msg.payload);
            }
            node.on('input', handler);
            client.on('worldmap', function(data) {
                if (data.action === "connected") {
                    var c = {init:true};
                    if (node.lat && node.lat.length > 0) { c.lat = node.lat; }
                    if (node.lon && node.lon.length > 0) { c.lon = node.lon; }
                    if (node.zoom && node.zoom.length > 0) { c.zoom = node.zoom; }
                    if (node.layer && node.layer.length > 0) { c.layer = node.layer; }
                    if (node.cluster && node.cluster.length > 0) { c.cluster = node.cluster; }
                    if (node.maxage && node.maxage.length > 0) { c.maxage = node.maxage; }
                    c.showmenu = node.showmenu;
                    c.panit = node.panit;
                    client.emit("worldmapdata",{command:c});
                }
            });
            client.on('disconnect', function() {
                node.removeListener("input", handler);
                node.status({fill:"green",shape:"ring",text:"connected "+socket.engine.clientsCount});
            });
            node.on("close", function() {
                node.status({});
                client.disconnect(true);
            });
        }
        node.on("close", function() {
            // socket.close();
            // socket = null;
        });
        node.status({});
        socket.on('connection', callback);
    }
    RED.nodes.registerType("worldmap",WorldMap);


    var WorldMapIn = function(n) {
        RED.nodes.createNode(this,n);
        if (!socket) {
            var fullPath = path.posix.join(RED.settings.httpNodeRoot, 'worldmap', 'socket.io');
            socket = io.listen(RED.server, {path:fullPath});
        }
        var node = this;

        var callback = function(client) {
            client.setMaxListeners(0);
            node.status({fill:"green",shape:"dot",text:"connected "+socket.engine.clientsCount});
            client.on('worldmap', function(data) {
                node.send({payload:data, topic:"worldmap"});
            });
            client.on('disconnect', function() {
                node.status({fill:"green",shape:"ring",text:"connected "+socket.engine.clientsCount});
                node.send({payload:{action:"disconnect", clients:socket.engine.clientsCount}, topic:"worldmap"});
            });
            node.on("close", function() {
                client.disconnect(true);
            });
        }

        node.on("close", function() {
            node.status({});
            //socket.close();
        });
        socket.on('connection', callback);
    }
    RED.nodes.registerType("worldmap in",WorldMapIn);


    var satarray = {};
    var WorldMapTracks = function(n) {
        RED.nodes.createNode(this,n);
        this.depth = Number(n.depth) || 20;
        var node = this;

        node.on("input", function(msg) {
            if (msg.hasOwnProperty("payload") && msg.payload.hasOwnProperty("name")) {
                var newmsg = RED.util.cloneMessage(msg);
                if (msg.payload.deleted) {
                    delete satarray[msg.payload.name];
                    newmsg.payload.name = msg.payload.name + "_";
                    node.send(newmsg);  // send the track to be deleted
                    return;
                }
                if (!satarray.hasOwnProperty(msg.payload.name)) {
                    satarray[msg.payload.name] = [];
                }
                satarray[msg.payload.name].push(msg.payload);
                if (satarray[msg.payload.name].length > node.depth) {
                    satarray[msg.payload.name].shift();
                }
                var line = [];
                for (var i=0; i<satarray[msg.payload.name].length; i++) {
                    var m = satarray[msg.payload.name][i];
                    if (m.hasOwnProperty("lat") && m.hasOwnProperty("lon")) {
                        line.push( [m.lat*1, m.lon*1] );
                        delete newmsg.payload.lat;
                        delete newmsg.payload.lon;
                    }
                    if (m.hasOwnProperty("latitude") && m.hasOwnProperty("longitude")) {
                        line.push( [m.latitude*1, m.longitude*1] );
                        delete newmsg.payload.latitude;
                        delete newmsg.payload.longitude;
                    }
                    if (m.hasOwnProperty("position") && m.position.hasOwnProperty("lat") && m.position.hasOwnProperty("lon")) {
                        line.push( [m.position.lat*1, m.position.lon*1] );
                        delete newmsg.payload.position;
                    }
                }
                if (line.length > 1) { // only send track if two points or more
                    newmsg.payload.line = line;
                    newmsg.payload.name = msg.payload.name + "_";
                    node.send(newmsg);  // send the track
                }
            }
        });

        node.on("close", function() {
            satarray = {};
        });
    }
    RED.nodes.registerType("worldmap-tracks",WorldMapTracks);
}