/*

 * screen.c     -- UI stuff

 *

 * Copyright (C) 2005, 2006 Mikael Berthe <bmikael@lists.lilotux.net>

 * Parts of this file come from the Cabber project <cabber@ajmacias.com>

 *

 * This program is free software; you can redistribute it and/or modify

 * it under the terms of the GNU General Public License as published by

 * the Free Software Foundation; either version 2 of the License, or (at

 * your option) any later version.

 *

 * This program is distributed in the hope that it will be useful, but

 * WITHOUT ANY WARRANTY; without even the implied warranty of

 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU

 * General Public License for more details.

 *

 * You should have received a copy of the GNU General Public License

 * along with this program; if not, write to the Free Software

 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307

 * USA

 */

#include <stdio.h>

#include <stdlib.h>

#include <string.h>

#include <time.h>

#include <ctype.h>

#include <locale.h>

#include <langinfo.h>

#include <config.h>

#ifdef HAVE_ASPELL_H

# include <aspell.h>

#endif

#include "screen.h"

#include "utf8.h"

#include "hbuf.h"

#include "commands.h"

#include "compl.h"

#include "roster.h"

#include "histolog.h"

#include "settings.h"

#include "utils.h"

#define get_color(col)  (COLOR_PAIR(col)|COLOR_ATTRIB[col])

#define DEFAULT_LOG_WIN_HEIGHT (5+2)

#define DEFAULT_ROSTER_WIDTH    24

#define CHAT_WIN_HEIGHT (maxY-1-Log_Win_Height)

char *LocaleCharSet = "C";

static unsigned short int Log_Win_Height;

static unsigned short int Roster_Width;

static inline void check_offset(int);

static void scr_cancel_current_completion(void);

static void scr_end_current_completion(void);

static void scr_insert_text(const char*);

static void scr_handle_tab(void);

#ifdef HAVE_ASPELL_H

static void spellcheck(char *, char *);

static inline int is_alpha(const char *);

#endif

static GHashTable *winbufhash;

typedef struct {

  GList  *hbuf;

  GList  *top;     // If top is NULL, we'll display the last lines

  char    cleared; // For ex, user has issued a /clear command...

  char    lock;

} buffdata;

typedef struct {

  WINDOW *win;

  PANEL  *panel;

  buffdata *bd;

} winbuf;

struct dimensions {

  int l;

  int c;

};

static WINDOW *rosterWnd, *chatWnd, *activechatWnd, *inputWnd, *logWnd;

static WINDOW *mainstatusWnd, *chatstatusWnd;

static PANEL *rosterPanel, *chatPanel, *activechatPanel, *inputPanel;

static PANEL *mainstatusPanel, *chatstatusPanel;

static PANEL *logPanel;

static int maxY, maxX;

static int prev_chatwidth;

static winbuf *statusWindow;

static winbuf *currentWindow;

static GList  *statushbuf;

static int roster_hidden;

static int chatmode;

static int multimode;

static char *multiline, *multimode_subj;

int update_roster;

int utf8_mode = 0;

static bool Autoaway;

static bool Curses;

static bool log_win_on_top;

static bool roster_win_on_right;

static time_t LastActivity;

static char       inputLine[INPUTLINE_LENGTH+1];

#ifdef HAVE_ASPELL_H

static char       maskLine[INPUTLINE_LENGTH+1];

#endif

static char      *ptr_inputline;

static short int  inputline_offset;

static int    completion_started;

static GList *cmdhisto;

static GList *cmdhisto_cur;

static guint  cmdhisto_nblines;

static char   cmdhisto_backup[INPUTLINE_LENGTH+1];

static int    chatstate; /* (0=active, 1=composing, 2=paused) */

static bool   lock_chatstate;

static time_t chatstate_timestamp;

int chatstates_disabled;

#define MAX_KEYSEQ_LENGTH 8

typedef struct {

  char *seqstr;

  guint mkeycode;

  gint  value;

} keyseq;

GSList *keyseqlist;

static void add_keyseq(char *seqstr, guint mkeycode, gint value);

void scr_WriteInWindow(const char *winId, const char *text, time_t timestamp,

                       unsigned int prefix_flags, int force_show);

#ifdef HAVE_ASPELL_H

#define ASPELLBADCHAR 5

AspellConfig *spell_config;

