/**
 * Copyright JS Foundation and other contributors, http://js.foundation
 *
 * 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 should = require("should");
var sinon = require("sinon");
var when = require("when");
var path = require("path");
var fs = require('fs');
var EventEmitter = require('events');

var child_process = require('child_process');
var installer = require("../../../../../red/runtime/nodes/registry/installer");
var registry = require("../../../../../red/runtime/nodes/registry/index");
var typeRegistry = require("../../../../../red/runtime/nodes/registry/registry");

describe('nodes/registry/installer', function() {

    before(function() {
        installer.init({});
    });
    afterEach(function() {
        if (child_process.spawn.restore) {
            child_process.spawn.restore();
        }
        if (child_process.execFile.restore) {
            child_process.execFile.restore();
        }
        if (registry.addModule.restore) {
            registry.addModule.restore();
        }
        if (registry.removeModule.restore) {
            registry.removeModule.restore();
        }
        if (typeRegistry.removeModule.restore) {
            typeRegistry.removeModule.restore();
        }
        if (registry.getModuleInfo.restore) {
            registry.getModuleInfo.restore();
        }
        if (typeRegistry.getModuleInfo.restore) {
            typeRegistry.getModuleInfo.restore();
        }

        if (require('fs').statSync.restore) {
            require('fs').statSync.restore();
        }

    });

    describe("installs module", function() {
        it("rejects when npm returns a 404", function(done) {
            sinon.stub(child_process,"spawn",function(cmd,args,opt) {
                var ee = new EventEmitter();
                ee.stdout = new EventEmitter();
                ee.stderr = new EventEmitter();
                setTimeout(function() {
                    ee.stderr.emit('data'," 404  this_wont_exist");
                    ee.emit('close',1);
                },10)
                return ee;
            });

            installer.installModule("this_wont_exist").otherwise(function(err) {
                err.code.should.be.eql(404);
                done();
            });
        });
        it("rejects when npm does not find specified version", function(done) {
            sinon.stub(child_process,"spawn",function(cmd,args,opt) {
                var ee = new EventEmitter();
                ee.stdout = new EventEmitter();
                ee.stderr = new EventEmitter();
                setTimeout(function() {
                    ee.stderr.emit('data'," version not found: this_wont_exist@0.1.2");
                    ee.emit('close',1);
                },10)
                return ee;
            });
            sinon.stub(typeRegistry,"getModuleInfo", function() {
                return {
                    version: "0.1.1"
                }
            });

            installer.installModule("this_wont_exist","0.1.2").otherwise(function(err) {
                err.code.should.be.eql(404);
                done();
            });
        });
        it("rejects when update requested to existing version", function(done) {
            sinon.stub(typeRegistry,"getModuleInfo", function() {
                return {
                    version: "0.1.1"
                }
            });
            installer.installModule("this_wont_exist","0.1.1").otherwise(function(err) {
                err.code.should.be.eql('module_already_loaded');
                done();
            });
        });
        it("rejects with generic error", function(done) {
            sinon.stub(child_process,"spawn",function(cmd,args,opt,cb) {
                var ee = new EventEmitter();
                ee.stdout = new EventEmitter();
                ee.stderr = new EventEmitter();
                setTimeout(function() {
                    ee.stderr.emit('data'," kaboom!");
                    ee.emit('close',1);
                },10)
                return ee;
            });

            installer.installModule("this_wont_exist").then(function() {
                done(new Error("Unexpected success"));
            }).otherwise(function(err) {
                done();
            });
        });
        it("succeeds when module is found", function(done) {
            var nodeInfo = {nodes:{module:"foo",types:["a"]}};
            sinon.stub(child_process,"spawn",function(cmd,args,opt) {
                var ee = new EventEmitter();
                ee.stdout = new EventEmitter();
                ee.stderr = new EventEmitter();
                setTimeout(function() {
                    ee.emit('close',0);
                },10)
                return ee;
            });
            var addModule = sinon.stub(registry,"addModule",function(md) {
                return when.resolve(nodeInfo);
            });

            installer.installModule("this_wont_exist").then(function(info) {
                info.should.eql(nodeInfo);
                // commsMessages.should.have.length(1);
                // commsMessages[0].topic.should.equal("node/added");
                // commsMessages[0].msg.should.eql(nodeInfo.nodes);
                done();
            }).otherwise(function(err) {
                done(err);
            });
        });
        it("rejects when non-existant path is provided", function(done) {
            this.timeout(20000);
            var resourcesDir = path.resolve(path.join(__dirname,"..","resources","local","TestNodeModule","node_modules","NonExistant"));
            installer.installModule(resourcesDir).then(function() {
                done(new Error("Unexpected success"));
            }).otherwise(function(err) {
                if (err.hasOwnProperty("code")) {
                    err.code.should.eql(404);
                    done();
                }
                else {
                    console.log("ERRROR::"+err.toString()+"::");
                    err.toString().should.eql("Error: Install failed");
                    done();
                }
            });
        });
        it("succeeds when path is valid node-red module", function(done) {
            var nodeInfo = {nodes:{module:"foo",types:["a"]}};
            var addModule = sinon.stub(registry,"addModule",function(md) {
                return when.resolve(nodeInfo);
            });
            var resourcesDir = path.resolve(path.join(__dirname,"..","resources","local","TestNodeModule","node_modules","TestNodeModule"));
            sinon.stub(child_process,"spawn",function(cmd,args,opt) {
                var ee = new EventEmitter();
                ee.stdout = new EventEmitter();
                ee.stderr = new EventEmitter();
                setTimeout(function() {
                    ee.emit('close',0);
                },10)
                return ee;
            });
            installer.installModule(resourcesDir).then(function(info) {
                info.should.eql(nodeInfo);
                done();
            }).otherwise(function(err) {
                done(err);
            });
        });

    });
    describe("uninstalls module", function() {
        it("rejects invalid module names", function(done) {
            var promises = [];
            promises.push(installer.uninstallModule("this_wont_exist "));
            promises.push(installer.uninstallModule("this_wont_exist;no_it_really_wont"));
            when.settle(promises).then(function(results) {
                results[0].state.should.be.eql("rejected");
                results[1].state.should.be.eql("rejected");
                done();
            });
        });

        it("rejects with generic error", function(done) {
            var nodeInfo = [{module:"foo",types:["a"]}];
            var removeModule = sinon.stub(registry,"removeModule",function(md) {
                return when.resolve(nodeInfo);
            });
            sinon.stub(child_process,"execFile",function(cmd,args,opt,cb) {
                cb(new Error("test_error"),"","");
            });

            installer.uninstallModule("this_wont_exist").then(function() {
                done(new Error("Unexpected success"));
            }).otherwise(function(err) {
                done();
            });
        });
        it("succeeds when module is found", function(done) {
            var nodeInfo = [{module:"foo",types:["a"]}];
            var removeModule = sinon.stub(typeRegistry,"removeModule",function(md) {
                return nodeInfo;
            });
            var getModuleInfo = sinon.stub(registry,"getModuleInfo",function(md) {
                return {nodes:[]};
            });
            sinon.stub(child_process,"execFile",function(cmd,args,opt,cb) {
                cb(null,"","");
            });

            sinon.stub(fs,"statSync", function(fn) { return {}; });

            installer.uninstallModule("this_wont_exist").then(function(info) {
                info.should.eql(nodeInfo);
                // commsMessages.should.have.length(1);
                // commsMessages[0].topic.should.equal("node/removed");
                // commsMessages[0].msg.should.eql(nodeInfo);
                done();
            }).otherwise(function(err) {
                done(err);
            });
        });
    });
});