const fs = require('fs');
const ini = require('ini');
const mastodon = require('mastodon');
const mqtt = require('mqtt');
const request = require('request');
const rgbcolor = require('rgb-color');
const xmpp = require('simple-xmpp');

try {
    fs.readFileSync('./config.ini', 'utf-8');

    const config = ini.parse(fs.readFileSync('./config.ini', 'utf-8'));
    const debugging = config.debug;

    // Asterisk config
    const asterisk_callfrom = config.asterisk.callfrom;
    const asterisk_callerID = config.asterisk.callerID;
    const asterisk_callto = config.asterisk.callerto;
    const asterisk_context = config.asterisk.context;
    const asterisk_host = config.asterisk.host;
    const asterisk_password = config.asterisk.password;
    const asterisk_port = config.asterisk.port;
    const asterisk_user = config.asterisk.user;

    // Bot config
    const bot_hostname = config.bot.hostname;
    const bot_jid = config.bot.jid;
    const bot_password = config.bot.password;
    const bot_port = config.bot.port;

    // Gotify config
    const gotify_api_url = config.gotify.api_url;
    const gotify_key = config.gotify.key;
    const gotify_message = config.gotify.message;
    const gotify_priority = config.gotify.priority;
    const gotify_title = config.gotify.title;

    // Mastodon config
    const mastodon_api_url = config.mastodon.api_url;
    const mastodon_token = config.mastodon.token;
    const mastodon_toot = config.mastodon.toot;

    // MQTT config
    const mqtt_message = config.mqtt.message;
    const mqtt_password = config.mqtt.password;
    const mqtt_server = config.mqtt.server;
    const mqtt_topic = config.mqtt.topic;
    const mqtt_user = config.mqtt.user;

    // Tuya (Smart Lights) config
    const tuya_name = config.tuya.name;
    const tuya_bright_url = config.tuya.bright_url;
    const tuya_color_url = config.tuya.color_url;
    const tuya_status_url = config.tuya.status_url;
    const tuya_toggle_url = config.tuya.toggle_url;

    // Unlocks API config
    const unlocks_api_url = config.unlocks.api_url;
    const unlocks_pass = config.unlocks.pass;
    const unlocks_user = config.unlocks.user;

    // User config (authorized user)
    const user_jid = config.user.jid //.split('/')[0];
    const user_name = config.user.name;
    const user_server = config.user.server;

    // Weather config
    const weather_key = config.weather.key;
    const weather_city_code = config.weather.city_code;
    const weather_city_name = config.weather.city_name;
    const weather_units = config.weather.units;

    // Private channel creation (uses friends secion of config.ini to invite them to a private chat)
    const xmpp_api_url = config.xmpp.api_url;
    const xmpp_auth = config.xmpp.key;
    const xmpp_muc_name = config.xmpp.muc_name;
    const xmpp_muc_password = config.xmpp.muc_password;
    const xmpp_muc_server = config.xmpp.muc_server;

    let pc = 'This is a private command. Please see https://wiki.vanderwarker.family/doku.php?id=code:vxmppb:start for your own instance!';
    let weather_url = `https://api.openweathermap.org/data/2.5/weather?id=${weather_city_code}&appid=${weather_key}&units=${weather_units}`

    var ami = new require('asterisk-manager')(asterisk_port, asterisk_host, asterisk_user, asterisk_password, false);
    var client = mqtt.connect('tcp://' + mqtt_user + ':' + mqtt_password + '@' + mqtt_server);
    var M = new mastodon({
        access_token: `${mastodon_token}`,
        timeout_ms: 60 * 1000,
        api_url: `${mastodon_api_url}`,
    })

    // thx: https://stackoverflow.com/questions/48750528/get-direction-from-degrees
    function getDirection(angle) {
        var directions = ['North', 'North-East', 'East', 'South-East', 'South', 'South-West', 'West', 'North-West'];
        var index = Math.round(((angle %= 360) < 0 ? angle + 360 : angle) / 45) % 8;
        return directions[index];
    }

    // Once we're online, we'll send a message alerting admins
    xmpp.on('online', function(data, to) {
        console.log('Connected with JID: ' + bot_jid);
        xmpp.send(user_jid, "[ONLINE]", false);
        client.publish(mqtt_topic, mqtt_message);
        M.post('statuses', {
            status: `${mastodon_toot}`
        });
    });

    xmpp.on('chat', function(from, message) {
        function debug() {
            if (debugging === '1') {
                console.log('-------------');
                console.log(message);
                console.log(from);
                console.log('-------------');
            };
        }
        const friends = Object.keys(config.friends);
        let gotifyURL = `${gotify_api_url}/message?token=${gotify_key}&message=${from} ${gotify_message}&title=${gotify_title}&priority=${gotify_priority}`;
        let gotifyEUrl = encodeURI(gotifyURL);
        // HELP
        if (message === '!help') {
            xmpp.send(from, 'https://wiki.vanderwarker.family/doku.php?id=code:vxmppb:commands');
            debug();
        }

        // UNLOCKS
        else if (message === '!unlocks') {
            if (from != user_jid) {
                xmpp.send(from, pc);
            } else {
                var d = new Date();
                var weekday = new Array(7);
                weekday[0] = "Sunday";
                weekday[1] = "Monday";
                weekday[2] = "Tuesday";
                weekday[3] = "Wednesday";
                weekday[4] = "Thursday";
                weekday[5] = "Friday";
                weekday[6] = "Saturday";
                var n = weekday[d.getDay()];

                request(unlocks_api_url + "?columns=" + n, (error, res, body) => {
                    if (error) {
                        return console.log(error)
                    };

                    if (!error && res.statusCode == 200) {
                        var unlockBody = new RegExp(':(.*)}');
                        var unlockBodyMatch = body.match(unlockBody);
                        const unlockFinalMessage = user_name + " has " + unlockBodyMatch[1] + " unlocks for " + n;
                        xmpp.send(from, unlockFinalMessage);
                        debug();
                    }
                    if (!error && res.statusCode == 401) {
                        console.log('Invalid credentials');
                        xmpp.send(from, 'Invalid credentials');
                    }
                    if (!error && res.statusCode == 404) {
                        console.log('Record not found');
                        xmpp.send(from, 'Record not found');
                    }
                    if (!error && res.statusCode == 500) {
                        console.log('Server error.');
                        xmpp.send(from, 'Server error. Please ping admin');
                    }
                });
                debug();
            }
        }
        // Tuya light control
        else if (message === '!lights') {
            if (from != user_jid) {
                xmpp.send(from, pc);
            } else {
                request(tuya_status_url, (error, res, body) => {
                    if (error) {
                        return console.log(error)
                    };

                    if (!error && res.statusCode == 200) {
                        if (res.body === "true") {
                            const stat = tuya_name + ": On";
                            xmpp.send(from, stat);
                            console.log(stat);
                        } else if (res.body === "false") {
                            const stat = tuya_name + ": Off";
                            xmpp.send(from, stat);
                            console.log(stat);
                        } else {
                            xmpp.send(from, "Unknown reply from api call. Please reply ping to reach an admin.");
                            console.log("Tuya API: Unknown reply!");
                        }
                    }
                    if (!error && res.statusCode == 401) {
                        console.log('Invalid credentials');
                        xmpp.send(from, 'Invalid credentials');
                    }
                    if (!error && res.statusCode == 404) {
                        console.log('Record not found');
                        xmpp.send(from, 'Record not found');
                    }
                    if (!error && res.statusCode == 500) {
                        console.log('Server error.');
                        xmpp.send(from, 'Server error. Please ping admin');
                    }
                });
                debug();
            }
        } else if (message === tuya_name + ' on') {
            if (from != user_jid) {
                xmpp.send(from, pc);
            } else {
                request(tuya_toggle_url + "?stat=true&devname=" + tuya_name, (error, res, body) => {
                    if (error) {
                        return console.log(error)
                    };

                    if (!error && res.statusCode == 200) {
                        const stat = tuya_name + " has been turned on";
                        xmpp.send(from, stat);
                        console.log(stat);
                    }
                    if (!error && res.statusCode == 401) {
                        console.log('Invalid credentials');
                        xmpp.send(from, 'Invalid credentials');
                    }
                    if (!error && res.statusCode == 404) {
                        console.log('Record not found');
                        xmpp.send(from, 'Record not found');
                    }
                    if (!error && res.statusCode == 500) {
                        console.log('Server error.');
                        xmpp.send(from, 'Server error. Please ping admin');
                    }
                });
                debug();
            }
        } else if (message === tuya_name + ' off') {
            if (from != user_jid) {
                xmpp.send(from, pc);
            } else {
                request(tuya_toggle_url + "?stat=false&devname=" + tuya_name, (error, res, body) => {
                    if (error) {
                        return console.log(error)
                    };

                    if (!error && res.statusCode == 200) {
                        const stat = tuya_name + " has been turned off";
                        xmpp.send(from, stat);
                        console.log(stat);
                    }
                    if (!error && res.statusCode == 401) {
                        console.log('Invalid credentials');
                        xmpp.send(from, 'Invalid credentials');
                    }
                    if (!error && res.statusCode == 404) {
                        console.log('Record not found');
                        xmpp.send(from, 'Record not found');
                    }
                    if (!error && res.statusCode == 500) {
                        console.log('Server error.');
                        xmpp.send(from, 'Server error. Please ping admin');
                    }
                });
                debug();
            }
        } else if (message.includes(tuya_name + ' brightness')) {
            if (from != user_jid) {
                xmpp.send(from, pc);
            } else {
                var per = message.substring(message.indexOf("brightness") + 10);
                var perc = (per * 10)
                request(tuya_bright_url + "?brite=" + perc + "&devname=" + tuya_name, (error, res, body) => {
                    if (error) {
                        return console.log(error)
                    };

                    if (!error && res.statusCode == 200) {
                        xmpp.send(from, tuya_name + "set to " + per + "%");
                        console.log(tuya_name + "set to " + per + "%");
                    }
                    if (!error && res.statusCode == 401) {
                        console.log('Invalid credentials');
                        xmpp.send(from, 'Invalid credentials');
                    }
                    if (!error && res.statusCode == 404) {
                        console.log('Record not found');
                        xmpp.send(from, 'Record not found');
                    }
                    if (!error && res.statusCode == 500) {
                        console.log('Server error.');
                        xmpp.send(from, 'Server error. Please ping admin');
                    }
                });
                if (config.debug === '1') {
                    console.log('lights turned to ' + per + "%");
                }
            }
        } else if (message.includes(tuya_name + ' color')) {
            if (from != user_jid) {
                xmpp.send(from, pc);
            } else {
                request(tuya_toggle_url + "?stat=true&devname=" + tuya_name, (error, res, body) => {})
                var color = message.substring(message.indexOf("color") + 6);
                var colorRgb = rgbcolor(color);
                console.log(color)
                if (colorRgb.isValid()) {
                    var obj = colorRgb.channels();
                    console.log(obj.r + ', ' + obj.g + ', ' + obj.b);
                }
                request(tuya_color_url + "?r=" + colorRgb.r + "&g=" + colorRgb.g + "&b=" + colorRgb.b + "&devname=" + tuya_name, (error, res, body) => {
                    if (error) {
                        return console.log(error)
                    };

                    if (!error && res.statusCode == 200) {
                        xmpp.send(from, tuya_name + "set to " + color);
                        console.log(tuya_name + "set to " + color);
                    }
                    if (!error && res.statusCode == 401) {
                        console.log('Invalid credentials');
                        xmpp.send(from, 'Invalid credentials');
                    }
                    if (!error && res.statusCode == 404) {
                        console.log('Record not found');
                        xmpp.send(from, 'Record not found');
                    }
                    if (!error && res.statusCode == 500) {
                        console.log('Server error.');
                        xmpp.send(from, 'Server error. Please ping admin');
                    }
                });
                if (config.debug === '1') {
                    console.log(tuya_name + "set to " + color);
                }
            }
        }
        // Ping a user to let them know you would like to communicate
        else if (message === '!ping') {
            xmpp.send(from, "Pinging " + user_name + "! Please stand by.");
            xmpp.send(user_jid, from + " has pinged you!");
            client.publish(mqtt_topic, from + ' has pinged you!');
            request.post(gotifyEUrl, function(err, response, body) {
                if (err) {
                    console.log('error:', err);
                }
            });
            ami.action({
                'action': 'originate',
                'channel': 'SIP/' + asterisk_callfrom,
                'context': asterisk_context,
                'callerID': asterisk_callerID,
                'data': 'googletts.agi, \"hello. ' + from + ' has pinged you!\"',
                'application': 'agi'
            });
            debug();
        }

        // Check the weather using weatherunderground API
        else if (message === '!weather') {
            if (from != user_jid) {
                xmpp.send(from, pc);
            } else {
                xmpp.send(from, "Checking weather. Please hold...\r\n \r\n");
                request(weather_url, function(err, response, body) {
                    if (err) {
                        console.log('error:', err);
                    } else {
                        let w = JSON.parse(body);
                        let wm = weather_city_name + " Weather: \r\n Tempature: " + w.main.temp + " degrees. \r\n Conditions: " + w.weather[0].main + "\r\n Pressure: " +
                            w.main.pressure + " \r\n Wind Direction: " + getDirection(w.wind.deg) + "\r\n Wind Speed: " + w.wind.speed + " m.p.h. \r\n";
                        let wmc = weather_city_name + " Weather: Tempature: " + w.main.temp + " degrees. Conditions: " + w.weather[0].main + ". Pressure: " +
                            w.main.pressure + ". Wind Direction: " + getDirection(w.wind.deg) + ". Wind Speed: " + w.wind.speed + " miles per hour \r\n";
                        client.publish('weather/temp', 'w.main.temp');
                        client.publish('weather/conditions', 'w.weather[0].main');
                        client.publish('weather/pressure', 'w.main.pressure');
                        client.publish('weather/wind/direction', 'getDirection(w.wind.deg)');
                        client.publish('weather/wind/speed', 'w.wind.speed');
                        xmpp.send(from, wm);
                        /*
                        ami.action({
                        	'action':'originate',
                        	'channel':'SIP/' + asterisk_callfrom,
                        	'context': asterisk_context,
                        	'callerID' : asterisk_callerID,
                        	'data': 'googletts.agi,' + wmc,
                        	'application': 'agi'
                        });
                        */
                    }
                });
                debug();
            }
        }

        // Sends a nice goodbye message
        else if (message === '!bye') {
            xmpp.send(from, "Bye, have a beautiful time!");
            debug();
        }


        // Share-A-Command (#13?)
        else if (message === '!meet') {
            if (from != user_jid) {
                xmpp.send(from, pc);
            } else {
                const createRoom = {
                    method: 'POST',
                    url: xmpp_api_url + '/create_room_with_opts',
                    headers: {
                        'Content-Type': 'application/json',
                        Authorization: xmpp_auth
                    },
                    body: {
                        name: xmpp_muc_name,
                        service: xmpp_muc_server,
                        host: bot_hostname,
                        options: {
                            allow_change_subj: 'false',
                            allow_private_messages: 'false',
                            allow_private_messages_from_visitors: 'false',
                            allow_visitor_nickchange: 'false',
                            allow_visitor_status: 'false',
                            lang: 'en',
                            mam: 'true',
                            members_only: 'true',
                            persistent: 'true',
                            public: 'false',
                            public_list: 'false',
                            title: 'Secure channel generated by https://vxmppb.tk',
                            allow_subscription: 'true'
                        }
                    },
                    json: true
                };
                request(createRoom, function(error, response, body) {
                    if (error) throw new Error(error);
                    console.log(body);
                });
                setTimeout(() => {
                    for (const key in config.friends) {
                        xmpp.send(key, "Meeting started: " + xmpp_muc_name + "@" + xmpp_muc_server);
                        const addMember = {
                            method: 'POST',
                            url: xmpp_api_url + 'set_room_affiliation',
                            headers: {
                                'Content-Type': 'application/json',
                                Authorization: xmpp_auth
                            },
                            body: {
                                name: xmpp_muc_name,
                                service: xmpp_muc_server,
                                jid: key,
                                affiliation: 'member'
                            },
                            json: true
                        };
                        const inviteMember = {
                            method: 'POST',
                            url: xmpp_api_url + '/send_direct_invitation',
                            headers: {
                                'Content-Type': 'application/json',
                                Authorization: xmpp_auth
                            },
                            body: {
                                name: xmpp_muc_name,
                                service: xmpp_muc_server,
                                password: '',
                                reason: 'vXMPPb Meeting Invite',
                                users: key
                            },
                            json: true
                        };
                        request(addMember, function(error, response, body) {
                            if (error) throw new Error(error);
                            console.log(body);
                        });
                        request(inviteMember, function(error, response, body) {
                            if (error) throw new Error(error);
                            console.log(body);
                        });
                    }
                }, 2000);
                ///////////////////////////////////////
                debug();
            }
        }

        // End meeting
        else if (message === '!endmeet') {
            if (from != user_jid) {
                xmpp.send(from, pc);
            } else {
                const endMeeting = {
                    method: 'POST',
                    url: xmpp_api_url + '/destroy_room',
                    headers: {
                        'Content-Type': 'application/json',
                        Authorization: xmpp_auth
                    },
                    body: {
                        name: xmpp_muc_name,
                        service: xmpp_muc_server
                    },
                    json: true
                };
                request(endMeeting, function(error, response, body) {
                    if (error) throw new Error(error);
                    console.log(body);
                });
                xmpp.send(from, "Meeting ended");
                for (const key in config.friends) {
                    xmpp.send(key, "Meeting ended");
                }
            }
            debug();
        }



        // Shutsdown bot if admin sends shutdown command (linux)
        else if (message === "sudo shutdown now -h") {
            if (from != user_jid) {
                xmpp.send(from, pc);
            } else {
                xmpp.send(from, "Alrighty, shutting down. Goodbye!");
                debug();
                process.exit(1);
            }
        }

        // Get users vCard (WIP)
        else if (message === '!vcard') {
            if (from != user_jid) {
                xmpp.send(from, pc);
            } else {
                xmpp.getVCard(from, function(vcard) {
                    xmpp.send(from, vcard);
                    console.log(vcard)
                })
            }
        }

        // If the user sends something we don't have logic for, send them info about the project
        else {
            xmpp.send(from, "This is an auto replying bot. Please see https://wiki.vanderwarker.family/doku.php?id=code:vxmppb:commands");
            debug();
        }
    });

    //  Catch and log XMPP errors
    xmpp.on('error', function(err) {
        console.error(err);
    });

    // Set XMPP status
    xmpp.setPresence('chat', 'Asterisk,Mastodon, and MQTT. Oh my!');

    // Alas, we connect to XMPP!
    xmpp.connect({
        jid: bot_jid,
        password: bot_password,
        host: bot_hostname,
        port: bot_port
    });

    // Checks the XMPP server for new 'friend' requests
    console.log(xmpp.getRoster());


} catch (e) {
    console.log("Please create a config.ini");
    console.log("See https://wiki.vanderwarker.family/doku.php?id=code:vxmppb:install:start");
    console.log("and choose your prefered install method.")
}