keymap.c

Go to the documentation of this file.

 
#include "config.h"
#include <ctype.h>
#include <limits.h>
#include <stdbool.h>
#include <stdlib.h>
#include <string.h>
#include "mutt/lib.h"
#include "gui/lib.h"
#include "keymap.h"

static struct Mapping KeyNames[] = {
  // clang-format off
  { "<PageUp>",      KEY_PPAGE },
  { "<PageDown>",    KEY_NPAGE },
  { "<Up>",          KEY_UP },
  { "<Down>",        KEY_DOWN },
  { "<Right>",       KEY_RIGHT },
  { "<Left>",        KEY_LEFT },
  { "<Delete>",      KEY_DC },
  { "<BackSpace>",   KEY_BACKSPACE },
  { "<Insert>",      KEY_IC },
  { "<Home>",        KEY_HOME },
  { "<End>",         KEY_END },
  { "<Enter>",       '\n' },
  { "<Return>",      '\r' },
#ifdef KEY_ENTER
  { "<KeypadEnter>", KEY_ENTER },
#else
  { "<KeypadEnter>", '\n' },
#endif
  { "<Esc>",         '\033' }, // Escape
  { "<Tab>",         '\t' },
  { "<Space>",       ' ' },
  { "<Hash>",        '#' },
  { "<Semicolon>",   ';' },
  { "<DoubleQuote>", '"' },
  { "<Quote>",       '\'' },
  { "<Backslash>",   '\\' },
  { "<Backtick>",    '`' },
  { "<Dollar>",      '$' },
  { "<Less>",        '<' },
  { "<Greater>",     '>' },
#ifdef KEY_BTAB
  { "<BackTab>",     KEY_BTAB },
#endif
#ifdef KEY_NEXT
  { "<Next>",        KEY_NEXT },
#endif
  /* extensions supported by ncurses.  values are filled in during initialization */
 
  /* CTRL+key */
  { "<C-Up>",    -1 },
  { "<C-Down>",  -1 },
  { "<C-Left>",  -1 },
  { "<C-Right>", -1 },
  { "<C-Home>",  -1 },
  { "<C-End>",   -1 },
  { "<C-Next>",  -1 },
  { "<C-Prev>",  -1 },
 
  /* SHIFT+key */
  { "<S-Up>",    -1 },
  { "<S-Down>",  -1 },
  { "<S-Left>",  -1 },
  { "<S-Right>", -1 },
  { "<S-Home>",  -1 },
  { "<S-End>",   -1 },
  { "<S-Next>",  -1 },
  { "<S-Prev>",  -1 },
 
  /* ALT+key */
  { "<A-Up>",    -1 },
  { "<A-Down>",  -1 },
  { "<A-Left>",  -1 },
  { "<A-Right>", -1 },
  { "<A-Home>",  -1 },
  { "<A-End>",   -1 },
  { "<A-Next>",  -1 },
  { "<A-Prev>",  -1 },
  { NULL, 0 },
  // clang-format on
};

struct Mapping *keymap_get_key_names(void)
{
  return KeyNames;
}

struct Keymap *keymap_alloc(size_t len, keycode_t *keys)
{
  struct Keymap *km = MUTT_MEM_CALLOC(1, struct Keymap);
 
  km->len = len;
  km->keys = MUTT_MEM_CALLOC(len, keycode_t);
  memcpy(km->keys, keys, len * sizeof(keycode_t));
 
  return km;
}

void keymap_free(struct Keymap **pptr)
{
  if (!pptr || !*pptr)
    return;
 
  struct Keymap *km = *pptr;
  FREE(&km->macro);
  FREE(&km->desc);
  FREE(&km->keys);
 
  FREE(pptr);
}

void keymaplist_free(struct KeymapList *kml)
{
  struct Keymap *km = NULL;
  struct Keymap *km_tmp = NULL;
  STAILQ_FOREACH_SAFE(km, kml, entries, km_tmp)
  {
    STAILQ_REMOVE(kml, km, Keymap, entries);
    keymap_free(&km);
  }
}

