enter.c

Go to the documentation of this file.

 
#include "config.h"
#include <stddef.h>
#include <wchar.h>
#include <wctype.h>
#include "mutt/lib.h"
#include "core/lib.h"
#include "enter.h"
#include "state.h"
 
#define COMB_CHAR(wc) (IsWPrint(wc) && (wcwidth(wc) == 0))
 
int editor_backspace(struct EnterState *es)
{
  if (!es || (es->curpos == 0))
    return FR_ERROR;
 
  size_t i = es->curpos;
  while ((i > 0) && COMB_CHAR(es->wbuf[i - 1]))
    i--;
  if (i > 0)
    i--;
  wmemmove(es->wbuf + i, es->wbuf + es->curpos, es->lastchar - es->curpos);
  es->lastchar -= es->curpos - i;
  es->curpos = i;
 
  return FR_SUCCESS;
}
 
int editor_backward_char(struct EnterState *es)
{
  if (!es || (es->curpos == 0))
    return FR_ERROR;
 
  while (es->curpos && COMB_CHAR(es->wbuf[es->curpos - 1]))
    es->curpos--;
  if (es->curpos)
    es->curpos--;
 
  return FR_SUCCESS;
}
 
int editor_backward_word(struct EnterState *es)
{
  if (!es || (es->curpos == 0))
    return FR_ERROR;
 
  while (es->curpos && iswspace(es->wbuf[es->curpos - 1]))
    es->curpos--;
  while (es->curpos && !iswspace(es->wbuf[es->curpos - 1]))
    es->curpos--;
 
  return FR_SUCCESS;
}
 
int editor_bol(struct EnterState *es)
{
  if (!es)
    return FR_ERROR;
 
  es->curpos = 0;
  return FR_SUCCESS;
}
 
int editor_case_word(struct EnterState *es, enum EnterCase ec)
{
  if (!es || (es->curpos == es->lastchar))
    return FR_ERROR;
 
  while ((es->curpos < es->lastchar) && iswspace(es->wbuf[es->curpos]))
  {
    es->curpos++;
  }
  while ((es->curpos < es->lastchar) && !iswspace(es->wbuf[es->curpos]))
  {
    if (ec == EC_DOWNCASE)
    {
      es->wbuf[es->curpos] = towlower(es->wbuf[es->curpos]);
    }
    else
    {
      es->wbuf[es->curpos] = towupper(es->wbuf[es->curpos]);
      if (ec == EC_CAPITALIZE)
        ec = EC_DOWNCASE;
    }
    es->curpos++;
  }
  return FR_SUCCESS;
}
 
int editor_delete_char(struct EnterState *es)
{
  if (!es || (es->curpos == es->lastchar))
    return FR_ERROR;
 
  size_t i = es->curpos;
  if (i < es->lastchar)
    i++;
  while ((i < es->lastchar) && COMB_CHAR(es->wbuf[i]))
    i++;
  wmemmove(es->wbuf + es->curpos, es->wbuf + i, es->lastchar - i);
  es->lastchar -= i - es->curpos;
 
  return FR_SUCCESS;
}
 
int editor_eol(struct EnterState *es)
{
  if (!es)
    return FR_ERROR;
 
  es->curpos = es->lastchar;
  return FR_SUCCESS;
}
 
int editor_forward_char(struct EnterState *es)
{
  if (!es || (es->curpos == es->lastchar))
    return FR_ERROR;
 
  es->curpos++;
  while ((es->curpos < es->lastchar) && COMB_CHAR(es->wbuf[es->curpos]))
  {
    es->curpos++;
  }
 
  return FR_SUCCESS;
}
 
int editor_forward_word(struct EnterState *es)
{
  if (!es || (es->curpos == es->lastchar))
    return FR_ERROR;
 
  while ((es->curpos < es->lastchar) && iswspace(es->wbuf[es->curpos]))
  {
    es->curpos++;
  }
  while ((es->curpos < es->lastchar) && !iswspace(es->wbuf[es->curpos]))
  {
    es->curpos++;
  }
 
  return FR_SUCCESS;
}
 
int editor_kill_eol(struct EnterState *es)
{
  if (!es)
    return FR_ERROR;
 
  es->lastchar = es->curpos;
  return FR_SUCCESS;
}
 
int editor_kill_eow(struct EnterState *es)
{
  if (!es)
    return FR_ERROR;
 
  /* first skip over whitespace */
  size_t i;
  for (i = es->curpos; (i < es->lastchar) && iswspace(es->wbuf[i]); i++)
  {
    // do nothing
  }
 
  /* if there are any characters left.. */
  if (i < es->lastchar)
  {
    /* if the current character is alphanumeric.. */
    if (iswalnum(es->wbuf[i]))
    {
      /* skip over the rest of the word consistent of only alphanumerics */
      for (; (i < es->lastchar) && iswalnum(es->wbuf[i]); i++)
        ; // do nothing
    }
    else
    {
      i++; // skip over one non-alphanumeric character
    }
  }
 
  wmemmove(es->wbuf + es->curpos, es->wbuf + i, es->lastchar - i);
  es->lastchar += es->curpos - i;
  return FR_SUCCESS;
}
 
int editor_kill_line(struct EnterState *es)
{
  if (!es)
    return FR_ERROR;
 
  size_t len = es->lastchar - es->curpos;
 
  wmemmove(es->wbuf, es->wbuf + es->curpos, len);
 
  es->lastchar = len;
  es->curpos = 0;
 
  return FR_SUCCESS;
}
 
int editor_kill_whole_line(struct EnterState *es)
{
  if (!es)
    return FR_ERROR;
 
  es->lastchar = 0;
  es->curpos = 0;
 
  return FR_SUCCESS;
}
 
int editor_kill_word(struct EnterState *es)
{
  if (!es || (es->curpos == 0))
    return FR_ERROR;
 
  size_t i = es->curpos;
  while (i && iswspace(es->wbuf[i - 1]))
    i--;
  if (i > 0)
  {
    if (iswalnum(es->wbuf[i - 1]))
    {
      for (--i; (i > 0) && iswalnum(es->wbuf[i - 1]); i--)
        ; // do nothing
    }
    else
    {
      i--;
    }
  }
  wmemmove(es->wbuf + i, es->wbuf + es->curpos, es->lastchar - es->curpos);
  es->lastchar += i - es->curpos;
  es->curpos = i;
 
  return FR_SUCCESS;
}
 
int editor_transpose_chars(struct EnterState *es)
{
  if (!es || (es->lastchar < 2))
    return FR_ERROR;
 
  if (es->curpos == 0)
    es->curpos = 2;
  else if (es->curpos < es->lastchar)
    es->curpos++;
 
  wchar_t wc = es->wbuf[es->curpos - 2];
  es->wbuf[es->curpos - 2] = es->wbuf[es->curpos - 1];
  es->wbuf[es->curpos - 1] = wc;
 
  return FR_SUCCESS;
}
 
// -----------------------------------------------------------------------------
 
bool editor_buffer_is_empty(struct EnterState *es)
{
  if (!es)
    return true;
 
  return (es->lastchar == 0);
}