#include <sys/cdefs.h>
#ifndef lint
#if 0
static char sccsid[] = "@(#)filter.c 8.1 (Berkeley) 6/6/93";
#endif
__RCSID("$NetBSD: filter.c,v 1.4 1997/10/18 14:44:28 lukem Exp $");
#endif
#include <sys/types.h>
#include <pwd.h>
#include <unistd.h>
#include <stdio.h>
#include <ctype.h>
#include <stdlib.h>
#include <string.h>
#include "error.h"
#include "pathnames.h"
char *lint_libs[] = {
IG_FILE1,
IG_FILE2,
IG_FILE3,
IG_FILE4,
0
};
extern char* processname;
int lexsort __P((const void *, const void *));
int search_ignore __P((char *));
void
getignored(auxname)
char *auxname;
{
int i;
FILE *fyle;
char inbuffer[256];
int uid;
char filename[128];
char *username;
struct passwd *passwdentry;
nignored = 0;
if (auxname == 0){
if ( (username = (char *)getlogin()) == NULL){
username = "Unknown";
uid = getuid();
if ( (passwdentry = (struct passwd *)getpwuid(uid)) == NULL){
return;
}
} else {
if ( (passwdentry = (struct passwd *)getpwnam(username)) == NULL)
return;
}
strcpy(filename, passwdentry->pw_dir);
(void)strcat(filename, ERRORNAME);
} else
(void)strcpy(filename, auxname);
#ifdef FULLDEBUG
printf("Opening file \"%s\" to read names to ignore.\n",
filename);
#endif
if ( (fyle = fopen(filename, "r")) == NULL){
#ifdef FULLDEBUG
fprintf(stderr, "%s: Can't open file \"%s\"\n",
processname, filename);
#endif
return;
}
for (nignored = 0; fgets(inbuffer, 255, fyle) != NULL; nignored++)
continue;
names_ignored = (char **)Calloc(nignored+1, sizeof (char *));
fclose(fyle);
if (freopen(filename, "r", fyle) == NULL){
#ifdef FULLDEBUG
fprintf(stderr, "%s: Failure to open \"%s\" for second read.\n",
processname, filename);
#endif
nignored = 0;
return;
}
for (i=0; i < nignored && (fgets (inbuffer, 255, fyle) != NULL); i++){
names_ignored[i] = strsave(inbuffer);
(void)substitute(names_ignored[i], '\n', '\0');
}
qsort(names_ignored, nignored, sizeof *names_ignored, lexsort);
#ifdef FULLDEBUG
printf("Names to ignore follow.\n");
for (i=0; i < nignored; i++){
printf("\tIgnore: %s\n", names_ignored[i]);
}
#endif
}
int
lexsort(c1, c2)
const void *c1, *c2;
{
char **cpp1, **cpp2;
cpp1 = (char **)c1;
cpp2 = (char **)c2;
return(strcmp(*cpp1, *cpp2));
}
int
search_ignore(key)
char *key;
{
int ub, lb;
int halfway;
int order;
if (nignored == 0)
return(-1);
for(lb = 0, ub = nignored - 1; ub >= lb; ){
halfway = (ub + lb)/2;
if ( (order = strcmp(key, names_ignored[halfway])) == 0)
return(halfway);
if (order < 0)
ub = halfway - 1;
else
lb = halfway + 1;
}
return(-1);
}
Errorclass
discardit(errorp)
Eptr errorp;
{
int language;
int i;
Errorclass errorclass = errorp->error_e_class;
switch(errorclass){
case C_SYNC:
case C_NONSPEC:
case C_UNKNOWN: return(errorclass);
default: ;
}
if(errorp->error_lgtext < 2){
return(C_NONSPEC);
}
language = errorp->error_language;
if(language == INLINT){
if (errorclass != C_NONSPEC){
for(i=0; lint_libs[i] != 0; i++){
if (strcmp(errorp->error_text[0], lint_libs[i]) == 0){
return(C_DISCARD);
}
}
}
if (ispunct(lastchar(errorp->error_text[2])))
clob_last(errorp->error_text[2], '\0');
if (search_ignore(errorp->error_text[errorclass == C_NONSPEC ? 0 : 2]) >= 0){
return(C_NULLED);
}
}
return(errorclass);
}