/**
 * Blessed high-level interface
 * Still in development
 */

/*
  API Example:
  This will render a box with ascii borders containing the
  text 'Hello world!', centered horizontally and vertically.

  var blessed = require('blessed')
    , program = blessed()
    , screen;

  screen = new blessed.Screen({
    program: program
  });

  screen.append(new blessed.Text({
    screen: screen,
    parent: screen,
    fg: 3,
    bg: 5,
    border: {
      type: 'ascii',
      fg: 1
    },
    content: 'Hello world!',
    top: 'center',
    left: 'center'
  }));

  program.on('keypress', function(ch, key) {
    if (key.name === 'escape') {
      process.exit(0);
    }
  });

  screen.render();
*/

/**
 * Modules
 */

var EventEmitter = require('events').EventEmitter;

/**
 * Node
 */

function Node(options) {
  EventEmitter.call(this);

  this.options = options || {};
  this.screen = this.screen
    || Screen._default
    || (function(){throw new Error('No active screen.')})();
  this.parent = options.parent || null; // this.screen;
  this.children = [];

  (options.children || []).forEach(this.append.bind(this));

  if (this._isScreen && !this.focused) {
    this.focused = this.children[0];
  }
}

Node.prototype.__proto__ = EventEmitter.prototype;

Node.prototype.prepend = function(element) {
  element.parent = this;

  if (this._isScreen && !this.focused) {
    this.focused = element;
  }

  if (!~this.children.indexOf(element)) {
    this.children.unshift(element);
  }

  // element.emit('reparent', this);
  // this.emit('append', element);
};

Node.prototype.append = function(element) {
  element.parent = this;

  if (this._isScreen && !this.focused) {
    this.focused = element;
  }

  if (!~this.children.indexOf(element)) {
    this.children.push(element);
  }

  // element.emit('reparent', this);
  // this.emit('append', element);
};

Node.prototype.remove = function(element) {
  element.parent = null; // this.screen;

  var i = this.children.indexOf(element);
  if (~i) {
    this.children.splice(i, 1);
  }

  if (this._isScreen && this.focused === element) {
    this.focused = this.children[0];
  }

  // element.emit('reparent', null);
  // this.emit('remove', element);
};

Node.prototype.detach = function(element) {
  this.parent.remove(element);
};

/**
 * Screen
 */

function Screen(options) {
  var self = this;

  if (!Screen._default) {
    Screen._default = this;
  }

  Node.call(this, options);

  this._isScreen = true;
  this.program = options.program;
  this.tput = this.program.tput;
  this.dattr = ((0 << 18) | (0x1ff << 9)) | 0x1ff;
  this.position = {
    left: this.left = 0,
    right: this.right = 0,
    top: this.top = 0,
    bottom: this.bottom = 0
  };

  //this.focused = null;
  this.history = [];
  this.clickable = [];
  this.input = [];
  this.grabKeys = false;

  this.alloc();

  this.program.on('resize', function() {
    self.alloc();
    self.render();
    self.emit('resize');
  });

  this.program.alternateBuffer();
  this.program.hideCursor();

  process.on('exit', function() {
    self.program.clear();
    self.program.showCursor();
    self.program.normalBuffer();
  });

  this.on('newListener', function fn(type) {
    if (type === 'keypress' || type === 'mouse') {
      self.removeListener('newListener', fn);
      if (type === 'keypress') self._listenKeys();
      if (type === 'mouse') self._listenMouse();
    }
  });
}

Screen._default = null;

Screen.prototype.__proto__ = Node.prototype;

// TODO: Bubble events.
Screen.prototype._listenMouse = function(el, hover) {
  var self = this;

  if (el) {
    if (!hover) {
      if (!~this.clickable.indexOf(el)) this.clickable.push(el);
    } else {
      if (!~this.hover.indexOf(el)) this.hover.push(el);
    }
  }

  if (this._listenedMouse) return;
  this._listenedMouse = true;

  this.program.enableMouse();

  process.on('exit', function() {
    self.program.disableMouse();
  });

  //this.on('element click', function(el) {
  //  el.focus();
  //});

  this.program.on('mouse', function(data) {
    var i = 0, left, top, el;
    for (; i < self.clickable.length; i++) {
      el = self.clickable[i];
      left = el.left + (el.border ? 1 : 0);
      top = el.top + (el.border ? 1 : 0);
      if (el.parent.childBase != null) top -= el.parent.childBase;
      if (data.x > left && data.x <= left + el.width
          && data.y > top && data.y <= top + el.height) {
        el.emit('mouse', data);
        self.emit('element mouse', el, data);
        if (data.action === 'mouseup') {
          el.emit('click', data);
          self.emit('element click', el, data);
        } else if (data.action === 'movement') {
          el.emit('hover', data);
          self.emit('element hover', el, data);
        }
        el.emit(data.action, data);
        self.emit('element ' + data.action, data);
      }
    }
    self.emit('mouse', data);
  });
};

// TODO: Bubble events.
Screen.prototype._listenKeys = function(el) {
  var self = this;

  if (el) {
    if (!~this.input.indexOf(el)) {
      if (this._listenedMouse) {
        //this._listenMouse(el);
        el.on('click', el.focus.bind(el));
      }
      this.input.push(el);
    }
  }

  if (this._listenedKeys) return;
  this._listenedKeys = true;

  this.program.on('keypress', function(ch, key) {
    if (~self.input.indexOf(self.focused)) {
      self.focused.emit('keypress', ch, key);
    }
    if (!self.grabKeys) {
      self.emit('keypress', ch, key);
    }
  });
};

Screen.prototype.__defineGetter__('cols', function() {
  return this.program.cols;
});

Screen.prototype.__defineGetter__('rows', function() {
  return this.program.rows;
});

Screen.prototype.__defineGetter__('width', function() {
  return this.program.cols;
});

Screen.prototype.__defineGetter__('height', function() {
  return this.program.rows;
});

