// Github:   https://github.com/shdwjk/Roll20API/blob/master/TokenLock/TokenLock.js
// By:       The Aaron, Arcane Scriptomancer
// Contact:  https://app.roll20.net/users/104025/the-aaron

const TokenLock = (() => { // eslint-disable-line no-unused-vars

    const  version = '0.2.7';
    const lastUpdate = 1566254659;
    const schemaVersion = 0.2;

    const ch = (c) => {
        const entities = {
            '<' : 'lt',
            '>' : 'gt',
            "'" : '#39',
            '@' : '#64',
            '{' : '#123',
            '|' : '#124',
            '}' : '#125',
            '[' : '#91',
            ']' : '#93',
            '"' : 'quot',
            '*' : 'ast',
            '/' : 'sol',
            ' ' : 'nbsp'
        };

        if( entities.hasOwnProperty(c) ){
            return `&${entities[c]};`;
        }
        return '';
    };


    const getCommandOption_ToggleLock = () => {
        const text = (state.TokenLock.locked ? '<span style="color: #990000;">Locked</span>' : '<span style="color: #009900;">Unlocked</span>' );
        return '<div>'+
            'Tokens are now <b>'+
                text+
            '</b>. '+
            '<a href="!tl --toggle-lock">'+
                'Toggle'+
            '</a>'+
        '</div>';
        
    };

    const getConfigOption_AllowMoveOnTurn = () => {
        const text = (state.TokenLock.config.allowMoveOnTurn ? 'On' : 'Off' );
        return '<div>'+
            'Allow Move on Turn is currently <b>'+
                text+
            '</b> '+
            '<a href="!tl-config --toggle-allowmoveonturn">'+
                'Toggle'+
            '</a>'+
        '</div>';
        
    };

	const showHelp = (who) => {
		const stateColor = (state.TokenLock.locked) ? ('#990000') : ('#009900');
		const stateName  = (state.TokenLock.locked) ? ('Locked') : ('Unlocked');

        sendChat('',
            '/w "'+who+'" '+
'<div style="border: 1px solid black; background-color: white; padding: 3px 3px;">'+
	'<div style="font-weight: bold; border-bottom: 1px solid black;font-size: 130%;">'+
		'<div style="float:right;width:90px;border:1px solid black;background-color:#ffc;text-align:center;font-size: 70%;"><span style="color: '+stateColor+'; font-weight:bold; padding: 0px 4px;">'+stateName+'</span></div>'+
		'TokenLock v'+version+
		'<div style="clear: both"></div>'+
	'</div>'+
	'<div style="padding-left:10px;margin-bottom:3px;">'+
		'<p>TokenLock allows the GM to selectively prevent players from moving their tokens. '+
		'Since <i><u>change:graphic</u></i> events to not specify who changed the '+
		'graphic, determination of player tokens is based on whether that token '+
		'has an entry in the <b>controlled by</b> field of either the token or '+
		'the character it represents.  If <b>controlled by</b> is empty, the '+
		'GM can freely move the token at any point.  If there is any entry in '+
		'<b>controlled by</b>, the token can only be moved when TokenLock is '+
		'unlocked. </p>'+
        '<p>Moving of player controlled cards is still permissible. </p>'+
	'</div>'+
	'<b>Commands</b>'+
	'<div style="padding-left:10px;"><b><span style="font-family: serif;">!tl</span></b>'+
		'<div style="padding-left: 10px;padding-right:20px">'+
			'Executing the command with no arguments prints this help.  The following arguments may be supplied in order to change the configuration.  All changes are persisted between script restarts.'+
			'<ul>'+
				'<li style="border-top: 1px solid #ccc;border-bottom: 1px solid #ccc;">'+
					'<b><span style="font-family: serif;">lock</span></b> -- Locks the player tokens to prevent moving them.'+
				'</li> '+
				'<li style="border-top: 1px solid #ccc;border-bottom: 1px solid #ccc;">'+
					'<b><span style="font-family: serif;">unlock</span></b> -- Unlocks the player tokens allowing them to be moved.'+
				'</li> '+
			'</ul>'+
		'</div>'+
	'</div>'+
    getCommandOption_ToggleLock()+
	'<div style="padding-left:10px;">'+
		'<b><span style="font-family: serif;">!tl-config ['+ch('<')+'Options'+ch('>')+'|--help]</span></b>'+
		'<div style="padding-left: 10px;padding-right:20px">'+
			'<p>Swaps the selected Tokens for their counterparts on the other layer.</p>'+
			'<ul>'+
				'<li style="border-top: 1px solid #ccc;border-bottom: 1px solid #ccc;">'+
					'<b><span style="font-family: serif;">--help</span></b> '+ch('-')+' Shows the Help screen'+
				'</li> '+
				'<li style="border-top: 1px solid #ccc;border-bottom: 1px solid #ccc;">'+
					'<b><span style="font-family: serif;">--toggle-allowmoveonturn</span></b> '+ch('-')+' Sets whether tokens can be moved if they are at the top of the turn order.'+
				'</li> '+
			'</ul>'+
		'</div>'+
	'</div>'+
    getConfigOption_AllowMoveOnTurn()+
'</div>'
            );
    };

	const handleInput = (msg) => {

		if (msg.type !== "api" || !(playerIsGM(msg.playerid) || msg.playerid==='API') ) {
			return;
		}
        let who = (getObj('player',msg.playerid)||{get:()=>'API'}).get('_displayname');

		let args = msg.content.split(/\s+/);
		switch(args.shift()) {
            case '!tl':
                if(args.includes('--help')) {
                    showHelp(who);
                    return;
                }
				switch(args.shift()) {
					case 'lock':
                        state.TokenLock.locked=true;
                        sendChat('TokenLock','/w gm ' +
                            getCommandOption_ToggleLock()
                        );

						break;

					case 'unlock':
                        state.TokenLock.locked=false;
                        sendChat('TokenLock','/w gm ' +
                            getCommandOption_ToggleLock()
                        );
						break;

					case '--toggle-lock':
                        state.TokenLock.locked= !state.TokenLock.locked;
                        sendChat('TokenLock','/w gm ' +
                            getCommandOption_ToggleLock()
                        );
						break;

					default:
						showHelp(who);
						break;
				}
                break;

            case '!tl-config':
                if(args.includes('--help')) {
                    showHelp(who);
                    return;
                }
                if(!args.length) {
                    sendChat('','/w "'+who+'" '+
'<div style="border: 1px solid black; background-color: white; padding: 3px 3px;">'+
	'<div style="font-weight: bold; border-bottom: 1px solid black;font-size: 130%;">'+
		'TokenLock v'+version+
	'</div>'+
    getConfigOption_AllowMoveOnTurn()+
'</div>'
                    );
                    return;
                }
                args.forEach((a) => {
                    let opt=a.split(/\|/);

                    switch(opt.shift()) {
                        case '--toggle-allowmoveonturn':
                            state.TokenLock.config.allowMoveOnTurn = !state.TokenLock.config.allowMoveOnTurn;
                            sendChat('','/w "'+who+'" '+
                                '<div style="border: 1px solid black; background-color: white; padding: 3px 3px;">'+
                                    getConfigOption_AllowMoveOnTurn()+
                                '</div>'
                            );
                            break;

                        default:
                            sendChat('','/w "'+who+'" ' +
                                '<div><b>Unsupported Option:</div> '+a+'</div>'
                            );
                    }
                });
                break;
		}

	};

	const handleMove = (obj,prev) => {

		if(state.TokenLock.locked &&
            'token' === obj.get('subtype') &&
            ( !state.TokenLock.config.allowMoveOnTurn ||
                (( (((JSON.parse(Campaign().get('turnorder')||"[]"))[0])||{id:false}).id) !== obj.id) ) &&
                ( obj.get('left') !== prev.left || obj.get('top') !== prev.top || obj.get('rotation') !== prev.rotation )
		) {
            sendChat('TokenLock','/w gm '
                +(obj.get('Name')||(getObj('character',obj.get('represents'))||{get:()=>'Unknown'}).get('name'))
                +' just tried to move:'
                +(obj.get('left') !== prev.left ? ' X: '+Math.round((obj.get('left')-prev.left)/70) : '' )
                +(obj.get('top') !== prev.top ? ' Y: '+Math.round((obj.get('top')-prev.top)/70) : '' )
                +(obj.get('rotation') !== prev.rotation ? ' º: '+(obj.get('rotation')-prev.rotation) : '' )
            );

			if('' !== obj.get('controlledby')) {
				obj.set({left: prev.left, top: prev.top, rotation: prev.rotation});	
			} else if('' !== obj.get('represents') ) {
				let character = getObj('character',obj.get('represents'));
				if( character && character.get('controlledby') ) {
					obj.set({left: prev.left, top: prev.top, rotation: prev.rotation});	
				}
			}
		}
	};

    const checkInstall = () => {    
        log('-=> TokenLock v'+version+' <=-  ['+(new Date(lastUpdate*1000))+']');

        if( ! state.hasOwnProperty('TokenLock') || state.TokenLock.version !== schemaVersion) {
            log('  > Updating Schema to v'+schemaVersion+' <');
            switch(state.TokenLock && state.TokenLock.version) {

                /* falls through */
                case 0.1:
                    state.TokenLock.config={
                        allowMoveOnTurn: false
                    };
                    state.TokenLock.version=schemaVersion;

                /* falls through */
                case 'UpdateSchemaVersion':
                    state.TokenLock.version = schemaVersion;
                    break;


                default:
                    state.TokenLock = {
                        version: schemaVersion,
                        config: {
                            allowMoveOnTurn: false
                        },
                        locked: false
                    };
            }
		} 
	};

	const registerEventHandlers = () => {
		on('chat:message', handleInput);
		on('change:graphic', handleMove);
	};

    on("ready", () => {
        checkInstall(); 
        registerEventHandlers();
    });

	return { };
})();