#if defined(Hiro_Console)

namespace hiro {

static auto Console_keyPress(GtkWidget*, GdkEventKey* event, pConsole* p) -> int {
  return p->_keyPress(event->keyval, event->state);
}

auto pConsole::construct() -> void {
  gtkWidget = gtk_scrolled_window_new(0, 0);
  gtk_scrolled_window_set_policy(GTK_SCROLLED_WINDOW(gtkWidget), GTK_POLICY_AUTOMATIC, GTK_POLICY_ALWAYS);
  gtk_scrolled_window_set_shadow_type(GTK_SCROLLED_WINDOW(gtkWidget), GTK_SHADOW_ETCHED_IN);

  subWidget = gtk_text_view_new();
  gtk_widget_show(subWidget);
  gtk_text_view_set_editable(GTK_TEXT_VIEW(subWidget), false);
  gtk_text_view_set_wrap_mode(GTK_TEXT_VIEW(subWidget), GTK_WRAP_NONE);
  gtk_container_add(GTK_CONTAINER(gtkWidget), subWidget);

  textBuffer = gtk_text_view_get_buffer(GTK_TEXT_VIEW(subWidget));

  setBackgroundColor(state().backgroundColor);
  setForegroundColor(state().foregroundColor);

  g_signal_connect(G_OBJECT(subWidget), "key-press-event", G_CALLBACK(Console_keyPress), (gpointer)this);

  pWidget::construct();
}

auto pConsole::destruct() -> void {
  gtk_widget_destroy(subWidget);
  gtk_widget_destroy(gtkWidget);
}

auto pConsole::print(const string& text) -> void {
  //insert text before prompt and command
  GtkTextIter iter;
  gtk_text_buffer_get_iter_at_line_offset(textBuffer, &iter, gtk_text_buffer_get_line_count(textBuffer), 0);
  gtk_text_buffer_insert(textBuffer, &iter, text, -1);
  _seekToEnd();
}

auto pConsole::reset() -> void {
  //flush history and redraw prompt
  gtk_text_buffer_set_text(textBuffer, state().prompt, -1);
  _seekToEnd();
}

auto pConsole::setBackgroundColor(Color color) -> void {
  GdkColor gdkColor = CreateColor(color);
  gtk_widget_modify_base(subWidget, GTK_STATE_NORMAL, color ? &gdkColor : nullptr);
}

auto pConsole::setForegroundColor(Color color) -> void {
  GdkColor gdkColor = CreateColor(color);
  gtk_widget_modify_text(subWidget, GTK_STATE_NORMAL, color ? &gdkColor : nullptr);
}

auto pConsole::setPrompt(const string& prompt) -> void {
  //erase previous prompt and replace it with new prompt
  GtkTextIter lhs, rhs;
  gtk_text_buffer_get_iter_at_line_offset(textBuffer, &lhs, gtk_text_buffer_get_line_count(textBuffer), 0);
  gtk_text_buffer_get_iter_at_line_offset(textBuffer, &rhs, gtk_text_buffer_get_line_count(textBuffer), previousPrompt.size());
  gtk_text_buffer_delete(textBuffer, &lhs, &rhs);
  gtk_text_buffer_get_iter_at_line_offset(textBuffer, &lhs, gtk_text_buffer_get_line_count(textBuffer), 0);
  gtk_text_buffer_insert(textBuffer, &lhs, previousPrompt = prompt, -1);
  _seekToEnd();
}

auto pConsole::_keyPress(uint scancode, uint mask) -> bool {
  if(mask & (GDK_CONTROL_MASK | GDK_MOD1_MASK | GDK_SUPER_MASK)) return false;  //allow actions such as Ctrl+C (copy)

  GtkTextMark* mark = gtk_text_buffer_get_mark(textBuffer, "insert");
  GtkTextIter start, cursor, end;
  gtk_text_buffer_get_iter_at_line_offset(textBuffer, &start, gtk_text_buffer_get_line_count(textBuffer), state().prompt.size());
  gtk_text_buffer_get_iter_at_mark(textBuffer, &cursor, mark);
  gtk_text_buffer_get_end_iter(textBuffer, &end);

  if(scancode == GDK_KEY_Return || scancode == GDK_KEY_KP_Enter) {
    char* temp = gtk_text_buffer_get_text(textBuffer, &start, &end, true);
    string s = temp;
    g_free(temp);
    gtk_text_buffer_insert(textBuffer, &end, string{"\n", state().prompt}, -1);
    self().doActivate(s);
    if(s) history.prepend(s);
    if(history.size() > 128) history.removeRight();
    historyOffset = 0;
    _seekToEnd();
    return true;
  }

  if(scancode == GDK_KEY_Up) {
    gtk_text_buffer_delete(textBuffer, &start, &end);
    gtk_text_buffer_get_end_iter(textBuffer, &end);
    if(historyOffset < history.size()) {
      gtk_text_buffer_insert(textBuffer, &end, history[historyOffset++], -1);
    }
    _seekToEnd();
    return true;
  }

  if(scancode == GDK_KEY_Down) {
    gtk_text_buffer_delete(textBuffer, &start, &end);
    gtk_text_buffer_get_end_iter(textBuffer, &end);
    if(historyOffset > 0) {
      gtk_text_buffer_insert(textBuffer, &end, history[--historyOffset], -1);
    }
    _seekToEnd();
    return true;
  }

  if(scancode == GDK_KEY_Left) {
    if(gtk_text_iter_get_offset(&cursor) <= gtk_text_iter_get_offset(&start)) {
      gtk_text_buffer_place_cursor(textBuffer, &start);
    } else {
      gtk_text_iter_set_offset(&cursor, gtk_text_iter_get_offset(&cursor) - 1);
      gtk_text_buffer_place_cursor(textBuffer, &cursor);
    }
    _seekToMark();
    return true;
  }

  if(scancode == GDK_KEY_Right) {
    if(gtk_text_iter_get_offset(&cursor) < gtk_text_iter_get_offset(&start)) {
      gtk_text_buffer_place_cursor(textBuffer, &end);
    } else if(gtk_text_iter_get_offset(&cursor) < gtk_text_iter_get_offset(&end)) {
      gtk_text_iter_set_offset(&cursor, gtk_text_iter_get_offset(&cursor) + 1);
      gtk_text_buffer_place_cursor(textBuffer, &cursor);
    }
    _seekToMark();
    return true;
  }

  if(scancode == GDK_KEY_Home) {
    gtk_text_buffer_place_cursor(textBuffer, &start);
    _seekToMark();
    return true;
  }

  if(scancode == GDK_KEY_End) {
    gtk_text_buffer_place_cursor(textBuffer, &end);
    _seekToMark();
    return true;
  }

  if(scancode == GDK_KEY_BackSpace) {
    if(gtk_text_iter_get_offset(&cursor) <= gtk_text_iter_get_offset(&start)) return true;
    GtkTextIter lhs = cursor;
    gtk_text_iter_set_offset(&lhs, gtk_text_iter_get_offset(&cursor) - 1);
    gtk_text_buffer_delete(textBuffer, &lhs, &cursor);
    _seekToMark();
    return true;
  }

  if(scancode == GDK_KEY_Delete) {
    if(gtk_text_iter_get_offset(&cursor) < gtk_text_iter_get_offset(&start)) return true;
    if(gtk_text_iter_get_offset(&cursor) == gtk_text_iter_get_offset(&end)) return true;
    GtkTextIter rhs = cursor;
    gtk_text_iter_set_offset(&rhs, gtk_text_iter_get_offset(&cursor) + 1);
    gtk_text_buffer_delete(textBuffer, &cursor, &rhs);
    _seekToMark();
    return true;
  }

  if(scancode >= 0x20 && scancode <= 0x7e) {
    if(gtk_text_iter_get_offset(&cursor) < gtk_text_iter_get_offset(&start)) return true;
    gtk_text_buffer_insert(textBuffer, &cursor, string{(char)scancode}, -1);
    _seekToMark();
    return true;
  }

  return false;
}

auto pConsole::_seekToEnd() -> void {
  GtkTextIter iter;
  gtk_text_buffer_get_end_iter(textBuffer, &iter);
  gtk_text_buffer_place_cursor(textBuffer, &iter);
  _seekToMark();
}

auto pConsole::_seekToMark() -> void {
  GtkTextMark* mark = gtk_text_buffer_get_mark(textBuffer, "insert");
  gtk_text_view_scroll_mark_onscreen(GTK_TEXT_VIEW(subWidget), mark);
}

}

#endif
