Philippe
[squirrelmail.git] / src / addressbook.php
CommitLineData
abdfb4d0 1<?php
895905c0 2
35586184 3/**
4 * addressbook.php
5 *
15e6162e 6 * Copyright (c) 1999-2002 The SquirrelMail Project Team
35586184 7 * Licensed under the GNU GPL. For full terms see the file COPYING.
8 *
9 * Manage personal address book.
10 *
11 * $Id$
12 */
13
35586184 14require_once('../src/validate.php');
15require_once('../functions/array.php');
16require_once('../functions/display_messages.php');
17require_once('../functions/addressbook.php');
ffd8224c 18
daba719e 19/* Make an input field */
20function adressbook_inp_field($label, $field, $name, $size, $values, $add) {
21 global $color;
22 echo '<TR><TD BGCOLOR="' . $color[4] . '" ALIGN=RIGHT>' .
23 $label . ':</TD>' .
24 '<TD BGCOLOR="' . $color[4] . '" ALIGN=left>' .
25 '<INPUT NAME="' . $name . '[' . $field . ']" SIZE="' . $size . '" VALUE="';
26 if (isset($values[$field])) {
27 echo htmlspecialchars($values[$field]);
ffd8224c 28 }
daba719e 29 echo '">' . $add . '</TD></TR>' . "\n";
30}
ffd8224c 31
daba719e 32/* Output form to add and modify address data */
33function address_form($name, $submittext, $values = array()) {
34 global $color;
ffd8224c 35
daba719e 36 echo '<TABLE BORDER=0 CELLPADDING=1 COLS=2 WIDTH="90%" ALIGN=center>' ."\n";
ffd8224c 37
daba719e 38 adressbook_inp_field(_("Nickname"), 'nickname', $name, 15, $values,
39 '<SMALL>' . _("Must be unique") . '</SMALL>');
40 adressbook_inp_field(_("E-mail address"), 'email', $name, 45, $values, '');
41 adressbook_inp_field(_("First name"), 'firstname', $name, 45, $values, '');
42 adressbook_inp_field(_("Last name"), 'lastname', $name, 45, $values, '');
43 adressbook_inp_field(_("Additional info"), 'label', $name, 45, $values, '');
ffd8224c 44
daba719e 45 echo '<TR><TD COLSPAN=2 BGCOLOR="' . $color[4] . '" ALIGN=center>' . "\n" .
46 '<INPUT TYPE=submit NAME="' . $name . '[SUBMIT]" VALUE="' .
47 $submittext . '"></TD></TR>' .
48 "\n</TABLE>\n";
49}
ffd8224c 50
ffd8224c 51
f6c945b9 52/* Open addressbook, with error messages on but without LDAP (the *
53 * second "true"). Don't need LDAP here anyway */
daba719e 54$abook = addressbook_init(true, true);
55if($abook->localbackend == 0) {
56 plain_error_message(
57 _("No personal address book is defined. Contact administrator."),
58 $color);
59 exit();
60}
ffd8224c 61
daba719e 62displayPageHeader($color, 'None');
ffd8224c 63
daba719e 64
65$defdata = array();
66$formerror = '';
67$abortform = false;
68$showaddrlist = true;
69$defselected = array();
70
71
f6c945b9 72/* Handle user's actions */
daba719e 73if($REQUEST_METHOD == 'POST') {
74
f6c945b9 75 /**************************************************
76 * Add new address *
77 **************************************************/
78 if (!empty($addaddr['nickname'])) {
ffd8224c 79
80 $r = $abook->add($addaddr, $abook->localbackend);
81
f6c945b9 82 /* Handle error messages */
83 if (!$r) {
84 /* Remove backend name from error string */
ffd8224c 85 $errstr = $abook->error;
86 $errstr = ereg_replace('^\[.*\] *', '', $errstr);
87
88 $formerror = $errstr;
89 $showaddrlist = false;
90 $defdata = $addaddr;
91 }
92
daba719e 93 } else {
ffd8224c 94
f6c945b9 95 /************************************************
96 * Delete address(es) *
97 ************************************************/
98 if ((!empty($deladdr)) && sizeof($sel) > 0) {
daba719e 99 $orig_sel = $sel;
100 sort($sel);
101
f6c945b9 102 /* The selected addresses are identidied by "backend:nickname". *
103 * Sort the list and process one backend at the time */
daba719e 104 $prevback = -1;
105 $subsel = array();
106 $delfailed = false;
107
f6c945b9 108 for ($i = 0 ; (($i < sizeof($sel)) && !$delfailed) ; $i++) {
daba719e 109 list($sbackend, $snick) = explode(':', $sel[$i]);
110
f6c945b9 111 /* When we get to a new backend, process addresses in *
112 * previous one. */
113 if ($prevback != $sbackend && $prevback != -1) {
daba719e 114
115 $r = $abook->remove($subsel, $prevback);
f6c945b9 116 if (!$r) {
daba719e 117 $formerror = $abook->error;
118 $i = sizeof($sel);
119 $delfailed = true;
120 break;
121 }
122 $subsel = array();
123 }
124
f6c945b9 125 /* Queue for processing */
daba719e 126 array_push($subsel, $snick);
127 $prevback = $sbackend;
ffd8224c 128 }
ffd8224c 129
f6c945b9 130 if (!$delfailed) {
daba719e 131 $r = $abook->remove($subsel, $prevback);
f6c945b9 132 if (!$r) { /* Handle errors */
daba719e 133 $formerror = $abook->error;
134 $delfailed = true;
135 }
ffd8224c 136 }
ffd8224c 137
f6c945b9 138 if ($delfailed) {
daba719e 139 $showaddrlist = true;
140 $defselected = $orig_sel;
ffd8224c 141 }
ffd8224c 142
daba719e 143 } else {
144
f6c945b9 145 /***********************************************
146 * Update/modify address *
147 ***********************************************/
148 if (!empty($editaddr)) {
daba719e 149
f6c945b9 150 /* Stage one: Copy data into form */
daba719e 151 if (isset($sel) && sizeof($sel) > 0) {
152 if(sizeof($sel) > 1) {
153 $formerror = _("You can only edit one address at the time");
154 $showaddrlist = true;
155 $defselected = $sel;
156 } else {
157 $abortform = true;
158 list($ebackend, $enick) = explode(':', $sel[0]);
159 $olddata = $abook->lookup($enick, $ebackend);
160
f6c945b9 161 /* Display the "new address" form */
162 echo '<FORM ACTION="' . $PHP_SELF . '" METHOD="POST">' .
163 "\n" .
bd9bbfef 164 '<TABLE WIDTH="100%" COLS=1 ALIGN=CENTER>' . "\n" .
f6c945b9 165 '<TR><TD BGCOLOR="' . $color[0] .
166 '" ALIGN=CENTER>' . "\n" . '<STRONG>' .
167 _("Update address") .
bd9bbfef 168 "</STRONG>\n</TD></TR>\n</TABLE>\n";
daba719e 169 address_form("editaddr", _("Update address"), $olddata);
f6c945b9 170 echo '<INPUT TYPE=hidden NAME=oldnick VALUE="' .
171 htmlspecialchars($olddata["nickname"]) . "\">\n" .
172 '<INPUT TYPE=hidden NAME=backend VALUE="' .
173 htmlspecialchars($olddata["backend"]) . "\">\n" .
174 '<INPUT TYPE=hidden NAME=doedit VALUE=1>' . "\n" .
175 '</FORM>';
daba719e 176 }
177 } else {
178
f6c945b9 179 /* Stage two: Write new data */
180 if ($doedit = 1) {
daba719e 181 $newdata = $editaddr;
182 $r = $abook->modify($oldnick, $newdata, $backend);
183
f6c945b9 184 /* Handle error messages */
185 if (!$r) {
186 /* Display error */
bd9bbfef 187 echo '<TABLE WIDTH="100%" COLS=1 ALIGN=CENTER>' .
f6c945b9 188 "\n" . '<TR><TD ALIGN=CENTER>' . "\n" .
189 '<br><STRONG><FONT COLOR="' . $color[2] .
190 '">' . _("ERROR") . ": " . $abook->error .
bd9bbfef 191 '</FONT></STRONG>' . "\n</TD></TR>\n</TABLE>\n";
f6c945b9 192
193 /* Display the "new address" form again */
194 echo '<FORM ACTION="' . $PHP_SELF .
195 '" METHOD="POST">' . "\n" .
bd9bbfef 196 '<TABLE WIDTH="100%" COLS=1 ALIGN=CENTER>' .
f6c945b9 197 "\n" . '<TR><TD BGCOLOR="' . $color[0] .
198 '" ALIGN=CENTER>' . "\n" . '<STRONG>' .
199 _("Update address") .
bd9bbfef 200 "</STRONG>\n</TD></TR>\n</TABLE>\n";
daba719e 201 address_form("editaddr", _("Update address"), $newdata);
f6c945b9 202 echo '<INPUT TYPE=hidden NAME=oldnick VALUE="' .
203 htmlspecialchars($oldnick) . "\">\n" .
204 '<INPUT TYPE=hidden NAME=backend VALUE="' .
205 htmlspecialchars($backend) . "\">\n" .
206 '<INPUT TYPE=hidden NAME=doedit VALUE=1>' .
207 "\n" . '</FORM>';
daba719e 208 $abortform = true;
209 }
210 } else {
211
f6c945b9 212 /* Should not get here... */
daba719e 213 plain_error_message(_("Unknown error"), $color);
214 $abortform = true;
215 }
216 }
217 } /* !empty($editaddr) - Update/modify address */
218 } /* (!empty($deladdr)) && sizeof($sel) > 0 - Delete address(es) */
219 } /* !empty($addaddr['nickname']) - Add new address */
220
221 // Some times we end output before forms are printed
222 if($abortform) {
f6c945b9 223 echo "</BODY></HTML>\n";
daba719e 224 exit();
ffd8224c 225 }
daba719e 226}
ffd8224c 227
228
f6c945b9 229/* =================================================================== *
230 * The following is only executed on a GET request, or on a POST when *
231 * a user is added, or when "delete" or "modify" was successful. *
232 * =================================================================== */
ffd8224c 233
f6c945b9 234/* Display error messages */
235if (!empty($formerror)) {
bd9bbfef 236 echo '<TABLE WIDTH="100%" COLS=1 ALIGN=CENTER>' . "\n" .
1af3cc73 237 '<TR><TD ALIGN=CENTER>' . "\n" . '<br><STRONG>' .
f6c945b9 238 '<FONT COLOR="' . $color[2]. '">' . _("ERROR") . ': ' . $formerror .
bd9bbfef 239 '</FONT></STRONG>' . "\n</TD></TR>\n</TABLE>\n";
daba719e 240}
ffd8224c 241
242
f6c945b9 243/* Display the address management part */
244if ($showaddrlist) {
245 /* Get and sort address list */
daba719e 246 $alist = $abook->list_addr();
247 if(!is_array($alist)) {
ffd8224c 248 plain_error_message($abook->error, $color);
249 exit;
daba719e 250 }
ffd8224c 251
daba719e 252 usort($alist,'alistcmp');
253 $prevbackend = -1;
254 $headerprinted = false;
ffd8224c 255
f6c945b9 256 echo '<p align=center><a href="#AddAddress">' .
daba719e 257 _("Add address") . "</a></p>\n";
ffd8224c 258
f6c945b9 259 /* List addresses */
260 echo '<FORM ACTION="' . $PHP_SELF . '" METHOD="POST">' . "\n";
daba719e 261 while(list($undef,$row) = each($alist)) {
ffd8224c 262
f6c945b9 263 /* New table header for each backend */
264 if($prevbackend != $row['backend']) {
ffd8224c 265 if($prevbackend >= 0) {
f6c945b9 266 echo '<TR><TD COLSPAN=5 ALIGN=center>' . "\n" .
267 '<INPUT TYPE=submit NAME=editaddr VALUE="' .
268 _("Edit selected") . "\">\n" .
269 '<INPUT TYPE=submit NAME=deladdr VALUE="' .
270 _("Delete selected") . "\">\n</tr>\n" .
271 '<TR><TD COLSPAN="5" ALIGN=center>' .
272 '&nbsp;<BR></TD></TR></TABLE>' . "\n";
ffd8224c 273 }
274
f6c945b9 275 echo '<TABLE WIDTH="95%" COLS=1 ALIGN=CENTER>' . "\n" .
276 '<TR><TD BGCOLOR="' . $color[0] . '" ALIGN=CENTER>' . "\n" .
277 '<STRONG>' . $row['source'] .
bd9bbfef 278 "</STRONG>\n</TD></TR>\n</TABLE>\n" .
f6c945b9 279 '<TABLE COLS="5" BORDER="0" CELLPADDING="1" CELLSPACING="0"' .
280 ' WIDTH="90%" ALIGN="center">' .
281 '<TR BGCOLOR="' . $color[9] .
282 '"><TH ALIGN=left WIDTH="1%">&nbsp;<TH ALIGN=left WIDTH="1%">' .
283 _("Nickname") . '<TH ALIGN=left WIDTH="1%">' . _("Name") .
284 '<TH ALIGN=left WIDTH="1%">' . _("E-mail") .
285 '<TH ALIGN=left WIDTH="%">' . _("Info") . "</TR>\n";
286
ffd8224c 287 $line = 0;
288 $headerprinted = true;
f6c945b9 289 } /* End of header */
ffd8224c 290
291 $prevbackend = $row['backend'];
292
f6c945b9 293 /* Check if this user is selected */
294 if(in_array($row['backend'] . ':' . $row['nickname'], $defselected)) {
ffd8224c 295 $selected = 'CHECKED';
daba719e 296 } else {
ffd8224c 297 $selected = '';
daba719e 298 }
ffd8224c 299
f6c945b9 300 /* Print one row */
301 echo '<TR';
302 if ($line % 2) { echo ' bgcolor="' . $color[0]. '"'; }
303 echo '><TD VALIGN=top ALIGN=center WIDTH="1%"><SMALL>' .
304 '<INPUT TYPE=checkbox ' . $selected . ' NAME="sel[]" VALUE="' .
305 $row['backend'] . ':' . $row['nickname'] . '"></SMALL></TD>' .
306 '<TD VALIGN=top NOWRAP WIDTH="1%">&nbsp;' . $row['nickname'] .
307 '&nbsp;</TD>' .
308 '<TD VALIGN=top NOWRAP WIDTH="1%">&nbsp;' . $row['name'] .
309 '&nbsp;</TD>',
310 '<TD VALIGN=top NOWRAP WIDTH="1%">&nbsp;' .
311 '<A HREF="compose.php?send_to=' . rawurlencode($row['email']) .
312 '">' . $row['email'] . '</A>&nbsp;</TD>'."\n",
313 '<TD VALIGN=top WIDTH="1%">&nbsp;' . $row['label'] . '&nbsp;</TD>' .
314 "</TR>\n";
ffd8224c 315 $line++;
daba719e 316 }
ffd8224c 317
f6c945b9 318 /* End of list. Close table. */
319 if ($headerprinted) {
320 echo '<TR><TD COLSPAN=5 ALIGN=center>' . "\n" .
321 '<INPUT TYPE=submit NAME=editaddr VALUE="' . _("Edit selected") .
322 "\">\n" .
323 '<INPUT TYPE=submit NAME=deladdr VALUE="' . _("Delete selected") .
bd9bbfef 324 "\">\n" . '</TR></TABLE>';
daba719e 325 }
3f0442ee 326 echo '</FORM>';
f6c945b9 327} /* end of addresslist */
daba719e 328
329
f6c945b9 330/* Display the "new address" form */
331echo '<a name="AddAddress"></a>' . "\n" .
332 '<FORM ACTION="' . $PHP_SELF . '" NAME=f_add METHOD="POST">' . "\n" .
bd9bbfef 333 '<TABLE WIDTH="100%" COLS=1 ALIGN=CENTER>' . "\n" .
f6c945b9 334 '<TR><TD BGCOLOR="' . $color[0] . '" ALIGN=CENTER>' . "\n" . '<STRONG>',
335 sprintf(_("Add to %s"), $abook->localbackendname) .
bd9bbfef 336 "</STRONG>\n</TD></TR>\n" .
daba719e 337 "</TABLE>\n";
338address_form('addaddr', _("Add address"), $defdata);
339echo '</FORM>';
340
f6c945b9 341/* Add hook for anything that wants on the bottom */
daba719e 342do_hook('addressbook_bottom');
abdfb4d0 343?>
344
35586184 345</BODY></HTML>