151 lines
3.0 KiB
C
151 lines
3.0 KiB
C
/* This file is part of the program psim.
|
|
|
|
Copyright (C) 1994-1995, Andrew Cagney <cagney@highland.com.au>
|
|
|
|
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 "build-config.h"
|
|
|
|
#ifdef HAVE_STRING_H
|
|
#include <string.h>
|
|
#else
|
|
#ifdef HAVE_STRINGS_H
|
|
#include <strings.h>
|
|
#endif
|
|
#endif
|
|
|
|
#include "misc.h"
|
|
#include "filter.h"
|
|
|
|
struct _filter {
|
|
char *flag;
|
|
filter *next;
|
|
};
|
|
|
|
|
|
filter *
|
|
new_filter(const char *filt,
|
|
filter *filters)
|
|
{
|
|
while (strlen(filt) > 0) {
|
|
filter *new_filter;
|
|
/* break up the filt list */
|
|
char *end = strchr(filt, ',');
|
|
char *next;
|
|
int len;
|
|
if (end == NULL) {
|
|
end = strchr(filt, '\0');
|
|
next = end;
|
|
}
|
|
else {
|
|
next = end + 1;
|
|
}
|
|
len = end - filt;
|
|
/* add to filter list */
|
|
new_filter = ZALLOC(filter);
|
|
new_filter->flag = (char*)zalloc(len + 1);
|
|
strncpy(new_filter->flag, filt, len);
|
|
new_filter->next = filters;
|
|
filters = new_filter;
|
|
filt = next;
|
|
}
|
|
return filters;
|
|
}
|
|
|
|
|
|
int
|
|
is_filtered_out(const char *flags,
|
|
filter *filters)
|
|
{
|
|
while (strlen(flags) > 0) {
|
|
int present;
|
|
filter *filt = filters;
|
|
/* break the string up */
|
|
char *end = strchr(flags, ',');
|
|
char *next;
|
|
int len;
|
|
if (end == NULL) {
|
|
end = strchr(flags, '\0');
|
|
next = end;
|
|
}
|
|
else {
|
|
next = end + 1;
|
|
}
|
|
len = end - flags;
|
|
/* check that it is present */
|
|
present = 0;
|
|
filt = filters;
|
|
while (filt != NULL) {
|
|
if (strncmp(flags, filt->flag, len) == 0
|
|
&& strlen(filt->flag) == len) {
|
|
present = 1;
|
|
break;
|
|
}
|
|
filt = filt->next;
|
|
}
|
|
if (!present)
|
|
return 1;
|
|
flags = next;
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
|
|
int
|
|
it_is(const char *flag,
|
|
const char *flags)
|
|
{
|
|
int flag_len = strlen(flag);
|
|
while (*flags != '\0') {
|
|
if (!strncmp(flags, flag, flag_len)
|
|
&& (flags[flag_len] == ',' || flags[flag_len] == '\0'))
|
|
return 1;
|
|
while (*flags != ',') {
|
|
if (*flags == '\0')
|
|
return 0;
|
|
flags++;
|
|
}
|
|
flags++;
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
|
|
#ifdef MAIN
|
|
int
|
|
main(int argc, char **argv)
|
|
{
|
|
filter *filters = NULL;
|
|
int i;
|
|
if (argc < 2) {
|
|
printf("Usage: filter <flags> <filter> ...\n");
|
|
exit (1);
|
|
}
|
|
/* load the filter up */
|
|
for (i = 2; i < argc; i++)
|
|
filters = new_filter(argv[i], filters);
|
|
if (is_filtered_out(argv[1], filters))
|
|
printf("fail\n");
|
|
else
|
|
printf("pass\n");
|
|
return 0;
|
|
}
|
|
#endif
|