/*!
 * jQuery GrewForm Plugin v1.1(0.0.2)
 *
 * Copyright 2011, Artem Suschev
 * Grandcapital Ltd.
 * Modified by Andrey, 2011
 * 
 */

jQuery.fn.grewform = function(options){

    //this will allow selectors like 'input[value=foo]' to work with all jQuery versions
    jQuery('input,textarea').live('keyup change',function(e) {
        var codes= [33,34,36,35,45,38,40,37,39]//arrows and others
        if(e.keyCode && jQuery.inArray(e.keyCode,codes)<0)//skip this keyUps to let this keys work as expected
            jQuery(this).attr('value',this.value)
    });


    var form = jQuery(this)

    for (var rule_key in options)
    {
        var rule = new Rule(rule_key,form,options[rule_key])
    }

    //run in 300ms after keyup
    form.find('*').keyup(function(){
        var wait = setInterval(function(){
            clearInterval(wait)
            run_rules()
        },
        300)
    });

    //run on DOM loaded
    jQuery(document).ready(function(){
        run_rules()
    });

    //run after every change
    return form.find('*').change(function(){
        run_rules()
    });
};

function debug(str)
{
    console.log('jQuery.brForms >>> '+str)
}

function run_rules(){
    //debug(checking rules')

    //first run all unmatch actions
    for(var i in Rule.all)
        (function(rule){
            var wait = setInterval(
                function() {
                    if( !rule.form.find('*').is(":animated"))
                    {
                        clearInterval(wait);
                        if(rule.unmatches())
                        {
                            rule.run_unmatch_actions()
                        }
                    }
                },
                200
                )
        }(Rule.all[i]))

    //then run all math actions
    for(var i in Rule.all)
        (function(rule){
            var wait = setInterval(
                function() {
                    if( !rule.form.find('*').is(":animated"))
                    {
                        clearInterval(wait);
                        if(rule.matches())
                        {
                            rule.run_match_actions()
                        }
                    }
                },
                200
                )
        }(Rule.all[i]))
}

//constructor for rules
function Rule(selector,form,raw_rule){
    if ( typeof Rule.id == 'undefined' )
    {
        //unique id for rules
        Rule.id=0
        //special blip to mark DOM elements witch invoke rule actions
        Rule.blip_ptr = 'hgo_grewform_rule'
        //function for cascade unmatch
        Rule.unmtach_by_blip = function(blip){
            for(var k in Rule.all)
                if(Rule.all[k].blip === blip)
                {
                    //debug('unmtach_by_blip '+blip)
                    Rule.all[k].run_unmatch_actions()
                }
        }

        //All rules (hello Django:])
        Rule.all = []
    }

    this.id = Rule.id++
    this.blip = Rule.blip_ptr+this.id
    this.selectors = arrayfy((''+selector).split('AND')) //selector of the rule
    jQuery.each(this.selectors,function(selectors){
        return function(k,v){
            selectors[k]=$.trim(''+v)
        }
    }(this.selectors))//trim each selector
    this.selector = arr_to_selector(this.selectors) //selector of the rule
    this.trigged = false       //indicates is rule trigged or not
    this.match_actions = []
    this.unmatch_actions = []
    this.raw = raw_rule
    this.raw_selector = selector
    this.form = form

    //extract actions
    for(var action_key in raw_rule)
        generate_actions(action_key,form,this)

    //debug('created rule: '+this.selector +'['+ this.match_actions.length +'|'+this.unmatch_actions.length+']')

    this.matches = function(){
        for (var i in this.selectors)
        {
            var selector = this.selectors[i]
            if((!this.trigged))
            {
                //('option:visible') always return nothing
                if(this.form.find(selector).filter('option:first').length > 0)
                {
                    if(this.form.find(selector).parent('select:visible:first').length == 0)
                        return false
                }
                else if(this.form.find(selector).filter(':visible:first').length == 0)
                    return false
            }
            else
            {
                return false
            }
        }
        return true
    }

    this.unmatches = function(){
        if(!this.trigged)
            return false

        for (var i in this.selectors)
        {
            var selector = this.selectors[i]
            if(this.form.find(selector+':first').length == 0)
                return true
        }
        
        return false
    }

    this.run_match_actions = function(){
        //debug('match: '+this.raw_selector)

        this.trigged = true
        //mark elements that rule trigged, it's need for cascade actions
        this.form.find(this.selector).addClass(this.blip)
        for(var c in this.match_actions)
            this.match_actions[c].call(this)
    }
    this.run_match_actions.first_run = true

    this.run_unmatch_actions = function(){
        //debug('unmatch: '+this.raw_selector)

        this.trigged = false
        jQuery('.'+this.blip).removeClass(this.blip)
        for(var c in this.unmatch_actions)
            this.unmatch_actions[c].call(this)
    }

    Rule.all.push(this)
}