AspellSpeller *spell_checker;

#endif

/* Functions */

static int FindColor(const char *name)

{

  if (!strcmp(name, "default"))

    return -1;

  if (!strcmp(name, "black"))

    return COLOR_BLACK;

  if (!strcmp(name, "red"))

    return COLOR_RED;

  if (!strcmp(name, "green"))

    return COLOR_GREEN;

  if (!strcmp(name, "yellow"))

    return COLOR_YELLOW;

  if (!strcmp(name, "blue"))

    return COLOR_BLUE;

  if (!strcmp(name, "magenta"))

    return COLOR_MAGENTA;

  if (!strcmp(name, "cyan"))

    return COLOR_CYAN;

  if (!strcmp(name, "white"))

    return COLOR_WHITE;

  scr_LogPrint(LPRINT_LOGNORM, "ERROR: Wrong color: %s", name);

  return -1;

}

static void ParseColors(void)

{

  const char *colors[] = {

    "", "",

    "general",

    "msgout",

    "status",

    "roster",

    "rostersel",

    "rosterselmsg",

    "rosternewmsg",

    NULL

  };

  const char *color;

  const char *background   = settings_opt_get("color_background");

  const char *backselected = settings_opt_get("color_bgrostersel");

  const char *backstatus   = settings_opt_get("color_bgstatus");

  char *tmp;

  int i;

  // Initialize color attributes

  memset(COLOR_ATTRIB, 0, sizeof(COLOR_ATTRIB));

  // Default values

  if (!background)   background   = "black";

  if (!backselected) backselected = "cyan";

  if (!backstatus)   backstatus   = "blue";

  for (i=0; colors[i]; i++) {

    tmp = g_strdup_printf("color_%s", colors[i]);

    color = settings_opt_get(tmp);

    g_free(tmp);

    if (color) {

      if (!strncmp(color, "bright", 6)) {

        COLOR_ATTRIB[i+1] = A_BOLD;

        color += 6;

      }

    }

    switch (i + 1) {

      case 1:

          init_pair(1, COLOR_BLACK, COLOR_WHITE);

          break;

      case 2:

          init_pair(2, COLOR_WHITE, COLOR_BLACK);

          break;

      case COLOR_GENERAL:

          init_pair(i+1, ((color) ? FindColor(color) : COLOR_WHITE),

                    FindColor(background));

          break;

      case COLOR_MSGOUT:

          init_pair(i+1, ((color) ? FindColor(color) : COLOR_CYAN),

                    FindColor(background));

          break;

      case COLOR_STATUS:

          init_pair(i+1, ((color) ? FindColor(color) : COLOR_WHITE),

                    FindColor(backstatus));

          break;

      case COLOR_ROSTER:

          init_pair(i+1, ((color) ? FindColor(color) : COLOR_GREEN),

                    FindColor(background));

          break;

      case COLOR_ROSTERSEL:

          init_pair(i+1, ((color) ? FindColor(color) : COLOR_BLUE),

                    FindColor(backselected));

          break;

      case COLOR_ROSTERSELNMSG:

          init_pair(i+1, ((color) ? FindColor(color) : COLOR_RED),

                    FindColor(backselected));

          break;

      case COLOR_ROSTERNMSG:

          init_pair(i+1, ((color) ? FindColor(color) : COLOR_RED),

                    FindColor(background));

          break;

    }

  }

}

static void init_keycodes(void)

