busybox/libbb/process_escape_sequence.c

96 lines
1.8 KiB
C
Raw Normal View History

/* vi: set sw=4 ts=4: */
/*
* Utility routines.
*
2003-03-19 14:43:01 +05:30
* Copyright (C) Manuel Novoa III <mjn3@codepoet.org>
* and Vladimir Oleynik <dzo@simtreas.ru>
*
* Licensed under GPLv2 or later, see file LICENSE in this tarball for details.
*/
#include "libbb.h"
2004-07-30 04:45:16 +05:30
#define WANT_HEX_ESCAPES 1
/* Usual "this only works for ascii compatible encodings" disclaimer. */
#undef _tolower
#define _tolower(X) ((X)|((char) 0x20))
char FAST_FUNC bb_process_escape_sequence(const char **ptr)
{
/* bash builtin "echo -e '\ec'" interprets \e as ESC,
* but coreutils "/bin/echo -e '\ec'" does not.
* manpages tend to support coreutils way. */
static const char charmap[] ALIGN1 = {
'a', 'b', /*'e',*/ 'f', 'n', 'r', 't', 'v', '\\', 0,
'\a', '\b', /*27,*/ '\f', '\n', '\r', '\t', '\v', '\\', '\\' };
2004-07-30 04:45:16 +05:30
const char *p;
const char *q;
unsigned num_digits;
unsigned r;
unsigned n;
unsigned d;
unsigned base;
2004-07-30 04:45:16 +05:30
num_digits = n = 0;
base = 8;
2004-07-26 17:36:19 +05:30
q = *ptr;
2004-07-26 16:58:47 +05:30
2004-07-30 04:45:16 +05:30
#ifdef WANT_HEX_ESCAPES
2004-07-26 17:41:32 +05:30
if (*q == 'x') {
++q;
2004-07-30 04:45:16 +05:30
base = 16;
++num_digits;
2004-07-26 17:41:32 +05:30
}
2004-07-30 04:45:16 +05:30
#endif
2004-07-26 17:41:32 +05:30
/* bash requires leading 0 in octal escapes:
* \02 works, \2 does not (prints \ and 2).
* We treat \2 as a valid octal escape sequence. */
2003-03-19 14:43:01 +05:30
do {
d = (unsigned char)(*q) - '0';
2004-07-30 04:45:16 +05:30
#ifdef WANT_HEX_ESCAPES
if (d >= 10) {
d = (unsigned char)(_tolower(*q)) - 'a' + 10;
2004-07-26 17:41:32 +05:30
}
2004-07-30 04:45:16 +05:30
#endif
if (d >= base) {
#ifdef WANT_HEX_ESCAPES
if ((base == 16) && (!--num_digits)) {
2006-01-25 05:38:53 +05:30
/* return '\\'; */
2004-07-30 04:45:16 +05:30
--q;
2003-03-19 14:43:01 +05:30
}
2004-07-30 04:45:16 +05:30
#endif
break;
}
2004-07-30 04:45:16 +05:30
r = n * base + d;
if (r > UCHAR_MAX) {
break;
}
n = r;
++q;
} while (++num_digits < 3);
if (num_digits == 0) { /* mnemonic escape sequence? */
2003-03-19 14:43:01 +05:30
p = charmap;
do {
if (*p == *q) {
q++;
break;
}
2003-03-19 14:43:01 +05:30
} while (*++p);
/* p points to found escape char or NUL,
* advance it and find what it translates to */
p += sizeof(charmap) / 2;
n = *p;
}
*ptr = q;
2004-07-30 04:45:16 +05:30
return (char) n;
}