source: spip-zone/_plugins_/clevermail/2_0/inc/clevermail_post_create.php @ 32700

Last change on this file since 32700 was 32700, checked in by pierre.fiches@…, 10 years ago

sujet automatique plus valide, remplacement de eregi

File size: 1.6 KB
Line 
1<?php
2function clevermail_post_create($lst_id) {
3  if ($list = sql_fetsel("*", "spip_cm_lists", "lst_id = ".intval($lst_id))) {
4    if (!$last_create = sql_getfetsel("pst_date_create", "spip_cm_posts", "lst_id=".intval($list['lst_id']), "", "pst_date_create DESC", "0,1")) {
5      // Il n'y a pas encore eu de message dans cette liste
6      $last_create = 60*60*24; // On se place le 2 janvier 1970, SPIP n'aime pas epoc avec le critere "age"
7    }
8        $post = array('lst_id' => intval($lst_id), 'pst_date_create' => time());
9          include_spip('inc/distant');
10          $url_html =  $list['lst_url_html'].(strpos($list['lst_url_html'], '?') !== false ? '&' : '?').'date='.date("Y-m-d",$last_create);
11          $post['pst_html'] = recuperer_page($url_html);
12          $url_text = $list['lst_url_text'].(strpos($list['lst_url_html'], '?') !== false ? '&' : '?').'date='.date("Y-m-d",$last_create);
13          $post['pst_text'] = recuperer_page($url_text);
14          if (trim($post['pst_html']) != '' && trim($post['pst_text']) != '') {
15                  //if (eregi("<title>(.*)</title>", $post['pst_html'], $regs)) {
16                  if (preg_match(",<title>(.*)</title>,", $post['pst_html'], $regs)) {
17                    $post['pst_subject'] = trim($regs[1]);
18                  } else {
19                    $post['pst_subject'] = 'Aucun sujet';
20                  }
21                  $pst_id = sql_insertq("spip_cm_posts", $post);
22                  spip_log('Création du message « '.$post['pst_subject'].' » (id='.$pst_id.') dans la liste « '.$list['lst_name'].' » (id='.$lst_id.')', 'clevermail');
23                  return $pst_id;
24          } else {
25      spip_log('Création d\'un message dans la liste « '.$list['lst_name'].' » (id='.$lst_id.') impossible, contenu vide à '.$url_html.' et '.$url_text, 'clevermail');
26                return false;
27          }
28  }
29}
30?>
Note: See TracBrowser for help on using the repository browser.