73 lines
1.1 KiB
C
73 lines
1.1 KiB
C
/*
|
|
** TRIM.C - Remove leading, trailing, & excess embedded spaces
|
|
**
|
|
** public domain by Bob Stout
|
|
*/
|
|
|
|
#include <ctype.h>
|
|
#include <string.h>
|
|
|
|
#define NUL '\0'
|
|
|
|
char *trim(char *str)
|
|
{
|
|
char *ibuf = str, *obuf = str;
|
|
int i = 0, cnt = 0;
|
|
|
|
/*
|
|
** Trap NULL
|
|
*/
|
|
|
|
if (str) {
|
|
/*
|
|
** Remove leading spaces (from RMLEAD.C)
|
|
*/
|
|
|
|
for (ibuf = str; *ibuf && isspace(*ibuf); ++ibuf);
|
|
if (str != ibuf)
|
|
memmove(str, ibuf, ibuf - str);
|
|
|
|
/*
|
|
** Collapse embedded spaces (from LV1WS.C)
|
|
*/
|
|
|
|
while (*ibuf) {
|
|
if (isspace(*ibuf) && cnt)
|
|
ibuf++;
|
|
else {
|
|
if (!isspace(*ibuf))
|
|
cnt = 0;
|
|
else {
|
|
*ibuf = ' ';
|
|
cnt = 1;
|
|
}
|
|
obuf[i++] = *ibuf++;
|
|
}
|
|
}
|
|
obuf[i] = NUL;
|
|
|
|
/*
|
|
** Remove trailing spaces (from RMTRAIL.C)
|
|
*/
|
|
|
|
while (--i >= 0) {
|
|
if (!isspace(obuf[i]))
|
|
break;
|
|
}
|
|
obuf[++i] = NUL;
|
|
}
|
|
return str;
|
|
}
|
|
|
|
#ifdef TEST
|
|
|
|
#include <stdio.h>
|
|
|
|
main(int argc, char *argv[])
|
|
{
|
|
printf("trim(\"%s\") ", argv[1]);
|
|
printf("returned \"%s\"\n", trim(argv[1]));
|
|
}
|
|
|
|
#endif /* TEST */
|