Creating a Vulgar Word List

[wscreate]

I am using IMAP to parse POP email. I parse the From address, BODY and Subject.

I want to create a vulgar word list so that if the Subject or Body contains any words from the vulgar list, then the email will be deleted (Good for defeating spam).

Can someone point me in the right direction as far as the function I am seeking.

Thanks.

[wscreate]

preg_match looks like a good candidate. But, what about a list of multiple words?

Ex. Searches for one bad word....

// The Badword to search for
$BADWORD = "Microsoft";

if (preg_match ("$BADWORD", "$SUBJECT")) {
print "$BADWORD is in the subject";
} else {
print "$BADWORD is NOT in the subject.";

}

This seems to work, but how do I get this to roam through an entire list of separate badwords? Should I used iteration or put this in an array?

Thanks.

[thecookie]

Loop trough an array?

[jayant]

you can get what u want to achieve from:

function check_words($Message) {
######################################################################
# Filters Options
#
# $CensorList:	List of bad word to be replaced on Comments
# $CensorMode:  	0 = No Filtering (leave the bad words)
# 			1 = Exact Match
#			2 = Match Word at the Begining
#			3 = Match String Anywhere in the Text
# $CensorReplace:	String to replace bad words
######################################################################

$CensorList = array("badword1",
		    "badword2",
		    "badword3",
		    "badword4",
		    "badword5",
		    "badword6",
		    "badword7",
		    "badword8",
		    "badword9",
		    "badword10",
		    "badword11",
		    "badword12");
$CensorMode = 1;
$CensorReplace = "*****";

$EditedMessage = $Message;
if ($CensorMode != 0) {

if (is_array($CensorList)) {
    $Replace = $CensorReplace;
    if ($CensorMode == 1) {
	for ($i = 0; $i < count($CensorList); $i++) {
	    $EditedMessage = eregi_replace("$CensorList[$i]([^a-zA-Z0-9])","$Replace\\1",$EditedMessage);
	}
    } elseif ($CensorMode == 2) {
	for ($i = 0; $i < count($CensorList); $i++) {
	    $EditedMessage = eregi_replace("(^|[^[:alnum:]])$CensorList[$i]","\\1$Replace",$EditedMessage);
	}
    } elseif ($CensorMode == 3) {
	for ($i = 0; $i < count($CensorList); $i++) {
	    $EditedMessage = eregi_replace("$CensorList[$i]","$Replace",$EditedMessage);
	}
    }
}
}
return ($EditedMessage);
}

[Psyche]

Here is a function I use for replacing bad words in a shoutbox:

function BadWords($txt)
{
	$badword["word1"] = "%@#@";
	$badword["word1"] = "$@#^#";
	$badword["word1"] = "*^#@#!";
	$badword["word1"] = "!@#$%";

while(list($text, $image) = each($badword))
{
	$txt = str_replace("$text", "$image", "$txt");
}

return $txt;
}

Hope it helps

[jayant]

the above code will simply replace the set of censored words and return that. if you wish to know whether the function there was any word that was banned, you can use:

return ($editedMessage!=$Message);
instead of existing return statement

this will return true if message had any bad word, and false if the message was clean.

[wscreate]

Those are great examples. Thanks for the help.

Turns out, I have found that "preg_match" helps me do what I need to do. If there is a match (A badword in the subject of the email), then processing does not continue and the email is discarded.

====== my code =========
// Create list of bad words, separated by "|" and assign to variable.
// No preceding or trailing "|".

$BADWORD = "badword1|badword2|badword3|badword4|badword5|badword6";

// Use "preg_match" to search for any instance of badwords or
// phrase in the subject of the email (Variable $SUBJECT).
if (preg_match ("/$BADWORD/", "$SUBJECT")) {
print "$BADWORD is in the subject"; // Stop parsing email, and delete it
imap_delete ($inbox, 1);
imap_expunge ($inbox);
imap_close ($inbox);
} else {
print "$BADWORD is NOT in the subject"; // O.K. to proceed
include("inc.e.email-afteremailticket.php"); // insert email into DB
}
====== end my code =======

It feels a little clumsy, but it works very well.

Thanks again.