Support Forum

function userCheck($uname, $email, $agreetoterms, $bio)
{
    $dbconn =& pnDBGetConn(true);
    $pntable =& pnDBGetTables();

    $stop = '';

    // check for valid email
    $res = pnVarValidate($email, 'email');
    if ($res == false) {
        $stop = _ERRORINVEMAIL;
    }

    // check for valid uname
    $res2 = pnVarValidate($uname, 'uname');
    if ($res2 == false) {
        $stop = _NICK2LONG;
    }

    // check for some e-mail domains.
    list($foo, $maildomain) = split(\@\, $email);
    $maildomain = strtolower($maildomain);
    // get the list of banned domains
    $domains = pnConfigGetVar('reg_Illegaldomains');
    // fix any text formatting and convert to an array
    $domains = str_replace(', ', ',', $domains);
    $checkdomains = explode(',', $domains);
    // check if our main domain is amonsgt the banned list
    if (in_array($maildomain, $checkdomains)) {
       $stop = _EMAILINVALIDDOMAIN;
    }



// check for some e-mail TLDs that we do not like.
    $tld = "cn, ru, ua, by, biz, in, info, lv, tv, ws, pl";
    list($foo, $maildomain) = split(\@\, $email);
    $maildomain = strtolower($maildomain);
    // get the list of banned domains
    $domains = $tld;
    $domains = str_replace(', ', ',', $domains);

##
## Make an array of all the domain checks, separated by commas
    $checkdomains = explode(',', $domains);

##
## Construct the regular expression:
    $regex = "/\.(?:" . implode('|', $checkdomains) . ")+$/i";

##
## We use preg_match to test the regular expression against the domain
## If it's found (returns "1&quot   then it's invalid and we can break the loop
    if ( preg_match($regex, $maildomain) != false) {
        //$stop = "stopped at two";
        $stop = _EMAILINVALIDDOMAIN;

    }

// check for forbidden data in Biography
        $reg_illegalusername = trim(pnConfigGetVar('reg_Illegalusername'));
        if (!empty($reg_illegalusername)) {
            $usernames = explode(" ", $reg_illegalusername);
            $count = count($usernames);
            $pregcondition = "/((";
            for ($i = 0;$i < $count;$i++) {
                if ($i != $count-1) {
                    $pregcondition .= $usernames[$i] . ")|(";
                } else {
                    $pregcondition .= $usernames[$i] . "))/iAD";
                }
            }
            if (preg_match($pregcondition, $bio)) {
                $stop = "Your submission has failed due to content included in your application.";
            }
    }




    // Check for legal module
    if (pnModAvailable('legal')) {
        // If legal var agreetoterms checkbox not checked, value is 0 and results in error
        if ($agreetoterms == 0) {
            $stop = _ERRORMUSTAGREE;
        }
    }

SetEnvIfNoCase User-Agent "^libwww-perl*" BadBot

<input type='text' name='verify' length='20'>

$verify = $_POST['verify'];
echo("Verify value is: ".$verify);