import {
    dispatch as d3_dispatch
} from 'd3-dispatch';

import {
    event as d3_event,
    select as d3_select
} from 'd3-selection';

import {
    utilRebind,
    utilTriggerEvent
} from '../../modules/util';


// This code assumes that the combobox values will not have duplicate entries.
// It is keyed on the `value` of the entry.
// Data should be an array of objects like:
//   [{
//       title:  'hover text',
//       value:  'display text'
//   }, ...]

export function d3combobox() {
    var dispatch = d3_dispatch('accept');
    var _container = d3_select(document.body);
    var _wrapper = d3_select(null);
    var _suggestions = [];
    var _choice = '';
    var _canAutocomplete = true;
    var _caseSensitive = false;
    var _values = [];
    var _minItems = 2;

    var _fetcher = function(val, cb) {
        cb(_values.filter(function(d) {
            return d.value
                .toString()
                .toLowerCase()
                .indexOf(val.toLowerCase()) !== -1;
        }));
    };

    var combobox = function(input, attachTo) {
        _wrapper = _container
            .selectAll('div.combobox')
            .filter(function(d) { return d === input.node(); });

        input
            .classed('combobox-input', true)
            .on('focus.typeahead', focus)
            .on('blur.typeahead', blur)
            .on('keydown.typeahead', keydown)
            .on('keyup.typeahead', keyup)
            .on('input.typeahead', change)
            .each(function() {
                var parent = this.parentNode;
                var sibling = this.nextSibling;

                var caret = d3_select(parent).selectAll('.combobox-caret')
                    .filter(function(d) { return d === input.node(); })
                    .data([input.node()]);

                caret = caret.enter()
                    .insert('div', function() { return sibling; })
                    .attr('class', 'combobox-caret')
                    .merge(caret);

                caret
                    .on('mousedown', function () {
                        // prevent the form element from blurring. it blurs on mousedown
                        d3_event.stopPropagation();
                        d3_event.preventDefault();
                        if (_wrapper.empty()) {
                            input.node().focus();
                            fetch('', render);
                        } else {
                            hide();
                        }
                    });
            });

        function focus() {
            fetch(value(), render);
        }

        function blur() {
            window.setTimeout(hide, 150);
        }

        function show() {
            if (_wrapper.empty()) {
                _wrapper = _container
                    .insert('div', ':first-child')
                    .datum(input.node())
                    .attr('class', 'combobox')
                    .style('position', 'absolute')
                    .style('display', 'block')
                    .style('left', '0px')
                    .on('mousedown', function () {
                        // prevent moving focus out of the text field
                        d3_event.preventDefault();
                    });

                d3_select('body')
                    .on('scroll.combobox', render, true);
            }
        }

        function hide() {
            if (!_wrapper.empty()) {
                _choice = '';
                _wrapper.remove();

                d3_select('body')
                    .on('scroll.combobox', null);
            }
        }

        function keydown() {
            var shown = !_wrapper.empty();
            var tagName = input.node() ? input.node().tagName.toLowerCase() : '';

            switch (d3_event.keyCode) {
                case 8:   // ⌫ Backspace
                case 46:  // ⌦ Delete
                    _choice = '';
                    render();
                    input.on('input.typeahead', function() {
                        var start = input.property('selectionStart');
                        input.node().setSelectionRange(start, start);
                        input.on('input.typeahead', change);
                    });
                    break;

                case 9:   // ⇥ Tab
                    _wrapper.selectAll('a.selected').each(function (d) {
                        dispatch.call('accept', this, d);
                    });
                    hide();
                    break;

                case 13:  // ↩ Return
                    d3_event.preventDefault();
                    break;

                case 38:  // ↑ Up arrow
                    if (tagName === 'textarea' && !shown) return;
                    d3_event.preventDefault();
                    nav(-1);
                    break;

                case 40:  // ↓ Down arrow
                    if (tagName === 'textarea' && !shown) return;
                    d3_event.preventDefault();
                    if (tagName === 'input' && !shown) {
                        show();
                    }
                    nav(+1);
                    break;
            }
            d3_event.stopPropagation();
        }

        function keyup() {
            switch (d3_event.keyCode) {
                case 27:  // ⎋ Escape
                    hide();
                    break;

                case 13:  // ↩ Return
                    _wrapper.selectAll('a.selected').each(function (d) {
                       dispatch.call('accept', this, d);
                    });
                    hide();
                    break;
            }
        }

        function change() {
            fetch(value(), function() {
                if (input.property('selectionEnd') === input.property('value').length) {
                    doAutocomplete();
                }
                render();
            });
        }

        function nav(dir) {
            if (!_suggestions.length) return;

            var index = -1;
            for (var i = 0; i < _suggestions.length; i++) {
                if (_choice !== '' && _suggestions[i].value === _choice) {
                    index = i;
                    break;
                }
            }

            index = Math.max(Math.min(index + dir, _suggestions.length - 1), 0);
            _choice = _suggestions[index].value;
            input.property('value', _choice);
            render();
            ensureVisible();
        }

        function value() {
            var value = input.property('value');
            var start = input.property('selectionStart');
            var end = input.property('selectionEnd');

            if (start && end) {
                value = value.substring(0, start);
            }

            return value;
        }

        function fetch(v, cb) {
            _fetcher.call(input, v, function(results) {
                _suggestions = results;
                cb();
            });
        }

        function doAutocomplete() {
            if (!_canAutocomplete) return;

            var v = _caseSensitive ? value() : value().toLowerCase();
            _choice = '';
            if (!v) return;

            // Don't autocomplete if user is typing a number - #4935
            if (!isNaN(parseFloat(v)) && isFinite(v)) return;

            var best = -1;
            for (var i = 0; i < _suggestions.length; i++) {
                var suggestion = _suggestions[i].value;
                var compare = _caseSensitive ? suggestion : suggestion.toLowerCase();

                // if search string matches suggestion exactly, pick it..
                if (compare === v) {
                    best = i;
                    break;

                // otherwise lock in the first result that starts with the search string..
                } else if (best === -1 && compare.indexOf(v) === 0) {
                    best = i;
                }
            }

            if (best !== -1) {
                _choice = _suggestions[best].value;
                input.property('value', _choice);
                input.node().setSelectionRange(v.length, _choice.length);
            }
        }

        function render() {
            if (_suggestions.length >= _minItems &&
                document.activeElement === input.node()) {
                // input.attr('readonly') === null)
                show();
            } else {
                hide();
                return;
            }

            var options = _wrapper
                .selectAll('a.combobox-option')
                .data(_suggestions, function(d) { return d.value; });

            options.exit()
                .remove();

            // enter/update
            options.enter()
                .append('a')
                .attr('class', 'combobox-option')
                .text(function(d) { return d.value; })
                .merge(options)
                .attr('title', function(d) { return d.title; })
                .classed('selected', function(d) { return d.value === _choice; })
                .on('click', accept)
                .order();


            var node = attachTo ? attachTo.node() : input.node();
            var rect = node.getBoundingClientRect();

            _wrapper
                .style('left', (rect.left + 5) + 'px')
                .style('width', (rect.width - 10) + 'px')
                .style('top', rect.height + rect.top + 'px');
        }

        function ensureVisible() {
            var node = _wrapper.selectAll('a.selected').node();
            if (node) node.scrollIntoView();
        }

        function accept(d) {
            if (_wrapper.empty()) return;
            input.property('value', d.value);
            utilTriggerEvent(input, 'change');
            dispatch.call('accept', this, d);
            hide();
        }
    };

    combobox.canAutocomplete = function(val) {
        if (!arguments.length) return _canAutocomplete;
        _canAutocomplete = val;
        return combobox;
    };

    combobox.caseSensitive = function(val) {
        if (!arguments.length) return _caseSensitive;
        _caseSensitive = val;
        return combobox;
    };

    combobox.container = function(val) {
        if (!arguments.length) return _container;
        _container = val;
        return combobox;
    };

    combobox.data = function(val) {
        if (!arguments.length) return _values;
        _values = val;
        return combobox;
    };

    combobox.fetcher = function(val) {
        if (!arguments.length) return _fetcher;
        _fetcher = val;
        return combobox;
    };

    combobox.minItems = function(val) {
        if (!arguments.length) return _minItems;
        _minItems = val;
        return combobox;
    };


    return utilRebind(combobox, dispatch, 'on');
}


d3combobox.off = function(input) {
    input
        .on('focus.typeahead', null)
        .on('blur.typeahead', null)
        .on('keydown.typeahead', null)
        .on('keyup.typeahead', null)
        .on('input.typeahead', null)
        .each(function() {
            d3_select(this.parentNode).selectAll('.combobox-caret')
                .filter(function(d) { return d === input.node(); })
                .on('mousedown', null);
        });

    d3_select('body')
        .on('scroll.combobox', null);
};