Screen.prototype.alloc = function() {
  var x, y;
  this.lines = [];
  for (y = 0; y < this.rows; y++) {
    this.lines[y] = [];
    for (x = 0; x < this.cols; x++) {
      this.lines[y][x] = [this.dattr, ' '];
    }
    this.lines[y].dirty = true;
  }
  this.olines = [];
  for (y = 0; y < this.rows; y++) {
    this.olines[y] = [];
    for (x = 0; x < this.cols; x++) {
      this.olines[y][x] = [];
    }
  }
};

Screen.prototype.render = function() {
  this.children.forEach(function(el) {
    el.render();
  });
  this.draw(0, this.rows - 1);
  // this.emit('draw');
};

Screen.prototype.draw = function(start, end) {
  var x
    , y
    , line
    , out
    , ch
    , data
    , attr
    , fgColor
    , bgColor
    , flags;

  var lx = -1
    , ly = -1
    , o;

  this.program.saveCursor();

  for (y = start; y <= end; y++) {
    line = this.lines[y];
    o = this.olines[y];

    // TODO: Possibly get rid of .dirty altogether.
    if (!line.dirty) continue;
    line.dirty = false;

    out = '';
    attr = this.dattr;

    for (x = 0; x < this.cols; x++) {
      data = line[x][0];
      ch = line[x][1];

      if (data === o[x][0] && ch === o[x][1]) {
        if (lx === -1) {
          lx = x;
          ly = y;
        }
        continue;
      } else if (lx !== -1) {
        //out += y === ly
        //  ? this.program.cuf(x - lx)
        //  : this.program.cup(y, x);
        out += y === ly
          ? '\x1b[' + (x - lx) + 'C'
          : '\x1b[' + (y + 1) + ';' + (x + 1) + 'H';
        lx = -1, ly = -1;
      }
      o[x][0] = data;
      o[x][1] = ch;

      if (data !== attr) {
        if (attr !== this.dattr) {
          out += '\x1b[m';
        }
        if (data !== this.dattr) {
          out += '\x1b[';

          bgColor = data & 0x1ff;
          fgColor = (data >> 9) & 0x1ff;
          flags = data >> 18;

          // bold
          if (flags & 1) {
            out += '1;';
          }

          // underline
          if (flags & 2) {
            out += '4;';
          }

          // blink
          if (flags & 4) {
            out += '5;';
          }

          // inverse
          if (flags & 8) {
            out += '7;';
          }

          // invisible
          if (flags & 16) {
            out += '8;';
          }

          if (bgColor !== 0x1ff) {
            if (bgColor < 16 || this.tput.colors <= 16) {
              if (bgColor < 8) {
                bgColor += 40;
              } else if (bgColor < 16) {
                bgColor -= 8;
                bgColor += 100;
              }
              out += bgColor + ';';
            } else {
              out += '48;5;' + bgColor + ';';
            }
          }

          if (fgColor !== 0x1ff) {
            if (fgColor < 16 || this.tput.colors <= 16) {
              if (fgColor < 8) {
                fgColor += 30;
              } else if (fgColor < 16) {
                fgColor -= 8;
                fgColor += 90;
              }
              out += fgColor + ';';
            } else {
              out += '38;5;' + fgColor + ';';
            }
          }

          if (out[out.length-1] === ';') out = out.slice(0, -1);

          out += 'm';
        }
      }

      out += ch;
      attr = data;
    }

    if (attr !== this.dattr) {
      out += '\x1b[m';
    }

    //if (out) this.program.write(this.tput.cup(y, 1) + out);
    if (out) this.program.write('\x1b[' + (y + 1) + ';1H' + out);
  }

  this.program.restoreCursor();
};

Screen.prototype.focus = function(offset) {
  if (!this.input.length || !offset) return;
  var i = this.input.indexOf(this.focused);
  if (!~i) return;
  if (!this.input[i + offset]) {
    if (offset > 0) {
      while (offset--) if (++i > this.input.length - 1) i = 0;
    } else {
      offset = -offset;
      while (offset--) if (--i < 0) i = this.input.length - 1;
    }
  } else {
    i += offset;
  }
  return this.input[i].focus();
};

Screen.prototype.focusPrev = function() {
  return this.focus(-1);
};

Screen.prototype.focusNext = function() {
  return this.focus(1);
};

Screen.prototype.focusPush = function(el) {
  if (this.history.length === 10) {
    this.history.shift();
  }
  this.history.push(el);
};

Screen.prototype.focusLast =
Screen.prototype.focusPop = function() {
  return this.history.pop();
};

Screen.prototype.__defineGetter__('focused', function() {
  return this.history[this.history.length-1];
});

Screen.prototype.__defineSetter__('focused', function(el) {
  return this.focusPush(el);
});

Screen.prototype.clearRegion = function(xi, xl, yi, yl) {
  return this.fillRegion(this.dattr, ' ', xi, xl, yi, yl);
};

Screen.prototype.fillRegion = function(attr, ch, xi, xl, yi, yl) {
  var lines = this.lines
    , attr = attr || this.dattr
    , ch = ch || ' '
    , cell
    , xx;

  for (; yi < yl; yi++) {
    if (!lines[yi]) break;
    for (xx = xi; xx < xl; xx++) {
      cell = lines[yi][xx];
      if (!cell) break;
      if (attr !== cell[0] || ch !== cell[1]) {
        lines[yi][xx][0] = attr;
        lines[yi][xx][1] = ch;
        lines[yi].dirty = true;
      }
    }
  }
};

/**
 * Element
 */

