source: extensions/NBC_UserAdvManager/trunk/include/functions.inc.php @ 6785

<?php
include_once (UAM_PATH.'include/constants.php');
load_language('plugin.lang', UAM_PATH);

/* Function called from main.inc.php to send validation email */
function SendMail2User($typemail, $id, $username, $password, $email, $confirm)
{
  /* Only available for next Piwigo release (bug in switch_lang function) */
  global $conf;

  $conf_UAM = unserialize($conf['UserAdvManager']);
  
        include_once(PHPWG_ROOT_PATH.'include/functions_mail.inc.php');
  
        $infos1_perso = "";
  $infos2_perso = "";

/* We have to get the user's language in database */
  $query ='
SELECT user_id, language
FROM '.USER_INFOS_TABLE.'
WHERE user_id = '.$id.'
;';
  $data = pwg_db_fetch_assoc(pwg_query($query));

/* Check if user is already registered (profile changing) - If not (new registration), language is set to current gallery language */
  if (empty($data))
  {
/* And switch gallery to this language before using personalized and multilangual contents */
    $language = pwg_get_session_var( 'lang_switch', $user['language'] );
    switch_lang_to($language);
  }
  else
  {
/* And switch gallery to this language before using personalized and multilangual contents */
    $language = $data['language']; /* Usefull for debugging */
    switch_lang_to($data['language']);
    load_language('plugin.lang', UAM_PATH);
  }

  switch($typemail)
  {
    case 1:
      $subject = '['.$conf['gallery_title'].'] '.l10n_args(get_l10n_args('Add of %s', stripslashes($username)));
      $password = $password <> '' ? $password : l10n('UAM_empty_pwd');
      
      if (isset($conf_UAM[9]) and $conf_UAM[9] <> '')
      {
        if (function_exists('get_user_language_desc'))
        {
          $infos1_perso = get_user_language_desc($conf_UAM[9])."\n\n";
        }
        else $infos1_perso = l10n($conf_UAM[9])."\n\n"; 
      }
      
      break;
      
    case 2:
      $subject = '['.$conf['gallery_title'].'] '.l10n_args(get_l10n_args('Update of %s', stripslashes($username)));
      $password = $password <> '' ? $password : l10n('UAM_empty_pwd');

      break;
        
    case 3:
      $subject = '['.$conf['gallery_title'].'] '.l10n_args(get_l10n_args('Update of %s', stripslashes($username)));
      $password = $password <> '' ? $password : l10n('UAM_no_update_pwd');

      break;
  }

  if (isset($conf_UAM[0]) and $conf_UAM[0] == 'true')
  {
    $infos1 = array(
      get_l10n_args('infos_mail %s', stripslashes($username)),
      get_l10n_args('User: %s', stripslashes($username)),
      get_l10n_args('Password: %s', $password),
      get_l10n_args('Email: %s', $email),
      get_l10n_args('', ''),
    );
  }


  if ( isset($conf_UAM[1]) and $conf_UAM[1] == 'true' and $confirm)
  {
    $infos2 = array
    (
      get_l10n_args('Link: %s', AddConfirmMail($id, $email)),
      get_l10n_args('', ''),
    );

    if (isset($conf_UAM[10]) and $conf_UAM[10] <> '')
    {
      if (function_exists('get_user_language_desc'))
      {
        $infos2_perso = get_user_language_desc($conf_UAM[10])."\n\n";
      }
      else $infos2_perso = l10n($conf_UAM[10])."\n\n";
    }
  }

/* ******************************************************** */
/* **** Pending code since to find how to make it work **** */
/* ******************************************************** */
// Testing if FCK Editor is used. Then decoding htmlchars to avoid problems with pwg_mail()
/*$areas = array();
array_push( $areas,'UAM_MailInfo_Text','UAM_ConfirmMail_Text');

if (function_exists('set_fckeditor_instance'))
{
  $fcke_config = unserialize($conf['FCKEditor']);
  foreach($areas as $area)
  {
    if (isset($fcke_config['UAM_MailInfo_Text']) and $fcke_config['UAM_MailInfo_Text'] = true)
    {
      $infos1_perso = html_entity_decode($infos1_perso,ENT_QUOTES,UTF-8);
    }
    
    if (isset($fcke_config['UAM_ConfirmMail_Text']) and $fcke_config['UAM_ConfirmMail_Text'] = true)
    {
      $infos2_perso = html_entity_decode($infos2_perso,ENT_QUOTES,UTF-8);
    }
  }
}*/


/* Sending the email with subject and contents */
  pwg_mail($email, array(
    'subject' => $subject,
    'content' => (isset($infos1) ? $infos1_perso.l10n_args($infos1)."\n\n" : "").(isset($infos2) ? $infos2_perso.l10n_args($infos2)."\n\n" : "").get_absolute_root_url(),
  ));

/* ********************** */
/* Email sending debugger */
/* This is only to trace  */
/* the send of emails for */
/* debugging              */
/* ********************** */
//$content = (isset($infos1) ? $infos1_perso.l10n_args($infos1)."\n\n" : "").(isset($infos2) ? $infos2_perso.l10n_args($infos2)."\n\n" : "").get_absolute_root_url();   
//MailLog($email,$subject,$content,$language);
/* ********************** */

/* Switching back to default language */
switch_lang_back();
}


