/*
 *    Copyright [2011] [wisemapping]
 *
 *   Licensed under WiseMapping Public License, Version 1.0 (the "License").
 *   It is basically the Apache License, Version 2.0 (the "License") plus the
 *   "powered by wisemapping" text requirement on every single page;
 *   you may not use this file except in compliance with the License.
 *   You may obtain a copy of the license at
 *
 *       http://www.wisemapping.org/license
 *
 *   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.
 */

mindplot.DesignerKeyboard = new Class({
    Extends:Keyboard,
    initialize : function(designer) {
        $assert(designer, "designer can not be null");
        this.parent({defaultEventType: 'keydown'});
        this._registerEvents(designer);
    },


    _registerEvents : function(designer) {


        // Try with the keyboard ..
        var keyboardEvents = {
            'backspace':function(event) {
                event.preventDefault();
                event.stopPropagation();
            }.bind(this),

            'space' : function() {
                var node = this._getSelectedNode(designer);
                if (node) {
                    var model = topic.getModel();
                    var isShrink = !model.areChildrenShrinked();
                    topic.setChildrenShrinked(isShrink);
                }
            }.bind(this),

            'f2' : function() {
                var node = this._getSelectedNode(designer);
                if (node) {
                    var topic = nodes[0];
                    topic.showTextEditor();
                }
            }.bind(this),

            'delete' : function() {
                designer.deleteCurrentNode();
            }.bind(this),

            'enter' :
                function() {
                    designer.createSiblingForSelectedNode();
                }.bind(this),

            'insert' : function() {
                designer.createChildForSelectedNode();
            }.bind(this),

            'ctrl+z' : function() {
                designer.undo();
            }.bind(this),

            'meta+z' : function() {
                designer.undo();
            }.bind(this),

            'ctrl+z+shift' :function() {
                designer.redo();
            }.bind(this),

            'meta+z+shift' : function() {
                designer.redo();
            }.bind(this),

            'ctrl+a' : function(event) {
                designer.selectAll();
                event.preventDefault();
            },

            'ctrl+b' : function() {
                designer.changeFontWeight();
            },

            'meta+b' : function() {
                designer.changeFontWeight();
            },

            'ctrl+i' : function() {
                designer.changeFontStyle();
            },

            'meta+i' : function() {
                designer.changeFontStyle();
            },

            'meta+shift+a' : function(event) {
                designer.deselectAll();
                event.preventDefault();
            },

            'ctrl+shift+a' : function(event) {
                designer.deselectAll();
                event.preventDefault();

            },

            'meta+a' : function(event) {
                designer.selectAll();
                event.preventDefault();
            },

            'right' : function() {
                var node = this._getSelectedNode(designer);
                if (node) {
                    if (node.getTopicType() == mindplot.model.NodeModel.CENTRAL_TOPIC_TYPE) {
                        this._goToSideChild(designer, node, 'RIGHT');
                    }
                    else {
                        if (node.getPosition().x < 0) {
                            this._goToParent(designer, node);
                        }
                        else if (!node.areChildrenShrinked()) {
                            this._goToChild(designer, node);
                        }
                    }
                } else {
                    var centralTopic = designer.getCentralTopic();
                    this._goToNode(designer, centralTopic);
                }
            }.bind(this),

            'left' : function() {
                var node = this._getSelectedNode(designer);
                if (node) {
                    if (node.getTopicType() == mindplot.model.NodeModel.CENTRAL_TOPIC_TYPE) {
                        this._goToSideChild(designer, node, 'LEFT');
                    }
                    else {
                        if (node.getPosition().x > 0) {
                            this._goToParent(designer, node);
                        }
                        else if (!node.areChildrenShrinked()) {
                            this._goToChild(designer, node);
                        }
                    }
                } else {
                    var centralTopic = designer.getCentralTopic();
                    this._goToNode(designer, centralTopic);
                }
            }.bind(this),

            'up' : function() {
                var node = this._getSelectedNode(designer);
                if (node) {
                    if (node.getTopicType() != mindplot.model.NodeModel.CENTRAL_TOPIC_TYPE) {
                        this._goToBrother(designer, node, 'UP');
                    }
                } else {
                    var centralTopic = designer.getCentralTopic();
                    this._goToNode(designer, centralTopic);
                }
            }.bind(this),

            'down' : function() {
                var node = this._getSelectedNode(designer);
                if (node) {
                    if (node.getTopicType() != mindplot.model.NodeModel.CENTRAL_TOPIC_TYPE) {
                        this._goToBrother(designer, node, 'DOWN');
                    }
                } else {
                    var centralTopic = designer.getCentralTopic();
                    this._goToNode(designer, centralTopic);
                }
            }.bind(this)
        };
        this.addEvents(keyboardEvents);

        var regex = /^(?:shift|control|ctrl|alt|meta)$/;
        var modifiers = ['shift', 'control', 'alt', 'meta'];
        var excludes = ['esc','capslock','tab','f3','f4','f5','f6','f7','f8','f9','10','11','12'];

        $(document).addEvent('keydown', function(event) {

            // Convert key to mootool keyboard event format...
            var keys = [];
            modifiers.each(function(mod) {
                if (event[mod]) keys.push(mod);
            });
            if (!regex.test(event.key))
                keys.push(event.key);
            var key = keys.join('+');

            // Is the pressed key one of the already registered in the keyboard  ?
            var isRegistered = false;
            for (var eKey in  keyboardEvents) {
                if (eKey == key) {
                    isRegistered = true;
                    break;
                }
            }

            // If it's not registered, let's
            if (!isRegistered && !excludes.contains(key) && !modifiers.contains(key) && !key.contains('meta') && !key.contains('ctrl') && !key.contains('control')) {
                var nodes = designer.getSelectedNodes();
                if (nodes.length > 0) {
                    nodes[0].showTextEditor(event.key);
                    event.stopPropagation();
                }
            }
        });

    },

    _goToBrother : function(designer, node, direction) {
        var brothers = node._parent._getChildren();
        var target = node;
        var y = node.getPosition().y;
        var x = node.getPosition().x;
        var dist = null;
        for (var i = 0; i < brothers.length; i++) {
            var sameSide = (x * brothers[i].getPosition().x) >= 0;
            if (brothers[i] != node && sameSide) {
                var brother = brothers[i];
                var brotherY = brother.getPosition().y;
                if (direction == "DOWN" && brotherY > y) {
                    var distancia = y - brotherY;
                    if (distancia < 0) {
                        distancia = distancia * (-1);
                    }
                    if (dist == null || dist > distancia) {
                        dist = distancia;
                        target = brothers[i];
                    }
                }
                else if (direction == "UP" && brotherY < y) {
                    var distance = y - brotherY;
                    if (distance < 0) {
                        distance = distance * (-1);
                    }
                    if (dist == null || dist > distance) {
                        dist = distance;
                        target = brothers[i];
                    }
                }
            }
        }
        this._goToNode(designer, target);
    },


    _goToSideChild : function(designer, node, side) {
        var children = node._getChildren();
        if (children.length > 0) {
            var target = children[0];
            var top = null;
            for (var i = 0; i < children.length; i++) {
                var child = children[i];
                var childY = child.getPosition().y;
                if (side == 'LEFT' && child.getPosition().x < 0) {
                    if (top == null || childY < top) {
                        target = child;
                        top = childY;
                    }
                }
                if (side == 'RIGHT' && child.getPosition().x > 0) {
                    if (top == null || childY < top) {
                        target = child;
                        top = childY;
                    }
                }
            }

            this._goToNode(designer, target);
        }
    },

    _goToParent : function(designer, node) {
        var parent = node._parent;
        this._goToNode(designer, parent);
    },

    _goToChild : function(designer, node) {
        var children = node._getChildren();
        if (children.length > 0) {
            var target = children[0];
            var top = target.getPosition().y;
            for (var i = 0; i < children.length; i++) {
                var child = children[i];
                if (child.getPosition().y < top) {
                    top = child.getPosition().y;
                    target = child;
                }
            }
            this._goToNode(designer, target);
        }
    },

    _goToNode : function(designer, node) {
        // First deselect all the nodes ...
        designer.deselectAll();

        // Give focus to the selected node....
        node.setOnFocus(true);
    },

    _getSelectedNode : function(designer) {
        var nodes = designer.getSelectedNodes();
        return (nodes.length > 0) ? nodes[0] : null;
    }
});

mindplot.DesignerKeyboard.register = function(designer) {
    this._instance = new mindplot.DesignerKeyboard(designer);
    this._instance.activate();
};