function Element(options) {
  var self = this;

  Node.call(this, options);

  this.position = {
    left: options.left || 0,
    right: options.right || 0,
    top: options.top || 0,
    bottom: options.bottom || 0,
    width: options.width || null,
    height: options.height || null
  };

  this.hidden = options.hidden || false;
  this.fg = options.fg || 0x1ff;
  this.bg = options.bg || 0x1ff;
  this.bold = options.bold ? 1 : 0;
  this.underline = options.underline ? 2 : 0;

  if (this.fg === -1) this.fg = exports.NORMAL;
  if (this.bg === -1) this.bg = exports.NORMAL;

  this.fixed = options.fixed || false;
  this.border = options.border;
  if (this.border) {
    this.border.type = this.border.type || 'bg';
    this.border.fg = this.border.fg || -1;
    this.border.bg = this.border.bg || -1;
    this.border.ch = this.border.ch || ' ';
    this.border.bold = this.border.bold ? 1 : 0;
    this.border.underline = this.border.underline ? 2 : 0;
    if (this.border.fg === -1) this.border.fg = exports.NORMAL;
    if (this.border.bg === -1) this.border.bg = exports.NORMAL;
  }

  if (options.clickable) {
    this.screen._listenMouse(this);
  }

  if (options.input) {
    this.screen._listenKeys(this);
  }

  this.content = options.content || '';

  if (options.label) {
    this.append(new Text({
      screen: this.screen,
      content: options.label,
      left: 2,
      top: this.border ? 0 : -1
    }));
  }

  // TODO: Possibly move this to Node for screen.on('mouse', ...).
  this.on('newListener', function fn(type) {
    if (type === 'mouse'
      || type === 'click'
      || type === 'hover'
      || type === 'mousedown'
      || type === 'mouseup'
      || type === 'mousewheel'
      || type === 'wheeldown'
      || type === 'wheelup'
      || type === 'mousemove'
      || type === 'movement') {
      self.screen._listenMouse(self);
    } else if (type === 'keypress') {
      self.screen._listenKeys(self);
    }
  });
}

Element.prototype.__proto__ = Node.prototype;

/*
Element._emit = Element.prototype.emit;
Element.prototype.emit = function(type) {
  var args = Array.prototype.slice.call(arguments)
    , ret = Element._emit.apply(this, args);

  if (this.screen) {
    args.shift();
    args.unshift(this);
    args.unshift('element ' + type);
    this.screen.emit.apply(this.screen, args);
  }

  return ret;
};
*/

Element.prototype.hide = function() {
  var ret = this.render(true);
  this.hidden = true;
  this.screen.clearRegion(ret.xi, ret.xl, ret.yi, ret.yl);
  // this.emit('hide');
};

Element.prototype.show = function() {
  this.hidden = false;
  //this.render();
  // this.emit('show');
};

Element.prototype.toggle = function() {
  return this.hidden ? this.show() : this.hide();
};

Element.prototype.focus = function() {
  var old = this.screen.focused;
  this.screen.focused = this;
  old.emit('blur', this);
  this.emit('focus', old);
  this.screen.emit('element blur', old, this);
  this.screen.emit('element focus', old, this);
};

Element.prototype.setContent = function(content) {
  var ret = this.render(true);
  this.content = content || '';
  this.screen.clearRegion(
    ret.xi + (this.border ? 1 : 0),
    ret.xl - (this.border ? 1 : 0),
    ret.yi + (this.border ? 1 : 0),
    ret.yl - (this.border ? 1 : 0));
};

/**
 * Positioning
 */

// NOTE: When coords are entered in the Element constructor, all of the coords
// are *relative* to their parent, when retrieving them from `.left`, `.right`,
// etc members, the coords are absolute. To see the *relative* coords again,
// use `.rleft`, `.rright`, etc.

Element.prototype.__defineGetter__('left', function() {
  var left = this.position.left;

  if (typeof left === 'string') {
    if (left === 'center') left = '50%';
    left = +left.slice(0, -1) / 100;
    left = Math.max(this.width, this.parent.width) * left | 0;
    if (this.position.left === 'center') {
      left -= this.width / 2 | 0;
    }
  }

  if (this.options.left == null && this.options.right != null) {
    return this.screen.cols - this.width - this.right;
  }

  return (this.parent.left || 0) + left;
});

Element.prototype.__defineGetter__('right', function() {
  if (this.options.right == null && this.options.left != null) {
    return this.screen.cols - (this.left + this.width);
  }
  return (this.parent.right || 0) + this.position.right;
});

Element.prototype.__defineGetter__('top', function() {
  var top = this.position.top;

  if (typeof top === 'string') {
    if (top === 'center') top = '50%';
    top = +top.slice(0, -1) / 100;
    top = Math.max(this.height, this.parent.height) * top | 0;
    if (this.position.top === 'center') {
      top -= this.height / 2 | 0;
    }
  }

  if (this.options.top == null && this.options.bottom != null) {
    return this.screen.rows - this.height - this.bottom;
  }

  return (this.parent.top || 0) + top;
});

Element.prototype.__defineGetter__('bottom', function() {
  if (this.options.bottom == null && this.options.top != null) {
    return this.screen.rows - (this.top + this.height);
  }
  return (this.parent.bottom || 0) + this.position.bottom;
});

Element.prototype.__defineGetter__('width', function() {
  var width = this.position.width;
  if (typeof width === 'string') {
    if (width === 'half') width = '50%';
    width = +width.slice(0, -1) / 100;
    return this.parent.width * width | 0;
  }
  if (!width) {
    // Problem if .left is 'center', we can't calculate the width
    var left = this.position.left;
    if (typeof left === 'string') {
      if (left === 'center') left = '50%';
      left = +left.slice(0, -1) / 100;
      left = this.parent.width * left | 0;
    }
    width = this.parent.width - this.position.right - left;
  }
  return width;
});

Element.prototype.__defineGetter__('height', function() {
  var height = this.position.height;
  if (typeof height === 'string') {
    if (height === 'half') height = '50%';
    height = +height.slice(0, -1) / 100;
    return this.parent.height * height | 0;
  }
  if (!height) {
    // Problem if .top is 'center', we can't calculate the height
    var top = this.position.top;
    if (typeof top === 'string') {
      if (top === 'center') top = '50%';
      top = +top.slice(0, -1) / 100;
      top = this.parent.height * top | 0;
    }
    height = this.parent.height - this.position.bottom - top;
  }
  return height;
});

