EMILE/libui/edit.c

127 lines
2.0 KiB
C
Raw Permalink Blame History

This file contains invisible Unicode characters

This file contains invisible Unicode characters that are indistinguishable to humans but may be processed differently by a computer. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

/*
*
* (c) 2005-2007 Laurent Vivier <Laurent@Vivier.EU>
*
*/
#define __NO_INLINE__ /* to avoid inline putchar() */
#include <stdio.h>
#include <malloc.h>
#include <string.h>
#include <sys/types.h>
#include "libui.h"
#define LEFT_ARROW() if (pos > 0) \
{ \
putchar('\b'); \
pos--; \
}
#define RIGHT_ARROW() if (pos < l) \
{ \
putchar(buf[pos]);\
pos++; \
}
#define DELETE() if (pos < l) \
{ \
strcpy(buf + pos, buf + pos + 1);\
l--; \
console_cursor_save(); \
printf("%s", buf + pos); \
putchar(' '); \
console_cursor_restore(); \
}
void emile_edit(char *line, int length)
{
int l = strlen(line);
int pos = l;
int c;
int i;
int saved_wait = wait_char;
char *buf;
buf = malloc(length);
memcpy(buf, line, length);
console_cursor_off();
printf("%s", buf);
console_cursor_on();
wait_char = 1;
while (1)
{
console_keypressed(0);
c = console_getchar();
if (c == '\r')
{
strcpy(line, buf);
break;
}
retry:
if ( (c > 0x1f) && (c < 0x7f) && (l < length - 1) )
{
for (i = l; i > pos; i--)
buf[i] = buf[i - 1];
buf[pos] = c;
putchar(c);
pos++;
l++;
console_cursor_save();
printf("%s", buf + pos);
console_cursor_restore();
}
else switch(c)
{
case '':
c = console_getchar();
if ( c != '[' )
goto exit;
c = console_getchar();
switch(c)
{
case 'D':
LEFT_ARROW();
break;
case 'C':
RIGHT_ARROW();
break;
case '3':
if (console_getchar() == '~')
DELETE();
break;
default:
goto retry;
}
break;
case '':
LEFT_ARROW();
break;
case '':
RIGHT_ARROW();
break;
case '\b': /* backspace */
if (pos > 0)
{
putchar('\b');
pos--;
l--;
strcpy(buf + pos, buf + pos + 1);
console_cursor_save();
printf("%s", buf + pos);
putchar(' ');
console_cursor_restore();
}
break;
case 0x7f: /* Delete */
DELETE();
break;
}
}
exit:
wait_char = saved_wait;
free(buf);
}