/* This Source Code Form is subject to the terms of the Mozilla Public
 * License, v. 2.0. If a copy of the MPL was not distributed with this
 * file, You can obtain one at http://mozilla.org/MPL/2.0/. */

use dom::bindings::callback::eReportExceptions;
use dom::bindings::codegen::InheritTypes::{EventTargetCast, NodeCast, NodeDerived};
use dom::bindings::js::JS;
use dom::eventtarget::{Capturing, Bubbling, EventTarget};
use dom::event::{Event, Phase_At_Target, Phase_None, Phase_Bubbling, Phase_Capturing};
use dom::node::{Node, NodeHelpers};

// See http://dom.spec.whatwg.org/#concept-event-dispatch for the full dispatch algorithm
pub fn dispatch_event(target: &JS<EventTarget>,
                      pseudo_target: Option<JS<EventTarget>>,
                      event: &mut JS<Event>) -> bool {
    assert!(!event.get().dispatching);

    {
        let event = event.get_mut();
        event.target = match pseudo_target {
            Some(pseudo_target) => Some(pseudo_target),
            None => Some(target.clone())
        };
        event.dispatching = true;
    }

    let type_ = event.get().type_.clone();
    let mut chain = ~[];

    //TODO: no chain if not participating in a tree
    if target.get().is_node() {
        let target_node: JS<Node> = NodeCast::to(target);
        for ancestor in target_node.ancestors() {
            let ancestor_target: JS<EventTarget> = EventTargetCast::from(&ancestor);
            chain.push(ancestor_target);
        }
    }

    event.get_mut().phase = Phase_Capturing;

    //FIXME: The "callback this value" should be currentTarget

    /* capturing */
    for cur_target in chain.rev_iter() {
        let stopped = match cur_target.get().get_listeners_for(type_, Capturing) {
            Some(listeners) => {
                event.get_mut().current_target = Some(cur_target.clone());
                for listener in listeners.iter() {
                    listener.HandleEvent__(event, eReportExceptions);

                    if event.get().stop_immediate {
                        break;
                    }
                }

                event.get().stop_propagation
            }
            None => false
        };

        if stopped {
            break;
        }
    }

    /* at target */
    if !event.get().stop_propagation {
        {
            let event = event.get_mut();
            event.phase = Phase_At_Target;
            event.current_target = Some(target.clone());
        }

        let opt_listeners = target.get().get_listeners(type_);
        for listeners in opt_listeners.iter() {
            for listener in listeners.iter() {
                listener.HandleEvent__(event, eReportExceptions);
                if event.get().stop_immediate {
                    break;
                }
            }
        }
    }

    /* bubbling */
    if event.get().bubbles && !event.get().stop_propagation {
        event.get_mut().phase = Phase_Bubbling;

        for cur_target in chain.iter() {
            let stopped = match cur_target.get().get_listeners_for(type_, Bubbling) {
                Some(listeners) => {
                    event.get_mut().current_target = Some(cur_target.clone());
                    for listener in listeners.iter() {
                        listener.HandleEvent__(event, eReportExceptions);

                        if event.get().stop_immediate {
                            break;
                        }
                    }

                    event.get().stop_propagation
                }
                None => false
            };
            if stopped {
                break;
            }
        }
    }

    let event = event.get_mut();
    event.dispatching = false;
    event.phase = Phase_None;
    event.current_target = None;

    !event.DefaultPrevented()
}