/* Function called from UAM_admin.php to resend validation email with or without new validation key */
function ResendMail2User($typemail, $user_id, $username, $email, $confirm)
{
  /* Only available for next Piwigo release (bug in switch_lang function) */
  global $conf;

  $conf_UAM = unserialize($conf['UserAdvManager']);

  $conf_UAM_ConfirmMail = unserialize($conf['UserAdvManager_ConfirmMail']);
  
        include_once(PHPWG_ROOT_PATH.'include/functions_mail.inc.php');
  
        $infos1_perso = "";
  $infos2_perso = "";
  
/* We have to get the user's language in database */
  $query ='
SELECT user_id, language
FROM '.USER_INFOS_TABLE.'
WHERE user_id = '.$user_id.'
;';
  $data = pwg_db_fetch_assoc(pwg_query($query));
  $language = $data['language'];
  
/* And switch gallery to this language before using personalized and multilangual contents */
  switch_lang_to($data['language']);
   
  load_language('plugin.lang', UAM_PATH);

  switch($typemail)
  {
    case 1:
      $subject = '['.$conf['gallery_title'].'] '.l10n_args(get_l10n_args('Reminder_with_key_of_%s', $username));
      
      if (isset($conf_UAM_ConfirmMail[2]) and $conf_UAM_ConfirmMail[2] <> '' and isset($conf_UAM_ConfirmMail[3]) and $conf_UAM_ConfirmMail[3] == 'true' and $confirm)
      {
        if (function_exists('get_user_language_desc'))
        {
          $infos1 = get_user_language_desc($conf_UAM_ConfirmMail[2])."\n\n";
        }
                                else $infos1 = l10n($conf_UAM_ConfirmMail[2])."\n\n";

        $infos2 = array
        (
          get_l10n_args('Link: %s', ResetConfirmMail($user_id)),
          get_l10n_args('', ''),
        );        
                        }

/* Set reminder true */      
      $query = "
UPDATE ".USER_CONFIRM_MAIL_TABLE."
SET reminder = 'true'
WHERE user_id = '".$user_id."'
;";
      pwg_query($query);
      
                break;
      
    case 2:
      $subject = '['.$conf['gallery_title'].'] '.l10n_args(get_l10n_args('Reminder_without_key_of_%s',$username));
      
      if (isset($conf_UAM_ConfirmMail[2]) and $conf_UAM_ConfirmMail[2] <> '' and isset($conf_UAM_ConfirmMail[3]) and $conf_UAM_ConfirmMail[3] == 'true' and !$confirm)
      {
        if (function_exists('get_user_language_desc'))
        {
          $infos1 = get_user_language_desc($conf_UAM_ConfirmMail[2])."\n\n";
        }
        else $infos1 = l10n($conf_UAM_ConfirmMail[2])."\n\n";
      }
      
/* Set reminder true */      
      $query = "
UPDATE ".USER_CONFIRM_MAIL_TABLE."
SET reminder = 'true'
WHERE user_id = '".$user_id."'
;";
      pwg_query($query);
      
    break;
        }
  
  pwg_mail($email, array(
    'subject' => $subject,
    'content' => ($infos1."\n\n").(isset($infos2) ? l10n_args($infos2)."\n\n" : "").get_absolute_root_url(),
  ));

/* ********************** */
/* Email sending debugger */
/* This is only to trace  */
/* the send of emails for */
/* debugging              */
/* ********************** */
//$content = ($infos1."\n\n").(isset($infos2) ? l10n_args($infos2)."\n\n" : "").get_absolute_root_url();
//MailLog($email,$subject,$content,$language);
/* ********************** */

/* Switching back to default language */
switch_lang_back();
}


/* Function called from UAM_admin.php to send a reminder mail for ghost users */
function ghostreminder($user_id, $username, $email)
{
  /* Only available for next Piwigo release (bug in switch_lang function) */
  global $conf;

  $conf_UAM = unserialize($conf['UserAdvManager']);
  
        include_once(PHPWG_ROOT_PATH.'include/functions_mail.inc.php');
  
        $infos1_perso = "";

/* We have to get the user's language in database */
  $query ='
SELECT user_id, language
FROM '.USER_INFOS_TABLE.'
WHERE user_id = '.$user_id.'
;';
  $data = pwg_db_fetch_assoc(pwg_query($query));
  $language = $data['language'];

/* And switch gallery to this language before using personalized and multilangual contents */
  switch_lang_to($data['language']);
   
  load_language('plugin.lang', UAM_PATH);
  
  $subject = '['.$conf['gallery_title'].'] '.l10n_args(get_l10n_args('Ghost_reminder_of_%s', $username));     

  if (isset($conf_UAM[18]) and $conf_UAM[18] <> '' and isset($conf_UAM[16]) and $conf_UAM[16] == 'true')
  {
    if (function_exists('get_user_language_desc'))
    {
      $infos1 = get_user_language_desc($conf_UAM[18])."\n\n";
    }
    else
    {
      $infos1 = l10n($conf_UAM[18])."\n\n";
    }

    resetlastvisit($user_id);
  }

  pwg_mail($email, array(
    'subject' => $subject,
    'content' => $infos1.get_absolute_root_url(),
  ));

/* ********************** */
/* Email sending debugger */
/* This is only to trace  */
/* the send of emails for */
/* debugging              */
/* ********************** */
//$content = get_user_language_desc($conf_UAM[19])."\n\n";  
//MailLog($email,$subject,$content,$language);
/* ********************** */

/* Switching back to default language */
switch_lang_back();
}


