mirror of
https://github.com/vivier/EMILE.git
synced 2024-09-08 04:54:25 +00:00
111 lines
1.8 KiB
C
111 lines
1.8 KiB
C
/*
|
||
*
|
||
* (c) 2005 Laurent Vivier <LaurentVivier@wanadoo.fr>
|
||
*
|
||
*/
|
||
|
||
#define __NO_INLINE__ /* to avoid inline putchar() */
|
||
#include <stdio.h>
|
||
#include <string.h>
|
||
|
||
#include "console.h"
|
||
|
||
#define LEFT_ARROW() if (pos > 0) \
|
||
{ \
|
||
putchar('\b'); \
|
||
pos--; \
|
||
}
|
||
|
||
#define RIGHT_ARROW() if (pos < l) \
|
||
{ \
|
||
putchar(s[pos]);\
|
||
pos++; \
|
||
}
|
||
|
||
#define DELETE() if (pos < l) \
|
||
{ \
|
||
strcpy(s + pos, s + pos + 1); \
|
||
l--; \
|
||
console_cursor_save(); \
|
||
printf("%s", s + pos); \
|
||
putchar(' '); \
|
||
console_cursor_restore(); \
|
||
}
|
||
|
||
void cli_edit(char *s, int length)
|
||
{
|
||
int l = strlen(s);
|
||
int pos = l;
|
||
int c;
|
||
int i;
|
||
|
||
console_cursor_off();
|
||
printf("%s", s);
|
||
console_cursor_on();
|
||
|
||
while ((c = console_getchar()) != '\r')
|
||
{
|
||
retry:
|
||
if (c == 0)
|
||
continue;
|
||
if ( (c > 0x1f) && (c < 0x7f) && (l < length - 1) )
|
||
{
|
||
for (i = l; i > pos; i--)
|
||
s[i] = s[i - 1];
|
||
s[pos] = c;
|
||
putchar(c);
|
||
pos++;
|
||
l++;
|
||
console_cursor_save();
|
||
printf("%s", s + pos);
|
||
console_cursor_restore();
|
||
}
|
||
else switch(c)
|
||
{
|
||
case '':
|
||
while ((c = console_getchar()) == 0);
|
||
if ( c != '[' )
|
||
goto retry;
|
||
while ((c = console_getchar()) == 0);
|
||
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(s + pos, s + pos + 1);
|
||
console_cursor_save();
|
||
printf("%s", s + pos);
|
||
putchar(' ');
|
||
console_cursor_restore();
|
||
}
|
||
break;
|
||
case 0x7f: /* Delete */
|
||
DELETE();
|
||
break;
|
||
}
|
||
}
|
||
}
|