function generate_actions(key,form,rule)
{
    //genereting different actions
    switch(key){
        case 'show':
            rule.match_actions.push(
                function(elems){
                    return function(){
                        //debug('show action');
                        if(elems.is('option'))
                        {
                            elems.show();
                        }
                        else
                        {
                            elems.slideDown();
                        }
                    }
                }(form.find(rule.raw[key]))
                )

            rule.unmatch_actions.push(
                function(elems){
                    return function(){
                        //debug('show action rollback');
                        cascade_unmatch(elems);
                        if(elems.is('option'))
                        {
                            elems.hide();
                        }
                        else
                        {
                            elems.slideUp();
                        }
                    }
                }(form.find(rule.raw[key]))
                )
            break
        case 'hide':
            rule.match_actions.push(
                function(elems){
                    return function(){
                        //debug('hide action');
                        if(elems.is('option'))
                        {
                            elems.hide();
                        }
                        else
                        {
                            elems.slideUp();
                        }
                    }
                }(form.find(rule.raw[key]))
                )

            rule.unmatch_actions.push(
                function(elems){
                    return function(){
                        //debug('hide action rollback');
                        cascade_unmatch(elems);
                        if(elems.is('option'))
                        {
                            elems.show();
                        }
                        else
                        {
                            elems.slideDown();
                        }
                    }
                }(form.find(rule.raw[key]))
                )
            break
        case 'set_value':
            rule.match_actions.push(
                function(values){
                    return function(){
                        //debug('value action');

                        var rule=this
                        jQuery.each(values,function(selector,value){
                            jQuery.each(rule.form.find(selector),function(){
                                var tagName = jQuery(this).tagName

                                if(tagName == 'select')
                                {
                                    elems.find('option').removeAttr('selected')
                                    elems.find('option [value='+value+']').attr('selected','selected')
                                }
                                else
                                    jQuery(this).val(value)
                            })
                        })
                    }
                }(rule.raw[key]))
            break
        case 'add_options':
            for (var selector in rule.raw[key])
            {
                var options = rule.raw[key][selector]

                if(typeof options == 'function')
                {
                    rule.match_actions.push(
                        function(e,selector,fn){
                            return function(){
                                var options = fn()
                                for(var v in options){
                                    //debug('add_options action')
                                    var selects = e.find(selector)
                                    jQuery('<option></option>').html(options[v])
                                    .val(v)
                                    .appendTo(selects);
                                }

                                //small trick with callable options:
                                //we should determine what to remove from DOM right after we add it!
                                if(this.run_match_actions.first_run){
                                    for(var v in options)
                                        this.unmatch_actions.push(
                                            function(e,selector,v){
                                                return function(){
                                                    //debug('add_options action rollback');
                                                    cascade_unmatch(e.children(selector).children('option[value='+v+']'))
                                                    e.find(selector).children().remove('option[value='+v+']')
                                                }
                                            }(form,selector,v)
                                            )
                                    //for adding unmatch actions only once!
                                    this.run_match_actions.first_run = false
                                }
                            }
                        }(form,selector,options)
                        )
                }
                else{
                    for(var v in options){
                        rule.match_actions.push(
                            function(e,selector,v,h){
                                return function(){
                                    //debug('add_options action')
                                    var selects = e.find(selector)
                                    jQuery('<option></option>').html(h)
                                    .val(v)
                                    .appendTo(selects);
                                }
                            }(form,selector,v,options[v])
                            )
                        rule.unmatch_actions.push(
                            function(e,selector,v){
                                return function(){
                                    //debug('add_options action rollback');
                                    cascade_unmatch(e.children(selector).children('option[value='+v+']'))
                                    e.find(selector).children().remove('option[value='+v+']')
                                }
                            }(form,selector,v)
                            )
                    }
                }
            }
            break
        case 'disable':
            rule.match_actions.push(
                function(elems){
                    return function(){
                        //debug('disable action');
                        elems.attr('disabled','disabled');
                    }
                }(form.find(rule.raw[key]))
                )

            rule.unmatch_actions.push(
                function(elems){
                    return function(){
                        //debug('disable action rollback');
                        cascade_unmatch(elems);
                        elems.removeAttr('disabled');
                    }
                }(form.find(rule.raw[key]))
                )
            break
        case 'enable':
            rule.match_actions.push(
                function(elems){
                    return function(){
                        //debug('enable action');
                        elems.removeAttr('disabled');
                    }
                }(form.find(rule.raw[key]))
                )

            rule.unmatch_actions.push(
                function(elems){
                    return function(){
                        //debug('enable action rollback');
                        cascade_unmatch(elems);
                        elems.attr('disabled','disabled');
                    }
                }(form.find(rule.raw[key]))
                )
            break
        case 'check':
            rule.match_actions.push(
                function(elems){
                    return function(){
                        //debug('check action');
                        elems.attr('checked','checked');
                    }
                }(form.find(rule.raw[key]))
                )

            rule.unmatch_actions.push(
                function(elems){
                    return function(){
                        //debug('check action rollback');
                        cascade_unmatch(elems);
                        elems.removeAttr('checked');
                    }
                }(form.find(rule.raw[key]))
                )
            break
        case 'uncheck':
            rule.match_actions.push(
                function(elems){
                    return function(){
                        //debug('uncheck action');
                        elems.removeAttr('checked');
                    }
                }(form.find(rule.raw[key]))
                )

            rule.unmatch_actions.push(
                function(elems){
                    return function(){
                        //debug('uncheck action rollback');
                        cascade_unmatch(elems);
                        elems.attr('checked','checked');
                    }
                }(form.find(rule.raw[key]))
                )
            break
        case 'custom':
            rule.match_actions.push(
                function(fn,context){
                    return function(){
                        fn.call(context)
                    }
                }(rule.raw[key]['match'],jQuery(rule.selector))
                )

            rule.unmatch_actions.push(
                function(fn,context){
                    return function(){
                        fn.call(context)
                    }
                }(rule.raw[key]['unmatch'],jQuery(rule.selector))
                )
            break
    }
}

function cascade_unmatch(elements)
{
    jQuery.each(elements,function(k,v){
        if(jQuery(this).attr('class') !== undefined)
        {
            var classes = jQuery(this).attr('class').split(' ')
        }
        else
        {
            return;
        }
        
        jQuery.each(classes,function(k,v){
            Rule.unmtach_by_blip(v)
        })
        cascade_unmatch(elements.children())
    })
}

function arrayfy(obj)
{
    if(obj.constructor != Array)
        return [obj];

    return obj;
}

function arr_to_selector(arr)
{
    res = ''
    for(var i in arr)
        //Косяк: trim
        res += $.trim(''+arr[i]) + ','

    return res
}