struct Keymap *keymap_compare(struct Keymap *km1, struct Keymap *km2, size_t *pos)
{
  *pos = 0;
 
  while ((*pos < km1->len) && (*pos < km2->len))
  {
    if (km1->keys[*pos] < km2->keys[*pos])
      return km2;
 
    if (km1->keys[*pos] > km2->keys[*pos])
      return km1;
 
    *pos = *pos + 1;
  }
 
  return NULL;
}

void keymap_get_name(int c, struct Buffer *buf)
{
  const char *name = mutt_map_get_name(c, KeyNames);
  if (name)
  {
    buf_addstr(buf, name);
    return;
  }
 
  if ((c < 256) && (c > -128) && iscntrl((unsigned char) c))
  {
    if (c < 0)
      c += 256;
 
    if (c < 128)
    {
      buf_addch(buf, '^');
      buf_addch(buf, (c + '@') & 0x7f);
    }
    else
    {
      buf_add_printf(buf, "\\%d%d%d", c >> 6, (c >> 3) & 7, c & 7);
    }
  }
  else if ((c >= KEY_F0) && (c < KEY_F(256))) /* this maximum is just a guess */
  {
    buf_add_printf(buf, "<F%d>", c - KEY_F0);
  }
  else if ((c < 256) && (c >= -128) && IsPrint(c))
  {
    buf_add_printf(buf, "%c", (unsigned char) c);
  }
  else
  {
    buf_add_printf(buf, "<%ho>", (unsigned short) c);
  }
}

bool keymap_expand_key(struct Keymap *km, struct Buffer *buf)
{
  if (!km || !buf)
    return false;
 
  for (int i = 0; i < km->len; i++)
  {
    keymap_get_name(km->keys[i], buf);
  }
 
  return true;
}

void keymap_expand_string(const char *str, struct Buffer *buf)
{
  if (!str)
    return;
 
  for (; *str; str++)
  {
    keymap_get_name(*str, buf);
  }
}

int parse_fkey(char *str)
{
  char *t = NULL;
  int n = 0;
 
  if ((str[0] != '<') || (mutt_tolower(str[1]) != 'f'))
    return -1;
 
  for (t = str + 2; *t && mutt_isdigit(*t); t++)
  {
    n *= 10;
    n += *t - '0';
  }
 
  if (*t != '>')
    return -1;
  return n;
}

int parse_keycode(const char *str)
{
  char *end_char = NULL;
  long int result = strtol(str + 1, &end_char, 8);
 
  /* allow trailing whitespace, eg.  < 1001 > */
  while (mutt_isspace(*end_char))
    end_char++;
 
  /* negative keycodes don't make sense, also detect overflow */
  if ((*end_char != '>') || (result < 0) || (result == LONG_MAX))
  {
    return -1;
  }
 
  return result;
}

size_t parse_keys(const char *str, keycode_t *d, size_t max)
{
  int n;
  size_t len = max;
  char buf[128] = { 0 };
  char c;
  char *t = NULL;
 
  mutt_str_copy(buf, str, sizeof(buf));
  char *s = buf;
 
  while (*s && len)
  {
    *d = '\0';
    if ((*s == '<') && (t = strchr(s, '>')))
    {
      t++;
      c = *t;
      *t = '\0';
 
      n = mutt_map_get_value(s, KeyNames);
      if (n != -1)
      {
        s = t;
        *d = n;
      }
      else if ((n = parse_fkey(s)) > 0)
      {
        s = t;
        *d = KEY_F(n);
      }
      else if ((n = parse_keycode(s)) > 0)
      {
        s = t;
        *d = n;
      }
 
      *t = c;
    }
 
    if (!*d)
    {
      *d = (unsigned char) *s;
      s++;
    }
    d++;
    len--;
  }
 
  return max - len;
}