hush/libbb/process_escape_sequence.c

113 lines
2.2 KiB
C
Raw Normal View History

/* vi: set sw=4 ts=4: */
/*
* Utility routines.
*
2003-03-19 09:13:01 +00:00
* Copyright (C) Manuel Novoa III <mjn3@codepoet.org>
* and Vladimir Oleynik <dzo@simtreas.ru>
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; either version 2 of the License, or
* (at your option) any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program; if not, write to the Free Software
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
*
*
*/
#include <stdio.h>
#include <limits.h>
2004-07-26 12:11:32 +00:00
#include <ctype.h>
#include "libbb.h"
2004-07-29 23:15:16 +00:00
#define WANT_HEX_ESCAPES 1
/* Usual "this only works for ascii compatible encodings" disclaimer. */
#undef _tolower
#define _tolower(X) ((X)|((char) 0x20))
2003-03-19 09:13:01 +00:00
char bb_process_escape_sequence(const char **ptr)
{
static const char charmap[] = {
'a', 'b', 'f', 'n', 'r', 't', 'v', '\\', 0,
'\a', '\b', '\f', '\n', '\r', '\t', '\v', '\\', '\\' };
2004-07-29 23:15:16 +00:00
const char *p;
const char *q;
unsigned int num_digits;
unsigned int r;
unsigned int n;
unsigned int d;
unsigned int base;
num_digits = n = 0;
base = 8;
2004-07-26 12:06:19 +00:00
q = *ptr;
2004-07-26 11:28:47 +00:00
2004-07-29 23:15:16 +00:00
#ifdef WANT_HEX_ESCAPES
2004-07-26 12:11:32 +00:00
if (*q == 'x') {
++q;
2004-07-29 23:15:16 +00:00
base = 16;
++num_digits;
2004-07-26 12:11:32 +00:00
}
2004-07-29 23:15:16 +00:00
#endif
2004-07-26 12:11:32 +00:00
2003-03-19 09:13:01 +00:00
do {
2004-07-29 23:15:16 +00:00
d = (unsigned int)(*q - '0');
#ifdef WANT_HEX_ESCAPES
if (d >= 10) {
d = ((unsigned int)(_tolower(*q) - 'a')) + 10;
2004-07-26 12:11:32 +00:00
}
2004-07-29 23:15:16 +00:00
#endif
if (d >= base) {
#ifdef WANT_HEX_ESCAPES
if ((base == 16) && (!--num_digits)) {
/* return '\\'; */
--q;
2003-03-19 09:13:01 +00:00
}
2004-07-29 23:15:16 +00:00
#endif
break;
}
2004-07-29 23:15:16 +00:00
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 09:13:01 +00:00
p = charmap;
do {
if (*p == *q) {
q++;
break;
}
2003-03-19 09:13:01 +00:00
} while (*++p);
n = *(p+(sizeof(charmap)/2));
}
*ptr = q;
2004-07-29 23:15:16 +00:00
return (char) n;
}
/* END CODE */
/*
Local Variables:
c-file-style: "linux"
c-basic-offset: 4
tab-width: 4
End:
*/