UTF-8 fixes
[platal.git] / include / newsletter.inc.php
1 <?php
2 /***************************************************************************
3 * Copyright (C) 2003-2007 Polytechnique.org *
4 * http://opensource.polytechnique.org/ *
5 * *
6 * This program is free software; you can redistribute it and/or modify *
7 * it under the terms of the GNU General Public License as published by *
8 * the Free Software Foundation; either version 2 of the License, or *
9 * (at your option) any later version. *
10 * *
11 * This program is distributed in the hope that it will be useful, *
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of *
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the *
14 * GNU General Public License for more details. *
15 * *
16 * You should have received a copy of the GNU General Public License *
17 * along with this program; if not, write to the Free Software *
18 * Foundation, Inc., *
19 * 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA *
20 ***************************************************************************/
21
22 require_once("massmailer.inc.php");
23
24 // {{{ class NewsLetter
25
26 class NewsLetter extends MassMailer
27 {
28 public $_date;
29 public $_cats = Array();
30 public $_arts = Array();
31
32 function __construct($id = null)
33 {
34 parent::__construct('newsletter/nl.tpl', 'nl.css', 'nl/show');
35 if (isset($id)) {
36 if ($id == 'last') {
37 $res = XDB::query("SELECT MAX(id) FROM newsletter WHERE bits!='new'");
38 $id = $res->fetchOneCell();
39 }
40 $res = XDB::query("SELECT * FROM newsletter WHERE id={?} OR short_name={?} LIMIT 1", $id, $id);
41 } else {
42 $res = XDB::query("SELECT * FROM newsletter WHERE bits='new'");
43 if (!$res->numRows()) {
44 Newsletter::create();
45 }
46 $res = XDB::query("SELECT * FROM newsletter WHERE bits='new'");
47 }
48 $nl = $res->fetchOneAssoc();
49
50 $this->_id = $nl['id'];
51 $this->_shortname = $nl['short_name'];
52 $this->_date = $nl['date'];
53 $this->_title = $nl['titre'];
54 $this->_title_mail = $nl['titre_mail'];
55 $this->_head = $nl['head'];
56
57 $res = XDB::iterRow("SELECT cid,titre FROM newsletter_cat ORDER BY pos");
58 while (list($cid, $title) = $res->next()) {
59 $this->_cats[$cid] = $title;
60 }
61
62 $res = XDB::iterRow(
63 "SELECT a.title,a.body,a.append,a.aid,a.cid,a.pos
64 FROM newsletter_art AS a
65 INNER JOIN newsletter AS n USING(id)
66 LEFT JOIN newsletter_cat AS c ON(a.cid=c.cid)
67 WHERE a.id={?}
68 ORDER BY c.pos,a.pos", $this->_id);
69 while (list($title, $body, $append, $aid, $cid, $pos) = $res->next()) {
70 $this->_arts[$cid]["a$aid"] = new NLArticle($title, $body, $append, $aid, $cid, $pos);
71 }
72 }
73
74 public function save()
75 {
76 XDB::execute('UPDATE newsletter SET date={?},titre={?},titre_mail={?},head={?},short_name={?} WHERE id={?}',
77 $this->_date, $this->_title, $this->_title_mail, $this->_head, $this->_shortname,$this->_id);
78 }
79
80 public function getArt($aid)
81 {
82 foreach ($this->_arts as $key=>$artlist) {
83 if (isset($artlist["a$aid"])) {
84 return $artlist["a$aid"];
85 }
86 }
87 return null;
88 }
89
90 public function saveArticle(&$a)
91 {
92 if ($a->_aid>=0) {
93 XDB::execute('REPLACE INTO newsletter_art (id,aid,cid,pos,title,body,append)
94 VALUES ({?},{?},{?},{?},{?},{?},{?})',
95 $this->_id, $a->_aid, $a->_cid, $a->_pos,
96 $a->_title, $a->_body, $a->_append);
97 $this->_arts['a'.$a->_aid] = $a;
98 } else {
99 XDB::execute('INSERT INTO newsletter_art
100 SELECT {?},MAX(aid)+1,{?},'.($a->_pos ? intval($a->_pos) : 'MAX(pos)+1').',{?},{?},{?}
101 FROM newsletter_art AS a
102 WHERE a.id={?}',
103 $this->_id, $a->_cid, $a->_title, $a->_body, $a->_append, $this->_id);
104 $this->_arts['a'.$a->_aid] = $a;
105 }
106 }
107
108 public function delArticle($aid)
109 {
110 XDB::execute('DELETE FROM newsletter_art WHERE id={?} AND aid={?}', $this->_id, $aid);
111 foreach ($this->_arts as $key=>$art) {
112 unset($this->_arts[$key]["a$aid"]);
113 }
114 }
115
116 protected function assignData(&$smarty)
117 {
118 $smarty->assign_by_ref('nl', $this);
119 }
120
121 protected function setSent()
122 {
123 XDB::execute("UPDATE newsletter SET bits='sent' WHERE id={?}", $this->_id);
124 }
125
126 static public function subscriptionState($uid = null)
127 {
128 $user = is_null($uid) ? S::v('uid') : $uid;
129 $res = XDB::query("SELECT 1
130 FROM newsletter_ins
131 WHERE user_id={?}", $user);
132 return $res->fetchOneCell();
133 }
134
135 static public function unsubscribe($uid = null)
136 {
137 $user = is_null($uid) ? S::v('uid') : $uid;
138 XDB::execute("DELETE FROM newsletter_ins
139 WHERE user_id={?}", $user);
140 }
141
142 static public function subscribe($uid = null)
143 {
144 $user = is_null($uid) ? S::v('uid') : $uid;
145 XDB::execute("REPLACE INTO newsletter_ins (user_id,last)
146 VALUES ({?}, 0)", $user);
147 }
148
149 protected function subscriptionTable()
150 {
151 return 'newsletter_ins';
152 }
153
154 protected function subscriptionWhere()
155 {
156 return '1';
157 }
158
159 static public function create()
160 {
161 XDB::execute("INSERT INTO newsletter
162 SET bits='new',date=NOW(),titre='to be continued',titre_mail='to be continued'");
163 }
164
165 static public function listSent()
166 {
167 $res = XDB::query("SELECT IF(short_name IS NULL, id,short_name) as id,date,titre_mail AS titre
168 FROM newsletter
169 WHERE bits!='new'
170 ORDER BY date DESC");
171 return $res->fetchAllAssoc();
172 }
173
174 static public function listAll()
175 {
176 $res = XDB::query("SELECT IF(short_name IS NULL, id,short_name) as id,date,titre_mail AS titre
177 FROM newsletter
178 ORDER BY date DESC");
179 return $res->fetchAllAssoc();
180 }
181 }
182
183 // }}}
184 // {{{ class NLArticle
185
186 class NLArticle
187 {
188 // {{{ properties
189
190 var $_aid;
191 var $_cid;
192 var $_pos;
193 var $_title;
194 var $_body;
195 var $_append;
196
197 // }}}
198 // {{{ constructor
199
200 function __construct($title='', $body='', $append='', $aid=-1, $cid=0, $pos=0)
201 {
202 $this->_body = $body;
203 $this->_title = $title;
204 $this->_append = $append;
205 $this->_aid = $aid;
206 $this->_cid = $cid;
207 $this->_pos = $pos;
208 }
209
210 // }}}
211 // {{{ function title()
212
213 public function title()
214 { return trim($this->_title); }
215
216 // }}}
217 // {{{ function body()
218
219 public function body()
220 { return trim($this->_body); }
221
222 // }}}
223 // {{{ function append()
224
225 public function append()
226 { return trim($this->_append); }
227
228 // }}}
229 // {{{ function toText()
230
231 public function toText()
232 {
233 $title = '*'.$this->title().'*';
234 $body = enriched_to_text($this->_body,false,true);
235 $app = enriched_to_text($this->_append,false,false,4);
236 return trim("$title\n\n$body\n\n$app")."\n";
237 }
238
239 // }}}
240 // {{{ function toHtml()
241
242 public function toHtml()
243 {
244 $title = "<h2 class='xorg_nl'><a id='art{$this->_aid}'></a>".pl_entities($this->title()).'</h2>';
245 $body = enriched_to_text($this->_body,true);
246 $app = enriched_to_text($this->_append,true);
247
248 $art = "$title\n";
249 $art .= "<div class='art'>\n$body\n";
250 if ($app) {
251 $art .= "<div class='app'>$app</div>";
252 }
253 $art .= "</div>\n";
254
255 return $art;
256 }
257
258 // }}}
259 // {{{ function check()
260
261 public function check()
262 {
263 $text = enriched_to_text($this->_body);
264 $arr = explode("\n",wordwrap($text,68));
265 $c = 0;
266 foreach ($arr as $line) {
267 if (trim($line)) {
268 $c++;
269 }
270 }
271 return $c<9;
272 }
273
274 // }}}
275 }
276
277 // }}}
278
279 // vim:set et sw=4 sts=4 sws=4 enc=utf-8:
280 ?>