Element.prototype.__defineGetter__('rleft', function() {
  var left = this.position.left;

  if (typeof left === 'string') {
    if (left === 'center') left = '50%';
    left = +left.slice(0, -1) / 100;
    left = Math.max(this.width, this.parent.width) * left | 0;
    if (this.position.left === 'center') {
      left -= this.width / 2 | 0;
    }
  }

  if (this.options.left == null && this.options.right != null) {
    return this.parent.width - this.width - this.right;
  }

  return left;
});

Element.prototype.__defineGetter__('rright', function() {
  if (this.options.right == null && this.options.left != null) {
    return this.parent.width - (this.rleft + this.width);
  }
  return this.position.right;
});

Element.prototype.__defineGetter__('rtop', function() {
  var top = this.position.top;

  if (typeof top === 'string') {
    if (top === 'center') top = '50%';
    top = +top.slice(0, -1) / 100;
    top = Math.max(this.height, this.parent.height) * top | 0;
    if (this.position.top === 'center') {
      top -= this.height / 2 | 0;
    }
  }

  if (this.options.top == null && this.options.bottom != null) {
    return this.parent.height - this.height - this.bottom;
  }

  return top;
});

Element.prototype.__defineGetter__('rbottom', function() {
  if (this.options.bottom == null && this.options.top != null) {
    return this.parent.height - (this.rtop + this.height);
  }
  return this.position.bottom;
});

// TODO: Reconcile the fact the `position.left` is actually `.rleft`. etc.
// TODO: Allow string values for absolute coords below.
// TODO: Optimize clearing to only clear what is necessary.

Element.prototype.__defineSetter__('left', function(val) {
  if (typeof val === 'string') {
    if (val === 'center') val = '50%';
    val = +val.slice(0, -1) / 100;
    val = this.screen.width * val | 0;
    //val = val - this.parent.left;
  }
  this.emit('move');
  this.screen.clearRegion(this.left, this.left + this.width, this.top, this.top + this.height);
  //var left = this.left;
  //return this.options.left = this.position.left = left + (val - left);
  return this.options.left = this.position.left = val - this.parent.left;
  // More efficient clearing:
  // if (left > this.left) {
  //   this.screen.clearRegion(this.left + this.width, left + this.width, this.top, this.top + this.height);
  // } else {
  //   this.screen.clearRegion(left, this.left, this.top, this.top + this.height);
  // }
});

Element.prototype.__defineSetter__('right', function(val) {
  if (typeof val === 'string') {
    if (val === 'center') val = '50%';
    val = +val.slice(0, -1) / 100;
    val = this.screen.width * val | 0;
    //val = val - this.parent.right;
  }
  this.emit('move');
  this.screen.clearRegion(
    this.left, this.left + this.width,
    this.top, this.top + this.height);
  //var right = this.right;
  //return this.options.right = this.position.right = right + (val - right);
  return this.options.right = this.position.right = val - this.parent.right;
});

Element.prototype.__defineSetter__('top', function(val) {
  if (typeof val === 'string') {
    if (val === 'center') val = '50%';
    val = +val.slice(0, -1) / 100;
    val = this.screen.height * val | 0;
    //val = val - this.parent.top;
  }
  this.emit('move');
  this.screen.clearRegion(
    this.left, this.left + this.width,
    this.top, this.top + this.height);
  //var top = this.top;
  //return this.options.top = this.position.top = top + (val - top);
  return this.options.top = this.position.top = val - this.parent.top;
});

Element.prototype.__defineSetter__('bottom', function(val) {
  if (typeof val === 'string') {
    if (val === 'center') val = '50%';
    val = +val.slice(0, -1) / 100;
    val = this.screen.height * val | 0;
    //val = val - this.parent.bottom;
  }
  this.emit('move');
  this.screen.clearRegion(
    this.left, this.left + this.width,
    this.top, this.top + this.height);
  //var bottom = this.bottom;
  //return this.options.bottom = this.position.bottom = bottom + (val - bottom);
  return this.options.bottom = this.position.bottom = val - this.parent.bottom;
});

Element.prototype.__defineSetter__('width', function(val) {
  this.emit('resize');
  //if (this.width < width)
  this.screen.clearRegion(
    this.left, this.left + this.width,
    this.top, this.top + this.height);
  return this.options.width = this.position.width = val;
});

Element.prototype.__defineSetter__('height', function(val) {
  this.emit('resize');
  //if (this.height < height)
  this.screen.clearRegion(
    this.left, this.left + this.width,
    this.top, this.top + this.height);
  return this.options.height = this.position.height = val;
});

Element.prototype.__defineSetter__('rleft', function(val) {
  this.emit('move');
  this.screen.clearRegion(
    this.left, this.left + this.width,
    this.top, this.top + this.height);
  return this.options.left = this.position.left = val;
});

Element.prototype.__defineSetter__('rright', function(val) {
  this.emit('move');
  this.screen.clearRegion(
    this.left, this.left + this.width,
    this.top, this.top + this.height);
  return this.options.right = this.position.right = val;
});

Element.prototype.__defineSetter__('rtop', function(val) {
  this.emit('move');
  this.screen.clearRegion(
    this.left, this.left + this.width,
    this.top, this.top + this.height);
  return this.options.top = this.position.top = val;
});

Element.prototype.__defineSetter__('rbottom', function(val) {
  this.emit('move');
  this.screen.clearRegion(
    this.left, this.left + this.width,
    this.top, this.top + this.height);
  return this.options.bottom = this.position.bottom = val;
});

/**
 * Box
 */

function Box(options) {
  Element.call(this, options);
}

Box.prototype.__proto__ = Element.prototype;

