more stuff
This commit is contained in:
Eric Andersen
269
grep.c
269
grep.c
@ -23,187 +23,174 @@
|
||||
|
||||
|
||||
const char grep_usage[] =
|
||||
"Search the input file(s) for lines matching the given pattern.\n"
|
||||
"\tI search stdin if no files are given.\n"
|
||||
"\tI can't grok full regular expressions.\n"
|
||||
"usage: grep [in] PATTERN [FILES]...\n"
|
||||
"\ti=ignore case, n=list line numbers\n";
|
||||
"Search the input file(s) for lines matching the given pattern.\n"
|
||||
"\tI search stdin if no files are given.\n"
|
||||
"\tI can't grok full regular expressions.\n"
|
||||
"usage: grep [in] PATTERN [FILES]...\n"
|
||||
"\ti=ignore case, n=list line numbers\n";
|
||||
|
||||
|
||||
|
||||
static BOOL search
|
||||
(const char * string, const char * word, BOOL ignoreCase);
|
||||
static BOOL search (const char *string, const char *word, BOOL ignoreCase);
|
||||
|
||||
|
||||
extern int
|
||||
grep_main(int argc, char ** argv)
|
||||
extern int grep_main (int argc, char **argv)
|
||||
{
|
||||
FILE * fp;
|
||||
const char * word;
|
||||
const char * name;
|
||||
const char * cp;
|
||||
BOOL tellName;
|
||||
BOOL ignoreCase;
|
||||
BOOL tellLine;
|
||||
long line;
|
||||
char buf[BUF_SIZE];
|
||||
FILE *fp;
|
||||
const char *word;
|
||||
const char *name;
|
||||
const char *cp;
|
||||
BOOL tellName;
|
||||
BOOL ignoreCase;
|
||||
BOOL tellLine;
|
||||
long line;
|
||||
char buf[BUF_SIZE];
|
||||
|
||||
ignoreCase = FALSE;
|
||||
tellLine = FALSE;
|
||||
ignoreCase = FALSE;
|
||||
tellLine = FALSE;
|
||||
|
||||
argc--;
|
||||
argv++;
|
||||
if (argc < 1) {
|
||||
fprintf (stderr, "%s", grep_usage);
|
||||
return 1;
|
||||
}
|
||||
|
||||
if (**argv == '-') {
|
||||
argc--;
|
||||
argv++;
|
||||
if (argc < 1)
|
||||
{
|
||||
fprintf(stderr, "%s", grep_usage);
|
||||
cp = *argv++;
|
||||
|
||||
while (*++cp)
|
||||
switch (*cp) {
|
||||
case 'i':
|
||||
ignoreCase = TRUE;
|
||||
break;
|
||||
|
||||
case 'n':
|
||||
tellLine = TRUE;
|
||||
break;
|
||||
|
||||
default:
|
||||
fprintf (stderr, "Unknown option\n");
|
||||
return 1;
|
||||
}
|
||||
}
|
||||
|
||||
word = *argv++;
|
||||
argc--;
|
||||
|
||||
tellName = (argc > 1);
|
||||
|
||||
while (argc-- > 0) {
|
||||
name = *argv++;
|
||||
|
||||
fp = fopen (name, "r");
|
||||
|
||||
if (fp == NULL) {
|
||||
perror (name);
|
||||
|
||||
continue;
|
||||
}
|
||||
|
||||
if (**argv == '-')
|
||||
{
|
||||
argc--;
|
||||
cp = *argv++;
|
||||
line = 0;
|
||||
|
||||
while (*++cp) switch (*cp)
|
||||
{
|
||||
case 'i':
|
||||
ignoreCase = TRUE;
|
||||
break;
|
||||
while (fgets (buf, sizeof (buf), fp)) {
|
||||
line++;
|
||||
|
||||
case 'n':
|
||||
tellLine = TRUE;
|
||||
break;
|
||||
cp = &buf[strlen (buf) - 1];
|
||||
|
||||
default:
|
||||
fprintf(stderr, "Unknown option\n");
|
||||
return 1;
|
||||
}
|
||||
if (*cp != '\n')
|
||||
fprintf (stderr, "%s: Line too long\n", name);
|
||||
|
||||
if (search (buf, word, ignoreCase)) {
|
||||
if (tellName)
|
||||
printf ("%s: ", name);
|
||||
|
||||
if (tellLine)
|
||||
printf ("%ld: ", line);
|
||||
|
||||
fputs (buf, stdout);
|
||||
}
|
||||
}
|
||||
|
||||
word = *argv++;
|
||||
argc--;
|
||||
if (ferror (fp))
|
||||
perror (name);
|
||||
|
||||
tellName = (argc > 1);
|
||||
|
||||
while (argc-- > 0)
|
||||
{
|
||||
name = *argv++;
|
||||
|
||||
fp = fopen(name, "r");
|
||||
|
||||
if (fp == NULL)
|
||||
{
|
||||
perror(name);
|
||||
|
||||
continue;
|
||||
}
|
||||
|
||||
line = 0;
|
||||
|
||||
while (fgets(buf, sizeof(buf), fp))
|
||||
{
|
||||
line++;
|
||||
|
||||
cp = &buf[strlen(buf) - 1];
|
||||
|
||||
if (*cp != '\n')
|
||||
fprintf(stderr, "%s: Line too long\n", name);
|
||||
|
||||
if (search(buf, word, ignoreCase))
|
||||
{
|
||||
if (tellName)
|
||||
printf("%s: ", name);
|
||||
|
||||
if (tellLine)
|
||||
printf("%ld: ", line);
|
||||
|
||||
fputs(buf, stdout);
|
||||
}
|
||||
}
|
||||
|
||||
if (ferror(fp))
|
||||
perror(name);
|
||||
|
||||
fclose(fp);
|
||||
}
|
||||
return 0;
|
||||
fclose (fp);
|
||||
}
|
||||
return 0;
|
||||
}
|
||||
|
||||
|
||||
/*
|
||||
* See if the specified word is found in the specified string.
|
||||
*/
|
||||
static BOOL
|
||||
search(const char * string, const char * word, BOOL ignoreCase)
|
||||
static BOOL search (const char *string, const char *word, BOOL ignoreCase)
|
||||
{
|
||||
const char * cp1;
|
||||
const char * cp2;
|
||||
int len;
|
||||
int lowFirst;
|
||||
int ch1;
|
||||
int ch2;
|
||||
const char *cp1;
|
||||
const char *cp2;
|
||||
int len;
|
||||
int lowFirst;
|
||||
int ch1;
|
||||
int ch2;
|
||||
|
||||
len = strlen(word);
|
||||
len = strlen (word);
|
||||
|
||||
if (!ignoreCase)
|
||||
{
|
||||
while (TRUE)
|
||||
{
|
||||
string = strchr(string, word[0]);
|
||||
if (!ignoreCase) {
|
||||
while (TRUE) {
|
||||
string = strchr (string, word[0]);
|
||||
|
||||
if (string == NULL)
|
||||
return FALSE;
|
||||
if (string == NULL)
|
||||
return FALSE;
|
||||
|
||||
if (memcmp(string, word, len) == 0)
|
||||
return TRUE;
|
||||
if (memcmp (string, word, len) == 0)
|
||||
return TRUE;
|
||||
|
||||
string++;
|
||||
}
|
||||
string++;
|
||||
}
|
||||
}
|
||||
|
||||
/*
|
||||
* Here if we need to check case independence.
|
||||
* Do the search by lower casing both strings.
|
||||
*/
|
||||
lowFirst = *word;
|
||||
|
||||
if (isupper (lowFirst))
|
||||
lowFirst = tolower (lowFirst);
|
||||
|
||||
while (TRUE) {
|
||||
while (*string && (*string != lowFirst) &&
|
||||
(!isupper (*string) || (tolower (*string) != lowFirst))) {
|
||||
string++;
|
||||
}
|
||||
|
||||
/*
|
||||
* Here if we need to check case independence.
|
||||
* Do the search by lower casing both strings.
|
||||
*/
|
||||
lowFirst = *word;
|
||||
if (*string == '\0')
|
||||
return FALSE;
|
||||
|
||||
if (isupper(lowFirst))
|
||||
lowFirst = tolower(lowFirst);
|
||||
cp1 = string;
|
||||
cp2 = word;
|
||||
|
||||
while (TRUE)
|
||||
{
|
||||
while (*string && (*string != lowFirst) &&
|
||||
(!isupper(*string) || (tolower(*string) != lowFirst)))
|
||||
{
|
||||
string++;
|
||||
}
|
||||
do {
|
||||
if (*cp2 == '\0')
|
||||
return TRUE;
|
||||
|
||||
if (*string == '\0')
|
||||
return FALSE;
|
||||
ch1 = *cp1++;
|
||||
|
||||
cp1 = string;
|
||||
cp2 = word;
|
||||
if (isupper (ch1))
|
||||
ch1 = tolower (ch1);
|
||||
|
||||
do
|
||||
{
|
||||
if (*cp2 == '\0')
|
||||
return TRUE;
|
||||
ch2 = *cp2++;
|
||||
|
||||
ch1 = *cp1++;
|
||||
if (isupper (ch2))
|
||||
ch2 = tolower (ch2);
|
||||
|
||||
if (isupper(ch1))
|
||||
ch1 = tolower(ch1);
|
||||
|
||||
ch2 = *cp2++;
|
||||
|
||||
if (isupper(ch2))
|
||||
ch2 = tolower(ch2);
|
||||
|
||||
}
|
||||
while (ch1 == ch2);
|
||||
|
||||
string++;
|
||||
}
|
||||
while (ch1 == ch2);
|
||||
|
||||
string++;
|
||||
}
|
||||
return (TRUE);
|
||||
}
|
||||
|
||||
#endif
|
||||
|
||||
Reference in New Issue
Block a user