+/**
+ * addressbook.php
+ *
+ * Copyright (c) 1999-2004 The SquirrelMail Project Team
+ * Licensed under the GNU GPL. For full terms see the file COPYING.
+ *
+ * Manage personal address book.
+ *
+ * @version $Id$
+ * @package squirrelmail
+ */
+
+/**
+ * Path for SquirrelMail required files.
+ * @ignore
+ */
+define('SM_PATH','../');
+
+/** SquirrelMail required files. */
+require_once(SM_PATH . 'include/validate.php');
+require_once(SM_PATH . 'functions/global.php');
+require_once(SM_PATH . 'functions/display_messages.php');
+require_once(SM_PATH . 'functions/addressbook.php');
+require_once(SM_PATH . 'functions/strings.php');
+require_once(SM_PATH . 'functions/html.php');
+require_once(SM_PATH . 'functions/forms.php');
+
+/** lets get the global vars we may need */
+sqgetGlobalVar('key', $key, SQ_COOKIE);
+
+sqgetGlobalVar('username', $username, SQ_SESSION);
+sqgetGlobalVar('onetimepad',$onetimepad, SQ_SESSION);
+sqgetGlobalVar('base_uri', $base_uri, SQ_SESSION);
+sqgetGlobalVar('delimiter', $delimiter, SQ_SESSION);
+
+/* From the address form */
+sqgetGlobalVar('addaddr', $addaddr, SQ_POST);
+sqgetGlobalVar('editaddr', $editaddr, SQ_POST);
+sqgetGlobalVar('deladdr', $deladdr, SQ_POST);
+sqgetGlobalVar('sel', $sel, SQ_POST);
+sqgetGlobalVar('oldnick', $oldnick, SQ_POST);
+sqgetGlobalVar('backend', $backend, SQ_POST);
+sqgetGlobalVar('doedit', $doedit, SQ_POST);
+
+/* Get sorting order */
+$abook_sort_order = get_abook_sort();
+
+/**
+ * Make an input field
+ * @param string $label
+ * @param string $field
+ * @param string $name
+ * @param string $size
+ * @param array $values
+ * @param string $add
+ */
+function addressbook_inp_field($label, $field, $name, $size, $values, $add) {
+ global $color;
+ $value = ( isset($values[$field]) ? $values[$field] : '');
+
+ $td_str = addInput($name.'['.$field.']', $value, $size)
+ . $add ;
+
+ return html_tag( 'tr' ,
+ html_tag( 'td', $label . ':', 'right', $color[4]) .
+ html_tag( 'td', $td_str, 'left', $color[4])
+ )
+ . "\n";
+}
+
+/**
+ * Output form to add and modify address data
+ */
+function address_form($name, $submittext, $values = array()) {
+ global $color, $squirrelmail_language;
+
+ if ($squirrelmail_language == 'ja_JP')
+ {
+ echo html_tag( 'table',
+ addressbook_inp_field(_("Nickname"), 'nickname', $name, 15, $values,
+ ' <small>' . _("Must be unique") . '</small>') .
+ addressbook_inp_field(_("E-mail address"), 'email', $name, 45, $values, '') .
+ addressbook_inp_field(_("Last name"), 'lastname', $name, 45, $values, '') .
+ addressbook_inp_field(_("First name"), 'firstname', $name, 45, $values, '') .
+ addressbook_inp_field(_("Additional info"), 'label', $name, 45, $values, '') .
+ list_writable_backends($name) .
+ html_tag( 'tr',
+ html_tag( 'td',
+ '<input type="submit" name="' . htmlentities($name) . '[SUBMIT]" value="' .
+ $submittext . '" />',
+ 'center', $color[4], 'colspan="2"')
+ )
+ , 'center', '', 'border="0" cellpadding="1" width="90%"') ."\n";
+ } else {
+ echo html_tag( 'table',
+ addressbook_inp_field(_("Nickname"), 'nickname', $name, 15, $values,
+ ' <small>' . _("Must be unique") . '</small>') .
+ addressbook_inp_field(_("E-mail address"), 'email', $name, 45, $values, '') .
+ addressbook_inp_field(_("First name"), 'firstname', $name, 45, $values, '') .
+ addressbook_inp_field(_("Last name"), 'lastname', $name, 45, $values, '') .
+ addressbook_inp_field(_("Additional info"), 'label', $name, 45, $values, '') .
+ list_writable_backends($name) .
+ html_tag( 'tr',
+ html_tag( 'td',
+ '<input type="submit" name="' . htmlentities($name) . '[SUBMIT]" value="' .
+ $submittext . '" />',
+ 'center', $color[4], 'colspan="2"')
+ )
+ , 'center', '', 'border="0" cellpadding="1" width="90%"') ."\n";
+}
+}
+
+function list_writable_backends($name) {
+ global $color, $abook;
+ if ( $name != 'addaddr' ) { return; }
+ if ( $abook->numbackends > 1 ) {
+ $ret = '<select name="backend">';
+ $backends = $abook->get_backend_list();
+ while (list($undef,$v) = each($backends)) {
+ if ($v->writeable) {
+ $ret .= '<option value="' . $v->bnum;
+ $ret .= '">' . $v->sname . "</option>\n";
+ }