Apple-2gs-SW/hush
1
0
Fork 0
mirror of https://github.com/sheumann/hush.git synced 2024-12-22 14:30:31 +00:00
Code Issues Projects Releases Wiki Activity

tr: better comments, small code shrink

Browse Source 
function                                             old     new   delta
expand                                              2232    2230      -2
tr_main                                              677     655     -22
This commit is contained in:
Denis Vlasenko 2007-11-13 22:22:29 +00:00
parent a89d50fb9a
commit 3d461676a9
1 changed files with 60 additions and 47 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

107
coreutils/tr.c
View File

@ -42,19 +42,46 @@ static void map(char *pvector,
} }
/* supported constructs: /* supported constructs:
* Ranges, e.g., [0-9] ==> 0123456789 * Ranges, e.g., 0-9 ==> 0123456789
* Escapes, e.g., \a ==> Control-G * Ranges, e.g., [0-9] ==> 0123456789
* Character classes, e.g. [:upper:] ==> A ... Z * Escapes, e.g., \a ==> Control-G
* Character classes, e.g. [:upper:] ==> A...Z
* Equiv classess, e.g. [=A=] ==> A (hmmmmmmm?)
*/ */
static unsigned int expand(const char *arg, char *buffer) static unsigned int expand(const char *arg, char *buffer)
{ {
char *buffer_start = buffer; char *buffer_start = buffer;
unsigned i; /* XXX: FIXME: use unsigned char? */ unsigned i; /* can't be unsigned char: must be able to hold 256 */
unsigned char ac; unsigned char ac;
while (*arg) {
if (*arg == '\\') {
arg++;
*buffer++ = bb_process_escape_sequence(&arg);
continue;
}
if (arg[1] == '-') { /* "0-9..." */
ac = arg[2];
if (ac == '\0') { /* "0-": copy verbatim */
*buffer++ = *arg++; /* copy '0' */
continue; /* next iter will copy '-' and stop */
}
i = *arg;
while (i <= ac) /* ok: i is unsigned _int_ */
*buffer++ = i++;
arg += 3; /* skip 0-9 */
continue;
}
if (*arg == '[') { /* "[xyz..." */
arg++;
i = *arg++;
/* "[xyz...", i=x, arg points to y */
if (ENABLE_FEATURE_TR_CLASSES && i == ':') {
#define CLO ":]\0" #define CLO ":]\0"
static const char classes[] ALIGN1 = static const char classes[] ALIGN1 =
"alpha"CLO "alnum"CLO "digit"CLO "lower"CLO "upper"CLO "space"CLO "alpha"CLO "alnum"CLO "digit"CLO
"blank"CLO "punct"CLO "cntrl"CLO; "lower"CLO "upper"CLO "space"CLO
"blank"CLO "punct"CLO "cntrl"CLO;
#define CLASS_invalid 0 /* we increment the retval */ #define CLASS_invalid 0 /* we increment the retval */
#define CLASS_alpha 1 #define CLASS_alpha 1
#define CLASS_alnum 2 #define CLASS_alnum 2
@ -68,27 +95,9 @@ static unsigned int expand(const char *arg, char *buffer)
//#define CLASS_xdigit 10 //#define CLASS_xdigit 10
//#define CLASS_graph 11 //#define CLASS_graph 11
//#define CLASS_print 12 //#define CLASS_print 12
while (*arg) {
if (*arg == '\\') {
arg++;
*buffer++ = bb_process_escape_sequence(&arg);
} else if (*(arg+1) == '-') {
ac = *(arg+2);
if (ac == 0) {
*buffer++ = *arg++;
continue;
}
i = *arg;
while (i <= ac)
*buffer++ = i++;
arg += 3; /* Skip the assumed a-z */
} else if (*arg == '[') {
arg++;
i = *arg++;
if (ENABLE_FEATURE_TR_CLASSES && i == ':') {
smalluint j; smalluint j;
{ /* not really pretty.. */ { /* not really pretty.. */
char *tmp = xstrndup(arg, 7); // warning: xdigit needs 8, not 7 char *tmp = xstrndup(arg, 7); // warning: xdigit would need 8, not 7
j = index_in_strings(classes, tmp) + 1; j = index_in_strings(classes, tmp) + 1;
free(tmp); free(tmp);
} }
@ -115,10 +124,9 @@ static unsigned int expand(const char *arg, char *buffer)
*buffer++ = ' '; *buffer++ = ' ';
} }
if (j == CLASS_punct || j == CLASS_cntrl) { if (j == CLASS_punct || j == CLASS_cntrl) {
for (i = 0; i <= ASCII; i++) for (i = '\0'; i <= ASCII; i++)
if ((j == CLASS_punct && if ((j == CLASS_punct && isprint(i) && !isalnum(i) && !isspace(i))
isprint(i) && (!isalnum(i)) && (!isspace(i))) || || (j == CLASS_cntrl && iscntrl(i)))
(j == CLASS_cntrl && iscntrl(i)))
*buffer++ = i; *buffer++ = i;
} }
if (j == CLASS_invalid) { if (j == CLASS_invalid) {
@ -128,22 +136,26 @@ static unsigned int expand(const char *arg, char *buffer)
} }
break; break;
} }
if (ENABLE_FEATURE_TR_EQUIV && i == '=') { /* "[xyz...", i=x, arg points to y */
*buffer++ = *arg; if (ENABLE_FEATURE_TR_EQUIV && i == '=') { /* [=CHAR=] */
arg += 3; /* Skip the closing =] */ *buffer++ = *arg; /* copy CHAR */
arg += 3; /* skip CHAR=] */
continue; continue;
} }
if (*arg++ != '-') { if (*arg != '-') { /* not [x-...] - copy verbatim */
*buffer++ = '['; *buffer++ = '[';
arg -= 2; arg--; /* points to x */
continue; continue; /* copy all, including eventual ']' */
} }
/* [x-y...] */
arg++;
ac = *arg++; ac = *arg++;
while (i <= ac) while (i <= ac)
*buffer++ = i++; *buffer++ = i++;
arg++; /* Skip the assumed ']' */ arg++; /* skip the assumed ']' */
} else continue;
*buffer++ = *arg++; }
*buffer++ = *arg++;
} }
return (buffer - buffer_start); return (buffer - buffer_start);
} }
@ -154,7 +166,7 @@ static int complement(char *buffer, int buffer_len)
char conv[ASCII + 2]; char conv[ASCII + 2];
ix = 0; ix = 0;
for (i = 0; i <= ASCII; i++) { for (i = '\0'; i <= ASCII; i++) {
for (j = 0; j < buffer_len; j++) for (j = 0; j < buffer_len; j++)
if (buffer[j] == i) if (buffer[j] == i)
break; break;
@ -174,7 +186,9 @@ int tr_main(int argc, char **argv)
int i; int i;
smalluint flags = 0; smalluint flags = 0;
ssize_t read_chars = 0; ssize_t read_chars = 0;
size_t in_index = 0, out_index = 0, c, coded, last = -1; size_t in_index = 0, out_index = 0;
unsigned last = UCHAR_MAX + 1; /* not equal to any char */
unsigned char coded, c;
RESERVE_CONFIG_UBUFFER(output, BUFSIZ); RESERVE_CONFIG_UBUFFER(output, BUFSIZ);
RESERVE_CONFIG_BUFFER(vector, ASCII+1); RESERVE_CONFIG_BUFFER(vector, ASCII+1);
RESERVE_CONFIG_BUFFER(invec, ASCII+1); RESERVE_CONFIG_BUFFER(invec, ASCII+1);
@ -203,8 +217,8 @@ int tr_main(int argc, char **argv)
input_length = expand(argv[idx++], tr_buf); input_length = expand(argv[idx++], tr_buf);
if (flags & TR_OPT_complement) if (flags & TR_OPT_complement)
input_length = complement(tr_buf, input_length); input_length = complement(tr_buf, input_length);
if (argv[idx] != NULL) { if (argv[idx]) {
if (*argv[idx] == '\0') if (argv[idx][0] == '\0')
bb_error_msg_and_die("STRING2 cannot be empty"); bb_error_msg_and_die("STRING2 cannot be empty");
output_length = expand(argv[idx], output); output_length = expand(argv[idx], output);
map(vector, tr_buf, input_length, output, output_length); map(vector, tr_buf, input_length, output, output_length);
@ -222,9 +236,8 @@ int tr_main(int argc, char **argv)
xwrite(STDOUT_FILENO, (char *)output, out_index); xwrite(STDOUT_FILENO, (char *)output, out_index);
out_index = 0; out_index = 0;
} }
read_chars = read(STDIN_FILENO, tr_buf, BUFSIZ); read_chars = safe_read(STDIN_FILENO, tr_buf, BUFSIZ);
if (read_chars <= 0) { if (read_chars <= 0) {
xwrite(STDOUT_FILENO, (char *)output, out_index);
if (read_chars < 0) if (read_chars < 0)
bb_perror_msg_and_die(bb_msg_read_error); bb_perror_msg_and_die(bb_msg_read_error);
exit(EXIT_SUCCESS); exit(EXIT_SUCCESS);
@ -235,8 +248,8 @@ int tr_main(int argc, char **argv)
coded = vector[c]; coded = vector[c];
if ((flags & TR_OPT_delete) && invec[c]) if ((flags & TR_OPT_delete) && invec[c])
continue; continue;
if ((flags & TR_OPT_squeeze_reps) && last == coded && if ((flags & TR_OPT_squeeze_reps) && last == coded
(invec[c] || outvec[coded])) && (invec[c] || outvec[coded]))
continue; continue;
output[out_index++] = last = coded; output[out_index++] = last = coded;
} }