{

  add_keyseq("O5A", MKEY_EQUIV, 521); // Ctrl-Up

  add_keyseq("O5B", MKEY_EQUIV, 514); // Ctrl-Down

  add_keyseq("O5C", MKEY_EQUIV, 518); // Ctrl-Right

  add_keyseq("O5D", MKEY_EQUIV, 516); // Ctrl-Left

  add_keyseq("O6A", MKEY_EQUIV, 520); // Shift-Up

  add_keyseq("O6B", MKEY_EQUIV, 513); // Shift-Down

  add_keyseq("O6C", MKEY_EQUIV, 402); // Shift-Right

  add_keyseq("O6D", MKEY_EQUIV, 393); // Shift-Left

  add_keyseq("O2A", MKEY_EQUIV, 520); // Shift-Up

  add_keyseq("O2B", MKEY_EQUIV, 513); // Shift-Down

  add_keyseq("O2C", MKEY_EQUIV, 402); // Shift-Right

  add_keyseq("O2D", MKEY_EQUIV, 393); // Shift-Left

  add_keyseq("[5^", MKEY_CTRL_PGUP, 0);   // Ctrl-PageUp

  add_keyseq("[6^", MKEY_CTRL_PGDOWN, 0); // Ctrl-PageDown

  add_keyseq("[5@", MKEY_CTRL_SHIFT_PGUP, 0);   // Ctrl-Shift-PageUp

  add_keyseq("[6@", MKEY_CTRL_SHIFT_PGDOWN, 0); // Ctrl-Shift-PageDown

  add_keyseq("[7@", MKEY_CTRL_SHIFT_HOME, 0); // Ctrl-Shift-Home

  add_keyseq("[8@", MKEY_CTRL_SHIFT_END, 0);  // Ctrl-Shift-End

  add_keyseq("[8^", MKEY_CTRL_END, 0);  // Ctrl-End

  add_keyseq("[7^", MKEY_CTRL_HOME, 0); // Ctrl-Home

  add_keyseq("[2^", MKEY_CTRL_INS, 0);  // Ctrl-Insert

  add_keyseq("[3^", MKEY_CTRL_DEL, 0);  // Ctrl-Delete

  // Xterm

  add_keyseq("[1;5A", MKEY_EQUIV, 521); // Ctrl-Up

  add_keyseq("[1;5B", MKEY_EQUIV, 514); // Ctrl-Down

  add_keyseq("[1;5C", MKEY_EQUIV, 518); // Ctrl-Right

  add_keyseq("[1;5D", MKEY_EQUIV, 516); // Ctrl-Left

  add_keyseq("[1;6A", MKEY_EQUIV, 520); // Ctrl-Shift-Up

  add_keyseq("[1;6B", MKEY_EQUIV, 513); // Ctrl-Shift-Down

  add_keyseq("[1;6C", MKEY_EQUIV, 402); // Ctrl-Shift-Right

  add_keyseq("[1;6D", MKEY_EQUIV, 393); // Ctrl-Shift-Left

  add_keyseq("[1;6H", MKEY_CTRL_SHIFT_HOME, 0); // Ctrl-Shift-Home

  add_keyseq("[1;6F", MKEY_CTRL_SHIFT_END, 0);  // Ctrl-Shift-End

  add_keyseq("[1;2A", MKEY_EQUIV, 521); // Shift-Up

  add_keyseq("[1;2B", MKEY_EQUIV, 514); // Shift-Down

  add_keyseq("[5;5~", MKEY_CTRL_PGUP, 0);   // Ctrl-PageUp

  add_keyseq("[6;5~", MKEY_CTRL_PGDOWN, 0); // Ctrl-PageDown

  add_keyseq("[1;5F", MKEY_CTRL_END, 0);  // Ctrl-End

  add_keyseq("[1;5H", MKEY_CTRL_HOME, 0); // Ctrl-Home

  add_keyseq("[2;5~", MKEY_CTRL_INS, 0);  // Ctrl-Insert

  add_keyseq("[3;5~", MKEY_CTRL_DEL, 0);  // Ctrl-Delete

  // PuTTY

  add_keyseq("[A", MKEY_EQUIV, 521); // Ctrl-Up

  add_keyseq("[B", MKEY_EQUIV, 514); // Ctrl-Down

  add_keyseq("[C", MKEY_EQUIV, 518); // Ctrl-Right

  add_keyseq("[D", MKEY_EQUIV, 516); // Ctrl-Left

  // screen

  add_keyseq("Oa", MKEY_EQUIV, 521); // Ctrl-Up

  add_keyseq("Ob", MKEY_EQUIV, 514); // Ctrl-Down

  add_keyseq("Oc", MKEY_EQUIV, 518); // Ctrl-Right

  add_keyseq("Od", MKEY_EQUIV, 516); // Ctrl-Left

  add_keyseq("[a", MKEY_EQUIV, 520); // Shift-Up

  add_keyseq("[b", MKEY_EQUIV, 513); // Shift-Down

  add_keyseq("[c", MKEY_EQUIV, 402); // Shift-Right

  add_keyseq("[d", MKEY_EQUIV, 393); // Shift-Left

  add_keyseq("[5$", MKEY_SHIFT_PGUP, 0);   // Shift-PageUp

  add_keyseq("[6$", MKEY_SHIFT_PGDOWN, 0); // Shift-PageDown

  // VT100

  add_keyseq("[H", MKEY_EQUIV, KEY_HOME); // Home

  add_keyseq("[F", MKEY_EQUIV, KEY_END);  // End

  // Konsole Linux

  add_keyseq("[1~", MKEY_EQUIV, KEY_HOME); // Home

  add_keyseq("[4~", MKEY_EQUIV, KEY_END);  // End

}