Box.prototype.render = function(stop) {
  // NOTE: Maybe move this `hidden` check down below `stop` check and return `ret`.
  if (this.hidden) return;

  var lines = this.screen.lines
    , xi = this.left
    , xl = this.screen.cols - this.right
    , yi = this.top
    , yl = this.screen.rows - this.bottom
    , cell
    , attr
    , ch
    , ci = this.contentIndex || 0
    , cl = this.content.length
    , battr
    , dattr
    , c;

  if (this.position.width) {
    xl = xi + this.width;
  }

  if (this.position.height) {
    yl = yi + this.height;
  }

  if (this.parent.childBase != null && ~this.parent.items.indexOf(this)) {
    var rtop = this.rtop - (this.parent.border ? 1 : 0)
      , visible = this.parent.height - (this.parent.border ? 2 : 0);

    yi -= this.parent.childBase;
    // if (noOverflow) ...
    yl = Math.min(yl, this.screen.rows - this.parent.bottom);
    // yl -= this.parent.childBase; // necessary here, but not necessary in Text.render for some reason.

    if (rtop - this.parent.childBase < 0) {
      return;
    }
    if (rtop - this.parent.childBase >= visible) {
      return;
    }
  }

  var ret = {
    xi: xi,
    xl: xl,
    yi: yi,
    yl: yl
  };

  if (stop) return ret;

  battr = this.border
    ? ((this.border.bold << 18) + (this.border.underline << 18)) | (this.border.fg << 9) | this.border.bg
    : 0;

  //if (this.escapes) dattr = this.screen.dattr;
  dattr = ((this.bold << 18) + (this.underline << 18)) | (this.fg << 9) | this.bg;
  attr = dattr;

  // Check previous line for escape codes.
  if (this.childBase > 0 && this._content) {
    var cci = ci - (this._content[this.childBase - 1].length + 1);
    for (; cci < ci; cci++) {
      if (this.content[cci] === '\x1b') {
        if (c = /^\x1b\[(?:\d+(?:;\d+)*)?m/.exec(this.content.substring(cci))) {
          attr = attrCode(c[0], attr);
          cci += c[0].length - 1;
        }
      }
    }
  }

  for (; yi < yl; yi++) {
    if (!lines[yi]) break;
    for (xi = this.left; xi < xl; xi++) {
      cell = lines[yi][xi];
      if (!cell) break;

      if (this.border && (yi === this.top || xi === this.left || yi === yl - 1 || xi === xl - 1)) {
        if (this.border.type === 'ascii') {
          if (yi === this.top) {
            if (xi === this.left) ch = '┌';
            else if (xi === xl - 1) ch = '┐';
            else ch = '─';
          } else if (yi === yl - 1) {
            if (xi === this.left) ch = '└';
            else if (xi === xl - 1) ch = '┘';
            else ch = '─';
          } else if (xi === this.left || xi === xl - 1) {
            ch = '│';
          }
        } else if (this.border.type === 'bg') {
          ch = this.border.ch;
        }
        if (battr !== cell[0] || ch !== cell[1]) {
          lines[yi][xi][0] = battr;
          lines[yi][xi][1] = ch;
          lines[yi].dirty = true;
        }
        continue;
      }

      ch = this.content[ci++] || ' ';

      // Handle escape codes.
      while (ch === '\x1b') {
        if (c = /^\x1b\[(?:\d+(?:;\d+)*)?m/.exec(this.content.substring(ci - 1))) {
          ci += c[0].length - 1;
          attr = attrCode(c[0], attr);
          ch = this.content[ci] || ' ';
          ci++;
        }
      }

      // Handle newlines.
      if (ch === '\t') ch = ' ';
      if (ch === '\n' || ch === '\r') {
        ch = ' ';
        var xxl = xl - (this.border ? 1 : 0);
        for (; xi < xxl; xi++) {
          cell = lines[yi][xi];
          if (!cell) break;
          if (attr !== cell[0] || ch !== cell[1]) {
            lines[yi][xi][0] = attr;
            lines[yi][xi][1] = ch;
            lines[yi].dirty = true;
          }
        }
        if (this.border) xi--;
        continue;
      }

      if (attr !== cell[0] || ch !== cell[1]) {
        lines[yi][xi][0] = attr;
        lines[yi][xi][1] = ch;
        lines[yi].dirty = true;
      }
    }
  }

  this.children.forEach(function(el) {
    el.render();
  });

  return ret;
};

/**
 * Text
 */

function Text(options) {
  Element.call(this, options);
  this.full = options.full;
}

Text.prototype.__proto__ = Element.prototype;

// TODO: Remove duplication of code by reusing box.render
// better. Possibly remove Text altogether.
// TODO: Maybe just remove escape code and newline handling from here.
Text.prototype.render = function(stop) {
  // NOTE: Maybe move this `hidden` check down below `stop` check and return `ret`.
  if (this.hidden) return;

  var lines = this.screen.lines
    , xi = this.left
    , xl = this.screen.cols - this.right
    , yi = this.top
    , yl = this.screen.rows - this.bottom
    , cell
    , attr
    , ch
    , ci = this.contentIndex || 0
    , cl = this.content.length
    , ended = -1
    , dattr
    , c;

  if (this.position.width) {
    xl = xi + this.width;
  }

  if (this.position.height) {
    yl = yi + this.height;
  }

  if (this.full) {
    xl = xi + this.parent.width - (this.parent.border ? 2 : 0) - this.rleft - this.rright;
  }

  if (this.parent.childBase != null && ~this.parent.items.indexOf(this)) {
    var rtop = this.rtop - (this.parent.border ? 1 : 0)
      , visible = this.parent.height - (this.parent.border ? 2 : 0);

    yi -= this.parent.childBase;
    // if (noOverflow) ...
    yl = Math.min(yl, this.screen.rows - this.parent.bottom);

    if (rtop - this.parent.childBase < 0) {
      return;
    }
    if (rtop - this.parent.childBase >= visible) {
      return;
    }
  }

  var ret = {
    xi: xi,
    xl: xl,
    yi: yi,
    yl: yl
  };

  if (stop) return ret;

  dattr = ((this.bold << 18) + (this.underline << 18)) | (this.fg << 9) | this.bg;
  attr = dattr;

  for (; yi < yl; yi++) {
    if (!lines[yi]) break;
    for (xi = this.left; xi < xl; xi++) {
      cell = lines[yi][xi];
      if (!cell) break;

      ch = this.content[ci++];

      // Handle escape codes.
      while (ch === '\x1b') {
        if (c = /^\x1b\[(?:\d+(?:;\d+)*)?m/.exec(this.content.substring(ci - 1))) {
          ci += c[0].length - 1;
          attr = attrCode(c[0], attr);
          ch = this.content[ci];
          ci++;
        }
      }

      // Handle newlines.
      if (ch === '\t') ch = ' ';
      if (ch === '\n' || ch === '\r') {
        ch = ' ';
        var xxl = xl;
        for (; xi < xxl; xi++) {
          cell = lines[yi][xi];
          if (!cell) break;
          if (attr !== cell[0] || ch !== cell[1]) {
            lines[yi][xi][0] = attr;
            lines[yi][xi][1] = ch;
            lines[yi].dirty = true;
          }
        }
        continue;
      }

      if (!ch) {
        if (this.full) {
          if (ended === -1) ended = yi;
          if (yi === ended) {
            ch = ' ';
          } else {
            break;
          }
        } else {
          break;
        }
      }

      if (attr !== cell[0] || ch !== cell[1]) {
        lines[yi][xi][0] = attr;
        lines[yi][xi][1] = ch;
        lines[yi].dirty = true;
      }
    }
  }

  return ret;
};

/**
 * Line
 */

function Line(options) {
  var orientation = options.orientation || 'vertical';
  delete options.orientation;

  if (orientation === 'vertical') {
    options.width = 1;
  } else {
    options.height = 1;
  }

  options.border = {
    type: 'bg',
    bg: options.bg || -1,
    fg: options.fg || -1,
    ch: !options.type || options.type === 'ascii'
      ? orientation === 'horizontal' ? '─' : '│'
      : options.ch || ' '
  };

  delete options.bg;
  delete options.fg;
  delete options.ch;

  Box.call(this, options);
}

Line.prototype.__proto__ = Box.prototype;

/**
 * ScrollableBox
 */

function ScrollableBox(options) {
  Box.call(this, options);
  this.scrollable = true;
  this.childOffset = 0;
  this.childBase = 0;
  this.baseLimit = options.baseLimit || Infinity;
  this.alwaysScroll = options.alwaysScroll;
}

ScrollableBox.prototype.__proto__ = Box.prototype;

ScrollableBox.prototype.scroll = function(offset) {
  var visible = this.height - (this.border ? 2 : 0);
  if (this.alwaysScroll) {
    // Semi-workaround
    this.childOffset = offset > 0
      ? visible - 1 + offset
      : offset;
  } else {
    this.childOffset += offset;
  }
  if (this.childOffset > visible - 1) {
    var d = this.childOffset - (visible - 1);
    this.childOffset -= d;
    this.childBase += d;
  } else if (this.childOffset < 0) {
    var d = this.childOffset;
    this.childOffset += -d;
    this.childBase += d;
  }
  if (this.childBase < 0) this.childBase = 0;
  else if (this.childBase > this.baseLimit) this.childBase = this.baseLimit;
};

/**
 * List
 */

function List(options) {
  var self = this;

  ScrollableBox.call(this, options);

  this.items = [];
  this.selected = 0;

  this.selectedBg = options.selectedBg || -1;
  this.selectedFg = options.selectedFg || -1;
  this.selectedBold = options.selectedBold ? 1 : 0;
  this.selectedUnderline = options.selectedUnderline ? 2 : 0;

  if (this.selectedBg === -1) this.selectedBg = exports.NORMAL;
  if (this.selectedFg === -1) this.selectedFg = exports.NORMAL;

  this.mouse = options.mouse || false;

  if (options.items) {
    options.items.forEach(this.add.bind(this));
  }

  if (this.children.length) {
    // Will throw if this.parent is not set!
    // Probably not good to have in a constructor.
    // this.select(0);
  }

  if (this.mouse) {
    self.on('wheeldown', function(data) {
      self.select(self.selected + 2);
      self.screen.render();
    });

    self.on('wheelup', function(data) {
      self.select(self.selected - 2);
      self.screen.render();
    });
  }
}

List.prototype.__proto__ = ScrollableBox.prototype;

List.prototype.add = function(item) {
  var self = this;

  // TODO: Use box here and get rid of text.
  var item = new Text({
    screen: this.screen,
    parent: this,
    fg: this.fg,
    bg: this.bg,
    content: item.content || item,
    top: this.items.length + (this.border ? 1 : 0),
    left: (this.border ? 1 : 0) + 1,
    full: true,
    height: 1
  });

  this.append(item);
  this.items.push(item);

  if (this.mouse) {
    item.on('click', function(data) {
      self.select(item);
      self.screen.render();
    });
  }
};

List.prototype._remove = List.prototype.remove;
List.prototype.remove = function(child) {
  if (typeof child === 'number') {
    child = this.children[child];
  }
  var i = this.items.indexOf(child);
  if (~i) this.items.splice(i, 1);
  this._remove(child);
};

List.prototype.select = function(index) {
  if (!this.items.length) return;

  if (typeof index === 'object') {
    index = this.items.indexOf(index);
  }

  if (index < 0) index = 0;
  else if (index >= this.items.length) index = this.items.length - 1;

  if (this.selected === index && this._listInitialized) return;
  this._listInitialized = true;

  if (this.selectedBg) {
    this.items[this.selected].bg = this.bg;
    this.items[index].bg = this.selectedBg;
  }

  if (this.selectedFg) {
    this.items[this.selected].fg = this.fg;
    this.items[index].fg = this.selectedFg;
  }

  if (this.selectedBold != null) {
    this.items[this.selected].bold = this.bold;
    this.items[index].bold = this.selectedBold;
  }

  if (this.selectedUnderline != null) {
    this.items[this.selected].underline = this.underline;
    this.items[index].underline = this.selectedUnderline;
  }

  var diff = index - this.selected;
  this.selected = index;
  this.scroll(diff);
};

List.prototype.move = function(offset) {
  this.select(this.selected + offset);
};

List.prototype.up = function(offset) {
  this.move(-(offset || 1));
};

List.prototype.down = function(offset) {
  this.move(offset || 1);
};

/**
 * ScrollableText
 */

function ScrollableText(options) {
  var self = this;

  options.alwaysScroll = true;

  ScrollableBox.call(this, options);

  if (options.mouse) {
    var self = this;
    this.on('wheeldown', function(data) {
      self.scroll(self.height / 2 | 0 || 1);
      self.screen.render();
    });
    this.on('wheelup', function(data) {
      self.scroll(-(self.height / 2 | 0) || -1);
      self.screen.render();
    });
  }

  this.screen.on('resize', function() {
    self.setContent(self.content);
  });

  this.on('resize', function() {
    self.setContent(self.content);
  });

  this.contentIndex = 0;
}

ScrollableText.prototype.__proto__ = ScrollableBox.prototype;

ScrollableText.prototype._scroll = ScrollableText.prototype.scroll;
ScrollableText.prototype.scroll = function(offset) {
  var base = this.childBase
    , ret = this._scroll(offset)
    , cb = this.childBase
    , diff = cb - base
    , w
    , i
    , max
    , t;

  if (diff === 0) return ret;

  // When scrolling text, we want to be able to handle SGR codes as well as line
  // feeds. This allows us to take preformatted text output from other programs
  // and put it in a scrollable text box.
  // TODO: Move this into a separate function and call it from the constructor
  // and setContent.
  if (this.content != null) {
    w = this.width - (this.border ? 2 : 0);
    if (this.__content == null) this.__content = this.content;
    if (this._content == null || this._content.width !== w) {
      this._content = wrapContent(this.__content, w);
      this.content = this._content.join('\n');
      // this._content = this._content.map(function(line) {
      //   return line.length;
      // });
    }

    max = this._content.length - 1 - (this.height - (this.border ? 2 : 0));
    if (cb > max) this.childBase = cb = max;

    // Faster:
    if (diff > 0) {
      for (i = base; i < cb; i++) this.contentIndex += this._content[i].length + 1;
    } else {
      for (i = base - 1; i >= cb; i--) this.contentIndex -= this._content[i].length + 1;
    }
  }

  return ret;
};

ScrollableText.prototype._setContent = ScrollableText.prototype.setContent;
ScrollableText.prototype.setContent = function(content) {
  var ret = this._setContent(content);

  // delete this.__content;
  // delete this._content;

  this.__content = this.content;
  this._content = wrapContent(this.__content, this.width - (this.border ? 2 : 0));
  this.content = this._content.join('\n');
  // this._content = this._content.map(function(line) {
  //   return line.length;
  // });

  for (var i = 0, t = 0; i < this.childBase; i++) {
    t += this._content[i].length + 1;
  }
  this.contentIndex = t;

  // this.childBase = 0;
  // this.contentIndex = 0;

  if (this.parent) this.scroll(0);

  return ret;
};

/**
 * Input
 */

function Input(options) {
  Box.call(this, options);
}

Input.prototype.__proto__ = Box.prototype;

/**
 * Textbox
 */

function Textbox(options) {
  Input.call(this, options);
  this.value = options.value || '';
  this.content = options.content || '';
  this.screen._listenKeys(this);
}

Textbox.prototype.__proto__ = Input.prototype;

Textbox.prototype.setInput = function(callback) {
  var self = this;

  this.screen.grabKeys = true;

  this.focus();
  // this.screen.program.saveCursor();
  this.screen.program.cup(
    this.top + 1 + (this.border ? 1 : 0),
    this.left + 1 + (this.border ? 1 : 0));
  this.screen.program.showCursor();
  this.screen.program.sgr('normal');

  this._callback = function(err, value) {
    // self.screen.program.restoreCursor();
    self.screen.program.hideCursor();
    // Wait for global keypress event to fire.
    process.nextTick(function() {
      self.screen.grabKeys = false;
    });
    return err
      ? callback(err)
      : callback(null, value);
  };

  this.__listener = this._listener.bind(this);
  this.on('keypress', this.__listener);
};

Textbox.prototype._listener = function(ch, key) {
  var callback = this._callback
    , value = this.content;

  if (key.name === 'escape' || key.name === 'enter') {
    delete this._callback;
    this.setContent('');
    this.removeListener('keypress', this.__listener);
    delete this.__listener;
    callback(null, key.name === 'enter' ? value : null);
  } else if (key.name === 'backspace') {
    if (this.content.length) {
      this.setContent(this.content.slice(0, -1));
      if (this.content.length < this.width - (this.border ? 2 : 0) - 1) {
        this.screen.program.cub();
      }
    }
  } else {
    if (ch) {
      this.setContent(this.content + ch);
      if (this.content.length < this.width - (this.border ? 2 : 0)) {
        this.screen.program.cuf();
      }
    }
  }

  this.screen.render();
};

Textbox.prototype._render = Input.prototype.render;
Textbox.prototype.render = function(stop) {
  var content = this.content;
  this.content = this.content.slice(-(this.width - (this.border ? 2 : 0) - 1));
  var ret = this._render(stop);
  this.content = content;
  if (stop) return stop;
  return ret;
};

Textbox.prototype.setEditor = function(callback) {
  var self = this;

  this.focus();

  self.screen.program.normalBuffer();
  self.screen.program.showCursor();

  return readEditor(function(err, value) {
    self.screen.program.alternateBuffer();
    self.screen.program.hideCursor();
    self.screen.alloc();
    self.screen.render();
    if (err) return callback(err);
    self.setContent(value);
    return callback(null, value);
  });
};

/**
 * Textarea
 */

function Textarea(options) {
  Input.call(this, options);
}

Textarea.prototype.__proto__ = Input.prototype;

/**
 * Button
 */

function Button(options) {
  Input.call(this, options);
}

Button.prototype.__proto__ = Input.prototype;

/**
 * ProgressBar
 */

function ProgressBar(options) {
  Input.call(this, options);
  this.filled = options.filled || 0;
  if (typeof this.filled === 'string') {
    this.filled = +this.filled.slice(0, -1);
  }
  this.ch = options.ch || ' ';
  this.barFg = options.barFg || -1;
  this.barBg = options.barBg || -1;
  if (this.barFg === -1) this.barFg = exports.NORMAL;
  if (this.barBg === -1) this.barBg = exports.NORMAL;
}

ProgressBar.prototype.__proto__ = Input.prototype;

ProgressBar.prototype._render = ProgressBar.prototype.render;
ProgressBar.prototype.render = function(stop) {
  // NOTE: Maybe move this `hidden` check down below `stop` check and return `ret`.
  if (this.hidden) return;

  var ret = this._render(stop);

  if (stop) return ret;

  var xi = ret.xi
    , xl = ret.xl
    , yi = ret.yi
    , yl = ret.yl
    , dattr;

  if (this.border) xi++, yi++, xl--, yl--;

  xl = xi + ((xl - xi) * (this.filled / 100)) | 0;

  dattr = ((this.bold << 18) + (this.underline << 18)) | (this.barFg << 9) | this.barBg;

  this.screen.fillRegion(dattr, this.ch, xi, xl, yi, yl);

  return ret;
};

ProgressBar.prototype.progress = function(filled) {
  this.filled += filled;
  if (this.filled < 0) this.filled = 0;
  else if (this.filled > 100) this.filled = 100;
};

ProgressBar.prototype.reset = function() {
  this.filled = 0;
};

/**
 * Helpers
 */

// Convert an SGR string to our own attribute format.
function attrCode(code, cur) {
  var flags = (cur >> 18) & 0x1ff;
  var fg = (cur >> 9) & 0x1ff;
  var bg = cur & 0x1ff;
  var c, i;

  code = /^\x1b\[([^m]*)m$/.exec(code)[1].split(';');
  if (!code[0]) code[0] = '0';

  for (i = 0; i < code.length; i++) {
    c = +code[i] || 0;
    switch (c) {
      case 0:
        bg = 0x1ff;
        fg = 0x1ff;
        flags = 0;
        break;
      case 1:
        flags |= 1;
        break;
      case 4:
        flags |= 2;
        break;
      case 5:
        flags |= 4;
        break;
      case 7:
        flags |= 8;
        break;
      case 8:
        flags |= 16;
        break;
      default:
        if (c === 48 && code[i+1] === '5') {
          i += 2;
          bg = +code[i];
          break;
        } else if (c === 38 && code[i+1] === '5') {
          i += 2;
          fg = +code[i];
          break;
        }
        if (c >= 40 && c <= 47) {
          bg = c - 40;
        } else if (c >= 100 && c <= 107) {
          bg = c - 100;
          bg += 8;
        } else if (c >= 30 && c <= 37) {
          fg = c - 30;
        } else if (c >= 90 && c <= 97) {
          fg = c - 90;
          fg += 8;
        }
        break;
    }
  }

  return (flags << 18) | (fg << 9) | bg;
}

function readEditor(callback) {
  var spawn = require('child_process').spawn
    , fs = require('fs')
    , editor = process.env.EDITOR || 'vi'
    , file = '/tmp/blessed.' + Math.random().toString(36);

  var write = process.stdout.write;
  process.stdout.write = function() {};

  try {
    process.stdin.pause();
  } catch (e) {
    ;
  }

  var resume = function() {
    try {
      process.stdin.resume();
    } catch (e) {
      ;
    }
    process.stdout.write = write;
  };

  var ps = spawn(editor, [file], {
    stdio: 'inherit',
    env: process.env,
    cwd: process.env.HOME
  });

  ps.on('error', function(err) {
    resume();
    return callback(err);
  });

  ps.on('exit', function(code) {
    resume();
    return fs.readFile(file, 'utf8', function(err, data) {
      return fs.unlink(file, function() {
        if (err) return callback(err);
        return callback(null, data);
      });
    });
  });
}

function wrapContent(content, width) {
  var lines = content.split('\n')
    , out = [];

  lines.forEach(function(line) {
    var total
      , i
      , part
      , esc;

    while (line.length > width) {
      for (i = 0, total = 0; i < line.length; i++) {
        while (line[i] === '\x1b') {
          while (line[i] && line[i++] !== 'm');
        }
        if (!line[i]) break;
        if (++total === width) break;
      }

      part = line.substring(0, i - 1);
      esc = /\x1b[\[\d;]*$/.exec(part);

      if (esc) {
        part = part.slice(0, -esc[0].length);
        line = line.substring(i - 1 - esc[0].length);
        out.push(part);
      } else {
        line = line.substring(i - 1);
        out.push(part);
      }
    }

    // If only an escape code got cut off, at it to `part`.
    if (/^(?:\x1b[\[\d;]*m)+$/.test(line)) {
      out[out.length-1] += line;
      return;
    }
    out.push(line);
  });

  out.width = width;

  return out;
}

/**
 * Constants
 */

exports.NORMAL = 0x1ff;

/**
 * Expose
 */

exports.Screen = Screen;
exports.Box = Box;
exports.Text = Text;
exports.Line = Line;
exports.ScrollableBox = ScrollableBox;
exports.List = List;
exports.ScrollableText = ScrollableText;
exports.Input = Input;
exports.Textbox = Textbox;
exports.Button = Button;
exports.ProgressBar = ProgressBar;