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