const fs = require('fs');
const tty = require('tty');
require('process');

const MAX_SEQ_PACKET_SIZE = 128 * 1024;
const controlMessages = {
    contractEnd: "contract_end",
    unlChangeset: "unl_changeset"
}
Object.freeze(controlMessages);

const clientProtocols = {
    json: "json",
    bson: "bson"
}
Object.freeze(clientProtocols);

class HotPocketContract {

    #controlChannel = null;
    #clientProtocol = null;

    init(contractFunc, clientProtocol = clientProtocols.json) {

        if (this.#controlChannel) // Already initialized.
            return false;

        this.#clientProtocol = clientProtocol;

        // Check whether we are running on a console and provide error.
        if (tty.isatty(process.stdin.fd)) {
            console.error("Error: Hot Pocket smart contracts must be executed via Hot Pocket.");
            return false;
        }

        // Parse HotPocket args.
        const argsJson = fs.readFileSync(process.stdin.fd, 'utf8');
        const hpargs = JSON.parse(argsJson);

        this.#controlChannel = new ControlChannel(hpargs.control_fd);
        this.#executeContract(hpargs, contractFunc);
        return true;
    }

    #executeContract = (hpargs, contractFunc) => {
        // Keeps track of all the tasks (promises) that must be awaited before the termination.
        const pendingTasks = [];
        const nplChannel = new NplChannel(hpargs.npl_fd);

        const users = new UsersCollection(hpargs.user_in_fd, hpargs.users, this.#clientProtocol);
        const unl = new UnlCollection(hpargs.readonly, hpargs.unl, nplChannel, pendingTasks);
        const executionContext = new ContractContext(hpargs, users, unl, this.#controlChannel);

        invokeCallback(contractFunc, executionContext).catch(errHandler).finally(() => {
            // Wait for any pending tasks added during execution.
            Promise.all(pendingTasks).catch(errHandler).finally(() => {
                nplChannel.close();
                this.#terminate();
            });
        });
    }

    #terminate = () => {
        this.#controlChannel.send({ type: controlMessages.contractEnd });
        this.#controlChannel.close();
    }
}

// Represents patch config.
class PatchConfig {
    #patchConfigPath = "../patch.cfg";
    #version = null;
    #binPath = null;
    #binArgs = null;
    #roundtime = null;
    #consensus = null;
    #npl = null;
    #unl = null;
    #appbillMode = null;
    #appbillBinArgs = null;