/* Function called from functions AddConfirmMail and ResetConfirmMail for validation key generation */
function FindAvailableConfirmMailID()
{
  while (true)
  {
    $id = generate_key(16);
    $query = "
SELECT COUNT(*)
  FROM ".USER_CONFIRM_MAIL_TABLE."
WHERE id = '".$id."'
;";
    list($count) = pwg_db_fetch_row(pwg_query($query));

    if ($count == 0)
      return $id;
  }
}


/* Function called from functions SendMail2User to process unvalidated users and generate validation key link */
function AddConfirmMail($user_id, $email)
{
  global $conf;

  $conf_UAM = unserialize($conf['UserAdvManager']);
  $Confirm_Mail_ID = FindAvailableConfirmMailID();

  list($dbnow) = pwg_db_fetch_row(pwg_query('SELECT NOW();'));
  
  if (isset($Confirm_Mail_ID))
  {
    $query = "
SELECT status
  FROM ".USER_INFOS_TABLE."
WHERE user_id = '".$user_id."'
;";
    list($status) = pwg_db_fetch_row(pwg_query($query));
    
    $query = "
INSERT INTO ".USER_CONFIRM_MAIL_TABLE."
  (id, user_id, mail_address, status, date_check)
VALUES
  ('".$Confirm_Mail_ID."', '".$user_id."', '".$email."', '".$status."', null)
;";
    pwg_query($query);

    $query = "
DELETE FROM ".USER_GROUP_TABLE."
WHERE user_id = '".$user_id."'
  AND (
    group_id = '".$conf_UAM[2]."'
  OR 
    group_id = '".$conf_UAM[3]."'
  )
;";
    pwg_query($query);

    if (!is_admin() and $conf_UAM[8] <> -1)
    {
      $query = "
UPDATE ".USER_INFOS_TABLE."
SET status = '".$conf_UAM[8]."'
WHERE user_id = '".$user_id."'
;";
      pwg_query($query);
    }

    if ( $conf_UAM[2] <> -1 )
    {
      $query = "
INSERT INTO ".USER_GROUP_TABLE."
  (user_id, group_id)
VALUES
  ('".$user_id."', '".$conf_UAM[2]."')
;";
      pwg_query($query);
    }
    
    return get_absolute_root_url().UAM_PATH.'ConfirmMail.php?key='.$Confirm_Mail_ID.'&userid='.$user_id;
  }
}


/* Function called from main.inc.php to set group to new users if manual validation is set */
function setgroup($user_id)
{
  global $conf;
  
  $conf_UAM = unserialize($conf['UserAdvManager']);

  $query = "
DELETE FROM ".USER_GROUP_TABLE."
WHERE user_id = '".$user_id."'
  AND (
    group_id = '".$conf_UAM[2]."'
  OR 
    group_id = '".$conf_UAM[3]."'
  )
;";
  pwg_query($query);

  if (!is_admin() and $conf_UAM[8] <> -1)
  {
    $query = "
UPDATE ".USER_INFOS_TABLE."
SET status = '".$conf_UAM[8]."'
WHERE user_id = '".$user_id."'
;";
    pwg_query($query);
  }

  if ( $conf_UAM[2] <> -1 )
  {
    $query = "
INSERT INTO ".USER_GROUP_TABLE."
  (user_id, group_id)
VALUES
  ('".$user_id."', '".$conf_UAM[2]."')
;";
    pwg_query($query);
  }
}


/* Function called from UAM_admin.php to reset validation key */
function ResetConfirmMail($user_id)
{
  global $conf;
  
  $Confirm_Mail_ID = FindAvailableConfirmMailID();

  list($dbnow) = pwg_db_fetch_row(pwg_query('SELECT NOW();'));
  
  if (isset($Confirm_Mail_ID))
  { 
    $query = "
UPDATE ".USER_CONFIRM_MAIL_TABLE."
SET id = '".$Confirm_Mail_ID."'
WHERE user_id = '".$user_id."'
;";
    pwg_query($query);

                $query = "
UPDATE ".USER_INFOS_TABLE."
SET registration_date = '".$dbnow."'
WHERE user_id = '".$user_id."'
;";
                pwg_query($query);
    
    return get_absolute_root_url().UAM_PATH.'ConfirmMail.php?key='.$Confirm_Mail_ID.'&userid='.$user_id;
  }
}


