示例#1
0
$liste = isset($_REQUEST['liste']) ? intval($_REQUEST['liste']) : 0;
$message = '';
$code = '';
if (empty($action) && preg_match('/([a-z0-9]{20})(?:&|$)/i', $_SERVER['QUERY_STRING'], $match)) {
    $code = $match[1];
} else {
    if (!empty($action) && !empty($email) && strlen($code) == 32) {
        $code = substr($code, 0, 20);
    }
}
if (!empty($action) || !empty($code)) {
    //
    // Purge des éventuelles inscriptions dépassées
    // pour parer au cas d'une réinscription
    //
    purge_liste();
    require WA_ROOTDIR . '/includes/class.form.php';
    if (!empty($action)) {
        if (in_array($action, array('inscription', 'setformat', 'desinscription'))) {
            $sql = "SELECT liste_id, liste_format, sender_email, liste_alias, limitevalidate,\n\t\t\t\t\tliste_name, form_url, return_email, liste_sig, use_cron, confirm_subscribe\n\t\t\t\tFROM " . LISTE_TABLE . "\n\t\t\t\tWHERE liste_id = " . $liste;
            if (!($result = $db->query($sql))) {
                trigger_error('Impossible d\'obtenir les données sur la liste', ERROR);
            }
            if ($listdata = $result->fetch()) {
                $wanewsletter = new Wanewsletter($listdata);
                $wanewsletter->message =& $message;
                $wanewsletter->do_action($action, $email, $format);
            } else {
                $message = $lang['Message']['Unknown_list'];
            }
        } else {
示例#2
0
                 $message .= '<br /><br /><input type="checkbox" id="delete_all" name="delete_all" value="1" /> <label for="delete_all">' . $lang['Delete_abo_logs'] . '</label>';
             } else {
                 $output->addHiddenField('delete_all', '1');
                 $message = $lang['Delete_all'];
             }
             $output->addHiddenField('action', 'delete');
             $output->addHiddenField('sessid', $session->session_id);
             $output->page_header();
             $output->set_filenames(array('body' => 'confirm_body.tpl'));
             $output->assign_vars(array('L_CONFIRM' => $lang['Title']['confirm'], 'TEXTE' => $message, 'L_YES' => $lang['Yes'], 'L_NO' => $lang['No'], 'S_HIDDEN_FIELDS' => $output->getHiddenFields(), 'U_FORM' => sessid('./view.php?mode=liste')));
             $output->pparse('body');
             $output->page_footer();
         }
     } else {
         if ($action == 'purge') {
             $abo_deleted = purge_liste($listdata['liste_id'], $listdata['limitevalidate'], $listdata['purge_freq']);
             $output->redirect('./view.php?mode=liste', 4);
             $message = sprintf($lang['Message']['Success_purge'], $abo_deleted);
             $message .= '<br /><br />' . sprintf($lang['Click_return_liste'], '<a href="' . sessid('./view.php?mode=liste') . '">', '</a>');
             $output->message($message);
         }
     }
 }
 //
 // Récupération des nombres d'inscrits
 //
 $num_inscrits = 0;
 $num_temp = 0;
 $last_log = 0;
 $sql = "SELECT COUNT(*) AS num_abo, confirmed\n\t\tFROM " . ABO_LISTE_TABLE . "\n\t\tWHERE liste_id = {$listdata['liste_id']}\n\t\tGROUP BY confirmed";
 if (!($result = $db->query($sql))) {
示例#3
0
 /**
  * purge_liste()
  * 
  * Fonction de purge de la table des abonn�s 
  * Retourne le nombre d'entr�es supprim�es
  * Fonction r�cursive
  * 
  * @param integer $liste_id          Liste concern�e
  * @param integer $limitevalidate    Limite de validit� pour confirmer une inscription
  * @param integer $purge_freq        Fr�quence des purges
  * 
  * @return integer
  */
 function purge_liste($liste_id = 0, $limitevalidate = 0, $purge_freq = 0)
 {
     global $db, $nl_config;
     if (!$liste_id) {
         $total_entries_deleted = 0;
         $sql = "SELECT liste_id, limitevalidate, purge_freq \n\t\t\tFROM " . LISTE_TABLE . " \n\t\t\tWHERE purge_next < " . time() . " \n\t\t\t\tAND auto_purge = " . TRUE;
         if (!($result = $db->query($sql))) {
             trigger_error('Impossible d\'obtenir les listes de diffusion � purger', ERROR);
         }
         while ($row = $result->fetch()) {
             $total_entries_deleted += purge_liste($row['liste_id'], $row['limitevalidate'], $row['purge_freq']);
         }
         //
         // Optimisation des tables
         //
         $db->vacuum(array(ABONNES_TABLE, ABO_LISTE_TABLE));
         return $total_entries_deleted;
     } else {
         $sql = "SELECT abo_id\n\t\t\tFROM " . ABO_LISTE_TABLE . "\n\t\t\tWHERE liste_id = {$liste_id}\n\t\t\t\tAND confirmed = " . SUBSCRIBE_NOT_CONFIRMED . "\n\t\t\t\tAND register_date < " . (time() - $limitevalidate * 86400);
         if (!($result = $db->query($sql))) {
             trigger_error('Impossible d\'obtenir les entr�es � supprimer de la table abo_liste', ERROR);
         }
         $abo_ids = array();
         while ($abo_id = $result->column('abo_id')) {
             array_push($abo_ids, $abo_id);
         }
         $result->free();
         if (($num_abo_deleted = count($abo_ids)) > 0) {
             $sql_abo_ids = implode(', ', $abo_ids);
             $db->beginTransaction();
             if (!SQL_SUBSELECT_SUPPORTED) {
                 $sql = "SELECT abo_id\n\t\t\t\t\tFROM " . ABO_LISTE_TABLE . "\n\t\t\t\t\tWHERE abo_id IN({$sql_abo_ids})\n\t\t\t\t\tGROUP BY abo_id\n\t\t\t\t\tHAVING COUNT(abo_id) = 1";
                 if ($result = $db->query($sql)) {
                     $abo_ids = array();
                     while ($abo_id = $result->column('abo_id')) {
                         array_push($abo_ids, $abo_id);
                     }
                     if (count($abo_ids) > 0) {
                         $sql = "DELETE FROM " . ABONNES_TABLE . " \n\t\t\t\t\t\t\tWHERE abo_id IN(" . implode(', ', $abo_ids) . ")";
                         if (!$db->query($sql)) {
                             trigger_error('Impossible de supprimer les entr�es inutiles de la table des abonn�s', ERROR);
                         }
                     }
                 }
             } else {
                 $sql = "DELETE FROM " . ABONNES_TABLE . "\n\t\t\t\t\tWHERE abo_id IN(\n\t\t\t\t\t\tSELECT abo_id\n\t\t\t\t\t\tFROM " . ABO_LISTE_TABLE . "\n\t\t\t\t\t\tWHERE abo_id IN({$sql_abo_ids})\n\t\t\t\t\t\tGROUP BY abo_id\n\t\t\t\t\t\tHAVING COUNT(abo_id) = 1\n\t\t\t\t\t)";
                 if (!$db->query($sql)) {
                     trigger_error('Impossible de supprimer les entr�es inutiles de la table des abonn�s', ERROR);
                 }
             }
             $sql = "DELETE FROM " . ABO_LISTE_TABLE . "\n\t\t\t\tWHERE abo_id IN({$sql_abo_ids})\n\t\t\t\t\tAND liste_id = " . $liste_id;
             if (!$db->query($sql)) {
                 trigger_error('Impossible de supprimer les entr�es de la table abo_liste', ERROR);
             }
             $db->commit();
         }
         $sql = "UPDATE " . LISTE_TABLE . " \n\t\t\tSET purge_next = " . (time() + $purge_freq * 86400) . " \n\t\t\tWHERE liste_id = " . $liste_id;
         if (!$db->query($sql)) {
             trigger_error('Impossible de mettre � jour la table liste', ERROR);
         }
         return $num_abo_deleted;
     }
 }