//  scr_init_bindings()

// Create default key bindings

// Return 0 if error and 1 if none

void scr_init_bindings(void)

{

  GString *sbuf = g_string_new("");

  // Common backspace key codes: 8, 127

  settings_set(SETTINGS_TYPE_BINDING, "8", "iline char_bdel");    // Ctrl-h

  settings_set(SETTINGS_TYPE_BINDING, "127", "iline char_bdel");

  g_string_printf(sbuf, "%d", KEY_BACKSPACE);

  settings_set(SETTINGS_TYPE_BINDING, sbuf->str, "iline char_bdel");

  g_string_printf(sbuf, "%d", KEY_DC);

  settings_set(SETTINGS_TYPE_BINDING, sbuf->str, "iline char_fdel");

  g_string_printf(sbuf, "%d", KEY_LEFT);

  settings_set(SETTINGS_TYPE_BINDING, sbuf->str, "iline bchar");

  g_string_printf(sbuf, "%d", KEY_RIGHT);

  settings_set(SETTINGS_TYPE_BINDING, sbuf->str, "iline fchar");

  settings_set(SETTINGS_TYPE_BINDING, "7", "iline compl_cancel"); // Ctrl-g

  g_string_printf(sbuf, "%d", KEY_UP);

  settings_set(SETTINGS_TYPE_BINDING, sbuf->str, "iline hist_prev");

  g_string_printf(sbuf, "%d", KEY_DOWN);

  settings_set(SETTINGS_TYPE_BINDING, sbuf->str, "iline hist_next");

  g_string_printf(sbuf, "%d", KEY_PPAGE);

  settings_set(SETTINGS_TYPE_BINDING, sbuf->str, "roster up");

  g_string_printf(sbuf, "%d", KEY_NPAGE);

  settings_set(SETTINGS_TYPE_BINDING, sbuf->str, "roster down");

  g_string_printf(sbuf, "%d", KEY_HOME);

  settings_set(SETTINGS_TYPE_BINDING, sbuf->str, "iline iline_start");

  settings_set(SETTINGS_TYPE_BINDING, "1", "iline iline_start");  // Ctrl-a

  g_string_printf(sbuf, "%d", KEY_END);

  settings_set(SETTINGS_TYPE_BINDING, sbuf->str, "iline iline_end");

  settings_set(SETTINGS_TYPE_BINDING, "5", "iline iline_end");    // Ctrl-e

  // Ctrl-o (accept-line-and-down-history):

  settings_set(SETTINGS_TYPE_BINDING, "15", "iline iline_accept_down_hist");

  settings_set(SETTINGS_TYPE_BINDING, "21", "iline iline_bdel");  // Ctrl-u

  g_string_printf(sbuf, "%d", KEY_EOL);

  settings_set(SETTINGS_TYPE_BINDING, sbuf->str, "iline iline_fdel");

  settings_set(SETTINGS_TYPE_BINDING, "11", "iline iline_fdel");  // Ctrl-k

  settings_set(SETTINGS_TYPE_BINDING, "16", "buffer up");         // Ctrl-p

  settings_set(SETTINGS_TYPE_BINDING, "14", "buffer down");       // Ctrl-n

  settings_set(SETTINGS_TYPE_BINDING, "20", "iline char_swap");   // Ctrl-t

  settings_set(SETTINGS_TYPE_BINDING, "23", "iline word_bdel");   // Ctrl-w

  settings_set(SETTINGS_TYPE_BINDING, "M98", "iline bword");      // Meta-b

  settings_set(SETTINGS_TYPE_BINDING, "M102", "iline fword");     // Meta-f

  // Ctrl-Left  (2 codes):

  settings_set(SETTINGS_TYPE_BINDING, "515", "iline bword");