/* Function called from function_UserAdvManager.inc.php to reset last visit date after sending a reminder */
function resetlastvisit($user_id)
{
  global $conf;

  list($dbnow) = pwg_db_fetch_row(pwg_query('SELECT NOW();'));

  $query = "
UPDATE ".USER_LASTVISIT_TABLE."
SET lastvisit = '".$dbnow."', reminder = 'true'
WHERE user_id = '".$user_id."'
;";
  pwg_query($query);
}


/* Function called from main.inc.php - Triggered on user deletion */
function DeleteConfirmMail($user_id)
{
  $query = "
DELETE FROM ".USER_CONFIRM_MAIL_TABLE."
WHERE user_id = '".$user_id."'
;";
  pwg_query($query);
}

/* Function called from main.inc.php - Triggered on user deletion */
function DeleteLastVisit($user_id)
{
  $query = "
DELETE FROM ".USER_LASTVISIT_TABLE."
WHERE user_id = '".$user_id."'
;";
  pwg_query($query);
}


/* Function called from main.inc.php - Triggered on user deletion */
function DeleteRedir($user_id)
{
  $tab = array();

  $query = '
SELECT value
FROM '.CONFIG_TABLE.'
WHERE param = "UserAdvManager_Redir"
;';

  $tab = pwg_db_fetch_row(pwg_query($query));
  
  $values = explode(',', $tab[0]);

  unset($values[array_search($user_id, $values)]);
     
  $query = "
UPDATE ".CONFIG_TABLE."
SET value = \"".implode(',', $values)."\"
WHERE param = 'UserAdvManager_Redir';";

  pwg_query($query);
}


/* Function called from ConfirmMail.php to verify validation key used by user according time limit */
/* Return true is key validation is OK else return false */
function VerifyConfirmMail($id)
{
  global $conf;

  include_once(PHPWG_ROOT_PATH.'admin/include/functions.php');
  
  $conf_UAM = unserialize($conf['UserAdvManager']);

  $conf_UAM_ConfirmMail = unserialize($conf['UserAdvManager_ConfirmMail']);

  $query = "
SELECT COUNT(*)
FROM ".USER_CONFIRM_MAIL_TABLE."
WHERE id = '".$id."'
;";
  list($count) = pwg_db_fetch_row(pwg_query($query));

  if ($count == 1)
  {
    $query = "
SELECT user_id, status, date_check
FROM ".USER_CONFIRM_MAIL_TABLE."
WHERE id = '".$id."'
;";
    $data = pwg_db_fetch_assoc(pwg_query($query));
        
    if (!empty($data) and isset($data['user_id']) and !isset($data['date_check']))
    {
      $query = "
SELECT registration_date
FROM ".USER_INFOS_TABLE."
WHERE user_id = '".$data['user_id']."'
;";
      list($registration_date) = pwg_db_fetch_row(pwg_query($query));

/*              Time limit process              */
/* ******************************************** */  
      if (!empty($registration_date))
      {
                                // Verify Confirmmail with time limit ON
                                if (isset ($conf_UAM_ConfirmMail[1]))
                                {
                                        // dates formating and compare
                                        $today = date("d-m-Y"); // Get today's date
                                        list($day, $month, $year) = explode('-', $today); // explode date of today                                               
                                        $daytimestamp = mktime(0, 0, 0, $month, $day, $year);// Generate UNIX timestamp
                        
                                list($regdate, $regtime) = explode(' ', $registration_date); // Explode date and time from registration date
                                        list($regyear, $regmonth, $regday) = explode('-', $regdate); // Explode date from registration date
                                        $regtimestamp = mktime(0, 0, 0, $regmonth, $regday, $regyear);// Generate UNIX timestamp
                        
                                        $deltasecs = $daytimestamp - $regtimestamp;// Compare the 2 UNIX timestamps     
                                        $deltadays = floor($deltasecs / 86400);// Convert result from seconds to days

                                        // Condition with the value set for time limit
                                        if ($deltadays <= $conf_UAM_ConfirmMail[1]) // If Nb of days is less than the limit set
                                        {
                                                list($dbnow) = pwg_db_fetch_row(pwg_query('SELECT NOW();'));

                                                $query = '
UPDATE '.USER_CONFIRM_MAIL_TABLE.'
SET date_check="'.$dbnow.'"
WHERE id = "'.$id.'"
;';
                                                pwg_query($query);
      
                                                if ($conf_UAM[2] <> -1) // Delete user from unvalidated users group
                                                {
                                                        $query = "
DELETE FROM ".USER_GROUP_TABLE."
WHERE user_id = '".$data['user_id']."'
  AND group_id = '".$conf_UAM[2]."'
;";
                                                        pwg_query($query);
                                                }
            
                                                if ($conf_UAM[3] <> -1) // Add user to validated users group 
                                                {
                                                        $query = "
INSERT INTO ".USER_GROUP_TABLE."
  (user_id, group_id)
VALUES
  ('".$data['user_id']."', '".$conf_UAM[3]."')
;";
                                                        pwg_query($query);
                                                }

                                                if (($conf_UAM[4] <> -1 or isset($data['status']))) // Change user's status
                                                {
                                                        $query = "
UPDATE ".USER_INFOS_TABLE."
SET status = '".(isset($data['status']) ? $data['status'] : $conf_UAM[4])."'
WHERE user_id = '".$data['user_id']."'
;";
                                                        pwg_query($query);
                                                }
                                                // Refresh user's category cache
                                                invalidate_user_cache();
  
                                                return true;
                                        }
                                        elseif ($deltadays > $conf_UAM_ConfirmMail[1]) // If timelimit exeeds
                                        {
                                                return false;
                                        }
                                }
                                // Verify Confirmmail with time limit OFF
                                else
                                {
                                        list($dbnow) = pwg_db_fetch_row(pwg_query('SELECT NOW();'));

                                        $query = '
UPDATE '.USER_CONFIRM_MAIL_TABLE.'
SET date_check="'.$dbnow.'"
WHERE id = "'.$id.'"
;';
                                        pwg_query($query);
      
                                        if ($conf_UAM[2] <> -1)
                                        {
                                                $query = "
DELETE FROM ".USER_GROUP_TABLE."
WHERE user_id = '".$data['user_id']."'
AND group_id = '".$conf_UAM[2]."'
;";
                                                pwg_query($query);
                                        }
    
                                        if ($conf_UAM[3] <> -1)
                                        {
                                                $query = "
DELETE FROM ".USER_GROUP_TABLE."
WHERE user_id = '".$data['user_id']."'
AND group_id = '".$conf_UAM[3]."'
;";
                                                pwg_query($query);

                                                $query = "
INSERT INTO ".USER_GROUP_TABLE."
  (user_id, group_id)
VALUES
  ('".$data['user_id']."', '".$conf_UAM[3]."')
;";
                                                pwg_query($query);
                                        }

                                        if (($conf_UAM[4] <> -1 or isset($data['status'])))
                                        {
                                                $query = "
UPDATE ".USER_INFOS_TABLE."
SET status = '".(isset($data['status']) ? $data['status'] : $conf_UAM[4])."'
WHERE user_id = '".$data['user_id']."'
;";
                                                pwg_query($query);
                                        }
                                        // Refresh user's category cache
                                        invalidate_user_cache();
  
                                        return true;
                                }
                        }
                }
        }
  else
    return false;
}

