/**
 * Copyright 2013 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.
 **/

var RED = require("../../red/red");
var util = require("util");
var firmata = require("firmata");
var arduinoReady = false;
var thisboard = null;

// The Board Definition - this opens (and closes) the connection
function ArduinoNode(n) {
	RED.nodes.createNode(this,n);
	this.device = n.device;
	this.repeat = n.repeat||25;
	util.log("[firmata] Opening"+this.device);

//	var tou = setInterval(function() {
//		if (!arduinoReady) {
//			clearInterval(tou);

	arduinoReady = false;
	if (thisboard == null) {
		this.board = new firmata.Board(this.device, function(err) {
			if (err) {
				util.log("[firmata] "+err);
				return;
			}
			arduinoReady = true;
			util.log('[firmata] Arduino connected');
		});
		thisboard = this.board;
	}
	else {
		util.log("[firmata] Arduino already connected");
		this.board = thisboard;
		console.log(this.board._events);
		this.board.removeAllListeners();
		arduinoReady = true;
	}

//		} else { util.log("[firmata] Waiting for Firmata"); }
//	}, 1000); // wait for firmata to disconnect from arduino

	this._close = function() {
		//this.board.sp.close(function() { console.log("[firmata] Serial port closed"); arduinoReady = false; });
		util.log("[firmata] Stopped");
	}
}

RED.nodes.registerType("arduino-board",ArduinoNode);

ArduinoNode.prototype.close = function() {
	this._close();
}

// The Input Node
function DuinoNodeIn(n) {
	RED.nodes.createNode(this,n);
	this.buttonState = -1;
	this.pin = n.pin;
	this.state = n.state;
	this.arduino = n.arduino;
	this.serverConfig = RED.nodes.getNode(this.arduino);
	this.board = this.serverConfig.board;
	this.repeat = this.serverConfig.repeat;
	var node = this;

	var tout = setInterval(function() {
		if (arduinoReady) {
			clearInterval(tout);
			console.log(node.state,node.pin,node.board.MODES[node.state]);
			node.board.pinMode(node.pin, node.board.MODES[node.state]);
			node.board.setSamplingInterval(node.repeat);
			var oldrdg = "";
			if (node.state == "ANALOG") {
				node.board.analogRead(node.pin, function(data) {
					var msg = {payload:data, topic:"A"+node.pin};
					if (data != oldrdg) {
						node.send(msg);
						oldrdg = data;
					}
				});
			}
			else {
				node.board.digitalRead(node.pin, function(data) {
					var msg = {payload:data, topic:node.pin};
					node.send(msg);
				});
			}
		}
		else { node.log("Waiting for Arduino"); }
	}, 2000); // loop to wait for firmata to connect to arduino

	this._close = function() {
		clearInterval(this._interval);
		util.log("[firmata] input eventlistener stopped");
	}
}
RED.nodes.registerType("arduino in",DuinoNodeIn);

DuinoNodeIn.prototype.close = function() {
	this._close();
}


// The Output Node
function DuinoNodeOut(n) {
	RED.nodes.createNode(this,n);
	this.buttonState = -1;
	this.pin = n.pin;
	this.state = n.state;
	this.arduino = n.arduino;
	this.serverConfig = RED.nodes.getNode(this.arduino);
	this.board = this.serverConfig.board;
	var node = this;

	this.on("input", function(msg) {
		//console.log(msg);
		if (arduinoReady) {
			if (node.state == "OUTPUT") {
				if ((msg.payload == true)||(msg.payload == 1)||(msg.payload.toString().toLowerCase() == "on")) {
					node.board.digitalWrite(node.pin, node.board.HIGH);
				}
				if ((msg.payload == false)||(msg.payload == 0)||(msg.payload.toString().toLowerCase() == "off")) {
					node.board.digitalWrite(node.pin, node.board.LOW);
				}
			}
			if (node.state == "PWM") {
				msg.payload = msg.payload * 1;
				if ((msg.payload >= 0) && (msg.payload <= 255)) {
					//console.log(msg.payload, node.pin);
					node.board.servoWrite(node.pin, msg.payload);
				}
			}
			if (node.state == "SERVO") {
				msg.payload = msg.payload * 1;
				if ((msg.payload >= 0) && (msg.payload <= 180)) {
					//console.log(msg.payload, node.pin);
					node.board.servoWrite(node.pin, msg.payload);
				}
			}
		}
		//else { console.log("Arduino not ready"); }
	});

	var touo = setInterval(function() {
		if (arduinoReady) {
			clearInterval(touo);
			//console.log(node.state,node.pin,node.board.MODES[node.state]);
			node.board.pinMode(node.pin, node.board.MODES[node.state]);
		}
	}, 5000); // loop to wait for firmata to connect to arduino
}
RED.nodes.registerType("arduino out",DuinoNodeOut);