    // Loads the config value if there's a patch config file. Otherwise throw error.
    readConfig() {
        if (!fs.existsSync(this.#patchConfigPath))
            throw "Patch config file does not exist.";

        const fileContent = fs.readFileSync(this.#patchConfigPath);
        const config = JSON.parse(fileContent);
        this.#version = config.version;
        this.#binPath = config.bin_path;
        this.#binArgs = config.bin_args;
        this.#roundtime = +config.roundtime;
        this.#consensus = config.consensus;
        this.#npl = config.npl;
        this.#unl = config.unl;
        this.#appbillMode = config.appbill.mode;
        this.#appbillBinArgs = config.appbill.bin_args;
    }

    setVersion(version) {
        if (!version)
            throw "Contract version is not specified.";
        this.#version = version;
    }

    setUnl(unl) {
        if (!unl || !unl.length)
            throw "UNL list cannot be empty.";

        let updatedUnl = [];
        for (let pubKey of unl) {
            // Pubkeys are validated against length, ed prefix and hex characters.
            if (!pubKey.length)
                throw "UNL pubKey not specified.";
            else if (!(/^(e|E)(d|D)[0-9a-fA-F]{64}$/g.test(pubKey)))
                throw "Invalid UNL pubKey specified.";

            updatedUnl.push(pubKey);
        }
        this.#unl = updatedUnl;
    }

    setBinPath(binPath) {
        if (!binPath.length)
            throw "Binary path cannot be empty.";
        this.#binPath = binPath;
    }

    setBinArgs(binArgs) {
        this.#binArgs = binArgs;
    }

    setRoundtime(roundtime) {
        if (roundtime == 0)
            throw "Round time cannot be zero."
        this.#roundtime = roundtime;
    }

    setConsensus(consensus) {
        if (consensus != "public" && consensus != "private")
            throw "Invalid consensus flag configured in patch file. Valid values: public|private";
        this.#consensus = consensus;
    }

    setNpl(npl) {
        if (npl != "public" && npl != "private")
            throw "Invalid npl flag configured in patch file. Valid values: public|private";
        this.#npl = npl;
    }

    setAppbillMode(appbillMode) {
        this.#appbillMode = appbillMode;
    }

    setAppbillBinArgs(appbillBinArgs) {
        this.#appbillBinArgs = appbillBinArgs;
    }

    // Saves the config changes to tha patch config.
    saveChanges() {
        // Property order is simmilar to the property order of the patch.cfg created by HP at the startup.
        const config = {
            version: this.#version,
            unl: this.#unl,
            bin_path: this.#binPath,
            bin_args: this.#binArgs ? this.#binArgs : "",
            roundtime: this.#roundtime,
            consensus: this.#consensus,
            npl: this.#npl,
            appbill: {
                mode: this.#appbillMode ? this.#appbillMode : "",
                bin_args: this.#appbillBinArgs ? this.#appbillBinArgs : ""
            }
        };

        return new Promise((resolve, reject) => {
            // Format json to match with the patch.cfg json format created by HP at the startup.
            fs.writeFile(this.#patchConfigPath, JSON.stringify(config, null, 4), (err) => {
                if (err) reject(err);
                else resolve();
            });
        });
    }

    // Returns patch config as a JSON object.
    getConfig() {
        return {
            version: this.#version,
            unl: this.#unl,
            roundtime: this.#roundtime,
            consensus: this.#consensus,
            npl: this.#npl,
            binPath: this.#binPath,
            binArgs: this.#binArgs,
            appbill: {
                mode: this.#appbillMode,
                binArgs: this.#appbillBinArgs
            }
        }
    }
}

class ContractContext {

    #controlChannel = null;
    #patchConfig = null;

    constructor(hpargs, users, unl, controlChannel) {
        this.#controlChannel = controlChannel;
        this.readonly = hpargs.readonly;
        this.timestamp = hpargs.timestamp;
        this.users = users;
        this.unl = unl; // Not available in readonly mode.
        this.lcl = hpargs.lcl; // Not available in readonly mode.
        this.#patchConfig = new PatchConfig();
    }

    // Updates the config with given parameters and save the patch config.
    // Params,
    // {
    //     version: contract version as string,
    //     unl: list of unl pubkeys. Expecting "ed" prefixed (ed22519 algorithm) hex pubkeys,
    //     consensus: consensus private|public,
    //     npl: npl private|public,
    //     binPath: contract binary path string,
    //     binArgs: contract binary args string,
    //     appbillMode: appbill mode string,
    //     appbillBinArgs: appbill binary args string
    // }
    async updateConfig(params) {
        if (this.readonly)
            throw "Config update not allowed in readonly mode.";

        // Read current patch config values before update.
        this.#patchConfig.readConfig();

        if (params.hasOwnProperty('version')) {
            this.#patchConfig.setVersion(params.version);
        }
        if (params.hasOwnProperty('unl')) {
            this.#patchConfig.setUnl(params.unl);
        }
        // Commented and disabled updating until roundtime sniffing heuristics is implemented in HP.
        // if (params.hasOwnProperty('roundtime')) {
        //     this.#patchConfig.setRoundtime(params.roundtime);
        // }
        if (params.hasOwnProperty('consensus')) {
            this.#patchConfig.setConsensus(params.consensus);
        }
        if (params.hasOwnProperty('npl')) {
            this.#patchConfig.setNpl(params.npl);
        }
        if (params.hasOwnProperty('binPath')) {
            this.#patchConfig.setBinPath(params.binPath);
        }
        if (params.hasOwnProperty('binArgs')) {
            this.#patchConfig.setBinArgs(params.binArgs);
        }
        if (params.hasOwnProperty('appbillMode')) {
            this.#patchConfig.setAppbillMode(params.appbillMode);
        }
        if (params.hasOwnProperty('appbillBinArgs')) {
            this.#patchConfig.setAppbillBinArgs(params.appbillBinArgs);
        }
        await this.#patchConfig.saveChanges();
    }

    // Returns the config values in patch config.
    // Returns,
    // {
    //     version: contract version as string,
    //     unl: list of unl pubkeys. "ed" prefixed (ed22519 algorithm) hex pubkeys,
    //     roundtime:  roundtime as Number,
    //     consensus: consensus private|public,
    //     npl: npl private|public,
    //     binPath: contract binary path string,
    //     binArgs: contract binary args string,
    //     appbill: {
    //         mode: appbill mode string,
    //         binArgs: appbill binary args string
    //     }
    // }
    getConfig() {
        // Read current patch config values.
        this.#patchConfig.readConfig()
        return this.#patchConfig.getConfig();
    }
}

class UsersCollection {

    #users = {};
    #infd = null;

    constructor(userInputsFd, usersObj, clientProtocol) {
        this.#infd = userInputsFd;

        Object.entries(usersObj).forEach(([pubKey, arr]) => {

            const outfd = arr[0]; // First array element is the output fd.
            arr.splice(0, 1); // Remove first element (output fd). The rest are pairs of msg offset/length tuples.

            const channel = new UserChannel(outfd, clientProtocol);
            this.#users[pubKey] = new User(pubKey, channel, arr);
        });
    }

    // Returns the User for the specified pubkey. Returns null if not found.
    find(pubKey) {
        return this.#users[pubKey]
    }

    // Returns all the currently connected users.
    list() {
        return Object.values(this.#users);
    }

    count() {
        return Object.keys(this.#users).length;
    }

    async read(input) {
        const [offset, size] = input;
        const buf = Buffer.alloc(size);
        await readAsync(this.#infd, buf, offset, size);
        return buf;
    }
}

class User {
    pubKey = null;
    inputs = null;
    #channel = null;

    constructor(pubKey, channel, inputs) {
        this.pubKey = pubKey;
        this.inputs = inputs;
        this.#channel = channel;
    }

    async send(msg) {
        await this.#channel.send(msg);
    }
}

class UserChannel {
    #outfd = -1;
    #clientProtocol = null;

    constructor(outfd, clientProtocol) {
        this.#outfd = outfd;
        this.#clientProtocol = clientProtocol;
    }

    send(msg) {
        const messageBuf = this.serialize(msg);
        let headerBuf = Buffer.alloc(4);
        // Writing message length in big endian format.
        headerBuf.writeUInt32BE(messageBuf.byteLength)
        return writevAsync(this.#outfd, [headerBuf, messageBuf]);
    }

    serialize(msg) {

        if (!msg)
            throw "Cannot serialize null content.";

        if (Buffer.isBuffer(msg))
            return msg;

        if (this.#clientProtocol == clientProtocols.bson) {
            return Buffer.from(msg);
        }
        else { // json

            // In JSON, we need to ensure that the final buffer contains a string.
            if (typeof msg === "string" || msg instanceof String)
                return Buffer.from(msg);
            else
                return Buffer.from(JSON.stringify(msg));
        }
    }
}

class UnlCollection {
    nodes = {};
    #channel = null;
    #readonly = false;
    #pendingTasks = null;

    constructor(readonly, unl, channel, pendingTasks) {
        this.#readonly = readonly;
        this.#pendingTasks = pendingTasks;

        if (!readonly) {
            unl.forEach(pubKey => {
                this.nodes[pubKey] = new UnlNode(pubKey);
            });

            this.#channel = channel;
        }
    }

    // Returns the unl node for the specified pubkey. Returns null if not found.
    find(pubKey) {
        return this.nodes[pubKey];
    }

    // Returns all the unl nodes.
    list() {
        return Object.values(this.nodes);
    }

    count() {
        return Object.keys(this.nodes).length;
    }

    // Registers for NPL messages.
    onMessage(callback) {

        if (this.#readonly)
            throw "NPL messages not available in readonly mode.";

        this.#channel.consume((pubKey, msg) => {
            this.#pendingTasks.push(invokeCallback(callback, this.nodes[pubKey], msg));
        });
    }

    // Broadcasts a message to all unl nodes (including self if self is part of unl).
    async send(msg) {
        if (this.#readonly)
            throw "NPL messages not available in readonly mode.";

        await this.#channel.send(msg);
    }
}

// Represents a node that's part of unl.
class UnlNode {
    pubKey = null;

    constructor(pubKey) {
        this.pubKey = pubKey;
    }
}

// Represents the node-party-line that can be used to communicate with unl nodes.
class NplChannel {

    #readStream = null;
    #fd = -1;

    constructor(fd) {
        this.#fd = fd;
    }

    consume(onMessage) {

        this.#readStream = fs.createReadStream(null, { fd: this.#fd, highWaterMark: MAX_SEQ_PACKET_SIZE });

        // From the hotpocket when sending the npl messages first it sends the pubkey of the particular node
        // and then the message, First data buffer is taken as pubkey and the second one as message,
        // then npl message object is constructed and the event is emmited.
        let pubKey = null;

        this.#readStream.on("data", (data) => {
            if (!pubKey) {
                pubKey = data.toString();
            }
            else {
                onMessage(pubKey, data);
                pubKey = null;
            }
        });

        this.#readStream.on("error", (err) => { });
    }

    send(msg) {
        const buf = Buffer.from(msg);
        if (buf.length > MAX_SEQ_PACKET_SIZE)
            throw ("NPL message exceeds max size " + MAX_SEQ_PACKET_SIZE);
        return writeAsync(this.#fd, buf);
    }

    close() {
        this.#readStream && this.#readStream.close();
    }
}


class ControlChannel {

    #readStream = null;
    #fd = -1;

    constructor(fd) {
        this.#fd = fd;
    }

    consume(onMessage) {
        this.#readStream = fs.createReadStream(null, { fd: this.#fd, highWaterMark: MAX_SEQ_PACKET_SIZE });
        this.#readStream.on("data", onMessage);
        this.#readStream.on("error", (err) => { });
    }

    send(obj) {
        const buf = Buffer.from(JSON.stringify(obj));
        if (buf.length > MAX_SEQ_PACKET_SIZE)
            throw ("Control message exceeds max size " + MAX_SEQ_PACKET_SIZE);
        return writeAsync(this.#fd, buf);
    }

    close() {
        this.#readStream && this.#readStream.close();
    }
}

const writeAsync = (fd, buf) => new Promise(resolve => fs.write(fd, buf, resolve));
const writevAsync = (fd, bufList) => new Promise(resolve => fs.writev(fd, bufList, resolve));
const readAsync = (fd, buf, offset, size) => new Promise(resolve => fs.read(fd, buf, 0, size, offset, resolve));

const invokeCallback = async (callback, ...args) => {
    if (!callback)
        return;

    if (callback.constructor.name === 'AsyncFunction') {
        await callback(...args).catch(errHandler);
    }
    else {
        callback(...args);
    }
}

const errHandler = (err) => console.log(err);

module.exports = {
    Contract: HotPocketContract,
    clientProtocols
}