/* Function called from UAM_admin.php to force users validation by admin */
function ForceValidation($id)
{
  global $conf;

  include_once(PHPWG_ROOT_PATH.'admin/include/functions.php');

  $conf_UAM = unserialize($conf['UserAdvManager']);
        
  $query = "
SELECT COUNT(*)
  FROM ".USER_CONFIRM_MAIL_TABLE."
WHERE user_id = '".$id."'
;";
  list($count) = pwg_db_fetch_row(pwg_query($query));

  if ($count == 1)
  {
    $query = "
SELECT user_id, status, date_check
  FROM ".USER_CONFIRM_MAIL_TABLE."
WHERE user_id = '".$id."'
;";
    $data = pwg_db_fetch_assoc(pwg_query($query));

    if (!empty($data) and isset($data['user_id']) and !isset($data['date_check']))
    {      
                        list($dbnow) = pwg_db_fetch_row(pwg_query('SELECT NOW();'));

                        $query = "
UPDATE ".USER_CONFIRM_MAIL_TABLE."
SET date_check='".$dbnow."'
WHERE user_id = '".$data['user_id']."'
;";
                        pwg_query($query);
             
                        if ($conf_UAM[2] <> -1)
                        {
                                $query = "
DELETE FROM ".USER_GROUP_TABLE."
WHERE user_id = '".$data['user_id']."'
  AND group_id = '".$conf_UAM[2]."'
;";
                                pwg_query($query);
                        }
  
                        if ($conf_UAM[3] <> -1)
                        {
                                $query = "
DELETE FROM ".USER_GROUP_TABLE."
WHERE user_id = '".$data['user_id']."'
  AND group_id = '".$conf_UAM[3]."'
                                ;";
                                pwg_query($query);
        
                                $query = "
INSERT INTO ".USER_GROUP_TABLE."
  (user_id, group_id)
VALUES
  ('".$data['user_id']."', '".$conf_UAM[3]."')
;";
                                pwg_query($query);
                        }

                        if (($conf_UAM[4] <> -1 or isset($data['status'])))
                        {
                                $query = "
UPDATE ".USER_INFOS_TABLE."
SET status = '".(isset($data['status']) ? $data['status'] : $conf_UAM[4])."'
WHERE user_id = '".$data['user_id']."'
;";
                                pwg_query($query);
                        }
                        // Refresh user's category cache
                        invalidate_user_cache();
                        return true;
                }
        }
}


