var Popup = Class.create();
Popup.zIndex = 1000;
Popup.prototype = {
  initialize: function(popup, link) {
    var options = Object.extend({
      modal: false,
      effect: 'fade',
      hidden: true,
      closebox: 'popup_closebox',
      draghandle: 'popup_draghandle'
    }, arguments[2] || {});
    options.position = options.position || (options.modal ? 'center' : 'auto');
    options.trigger = options.trigger || (options.modal ? 'click' : 'mouseover');
    options.duration = this.first_value(options.duration, Popup.duration, 0.5);
    options.show_duration = this.first_value(options.show_duration, options.duration);
    options.hide_duration = this.first_value(options.hide_duration, options.duration);
    options.opacity = this.first_value(options.opacity, Popup.opacity, 0.5);
    options.show_delay = this.first_value(options.show_delay, Popup.show_delay, 500);
    options.hide_delay = this.first_value(options.hide_delay, Popup.hide_delay, 200);
    options.cursor_margin = this.first_value(options.cursor_margin, Popup.cursor_margin, 5);
    this.options = options;
    if (link) {
      this.link = $(link);
    }
    this.popup = $(popup);
    this.popup.popup = this;
    if (options.hidden) {
      this.popup.hide();
    }
    if (options.closebox) {
      this.closeboxes = document.getElementsByClassName(options.closebox, this.popup);
      if (this.popup.hasClassName(options.closebox)) {
        this.closeboxes[this.closeboxes.length] = this.popup;
      }
    }
    else {
      this.closeboxes = [];
    }
    if (options.draghandle) {
      var draghandles = document.getElementsByClassName(options.draghandle, this.popup);
      for (i = 0; i < draghandles.length; i++) {
        new Draggable(this.popup, { handle: draghandles[i] });
      }
      if (this.popup.hasClassName(options.draghandle)) {
        new Draggable(this.popup, { handle: this.popup });
      }
    }
    this.register_events();
  },
  register_events: function() {
    var trigger_function;
    if (this.is_auto_open()) {
      trigger_function = this.start_show_timer;
      if (this.link) {
        Event.observe(this.link, 'mouseout', this.stop_show_timer.bindAsEventListener(this));
      }
    }
    else {
      trigger_function = this.show;
    }
    if (this.link) {
      Event.observe(this.link, this.options.trigger, trigger_function.bindAsEventListener(this));
    }
    if (!this.options.modal) {
      Event.observe(this.popup, 'click', this.bring_to_front.bindAsEventListener(this));
    }
    if (this.closeboxes.length > 0) {
      for (var i = 0; i < this.closeboxes.length; i++) {
        Event.observe(this.closeboxes[i], 'click', this.hide.bindAsEventListener(this));
      }
    }
    else {
      if (this.link) {
        Event.observe(this.link, 'mouseout', this.start_hide_timer.bindAsEventListener(this));
      }
      Event.observe(this.popup, 'mouseover', this.stop_hide_timer.bindAsEventListener(this));
      Event.observe(this.popup, 'mouseout', this.start_hide_timer.bindAsEventListener(this));
    }
  },
  bring_to_front: function(event){    
    if (Number(this.popup.style.zIndex) < Popup.zIndex - 1){
      this.popup.style.zIndex = Popup.zIndex++;
    }
  },
  start_show_timer: function(event){
    this.stop_show_timer(event);
    this.mouse_x = Event.pointerX(event);
    this.mouse_y = Event.pointerY(event);
    this.show_timer = setTimeout(this.show.bind(this, event), this.options.show_delay);
  },
  stop_show_timer: function(event){
    if (this.show_timer){
      clearTimeout(this.show_timer);
      this.show_timer = null;
    }
  },
  start_hide_timer: function(event){
    this.stop_hide_timer(event);
    this.hide_timer = setTimeout(this.hide.bind(this, event), this.options.hide_delay);
  },
  stop_hide_timer: function(event){
    if (this.hide_timer) {
      clearTimeout(this.hide_timer);
      this.hide_timer = null;
    }
  },
  show: function(event){
    this.stop_show_timer(event);
    this.stop_hide_timer(event);
    if (this.is_open){
      return;
    }
    if (this.options.modal){
      this.show_overlay();
    }
    var pos;
    if (!event){
      pos = this.get_popup_position();
    }
    else if (this.is_auto_open()){
      pos = this.get_popup_position(this.mouse_x, this.mouse_y);
    }
    else{
      pos = this.get_popup_position(Event.pointerX(event), Event.pointerY(event));
    }
    Element.setStyle(this.popup, { top: pos.y, left: pos.x, zIndex: Popup.zIndex++ });
    this.is_open = true;
    switch (this.options.effect) {
      case 'slide':
        Effect.SlideDown(this.popup, {duration: this.options.show_duration});
        break;
      case 'grow':
        Effect.Grow(this.popup, {duration: this.options.show_duration});
        break;
      case 'blind':
        Effect.BlindDown(this.popup, {duration: this.options.show_duration});
        break;
      case 'fade':
      default:
        Effect.Appear(this.popup, {duration: this.options.show_duration});
        break;
    }
  },
  hide: function(event){
    this.is_open = false;
    switch (this.options.effect){
      case 'slide':
        Effect.SlideUp(this.popup,{duration: this.options.hide_duration});
        break;
      case 'grow':
        Effect.Shrink(this.popup,{duration: this.options.hide_duration});
        break;
      case 'blind':
        Effect.BlindUp(this.popup,{duration: this.options.hide_duration});
        break;
      case 'fade':
      default:
        Effect.Fade(this.popup,{duration: this.options.hide_duration});
        break;
    }
    if (this.options.modal){
      this.hide_overlay();
    }
  },
  first_value: function() {
    for (var i = 0; i < arguments.length; i++) {
      if (arguments[i] !== undefined) {
        return arguments[i];
      }
    }
    return undefined;
  },
  is_auto_open: function() {
    return this.options.trigger == 'mouseover';
  },
  show_overlay: function() {
    if (!Popup.overlay) {
      var overlay = document.createElement('div');
      overlay.setAttribute('id','popup_overlay');
      overlay.style.display = 'none';
      document.body.appendChild(overlay);
      Popup.overlay = overlay;
      Popup.overlay_levels = [];
    }
    Popup.overlay.style.height = this.get_page_dimensions().height + 'px';
    var z = Popup.zIndex++;
    Popup.overlay.style.zIndex = z;
    Popup.overlay_levels.push(z);
    if ( Popup.overlay_levels.length == 1){      
      new Effect.Appear(Popup.overlay,
        { duration: this.options.show_duration,
          to: this.options.opacity,
          queue: {position: 'end', scope: 'popup_overlay'}
        });
    }
    else{
      Popup.overlay.style.zIndex = z;
    }
  },	
  hide_overlay: function(){
    Popup.overlay_levels.pop();
    var z = Popup.overlay_levels.pop();
    if (z){
      Popup.overlay_levels.push(z);
      Popup.overlay.style.zIndex = z;
    }
    else{
      new Effect.Fade(Popup.overlay,
        { duration: this.options.hide_duration,
          queue: {position: 'end', scope: 'popup_overlay'}
        });
    }
  },
  get_popup_position: function(mouse_x, mouse_y){
    var pos;
    switch (this.options.position){
      case 'auto':
        pos = this.get_auto_position(mouse_x, mouse_y);
        break;
      case 'center':
        pos = this.get_center_position();
        break;
      case 'below':
        pos = this.get_below_position();
        break;
      default:        
        if (mo = this.options.position.match(/^\s*([^\s,]+)\s*,\s*([^\s,]+)\s*$/)){
          pos = {x: mo[1], y: mo[2]};
          pos.x = Number(pos.x) || pos.x;
          pos.y = Number(pos.y) || pos.y;
        }
        else {
          pos = {x: 0, y: 0};
        }
        break;
    }
    if (typeof pos.x == 'number'){
      pos.x += 'px';
    }
    if (typeof pos.y == 'number'){
      pos.y += 'px';
    }
    return pos;
  },
  get_below_position: function(){
    var pos = Position.cumulativeOffset(this.link);
    return {x: pos[0], y: pos[1] + Element.getHeight(this.link)};
  },
  get_center_position: function(){
    dim = Element.getDimensions(this.popup);
    var popup_width = dim.width;
    var popup_height = dim.height;
    dim = this.get_viewport_dimensions();
    var viewport_width = dim.width;
    var viewport_height = dim.height;
    var x;
    if (popup_width >= viewport_width){
      x = 0;
    }
    else{
      x = (viewport_width - popup_width)/2;
    }
    var y;
    if (popup_height >= viewport_height){
      y = 0;
    }
    else{
      y = (viewport_height - popup_height)/2;
    }
    return {x: x, y: y}; 
  },
  get_auto_position: function(mouse_x, mouse_y){
    dim = Element.getDimensions(this.popup);
    var popup_width = dim.width;
    var popup_height = dim.height;
    dim = this.get_viewport_dimensions();
    var viewport_width = dim.width;
    var viewport_height = dim.height;
    var available_right = viewport_width - (mouse_x + this.options.cursor_margin);
    var available_left = mouse_x - this.options.cursor_margin;
    var available_top = mouse_y - this.options.cursor_margin;
    var available_bottom = viewport_height - (mouse_x + this.options.cursor_margin);
    var offset = this.options.cursor_margin;
    var x = mouse_x;
    var y = mouse_y;
    if (popup_width >= viewport_width){
      x = 0;
    }
    else if (popup_width <= available_right){
      x += offset;
    }
    else if (popup_width <= available_left){
      x -= popup_width + offset;
    }
    else if (available_right >= available_left){
      x = viewport_width - popup_width;
    }
    else{
      x = 0;
    }
    if (popup_height >= viewport_height){
      y = 0;
    }
    else if (popup_height <= available_bottom){
      y += offset;
    }
    else if (popup_height <= available_top){
      y -= popup_height + offset;
    }
    else if (available_bottom >= available_top){
      y = viewport_height - popup_height;
    }
    else {
      y = 0;
    }
    return {x: x, y: y}; 
  },
  get_viewport_dimensions: function(){
		var dim = this.getPageSize();
    return {width: dim[2], height: dim[3]};
  },
  get_page_dimensions: function(){
		var dim = this.getPageSize();
    return {width: dim[0], height: dim[1]};
  },
  getPageSize: function(){
    var xScroll, yScroll;
    if (window.innerHeight && window.scrollMaxY){	
      xScroll = document.body.scrollWidth;
      yScroll = window.innerHeight + window.scrollMaxY;
    } else if (document.body.scrollHeight > document.body.offsetHeight){
      xScroll = document.body.scrollWidth;
      yScroll = document.body.scrollHeight;
    }else{
      xScroll = document.body.offsetWidth;
      yScroll = document.body.offsetHeight;
    }
    var windowWidth, windowHeight;
    if (self.innerHeight){
      windowWidth = self.innerWidth;
      windowHeight = self.innerHeight;
    } else if (document.documentElement && document.documentElement.clientHeight){
      windowWidth = document.documentElement.clientWidth;
      windowHeight = document.documentElement.clientHeight;
    } else if (document.body){
      windowWidth = document.body.clientWidth;
      windowHeight = document.body.clientHeight;
    }
    if(yScroll < windowHeight){
      pageHeight = windowHeight;
    } else { 
      pageHeight = yScroll;
    }
    if(xScroll < windowWidth){	
      pageWidth = windowWidth;
    } else {
      pageWidth = xScroll;
    }
    arrayPageSize = new Array(pageWidth,pageHeight,windowWidth,windowHeight);
    return arrayPageSize;
  }
}