- Drop obsolete script plugins/make_archive.pl.
[squirrelmail.git] / src / addressbook.php
... / ...
CommitLineData
1<?php
2
3/**
4 * addressbook.php
5 *
6 * Manage personal address book.
7 *
8 * @copyright &copy; 1999-2006 The SquirrelMail Project Team
9 * @license http://opensource.org/licenses/gpl-license.php GNU Public License
10 * @version $Id$
11 * @package squirrelmail
12 * @subpackage addressbook
13 */
14
15/**
16 * Include the SquirrelMail initialization file.
17 */
18include('../include/init.php');
19
20/** SquirrelMail required files. */
21/* address book functions */
22require_once(SM_PATH . 'functions/addressbook.php');
23/* form functions */
24require_once(SM_PATH . 'functions/forms.php');
25
26/** lets get the global vars we may need */
27
28/* From the address form */
29sqgetGlobalVar('addaddr', $addaddr, SQ_POST);
30sqgetGlobalVar('editaddr', $editaddr, SQ_POST);
31sqgetGlobalVar('deladdr', $deladdr, SQ_POST);
32sqgetGlobalVar('sel', $sel, SQ_POST);
33sqgetGlobalVar('oldnick', $oldnick, SQ_POST);
34sqgetGlobalVar('backend', $backend, SQ_POST);
35sqgetGlobalVar('doedit', $doedit, SQ_POST);
36
37/* Get sorting order */
38$abook_sort_order = get_abook_sort();
39
40/* Create page header before addressbook_init in order to display error messages correctly. */
41displayPageHeader($color, 'None');
42
43/* Open addressbook with error messages on.
44 remote backends (LDAP) are enabled because they can be used. (list_addr function)
45*/
46$abook = addressbook_init(true, false);
47
48// FIXME: do we have to stop use of address book, when localbackend is not present.
49if($abook->localbackend == 0) {
50 plain_error_message(
51 _("No personal address book is defined. Contact administrator."),
52 $color);
53 exit();
54}
55
56$defdata = array();
57$formerror = '';
58$abortform = false;
59$showaddrlist = true;
60$defselected = array();
61$form_url = 'addressbook.php';
62
63/* Handle user's actions */
64if(sqgetGlobalVar('REQUEST_METHOD', $req_method, SQ_SERVER) && $req_method == 'POST') {
65
66 /**************************************************
67 * Add new address *
68 **************************************************/
69 if (isset($addaddr)) {
70 if (isset($backend)) {
71 $r = $abook->add($addaddr, $backend);
72 } else {
73 $r = $abook->add($addaddr, $abook->localbackend);
74 }
75
76 /* Handle error messages */
77 if (!$r) {
78 /* Remove backend name from error string */
79 $errstr = $abook->error;
80 $errstr = ereg_replace('^\[.*\] *', '', $errstr);
81
82 $formerror = $errstr;
83 $showaddrlist = false;
84 $defdata = $addaddr;
85 }
86 } else {
87
88 /************************************************
89 * Delete address(es) *
90 ************************************************/
91 if ((!empty($deladdr)) && sizeof($sel) > 0) {
92 $orig_sel = $sel;
93 sort($sel);
94
95 /* The selected addresses are identidied by "backend:nickname". *
96 * Sort the list and process one backend at the time */
97 $prevback = -1;
98 $subsel = array();
99 $delfailed = false;
100
101 for ($i = 0 ; (($i < sizeof($sel)) && !$delfailed) ; $i++) {
102 list($sbackend, $snick) = explode(':', $sel[$i]);
103
104 /* When we get to a new backend, process addresses in *
105 * previous one. */
106 if ($prevback != $sbackend && $prevback != -1) {
107
108 $r = $abook->remove($subsel, $prevback);
109 if (!$r) {
110 $formerror = $abook->error;
111 $i = sizeof($sel);
112 $delfailed = true;
113 break;
114 }
115 $subsel = array();
116 }
117
118 /* Queue for processing */
119 array_push($subsel, $snick);
120 $prevback = $sbackend;
121 }
122
123 if (!$delfailed) {
124 $r = $abook->remove($subsel, $prevback);
125 if (!$r) { /* Handle errors */
126 $formerror = $abook->error;
127 $delfailed = true;
128 }
129 }
130
131 if ($delfailed) {
132 $showaddrlist = true;
133 $defselected = $orig_sel;
134 }
135
136 } else {
137
138 /***********************************************
139 * Update/modify address *
140 ***********************************************/
141 if (!empty($editaddr)) {
142 /* Stage one: Copy data into form */
143 if (isset($sel) && sizeof($sel) > 0) {
144 if(sizeof($sel) > 1) {
145 $formerror = _("You can only edit one address at the time");
146 $showaddrlist = true;
147 $defselected = $sel;
148 } else {
149 $abortform = true;
150 list($ebackend, $enick) = explode(':', current($sel));
151 $olddata = $abook->lookup($enick, $ebackend);
152 // Test if $olddata really contains anything and return an error message if it doesn't
153 if (!$olddata) {
154 error_box(nl2br(htmlspecialchars($abook->error)));
155 } else {
156 /* Display the "new address" form */
157 abook_create_form($form_url,'editaddr',_("Update address"),_("Update address"),$olddata);
158 echo addHidden('oldnick', $olddata['nickname']).
159 addHidden('backend', $olddata['backend']).
160 addHidden('doedit', '1').
161 '</form>';
162 }
163 }
164 } elseif ($doedit == 1) {
165 /* Stage two: Write new data */
166 $newdata = $editaddr;
167 $r = $abook->modify($oldnick, $newdata, $backend);
168
169 /* Handle error messages */
170 if (!$r) {
171 /* Display error */
172 echo html_tag( 'table',
173 html_tag( 'tr',
174 html_tag( 'td',
175 "\n". '<strong><font color="' . $color[2] .
176 '">' . _("ERROR") . ': ' . $abook->error . '</font></strong>' ."\n",
177 'center' )
178 ),
179 'center', '', 'width="100%"' );
180
181 /* Display the "new address" form again */
182 abook_create_form($form_url,'editaddr',_("Update address"),_("Update address"),$newdata);
183 echo addHidden('oldnick', $oldnick).
184 addHidden('backend', $backend).
185 addHidden('doedit', '1').
186 "\n" . '</form>';
187 $abortform = true;
188 }
189 } else {
190 /**
191 * $editaddr is set, but $sel (address selection in address listing)
192 * and $doedit (address edit form) are not set.
193 * Assume that user clicked on "Edit address" without selecting any address.
194 */
195 $formerror = _("Please select address that you want to edit");
196 $showaddrlist = true;
197 } /* end of edit stage detection */
198 } /* !empty($editaddr) - Update/modify address */
199 } /* (!empty($deladdr)) && sizeof($sel) > 0 - Delete address(es) */
200 } /* !empty($addaddr['nickname']) - Add new address */
201
202 // Some times we end output before forms are printed
203 if($abortform) {
204 echo "</body></html>\n";
205 exit();
206 }
207}
208
209
210/* =================================================================== *
211 * The following is only executed on a GET request, or on a POST when *
212 * a user is added, or when "delete" or "modify" was successful. *
213 * =================================================================== */
214
215/* Display error messages */
216if (!empty($formerror)) {
217 echo html_tag( 'table',
218 html_tag( 'tr',
219 html_tag( 'td',
220 "\n". '<br /><strong><font color="' . $color[2] .
221 '">' . _("ERROR") . ': ' . nl2br(htmlspecialchars($formerror)) . '</font></strong>' ."\n",
222 'center' )
223 ),
224 'center', '', 'width="100%"' );
225}
226
227
228/* Display the address management part */
229if ($showaddrlist) {
230 /* Get and sort address list */
231 $alist = $abook->list_addr();
232 if(!is_array($alist)) {
233 plain_error_message(nl2br(htmlspecialchars($abook->error)), $color);
234 exit;
235 }
236
237 usort($alist,'alistcmp');
238 $prevbackend = -1;
239 $headerprinted = false;
240
241 echo html_tag( 'p', '<a href="#AddAddress">' . _("Add address") . '</a>', 'center' ) . "\n";
242
243 /* List addresses */
244 if (count($alist) > 0) {
245 echo addForm($form_url, 'post');
246 if ($abook->add_extra_field) {
247 $abook_fields = 6;
248 } else {
249 $abook_fields = 5;
250 }
251 while(list($undef,$row) = each($alist)) {
252
253 /* New table header for each backend */
254 if($prevbackend != $row['backend']) {
255 if($prevbackend < 0) {
256 echo html_tag( 'table',
257 html_tag( 'tr',
258 html_tag( 'td',
259 addSubmit(_("Edit selected"), 'editaddr').
260 addSubmit(_("Delete selected"), 'deladdr'),
261 'center', '', "colspan=\"$abook_fields\"" )
262 ) .
263 html_tag( 'tr',
264 html_tag( 'td', '&nbsp;<br />', 'center', '', "colspan=\"$abook_fields\"" )
265 ),
266 'center' );
267 echo "\n<!-- start of address book table -->\n" .
268 html_tag( 'table', '', 'center', '', 'border="0" cellpadding="1" cellspacing="0" width="90%"' ) .
269 html_tag( 'tr', "\n" .
270 html_tag( 'th', '&nbsp;', 'left', '', 'width="1%"' ) . "\n" .
271 html_tag( 'th', _("Nickname") .
272 show_abook_sort_button($abook_sort_order, _("sort by nickname"), 0, 1),
273 'left', '', 'width="1%"' ) . "\n" .
274 html_tag( 'th', _("Name") .
275 show_abook_sort_button($abook_sort_order, _("sort by name"), 2, 3),
276 'left', '', 'width="1%"' ) . "\n" .
277 html_tag( 'th', _("E-mail") .
278 show_abook_sort_button($abook_sort_order, _("sort by email"), 4, 5),
279 'left', '', 'width="1%"' ) . "\n" .
280 html_tag( 'th', _("Info") .
281 show_abook_sort_button($abook_sort_order, _("sort by info"), 6, 7),
282 'left', '', 'width="1%"' ) .
283 ($abook->add_extra_field ? html_tag( 'th', '&nbsp;','left', '', 'width="1%"'): '') .
284 "\n",
285 '', $color[9] ) . "\n";
286 }
287
288 // Separate different backends with <hr />
289 if($prevbackend > 0) {
290 echo html_tag( 'tr',
291 html_tag( 'td', "<hr />", 'center', '' ,"colspan=\"$abook_fields\"" )
292 );
293 }
294
295 // Print backend name
296 echo html_tag( 'tr',
297 html_tag( 'td', "\n" . '<strong>' . $row['source'] . '</strong>' . "\n", 'center', $color[0] ,"colspan=\"$abook_fields\"" )
298 );
299
300 $line = 0;
301 $headerprinted = true;
302 } /* End of header */
303
304 $prevbackend = $row['backend'];
305
306 /* Check if this user is selected */
307 $selected = in_array($row['backend'] . ':' . $row['nickname'], $defselected);
308
309 /* Print one row, with alternating color */
310 if ($line % 2) {
311 $tr_bgcolor = $color[12];
312 } else {
313 $tr_bgcolor = $color[4];
314 }
315 echo html_tag( 'tr', '', '', $tr_bgcolor);
316 if ($abook->backends[$row['backend']]->writeable) {
317 $id = $row['backend'].':'.$row['nickname'];
318 echo html_tag( 'td',
319 '<small>' .
320 addCheckBox("sel[$id]", $selected, $id).
321 '</small>' ,
322 'center', '', 'valign="top" width="1%"' );
323 $label1 = '<label for="sel_'.$id.'_">'; $label2='</label>';
324 } else {
325 echo html_tag( 'td',
326 '&nbsp;' ,
327 'center', '', 'valign="top" width="1%"' );
328 $label1 = $label2 = '';
329 }
330 echo html_tag( 'td',
331 '&nbsp;' . $label1 . htmlspecialchars($row['nickname']) . $label2 . '&nbsp;',
332 'left', '', 'valign="top" width="1%" style="white-space: nowrap;"' );
333
334 echo html_tag( 'td',
335 '&nbsp;' . $label1 . htmlspecialchars($row['name']) . $label2 . '&nbsp;',
336 'left', '', 'valign="top" width="1%" style="white-space: nowrap;"' );
337
338 // email address column
339 echo html_tag( 'td', '', 'left', '', 'valign="top" width="1%" style="white-space: nowrap;"' ) . '&nbsp;';
340 $email = $abook->full_address($row);
341 echo makeComposeLink('src/compose.php?send_to='.rawurlencode($email),
342 htmlspecialchars($row['email'])).
343 '&nbsp;</td>'."\n";
344
345 // info column
346 echo html_tag( 'td', '&nbsp;' . htmlspecialchars($row['label']) . '&nbsp;', 'left', '', 'valign="top" width="1%"' );
347
348 // add extra column if third party backend needs it
349 if ($abook->add_extra_field) {
350 echo html_tag( 'td',
351 '&nbsp;' . (isset($row['extra']) ? $row['extra'] : '') . '&nbsp;',
352 'left', '', 'valign="top" width="1%"' );
353 }
354 echo "</tr>\n";
355 $line++;
356 }
357 echo "</table>" .
358 "\n<!-- end of address book table -->\n";
359
360 /* End of list. Add edit/delete select buttons */
361 if ($headerprinted) {
362 echo html_tag( 'table',
363 html_tag( 'tr',
364 html_tag( 'td',
365 addSubmit(_("Edit selected"), 'editaddr') .
366 addSubmit(_("Delete selected"), 'deladdr'),
367 'center', '', "colspan=\"$abook_fields\"" )
368 ),
369 'center' );
370 }
371 echo "</form>\n";
372 }
373} /* end of addresslist */
374
375
376/* Display the "new address" form */
377echo '<a name="AddAddress"></a>' . "\n";
378abook_create_form($form_url,'addaddr',_("Add to address book"),_("Add address"),$defdata);
379echo "</form>\n";
380
381/* Hook for extra address book blocks */
382echo "<!-- start of addressbook_bottom hook-->\n";
383do_hook('addressbook_bottom');
384echo "\n<!-- end of addressbook_bottom hook-->\n";
385$oTemplate->display('footer.tpl');
386?>