/* Function called from main.inc.php - Check if username matches forbidden caracters */
function ValidateUsername($login)
{
  global $conf;

  $conf_UAM = unserialize($conf['UserAdvManager']);

  if (isset($login) and isset($conf_UAM[7]) and $conf_UAM[7] <> '')
  {
    $conf_CharExclusion = preg_split("/,/",$conf_UAM[7]);
    for ($i = 0 ; $i < count($conf_CharExclusion) ; $i++)
    {
      $pattern = '/'.$conf_CharExclusion[$i].'/i';
      if (preg_match($pattern, $login))
      {
        return true;
      }
    }
  }
  else
  {
    return false;
  }
}


/* Function called from main.inc.php - Check if user's email is in excluded email providers list */
/* Doesn't work on call - Must be copied in main.inc.php to work */
function ValidateEmailProvider($email)
{
  global $conf;

  $conf_UAM = unserialize($conf['UserAdvManager']);
  
        if (isset($email) and isset($conf_UAM[12]) and $conf_UAM[12] <> '')
        {
                //$ncsemail = strtolower($email);
                $conf_MailExclusion = preg_split("/[\s,]+/",$conf_UAM[12]);
                for ($i = 0 ; $i < count($conf_MailExclusion) ; $i++)
                {
                        $pattern = '/'.$conf_MailExclusion[$i].'/i';
                        if (preg_match($pattern, $email))
      {
                        return true;
      }
                }
        }
  else
  {
    return false;
  }
}


/* Function called from UserAdvManager.php - Get unvalidated users according time limit */
function get_unvalid_user_list()
{
        global $conf, $page;
          
        /* Get ConfirmMail configuration */
  $conf_UAM_ConfirmMail = unserialize($conf['UserAdvManager_ConfirmMail']);
  /* Get UAM configuration */
  $conf_UAM = unserialize($conf['UserAdvManager']);
  
  $users = array();

        /* search users depending expiration date */
  $query = '
SELECT DISTINCT u.'.$conf['user_fields']['id'].' AS id,
                u.'.$conf['user_fields']['username'].' AS username,
                u.'.$conf['user_fields']['email'].' AS email,
                ui.status,
                ui.adviser,
                ui.enabled_high,
                ui.level,
                ui.registration_date
FROM '.USERS_TABLE.' AS u
  INNER JOIN '.USER_INFOS_TABLE.' AS ui
    ON u.'.$conf['user_fields']['id'].' = ui.user_id
  LEFT JOIN '.USER_GROUP_TABLE.' AS ug
    ON u.'.$conf['user_fields']['id'].' = ug.user_id
WHERE u.'.$conf['user_fields']['id'].' >= 3
  AND (TO_DAYS(NOW()) - TO_DAYS(ui.registration_date) >= "'.$conf_UAM_ConfirmMail[1].'"
  OR TO_DAYS(NOW()) - TO_DAYS(ui.registration_date) < "'.$conf_UAM_ConfirmMail[1].'")';

        if ($conf_UAM[2] <> '-1' and $conf_UAM[8] == '-1')
  {
    $query.= '
  AND ug.group_id = '.$conf_UAM[2];
  }
  if ($conf_UAM[2] == '-1' and $conf_UAM[8] <> '-1')
  {
    $query.= '
  AND ui.status = \''.$conf_UAM[8]."'";
  }
  if ($conf_UAM[2] <> '-1' and $conf_UAM[8] <> '-1')
  {
    $query.= '
  AND ug.group_id = \''.$conf_UAM[2]."'";
  }
  $query.= '
ORDER BY ui.registration_date ASC
;';

        $result = pwg_query($query);
      
  while ($row = pwg_db_fetch_assoc($result))
  {
        $user = $row;
    $user['groups'] = array();

    array_push($users, $user);
        }

        /* add group lists */
  $user_ids = array();
  foreach ($users as $i => $user)
  {
        $user_ids[$i] = $user['id'];
        }
        
        $user_nums = array_flip($user_ids);

  if (count($user_ids) > 0)
  {
        $query = '
SELECT user_id, group_id
  FROM '.USER_GROUP_TABLE.'
WHERE user_id IN ('.implode(',', $user_ids).')
;';
        
                $result = pwg_query($query);
        
    while ($row = pwg_db_fetch_assoc($result))
    {
        array_push(
        $users[$user_nums[$row['user_id']]]['groups'],
        $row['group_id']
                        );
                }
        }

        return $users;
}


/* Function called from UserAdvManager.php - Get ghost users */
function get_ghost_user_list()
{
        global $conf, $page;

  $conf_UAM = unserialize($conf['UserAdvManager']);
  
  $users = array();

        /* search users depending expiration date */
  $query = '
SELECT DISTINCT u.'.$conf['user_fields']['id'].' AS id,
                u.'.$conf['user_fields']['username'].' AS username,
                u.'.$conf['user_fields']['email'].' AS email,
                lv.lastvisit,
                lv.reminder
FROM '.USERS_TABLE.' AS u
  INNER JOIN '.USER_LASTVISIT_TABLE.' AS lv
    ON u.'.$conf['user_fields']['id'].' = lv.user_id
WHERE (TO_DAYS(NOW()) - TO_DAYS(lv.lastvisit) >= "'.$conf_UAM[17].'")
ORDER BY lv.lastvisit ASC;';

        $result = pwg_query($query);
      
  while ($row = pwg_db_fetch_assoc($result))
  {
        $user = $row;
    $user['groups'] = array();

    array_push($users, $user);
        }

        /* add group lists */
  $user_ids = array();
  foreach ($users as $i => $user)
  {
        $user_ids[$i] = $user['id'];
        }

        return $users;
}


/* Function called from UserAdvManager.php - Get all users to display the number of days since their last visit */
function get_user_list()
{
        global $conf, $page;
  
  $users = array();

        /* search users depending expiration date */
  $query = '
SELECT DISTINCT u.'.$conf['user_fields']['id'].' AS id,
                u.'.$conf['user_fields']['username'].' AS username,
                u.'.$conf['user_fields']['email'].' AS email,
                ug.lastvisit
FROM '.USERS_TABLE.' AS u
  INNER JOIN '.USER_LASTVISIT_TABLE.' AS ug
    ON u.'.$conf['user_fields']['id'].' = ug.user_id
WHERE u.'.$conf['user_fields']['id'].' >= 3
ORDER BY ug.lastvisit DESC
;';

        $result = pwg_query($query);
      
  while ($row = pwg_db_fetch_assoc($result))
  {
        $user = $row;
    $user['groups'] = array();

    array_push($users, $user);
        }

        /* add group lists */
  $user_ids = array();
  foreach ($users as $i => $user)
  {
        $user_ids[$i] = $user['id'];
        }

        return $users;
}


/* Function called from UserAdvManager.php - to determine who is expired or not and giving a different display color */
function expiration($id)
{
        global $conf, $page;
          
        /* Get ConfirmMail configuration */
  $conf_UAM_ConfirmMail = unserialize($conf['UserAdvManager_ConfirmMail']);
          
        /* Get UAM configuration */
  $conf_UAM = unserialize($conf['UserAdvManager']);
        
        $query = "
SELECT registration_date
  FROM ".USER_INFOS_TABLE."
WHERE user_id = '".$id."'
;";
        list($registration_date) = pwg_db_fetch_row(pwg_query($query));

/*              Time limit process              */
/* ******************************************** */  
        if (!empty($registration_date))
  {
                // dates formating and compare
                $today = date("d-m-Y"); // Get today's date
                list($day, $month, $year) = explode('-', $today); // explode date of today                                               
                $daytimestamp = mktime(0, 0, 0, $month, $day, $year);// Generate UNIX timestamp
                
          list($regdate, $regtime) = explode(' ', $registration_date); // Explode date and time from registration date
                list($regyear, $regmonth, $regday) = explode('-', $regdate); // Explode date from registration date
                $regtimestamp = mktime(0, 0, 0, $regmonth, $regday, $regyear);// Generate UNIX timestamp
                        
                $deltasecs = $daytimestamp - $regtimestamp;// Compare the 2 UNIX timestamps     
                $deltadays = floor($deltasecs / 86400);// Convert result from seconds to days

                // Condition with the value set for time limit
                if ($deltadays <= $conf_UAM_ConfirmMail[1]) // If Nb of days is less than the limit set
                {
                        return false;
                }
                else
                {
                        return true;
                }
        }
}


/**
 * Returns a password's score for password complexity check
 *
 * @param password filled by user
 * 
 * Thanx to MathieuGut from http://m-gut.developpez.com
 */
function testpassword($password) // Le mot de passe passé en paramètre - $password given by user
{

  // Initialisation des variables - Variables initiation
  $points = 0;
  $point_lowercase = 0;
  $point_uppercase = 0;
  $point_numbers = 0;
  $point_characters = 0;

  // On récupère la longueur du mot de passe - Getting password lengh   
  $length = strlen($password);
  
  // On fait une boucle pour lire chaque lettre - Loop to read password characters
  for($i = 0; $i < $length; $i++)
  {
    // On sélectionne une à une chaque lettre - Select each letters
    // $i étant à 0 lors du premier passage de la boucle - $i is 0 at first turn
    $letters = $password[$i];

    if ($letters>='a' && $letters<='z')
    {
      // On ajoute 1 point pour une minuscule - Adding 1 point to score for a lowercase
                  $points = $points + 1;

                  // On rajoute le bonus pour une minuscule - Adding bonus points for lowercase
                  $point_lowercase = 1;
    }
    else if ($letters>='A' && $letters <='Z')
    {
      // On ajoute 2 points pour une majuscule - Adding 2 points to score for uppercase
      $points = $points + 2;
                
      // On rajoute le bonus pour une majuscule - Adding bonus points for uppercase
      $point_uppercase = 2;
    }
    else if ($letters>='0' && $letters<='9')
    {
      // On ajoute 3 points pour un chiffre - Adding 3 points to score for numbers
      $points = $points + 3;
                
      // On rajoute le bonus pour un chiffre - Adding bonus points for numbers
      $point_numbers = 3;
    }
    else
    {
      // On ajoute 5 points pour un caractère autre - Adding 5 points to score for special characters
      $points = $points + 5;
                
      // On rajoute le bonus pour un caractère autre - Adding bonus points for special characters
      $point_characters = 5;
    }
  }

  // Calcul du coefficient points/longueur - calculating the coefficient points/length
  $step1 = $points / $length;

  // Calcul du coefficient de la diversité des types de caractères... - Calculation of the diversity of character types...
  $step2 = $point_lowercase + $point_uppercase + $point_numbers + $point_characters;

  // Multiplication du coefficient de diversité avec celui de la longueur - Multiplying the coefficient of diversity with that of the length
  $score = $step1 * $step2;

  // Multiplication du résultat par la longueur de la chaîne - Multiplying the result by the length of the chain
  $finalscore = $score * $length;

  return $finalscore;
}

/* Function called from maintain.inc.php - to check if database upgrade is needed */
function table_exist($table)
{
  $query = 'DESC '.$table.';';
  return (bool)($res=pwg_query($query));
}

/* Email sending debugger function */
function MailLog($to, $subject, $content, $language)
{
   $fo=fopen (UAM_PATH.'admin/maillog.txt','a') ;
   fwrite($fo,"======================\n") ;
   fwrite($fo,'le ' . date('D, d M Y H:i:s') . "\r\n");
   fwrite($fo,$to . "\n" . $subject . "\r\n") ;
   fwrite($fo, "\n" . $content . "\r\n") ;
   fwrite($fo, 'Langue : '."\n" . $language . "\r\n") ;
   fclose($fo) ;
   //return mail ($to,$subject) ;
}


/* Function called from UAM_admin.php and main.inc.php to get the plugin version and name */
function PluginInfos($dir)
{
  $path = $dir;

  $plg_data = implode( '', file($path.'main.inc.php') );
  if ( preg_match("|Plugin Name: (.*)|", $plg_data, $val) )
  {
    $plugin['name'] = trim( $val[1] );
  }
  if (preg_match("|Version: (.*)|", $plg_data, $val))
  {
    $plugin['version'] = trim($val[1]);
  }
  if ( preg_match("|Plugin URI: (.*)|", $plg_data, $val) )
  {
    $plugin['uri'] = trim($val[1]);
  }
  if ($desc = load_language('description.txt', $path.'/', array('return' => true)))
  {
    $plugin['description'] = trim($desc);
  }
  elseif ( preg_match("|Description: (.*)|", $plg_data, $val) )
  {
    $plugin['description'] = trim($val[1]);
  }
  if ( preg_match("|Author: (.*)|", $plg_data, $val) )
  {
    $plugin['author'] = trim($val[1]);
  }
  if ( preg_match("|Author URI: (.*)|", $plg_data, $val) )
  {
    $plugin['author uri'] = trim($val[1]);
  }
  if (!empty($plugin['uri']) and strpos($plugin['uri'] , 'extension_view.php?eid='))
  {
    list( , $extension) = explode('extension_view.php?eid=', $plugin['uri']);
    if (is_numeric($extension)) $plugin['extension'] = $extension;
  }
// IMPORTANT SECURITY !
  $plugin = array_map('htmlspecialchars', $plugin);

  return $plugin ;
}


function clean_obsolete_files()
{
  if (file_exists(UAM_PATH.'obsolete.list')
    and $old_files = file(UAM_PATH.'obsolete.list', FILE_IGNORE_NEW_LINES)
    and !empty($old_files))
  {
    array_push($old_files, 'obsolete.list');
    foreach($old_files as $old_file)
    {
      $path = UAM_PATH.$old_file;
      if (is_file($path))
      {
        @unlink($path);
      }
    }
  }
}


// check_consult - Thx to LucMorizur
// checks if a user id is registered as having already
// visited his profile.php page.
// @uid        : the user id
// @user_idsOK : (returned) array of all users ids having already visited
//               their profile.php pages
//
// @returns    : true or false whether the users has already visited his
//               profile.php page or not
function check_consult($uid, &$user_idsOK)
{
  $t = array();
  $v = false;
  
  $query = "
SELECT value
FROM ".CONFIG_TABLE."
WHERE param = 'UserAdvManager_Redir'
;";
  
  if ($v = (($t = pwg_db_fetch_row(pwg_query($query))) !== false))
  {
    $user_idsOK = explode(',', $t[0]);
    $v = (in_array($uid, $user_idsOK));
  }
  return $v;
}
?>