src/editldap.c

   1 /*
   2  * Sylpheed -- a GTK+ based, lightweight, and fast e-mail client
   3  * Copyright (C) 2001-2007 Match Grun and the Claws Mail team
   4  *
   5  * This program is free software; you can redistribute it and/or modify
   6  * it under the terms of the GNU General Public License as published by
   7  * the Free Software Foundation; either version 3 of the License, or
   8  * (at your option) any later version.
   9  *
  10  * This program is distributed in the hope that it will be useful,
  11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13  * GNU General Public License for more details.
  14  *
  15  * You should have received a copy of the GNU General Public License
  16  * along with this program. If not, see <http://www.gnu.org/licenses/>.
  17  *
  18  */
  19
  20 /*
  21  * Edit LDAP address book data.
  22  */
  23
  24 #ifdef HAVE_CONFIG_H
  25 #  include "config.h"
  26 #endif
  27
  28 #ifdef USE_LDAP
  29
  30 #include "defs.h"
  31
  32 #include <glib.h>
  33 #include <glib/gi18n.h>
  34 #include <gdk/gdkkeysyms.h>
  35 #include <gtk/gtkwindow.h>
  36 #include <gtk/gtksignal.h>
  37 #include <gtk/gtklabel.h>
  38 #include <gtk/gtkentry.h>
  39 #include <gtk/gtktable.h>
  40 #include <gtk/gtkbutton.h>
  41
  42 #include "addressbook.h"
  43 #include "prefs_common.h"
  44 #include "addressitem.h"
  45 #include "mgutils.h"
  46 #include "ldapserver.h"
  47 #include "ldapctrl.h"
  48 #include "ldaputil.h"
  49 #include "editldap_basedn.h"
  50 #include "manage_window.h"
  51 #include "gtkutils.h"
  52 #include "prefs_gtk.h"
  53
  54 #define PAGE_BASIC      0
  55 #define PAGE_SEARCH     1
  56 #define PAGE_EXTENDED   2
  57
  58 #define ADDRESSBOOK_GUESS_LDAP_NAME     "MyServer"
  59 #define ADDRESSBOOK_GUESS_LDAP_SERVER   "localhost"
  60
  61 #define LDAPEDIT_TABLE_ROWS     6
  62 #define LDAPEDIT_TABLE_COLS     3
  63
  64 static struct _LDAPEdit {
  65         GtkWidget *window;
  66         GtkWidget *notebook;
  67         GtkWidget *ok_btn;
  68         GtkWidget *cancel_btn;
  69         GtkWidget *statusbar;
  70         gint status_cid;
  71         GtkWidget *entry_name;
  72         GtkWidget *entry_server;
  73         GtkWidget *spinbtn_port;
  74         GtkWidget *entry_baseDN;
  75         GtkWidget *spinbtn_timeout;
  76         GtkWidget *entry_bindDN;
  77         GtkWidget *entry_bindPW;
  78         GtkWidget *spinbtn_maxentry;
  79         GtkWidget *entry_criteria;
  80         GtkWidget *spinbtn_queryage;
  81         GtkWidget *check_dynsearch;
  82         GtkWidget *check_matchoption;
  83 #ifdef USE_LDAP_TLS
  84         GtkWidget *enable_ssl;
  85         GtkWidget *enable_tls;
  86 #endif
  87 } ldapedit;
  88
  89 /**
  90  * Parse out individual attribute names from criteria string.
  91  * \param criteria Criteria string.
  92  * \ctl   Control object.
  93  */
  94 static gboolean editldap_validate_criteria( gchar *criteria ) {
  95         gchar *ptr;
  96         gchar **splitStr;
  97         gint i;
  98         gboolean errorFlag;
  99
 100         errorFlag = TRUE;
 101
 102         /* Replace delimiters with spaces */
 103         ptr = criteria;
 104         while( *ptr ) {
 105                 if( *ptr == ',' || *ptr == ';' || *ptr == '|' )
 106                         *ptr = ' ';
 107                 ptr++;
 108         }
 109
 110         /* Parse string */
 111         splitStr = g_strsplit( criteria, " ", 0 );
 112         i = 0;
 113         while( TRUE ) {
 114                 if( splitStr[i] ) {
 115                         if( *splitStr[i] ) {
 116                                 errorFlag = FALSE;
 117                                 break;
 118                         }
 119                 }
 120                 else {
 121                         break;
 122                 }
 123                 i++;
 124         }
 125         g_strfreev( splitStr );
 126         return errorFlag;
 127 }
 128
 129 /*
 130 * Edit functions.
 131 */
 132 static void edit_ldap_status_show( gchar *msg ) {
 133         if( ldapedit.statusbar != NULL ) {
 134                 gtk_statusbar_pop( GTK_STATUSBAR(ldapedit.statusbar), ldapedit.status_cid );
 135                 if( msg ) {
 136                         gtk_statusbar_push( GTK_STATUSBAR(ldapedit.statusbar),
 137                                 ldapedit.status_cid, msg );
 138                 }
 139         }
 140 }
 141
 142 static gboolean edit_ldap_validate( void ) {
 143         gchar *str;
 144         gboolean errorFlag;
 145         gint page = 0;
 146
 147         errorFlag = FALSE;
 148         str = gtk_editable_get_chars(
 149                         GTK_EDITABLE(ldapedit.entry_name), 0, -1 );
 150         if( *str == '\0' ) {
 151                 page = PAGE_BASIC;
 152                 gtk_widget_grab_focus( ldapedit.entry_name );
 153                 edit_ldap_status_show( _( "A Name must be supplied." ) );
 154                 errorFlag = TRUE;
 155         }
 156         g_free( str );
 157
 158         if( ! errorFlag ) {
 159                 str = gtk_editable_get_chars(
 160                                 GTK_EDITABLE(ldapedit.entry_server), 0, -1 );
 161                 if( *str == '\0' ) {
 162                         page = PAGE_BASIC;
 163                         gtk_widget_grab_focus( ldapedit.entry_server );
 164                         edit_ldap_status_show(
 165                                 _( "A Hostname must be supplied for the server." ) );
 166                         errorFlag = TRUE;
 167                 }
 168                 g_free( str );
 169         }
 170
 171         if( ! errorFlag ) {
 172                 str = gtk_editable_get_chars(
 173                                 GTK_EDITABLE(ldapedit.entry_criteria), 0, -1 );
 174                 if( editldap_validate_criteria( str ) ) {
 175                         page = PAGE_SEARCH;
 176                         gtk_widget_grab_focus( ldapedit.entry_criteria );
 177                         edit_ldap_status_show(
 178                                 _( "At least one LDAP search attribute should be supplied." ) );
 179                         errorFlag = TRUE;
 180                 }
 181                 g_free( str );
 182         }
 183
 184         /* Switch to page with error */
 185         if( errorFlag ) {
 186                 gtk_notebook_set_current_page( GTK_NOTEBOOK(ldapedit.notebook), page );
 187         }
 188
 189         return errorFlag;
 190 }
 191
 192 static void edit_ldap_ok( GtkWidget *widget, gboolean *cancelled ) {
 193         if( ! edit_ldap_validate() ) {
 194                 *cancelled = FALSE;
 195                 gtk_main_quit();
 196         }
 197 }
 198
 199 static void edit_ldap_cancel( GtkWidget *widget, gboolean *cancelled ) {
 200         *cancelled = TRUE;
 201         gtk_main_quit();
 202 }
 203
 204 static gint edit_ldap_delete_event( GtkWidget *widget, GdkEventAny *event, gboolean *cancelled ) {
 205         *cancelled = TRUE;
 206         gtk_main_quit();
 207         return TRUE;
 208 }
 209
 210 static gboolean edit_ldap_key_pressed( GtkWidget *widget, GdkEventKey *event, gboolean *cancelled ) {
 211         if (event && event->keyval == GDK_Escape) {
 212                 *cancelled = TRUE;
 213                 gtk_main_quit();
 214         }
 215         return FALSE;
 216 }
 217
 218 static void edit_ldap_server_check( void ) {
 219         gchar *sHost, *sBind, *sPass;
 220         gint iPort, iTime;
 221         gchar *sMsg;
 222         gchar *sBaseDN = NULL;
 223         gint iBaseDN = 0;
 224         gboolean flg;
 225         gboolean tls = FALSE, ssl = FALSE;
 226         GList *baseDN = NULL;
 227
 228         edit_ldap_status_show( "" );
 229         flg = FALSE;
 230         sHost = gtk_editable_get_chars( GTK_EDITABLE(ldapedit.entry_server), 0, -1 );
 231         sBind = gtk_editable_get_chars( GTK_EDITABLE(ldapedit.entry_bindDN), 0, -1 );
 232         sPass = gtk_editable_get_chars( GTK_EDITABLE(ldapedit.entry_bindPW), 0, -1 );
 233         iPort = gtk_spin_button_get_value_as_int( GTK_SPIN_BUTTON( ldapedit.spinbtn_port ) );
 234         iTime = gtk_spin_button_get_value_as_int( GTK_SPIN_BUTTON( ldapedit.spinbtn_timeout ) );
 235 #ifdef USE_LDAP_TLS
 236         tls = gtk_toggle_button_get_active(GTK_TOGGLE_BUTTON(ldapedit.enable_tls));
 237         ssl = gtk_toggle_button_get_active(GTK_TOGGLE_BUTTON(ldapedit.enable_ssl));
 238 #endif
 239
 240         g_strchomp( sHost ); g_strchug( sHost );
 241         g_strchomp( sBind ); g_strchug( sBind );
 242         g_strchomp( sPass ); g_strchug( sPass );
 243         if( *sHost != '\0' ) {
 244                 /* Test connection to server */
 245                 if( ldaputil_test_connect( sHost, iPort, ssl, tls ) ) {
 246                         /* Attempt to read base DN */
 247                         baseDN = ldaputil_read_basedn( sHost, iPort, sBind, sPass, iTime, ssl, tls );
 248                         if( baseDN ) {
 249                                 GList *node = baseDN;
 250                                 while( node ) {
 251                                         ++iBaseDN;
 252                                         if( ! sBaseDN ) {
 253                                                 sBaseDN = g_strdup( node->data );
 254                                         }
 255                                         node = g_list_next( node );
 256                                 }
 257                                 mgu_free_dlist( baseDN );
 258                                 baseDN = node = NULL;
 259                         }
 260                         flg = TRUE;
 261                 }
 262         }
 263         g_free( sHost );
 264         g_free( sBind );
 265         g_free( sPass );
 266
 267         if( sBaseDN ) {
 268                 /* Load search DN */
 269                 gtk_entry_set_text(GTK_ENTRY(ldapedit.entry_baseDN), sBaseDN);
 270                 g_free( sBaseDN );
 271         }
 272
 273         /* Display appropriate message */
 274         if( flg ) {
 275                 sMsg = _( "Connected successfully to server" );
 276         }
 277         else {
 278                 sMsg = _( "Could not connect to server" );
 279         }
 280         edit_ldap_status_show( sMsg );
 281 }
 282
 283 static void edit_ldap_basedn_select( void ) {
 284         gchar *sHost, *sBind, *sPass, *sBase;
 285         gint iPort, iTime, tls = 0, ssl = 0;
 286         gchar *selectDN;
 287
 288         sHost = gtk_editable_get_chars( GTK_EDITABLE(ldapedit.entry_server), 0, -1 );
 289         sBase = gtk_editable_get_chars( GTK_EDITABLE(ldapedit.entry_baseDN), 0, -1 );
 290         sBind = gtk_editable_get_chars( GTK_EDITABLE(ldapedit.entry_bindDN), 0, -1 );
 291         sPass = gtk_editable_get_chars( GTK_EDITABLE(ldapedit.entry_bindPW), 0, -1 );
 292         iPort = gtk_spin_button_get_value_as_int( GTK_SPIN_BUTTON( ldapedit.spinbtn_port ) );
 293         iTime = gtk_spin_button_get_value_as_int( GTK_SPIN_BUTTON( ldapedit.spinbtn_timeout ) );
 294 #ifdef USE_LDAP_TLS
 295         tls = gtk_toggle_button_get_active(GTK_TOGGLE_BUTTON(ldapedit.enable_tls));
 296         ssl = gtk_toggle_button_get_active(GTK_TOGGLE_BUTTON(ldapedit.enable_ssl));
 297 #endif
 298
 299         g_strchomp( sHost ); g_strchug( sHost );
 300         g_strchomp( sBind ); g_strchug( sBind );
 301         g_strchomp( sPass ); g_strchug( sPass );
 302         selectDN = edit_ldap_basedn_selection( sHost, iPort, sBase, iTime, sBind, sPass, ssl, tls );
 303         if( selectDN ) {
 304                 gtk_entry_set_text(GTK_ENTRY(ldapedit.entry_baseDN), selectDN);
 305                 g_free( selectDN );
 306                 selectDN = NULL;
 307         }
 308         g_free( sHost );
 309         g_free( sBase );
 310         g_free( sBind );
 311         g_free( sPass );
 312 }
 313
 314 static void edit_ldap_search_reset() {
 315         gtk_entry_set_text(GTK_ENTRY(ldapedit.entry_criteria), ldapctl_get_default_criteria());
 316 }
 317
 318 static void addressbook_edit_ldap_dialog_create( gboolean *cancelled ) {
 319         GtkWidget *window;
 320         GtkWidget *vbox;
 321         GtkWidget *notebook;
 322         GtkWidget *hbbox;
 323         GtkWidget *ok_btn;
 324         GtkWidget *cancel_btn;
 325         GtkWidget *hsbox;
 326         GtkWidget *statusbar;
 327
 328         window = gtkut_window_new(GTK_WINDOW_TOPLEVEL, "editldap");
 329         gtk_widget_set_size_request(window, 450, -1);
 330         gtk_container_set_border_width(GTK_CONTAINER(window), 0);
 331         gtk_window_set_title(GTK_WINDOW(window), _("Edit LDAP Server"));
 332         gtk_window_set_position(GTK_WINDOW(window), GTK_WIN_POS_CENTER);
 333         gtk_window_set_modal(GTK_WINDOW(window), TRUE);
 334         g_signal_connect(G_OBJECT(window), "delete_event",
 335                          G_CALLBACK(edit_ldap_delete_event),
 336                          cancelled);
 337         g_signal_connect(G_OBJECT(window), "key_press_event",
 338                          G_CALLBACK(edit_ldap_key_pressed),
 339                          cancelled);
 340
 341         vbox = gtk_vbox_new( FALSE, 6 );
 342         gtk_widget_show( vbox );
 343         gtk_container_add( GTK_CONTAINER( window ), vbox );
 344
 345         /* Notebook */
 346         notebook = gtk_notebook_new();
 347         gtk_widget_show( notebook );
 348         gtk_box_pack_start( GTK_BOX( vbox ), notebook, TRUE, TRUE, 0 );
 349         gtk_container_set_border_width( GTK_CONTAINER( notebook ), 6 );
 350
 351         /* Status line */
 352         hsbox = gtk_hbox_new(FALSE, 0);
 353         gtk_box_pack_end(GTK_BOX(vbox), hsbox, FALSE, FALSE, BORDER_WIDTH);
 354         statusbar = gtk_statusbar_new();
 355         gtk_box_pack_start(GTK_BOX(hsbox), statusbar, TRUE, TRUE, BORDER_WIDTH);
 356
 357         /* Button panel */
 358         gtkut_stock_button_set_create(&hbbox, &cancel_btn, GTK_STOCK_CANCEL,
 359                                       &ok_btn, GTK_STOCK_OK,
 360                                       NULL, NULL);
 361         gtk_box_pack_end(GTK_BOX(vbox), hbbox, FALSE, FALSE, 0);
 362         gtk_widget_grab_default(ok_btn);
 363
 364         g_signal_connect(G_OBJECT(ok_btn), "clicked",
 365                          G_CALLBACK(edit_ldap_ok), cancelled);
 366         g_signal_connect(G_OBJECT(cancel_btn), "clicked",
 367                          G_CALLBACK(edit_ldap_cancel), cancelled);
 368
 369         gtk_widget_show_all(vbox);
 370
 371         ldapedit.window     = window;
 372         ldapedit.notebook   = notebook;
 373         ldapedit.ok_btn     = ok_btn;
 374         ldapedit.cancel_btn = cancel_btn;
 375         ldapedit.statusbar  = statusbar;
 376         ldapedit.status_cid =
 377                 gtk_statusbar_get_context_id(
 378                         GTK_STATUSBAR(statusbar), "Edit LDAP Server Dialog" );
 379 }
 380
 381 static void editldap_update_port (GtkToggleButton *ssl_btn, gpointer data) {
 382         gboolean val = gtk_toggle_button_get_active(ssl_btn);
 383         gtk_spin_button_set_value(
 384                 GTK_SPIN_BUTTON( ldapedit.spinbtn_port ),
 385                         val ? LDAPCTL_DFL_SSL_PORT:LDAPCTL_DFL_PORT );
 386 }
 387
 388 static void addressbook_edit_ldap_page_basic( gint pageNum, gchar *pageLbl ) {
 389         GtkWidget *vbox;
 390         GtkWidget *table;
 391         GtkWidget *label;
 392         GtkWidget *entry_name;
 393         GtkWidget *entry_server;
 394         GtkWidget *hbox_spin;
 395         GtkObject *spinbtn_port_adj;
 396         GtkWidget *spinbtn_port;
 397 #ifdef USE_LDAP_TLS
 398         GtkWidget *enable_ssl_checkbtn, *enable_tls_checkbtn;
 399 #endif
 400         GtkWidget *entry_baseDN;
 401         GtkWidget *check_btn;
 402         GtkWidget *lookdn_btn;
 403         GtkTooltips *toolTip;
 404         gint top;
 405
 406         vbox = gtk_vbox_new( FALSE, 8 );
 407         gtk_widget_show( vbox );
 408         gtk_container_add( GTK_CONTAINER( ldapedit.notebook ), vbox );
 409
 410         label = gtk_label_new( pageLbl );
 411         gtk_widget_show( label );
 412         gtk_notebook_set_tab_label(
 413                 GTK_NOTEBOOK( ldapedit.notebook ),
 414                 gtk_notebook_get_nth_page( GTK_NOTEBOOK( ldapedit.notebook ), pageNum ), label );
 415
 416         table = gtk_table_new( LDAPEDIT_TABLE_ROWS, LDAPEDIT_TABLE_COLS, FALSE);
 417         gtk_box_pack_start(GTK_BOX(vbox), table, FALSE, FALSE, 0);
 418         gtk_container_set_border_width( GTK_CONTAINER(table), 8 );
 419         gtk_table_set_row_spacings(GTK_TABLE(table), 8);
 420         gtk_table_set_col_spacings(GTK_TABLE(table), 8);
 421
 422         /* First row */
 423         top = 0;
 424         label = gtk_label_new(_("Name"));
 425         gtk_table_attach(GTK_TABLE(table), label, 0, 1, top, (top + 1), GTK_FILL, 0, 0, 0);
 426         gtk_misc_set_alignment(GTK_MISC(label), 0, 0.5);
 427
 428         entry_name = gtk_entry_new();
 429         gtk_table_attach(GTK_TABLE(table), entry_name, 1, 2, top, (top + 1),
 430                 GTK_EXPAND|GTK_SHRINK|GTK_FILL, 0, 0, 0);
 431
 432         toolTip = gtk_tooltips_new();
 433         gtk_tooltips_set_tip( toolTip, entry_name, _(
 434                 "A name that you wish to call the server." ),
 435                 NULL );
 436
 437         /* Next row */
 438         ++top;
 439         label = gtk_label_new(_("Hostname"));
 440         gtk_table_attach(GTK_TABLE(table), label, 0, 1, top, (top + 1), GTK_FILL, 0, 0, 0);
 441         gtk_misc_set_alignment(GTK_MISC(label), 0, 0.5);
 442
 443         entry_server = gtk_entry_new();
 444         gtk_table_attach(GTK_TABLE(table), entry_server, 1, 2, top, (top + 1),
 445                 GTK_EXPAND|GTK_SHRINK|GTK_FILL, 0, 0, 0);
 446
 447         toolTip = gtk_tooltips_new();
 448         gtk_tooltips_set_tip( toolTip, entry_server, _(
 449                 "This is the hostname of the server. For example, " \
 450                 "\"ldap.mydomain.com\" may be appropriate for the " \
 451                 "\"mydomain.com\" organization. An IP address may also be " \
 452                 "used. You may specify \"localhost\" if running an LDAP " \
 453                 "server on the same computer as Claws Mail." ),
 454                 NULL );
 455
 456         /* Next row */
 457         ++top;
 458         label = gtk_label_new(_("Port"));
 459         gtk_table_attach(GTK_TABLE(table), label, 0, 1, top, (top + 1), GTK_FILL, 0, 0, 0);
 460         gtk_misc_set_alignment(GTK_MISC(label), 0, 0.5);
 461
 462         hbox_spin = gtk_hbox_new (FALSE, 8);
 463         spinbtn_port_adj = gtk_adjustment_new (389, 1, 65535, 1, 1000, 1000);
 464         spinbtn_port = gtk_spin_button_new(GTK_ADJUSTMENT (spinbtn_port_adj), 1, 0);
 465         gtk_box_pack_start (GTK_BOX (hbox_spin), spinbtn_port, TRUE, FALSE, 0);
 466         gtk_widget_set_size_request (spinbtn_port, 64, -1);
 467         gtk_spin_button_set_numeric (GTK_SPIN_BUTTON (spinbtn_port), TRUE);
 468
 469 #ifdef USE_LDAP_TLS
 470         enable_tls_checkbtn = gtk_check_button_new_with_label(_("TLS"));
 471         enable_ssl_checkbtn = gtk_check_button_new_with_label(_("SSL"));
 472         SET_TOGGLE_SENSITIVITY_REVERSE(enable_tls_checkbtn, enable_ssl_checkbtn);
 473         SET_TOGGLE_SENSITIVITY_REVERSE(enable_ssl_checkbtn, enable_tls_checkbtn);
 474         gtk_tooltips_set_tip( toolTip, enable_tls_checkbtn, _(
 475                 "Enable secure connection to the LDAP server via TLS."
 476                 "If connection fails, be sure to check the correct "
 477                 "configuration in ldap.conf (TLS_CACERTDIR and TLS_REQCERT fields)." ),
 478                 NULL );
 479         gtk_tooltips_set_tip( toolTip, enable_ssl_checkbtn, _(
 480                 "Enable secure connection to the LDAP server via SSL."
 481                 "If connection fails, be sure to check the correct "
 482                 "configuration in ldap.conf (TLS_CACERTDIR and TLS_REQCERT fields)." ),
 483                 NULL );
 484
 485         gtk_box_pack_start (GTK_BOX (hbox_spin), enable_tls_checkbtn, TRUE, FALSE, 0);
 486         gtk_box_pack_start (GTK_BOX (hbox_spin), enable_ssl_checkbtn, TRUE, FALSE, 0);
 487 #endif
 488
 489         gtk_table_attach(GTK_TABLE(table), hbox_spin, 1, 2, top, (top + 1),
 490                 GTK_EXPAND|GTK_SHRINK|GTK_FILL, 0, 0, 0);
 491
 492         toolTip = gtk_tooltips_new();
 493         gtk_tooltips_set_tip( toolTip, spinbtn_port, _(
 494                 "The port number that the server listens on. Port 389 is " \
 495                 "the default." ),
 496                 NULL );
 497
 498         check_btn = gtk_button_new_with_label( _(" Check Server "));
 499         gtk_table_attach(GTK_TABLE(table), check_btn, 2, 3, top, (top + 1), GTK_FILL, 0, 3, 0);
 500
 501         toolTip = gtk_tooltips_new();
 502         gtk_tooltips_set_tip( toolTip, check_btn, _(
 503                 "Press this button to test the connection to the server." ),
 504                 NULL );
 505
 506         /* Next row */
 507         ++top;
 508         label = gtk_label_new(_("Search Base"));
 509         gtk_table_attach(GTK_TABLE(table), label, 0, 1, top, (top + 1), GTK_FILL, 0, 0, 0);
 510         gtk_misc_set_alignment(GTK_MISC(label), 0, 0.5);
 511
 512         entry_baseDN = gtk_entry_new();
 513         gtk_table_attach(GTK_TABLE(table), entry_baseDN, 1, 2, top, (top + 1),
 514                 GTK_EXPAND|GTK_SHRINK|GTK_FILL, 0, 0, 0);
 515
 516         toolTip = gtk_tooltips_new();
 517         gtk_tooltips_set_tip( toolTip, entry_baseDN, _(
 518                 "This specifies the name of the directory to be searched " \
 519                 "on the server. Examples include:\n" \
 520                 "  dc=claws-mail,dc=org\n" \
 521                 "  ou=people,dc=domainname,dc=com\n" \
 522                 "  o=Organization Name,c=Country\n"
 523                 ),
 524                 NULL );
 525
 526         lookdn_btn = gtkut_get_browse_file_btn(_("_Browse"));
 527         gtk_table_attach(GTK_TABLE(table), lookdn_btn, 2, 3, top, (top + 1), GTK_FILL, 0, 3, 0);
 528
 529         toolTip = gtk_tooltips_new();
 530         gtk_tooltips_set_tip( toolTip, lookdn_btn, _(
 531                 "Press this button to lookup the name of available " \
 532                 "directory names on the server." ),
 533                 NULL );
 534
 535         /* Signal handlers */
 536         g_signal_connect(G_OBJECT(check_btn), "clicked",
 537                          G_CALLBACK(edit_ldap_server_check), NULL);
 538         g_signal_connect(G_OBJECT(lookdn_btn), "clicked",
 539                          G_CALLBACK(edit_ldap_basedn_select), NULL);
 540
 541         /* Done */
 542         gtk_widget_show_all(vbox);
 543
 544         ldapedit.entry_name   = entry_name;
 545         ldapedit.entry_server = entry_server;
 546         ldapedit.spinbtn_port = spinbtn_port;
 547         ldapedit.entry_baseDN = entry_baseDN;
 548 #ifdef USE_LDAP_TLS
 549         ldapedit.enable_ssl = enable_ssl_checkbtn;
 550         ldapedit.enable_tls = enable_tls_checkbtn;
 551
 552         g_signal_connect(G_OBJECT(enable_ssl_checkbtn), "toggled", \
 553                          G_CALLBACK(editldap_update_port), NULL);
 554 #endif
 555 }
 556
 557 static void addressbook_edit_ldap_page_search( gint pageNum, gchar *pageLbl ) {
 558         GtkWidget *vbox;
 559         GtkWidget *table;
 560         GtkWidget *label;
 561         GtkWidget *entry_criteria;
 562         GtkWidget *hbox_spin;
 563         GtkObject *spinbtn_queryage_adj;
 564         GtkWidget *spinbtn_queryage;
 565         GtkWidget *check_dynsearch;
 566         GtkWidget *check_matchoption;
 567         GtkWidget *reset_btn;
 568         GtkTooltips *toolTip;
 569         gint top;
 570
 571         vbox = gtk_vbox_new( FALSE, 8 );
 572         gtk_widget_show( vbox );
 573         gtk_container_add( GTK_CONTAINER( ldapedit.notebook ), vbox );
 574
 575         label = gtk_label_new( pageLbl );
 576         gtk_widget_show( label );
 577         gtk_notebook_set_tab_label(
 578                 GTK_NOTEBOOK( ldapedit.notebook ),
 579                 gtk_notebook_get_nth_page( GTK_NOTEBOOK( ldapedit.notebook ), pageNum ), label );
 580
 581         table = gtk_table_new( LDAPEDIT_TABLE_ROWS, LDAPEDIT_TABLE_COLS, FALSE);
 582         gtk_box_pack_start(GTK_BOX(vbox), table, FALSE, FALSE, 0);
 583         gtk_container_set_border_width( GTK_CONTAINER(table), 8 );
 584         gtk_table_set_row_spacings(GTK_TABLE(table), 8);
 585         gtk_table_set_col_spacings(GTK_TABLE(table), 8);
 586
 587         /* First row */
 588         top = 0;
 589         label = gtk_label_new(_("Search Attributes"));
 590         gtk_table_attach(GTK_TABLE(table), label, 0, 1, top, (top + 1), GTK_FILL, 0, 0, 0);
 591         gtk_misc_set_alignment(GTK_MISC(label), 0, 0.5);
 592
 593         entry_criteria = gtk_entry_new();
 594         gtk_editable_set_editable(GTK_EDITABLE(entry_criteria), FALSE);
 595         gtk_table_attach(GTK_TABLE(table), entry_criteria, 1, 2, top, (top + 1),
 596                 GTK_EXPAND|GTK_SHRINK|GTK_FILL, 0, 0, 0);
 597
 598         toolTip = gtk_tooltips_new();
 599         gtk_tooltips_set_tip( toolTip, entry_criteria, _(
 600                 "A list of LDAP attribute names that should be searched " \
 601                 "when attempting to find a name or address." ),
 602                 NULL );
 603
 604         reset_btn = gtk_button_new_with_label( _(" Defaults "));
 605         gtk_table_attach(GTK_TABLE(table), reset_btn, 2, 3, top, (top + 1), GTK_FILL, 0, 3, 0);
 606
 607         toolTip = gtk_tooltips_new();
 608         gtk_tooltips_set_tip( toolTip, reset_btn, _(
 609                 "This resets the attribute names to a default value " \
 610                 "that should find most names and addresses during a " \
 611                 "name or address search process." ),
 612                 NULL );
 613
 614         /* Next row */
 615         ++top;
 616         label = gtk_label_new(_("Max Query Age (secs)"));
 617         gtk_table_attach(GTK_TABLE(table), label, 0, 1, top, (top + 1), GTK_FILL, 0, 0, 0);
 618         gtk_misc_set_alignment(GTK_MISC(label), 0, 0.5);
 619
 620         hbox_spin = gtk_hbox_new (FALSE, 8);
 621         spinbtn_queryage_adj = gtk_adjustment_new(
 622                 LDAPCTL_DFL_QUERY_AGE, 1, LDAPCTL_MAX_QUERY_AGE, 10, 1000, 1000 );
 623         spinbtn_queryage = gtk_spin_button_new(GTK_ADJUSTMENT (spinbtn_queryage_adj), 1, 0);
 624         gtk_box_pack_start (GTK_BOX (hbox_spin), spinbtn_queryage, FALSE, FALSE, 0);
 625         gtk_widget_set_size_request (spinbtn_queryage, 64, -1);
 626         gtk_spin_button_set_numeric (GTK_SPIN_BUTTON (spinbtn_queryage), TRUE);
 627         gtk_table_attach(GTK_TABLE(table), hbox_spin, 1, 2, top, (top + 1),
 628                 GTK_EXPAND|GTK_SHRINK|GTK_FILL, 0, 0, 0);
 629
 630         toolTip = gtk_tooltips_new();
 631         gtk_tooltips_set_tip( toolTip, spinbtn_queryage, _(
 632                 "This defines the maximum period of time (in seconds) that " \
 633                 "an address search result is valid for address completion " \
 634                 "purposes. Search results are stored in a cache until this " \
 635                 "period of time has passed and then retired. This will " \
 636                 "improve the response time when attempting to search for " \
 637                 "the same name or address on subsequent address completion " \
 638                 "requests. The cache will be searched in preference to " \
 639                 "performing a new server search request. The default value " \
 640                 "of 600 seconds (10 minutes), should be sufficient for most " \
 641                 "servers. A larger value will reduce the search time for " \
 642                 "subsequent searches. This is useful for servers that have " \
 643                 "slow response times at the expense of more memory to cache " \
 644                 "results." ),
 645                 NULL );
 646
 647         /* Next row */
 648         ++top;
 649         check_dynsearch = gtk_check_button_new_with_label(
 650                                 _("Include server in dynamic search") );
 651         gtk_table_attach(GTK_TABLE(table), check_dynsearch, 1, 3, top, (top + 1),
 652                 GTK_EXPAND|GTK_SHRINK|GTK_FILL, 0, 0, 0);
 653
 654         toolTip = gtk_tooltips_new();
 655         gtk_tooltips_set_tip( toolTip, check_dynsearch, _(
 656                 "Check this option to include this server for dynamic " \
 657                 "searches when using address completion." ),
 658                 NULL );
 659
 660         /* Next row */
 661         ++top;
 662         check_matchoption = gtk_check_button_new_with_label(
 663                                 _("Match names 'containing' search term") );
 664         gtk_table_attach(GTK_TABLE(table), check_matchoption, 1, 3, top, (top + 1),
 665                 GTK_EXPAND|GTK_SHRINK|GTK_FILL, 0, 0, 0);
 666
 667         toolTip = gtk_tooltips_new();
 668         gtk_tooltips_set_tip( toolTip, check_matchoption, _(
 669                 "Searches for names and addresses can be performed either " \
 670                 "using \"begins-with\" or \"contains\" search term. Check " \
 671                 "this option to perform a \"contains\" search; this type of " \
 672                 "search usually takes longer to complete. Note that for " \
 673                 "performance reasons, address completion uses " \
 674                 "\"begins-with\" for all searches against other address " \
 675                 "interfaces." \
 676                 ),
 677                 NULL );
 678
 679         /* Signal handlers */
 680         g_signal_connect(G_OBJECT(reset_btn), "clicked",
 681                          G_CALLBACK(edit_ldap_search_reset), NULL);
 682
 683         /* Done */
 684         gtk_widget_show_all(vbox);
 685
 686         ldapedit.entry_criteria    = entry_criteria;
 687         ldapedit.spinbtn_queryage  = spinbtn_queryage;
 688         ldapedit.check_dynsearch   = check_dynsearch;
 689         ldapedit.check_matchoption = check_matchoption;
 690 }
 691
 692 static void addressbook_edit_ldap_page_extended( gint pageNum, gchar *pageLbl ) {
 693         GtkWidget *vbox;
 694         GtkWidget *table;
 695         GtkWidget *label;
 696         GtkWidget *entry_bindDN;
 697         GtkWidget *entry_bindPW;
 698         GtkWidget *hbox_spin;
 699         GtkObject *spinbtn_timeout_adj;
 700         GtkWidget *spinbtn_timeout;
 701         GtkObject *spinbtn_maxentry_adj;
 702         GtkWidget *spinbtn_maxentry;
 703         GtkTooltips *toolTip;
 704         gint top;
 705
 706         vbox = gtk_vbox_new( FALSE, 8 );
 707         gtk_widget_show( vbox );
 708         gtk_container_add( GTK_CONTAINER( ldapedit.notebook ), vbox );
 709
 710         label = gtk_label_new( pageLbl );
 711         gtk_widget_show( label );
 712         gtk_notebook_set_tab_label(
 713                 GTK_NOTEBOOK( ldapedit.notebook ),
 714                 gtk_notebook_get_nth_page( GTK_NOTEBOOK( ldapedit.notebook ), pageNum ), label );
 715
 716         table = gtk_table_new( LDAPEDIT_TABLE_ROWS, LDAPEDIT_TABLE_COLS, FALSE);
 717         gtk_box_pack_start(GTK_BOX(vbox), table, FALSE, FALSE, 0);
 718         gtk_container_set_border_width( GTK_CONTAINER(table), 8 );
 719         gtk_table_set_row_spacings(GTK_TABLE(table), 8);
 720         gtk_table_set_col_spacings(GTK_TABLE(table), 8);
 721
 722         /* Next row */
 723         top = 0;
 724         label = gtk_label_new(_("Bind DN"));
 725         gtk_table_attach(GTK_TABLE(table), label, 0, 1, top, (top + 1), GTK_FILL, 0, 0, 0);
 726         gtk_misc_set_alignment(GTK_MISC(label), 0, 0.5);
 727
 728         entry_bindDN = gtk_entry_new();
 729         gtk_table_attach(GTK_TABLE(table), entry_bindDN, 1, 2, top, (top + 1),
 730                 GTK_EXPAND|GTK_SHRINK|GTK_FILL, 0, 0, 0);
 731
 732         toolTip = gtk_tooltips_new();
 733         gtk_tooltips_set_tip( toolTip, entry_bindDN, _(
 734                 "The LDAP user account name to be used to connect to the server. " \
 735                 "This is usually only used for protected servers. This name " \
 736                 "is typically formatted as: \"cn=user,dc=claws-mail,dc=org\". " \
 737                 "This is usually left empty when performing a search." ),
 738                 NULL );
 739
 740         /* Next row */
 741         ++top;
 742         label = gtk_label_new(_("Bind Password"));
 743         gtk_table_attach(GTK_TABLE(table), label, 0, 1, top, (top + 1), GTK_FILL, 0, 0, 0);
 744         gtk_misc_set_alignment(GTK_MISC(label), 0, 0.5);
 745
 746         entry_bindPW = gtk_entry_new();
 747         gtk_table_attach(GTK_TABLE(table), entry_bindPW, 1, 2, top, (top + 1),
 748                 GTK_EXPAND|GTK_SHRINK|GTK_FILL, 0, 0, 0);
 749         gtk_entry_set_visibility(GTK_ENTRY(entry_bindPW), FALSE);
 750
 751         toolTip = gtk_tooltips_new();
 752         gtk_tooltips_set_tip( toolTip, entry_bindPW, _(
 753                 "The password to be used when connecting as the \"Bind DN\" " \
 754                 "user." ),
 755                 NULL );
 756
 757         /* Next row */
 758         ++top;
 759         label = gtk_label_new(_("Timeout (secs)"));
 760         gtk_table_attach(GTK_TABLE(table), label, 0, 1, top, (top + 1), GTK_FILL, 0, 0, 0);
 761         gtk_misc_set_alignment(GTK_MISC(label), 0, 0.5);
 762
 763         hbox_spin = gtk_hbox_new (FALSE, 8);
 764         spinbtn_timeout_adj = gtk_adjustment_new (0, 0, 300, 1, 10, 10);
 765         spinbtn_timeout = gtk_spin_button_new(GTK_ADJUSTMENT (spinbtn_timeout_adj), 1, 0);
 766         gtk_box_pack_start (GTK_BOX (hbox_spin), spinbtn_timeout, FALSE, FALSE, 0);
 767         gtk_widget_set_size_request (spinbtn_timeout, 64, -1);
 768         gtk_spin_button_set_numeric (GTK_SPIN_BUTTON (spinbtn_timeout), TRUE);
 769         gtk_table_attach(GTK_TABLE(table), hbox_spin, 1, 2, top, (top + 1),
 770                 GTK_EXPAND|GTK_SHRINK|GTK_FILL, 0, 0, 0);
 771
 772         toolTip = gtk_tooltips_new();
 773         gtk_tooltips_set_tip( toolTip, spinbtn_timeout, _(
 774                 "The timeout period in seconds." ), NULL );
 775
 776         /* Next row */
 777         ++top;
 778         label = gtk_label_new(_("Maximum Entries"));
 779         gtk_table_attach(GTK_TABLE(table), label, 0, 1, top, (top + 1), GTK_FILL, 0, 0, 0);
 780         gtk_misc_set_alignment(GTK_MISC(label), 0, 0.5);
 781
 782         hbox_spin = gtk_hbox_new (FALSE, 8);
 783         spinbtn_maxentry_adj = gtk_adjustment_new (0, 0, 500, 1, 10, 10);
 784         spinbtn_maxentry = gtk_spin_button_new(GTK_ADJUSTMENT (spinbtn_maxentry_adj), 1, 0);
 785         gtk_box_pack_start (GTK_BOX (hbox_spin), spinbtn_maxentry, FALSE, FALSE, 0);
 786         gtk_widget_set_size_request (spinbtn_maxentry, 64, -1);
 787         gtk_spin_button_set_numeric (GTK_SPIN_BUTTON (spinbtn_maxentry), TRUE);
 788         gtk_table_attach(GTK_TABLE(table), hbox_spin, 1, 2, top, (top + 1),
 789                 GTK_EXPAND|GTK_SHRINK|GTK_FILL, 0, 0, 0);
 790
 791         toolTip = gtk_tooltips_new();
 792         gtk_tooltips_set_tip( toolTip, spinbtn_maxentry, _(
 793                 "The maximum number of entries that should be returned " \
 794                 "in the search result." ),
 795                 NULL );
 796
 797         /* Done */
 798         gtk_widget_show_all(vbox);
 799
 800         ldapedit.entry_bindDN     = entry_bindDN;
 801         ldapedit.entry_bindPW     = entry_bindPW;
 802         ldapedit.spinbtn_timeout  = spinbtn_timeout;
 803         ldapedit.spinbtn_maxentry = spinbtn_maxentry;
 804 }
 805
 806 static void addressbook_edit_ldap_create( gboolean *cancelled ) {
 807         gint page = 0;
 808         addressbook_edit_ldap_dialog_create( cancelled );
 809         addressbook_edit_ldap_page_basic( page++, _( "Basic" ) );
 810         addressbook_edit_ldap_page_search( page++, _( "Search" ) );
 811         addressbook_edit_ldap_page_extended( page++, _( "Extended" ) );
 812         gtk_widget_show_all( ldapedit.window );
 813 }
 814
 815 /**
 816  * Format criteria list for display.
 817  * \param ctl Control object.
 818  * \return Formatted string, or <i>NULL</i> if no attributes found.
 819  */
 820 static gchar *editldap_build_criteria_list( const LdapControl *ctl ) {
 821         gchar *str = NULL;
 822         gchar *tmp = NULL;
 823         GList *node;
 824
 825         node = ldapctl_get_criteria_list( ctl );
 826         while( node ) {
 827                 gchar *attr = node->data;
 828                 if( str ) {
 829                         tmp = g_strdup_printf( "%s, %s", str, attr );
 830                         g_free( str );
 831                         str = tmp;
 832                         tmp = NULL;
 833                 }
 834                 else {
 835                         str = g_strdup( attr );
 836                 }
 837                 node = g_list_next( node );
 838         }
 839
 840         return str;
 841 }
 842
 843 /**
 844  * Parse out individual attribute names from criteria string.
 845  * \param criteria Criteria string.
 846  * \ctl   Control object.
 847  */
 848 static void editldap_parse_criteria( gchar *criteria, LdapControl *ctl ) {
 849         gchar *ptr;
 850         gchar **splitStr;
 851         gint i;
 852
 853         /* Replace delimiters with spaces */
 854         ptr = criteria;
 855         while( *ptr ) {
 856                 if( *ptr == ',' || *ptr == ';' || *ptr == '|' )
 857                         *ptr = ' ';
 858                 ptr++;
 859         }
 860
 861         /* Parse string */
 862         ldapctl_criteria_list_clear( ctl );
 863         splitStr = g_strsplit( criteria, " ", 0 );
 864         i = 0;
 865         while( TRUE ) {
 866                 if( splitStr[i] ) {
 867                         if( *splitStr[i] ) {
 868                                 ldapctl_criteria_list_add( ctl, splitStr[i] );
 869                         }
 870                 }
 871                 else {
 872                         break;
 873                 }
 874                 i++;
 875         }
 876         g_strfreev( splitStr );
 877 }
 878
 879 /**
 880  * Clear entry fields to reasonable defaults (for a new server entry).
 881  */
 882 static void edit_ldap_clear_fields() {
 883         gtk_entry_set_text(
 884                 GTK_ENTRY(ldapedit.entry_name), ADDRESSBOOK_GUESS_LDAP_NAME );
 885         gtk_entry_set_text(
 886                 GTK_ENTRY(ldapedit.entry_server), ADDRESSBOOK_GUESS_LDAP_SERVER );
 887         gtk_entry_set_text(GTK_ENTRY(ldapedit.entry_baseDN), "");
 888         gtk_entry_set_text(GTK_ENTRY(ldapedit.entry_bindDN), "");
 889         gtk_entry_set_text(GTK_ENTRY(ldapedit.entry_bindPW), "");
 890         gtk_spin_button_set_value(
 891                 GTK_SPIN_BUTTON( ldapedit.spinbtn_port ), LDAPCTL_DFL_PORT );
 892         gtk_spin_button_set_value(
 893                 GTK_SPIN_BUTTON( ldapedit.spinbtn_timeout ), LDAPCTL_DFL_TIMEOUT );
 894         gtk_spin_button_set_value(
 895                 GTK_SPIN_BUTTON( ldapedit.spinbtn_maxentry ), LDAPCTL_DFL_TIMEOUT );
 896         gtk_entry_set_text(
 897                 GTK_ENTRY(ldapedit.entry_criteria), ldapctl_get_default_criteria());
 898         gtk_spin_button_set_value(
 899                 GTK_SPIN_BUTTON(ldapedit.spinbtn_queryage), LDAPCTL_DFL_QUERY_AGE );
 900         gtk_toggle_button_set_active(
 901                 GTK_TOGGLE_BUTTON( ldapedit.check_dynsearch), TRUE );
 902         gtk_toggle_button_set_active(
 903                 GTK_TOGGLE_BUTTON( ldapedit.check_matchoption), FALSE );
 904 #ifdef USE_LDAP_TLS
 905         gtk_toggle_button_set_active(
 906                 GTK_TOGGLE_BUTTON( ldapedit.enable_ssl), FALSE );
 907         gtk_toggle_button_set_active(
 908                 GTK_TOGGLE_BUTTON( ldapedit.enable_tls), FALSE );
 909 #endif
 910 }
 911
 912 /**
 913  * Load entry fields from server control data.
 914  * \param server Server object.
 915  */
 916 static void edit_ldap_set_fields( LdapServer *server ) {
 917         LdapControl *ctl;
 918         gchar *crit;
 919
 920         if( ldapsvr_get_name( server ) )
 921                 gtk_entry_set_text(GTK_ENTRY(ldapedit.entry_name),
 922                 ldapsvr_get_name( server ) );
 923
 924         ctl = server->control;
 925         if( ctl->hostName )
 926                 gtk_entry_set_text(
 927                         GTK_ENTRY(ldapedit.entry_server), ctl->hostName);
 928         if( ctl->baseDN )
 929                 gtk_entry_set_text(
 930                         GTK_ENTRY(ldapedit.entry_baseDN), ctl->baseDN );
 931         if( ctl->bindDN )
 932                 gtk_entry_set_text(
 933                         GTK_ENTRY(ldapedit.entry_bindDN), ctl->bindDN );
 934         if( ctl->bindPass )
 935                 gtk_entry_set_text(
 936                         GTK_ENTRY(ldapedit.entry_bindPW), ctl->bindPass );
 937         gtk_spin_button_set_value(
 938                 GTK_SPIN_BUTTON(ldapedit.spinbtn_port), ctl->port );
 939         gtk_spin_button_set_value(
 940                 GTK_SPIN_BUTTON(ldapedit.spinbtn_timeout), ctl->timeOut );
 941         gtk_spin_button_set_value(
 942                 GTK_SPIN_BUTTON(ldapedit.spinbtn_maxentry), ctl->maxEntries );
 943 #ifdef USE_LDAP_TLS
 944         gtk_toggle_button_set_active(
 945                 GTK_TOGGLE_BUTTON(ldapedit.enable_tls), ctl->enableTLS );
 946         gtk_toggle_button_set_active(
 947                 GTK_TOGGLE_BUTTON(ldapedit.enable_ssl), ctl->enableSSL );
 948 #endif
 949         /* Format criteria */
 950         crit = editldap_build_criteria_list( ctl );
 951         if( crit ) {
 952                 gtk_entry_set_text(GTK_ENTRY(ldapedit.entry_criteria), crit );
 953                 g_free( crit );
 954         }
 955         else {
 956                 gtk_entry_set_text(GTK_ENTRY(ldapedit.entry_criteria), "" );
 957         }
 958         gtk_spin_button_set_value(
 959                 GTK_SPIN_BUTTON(ldapedit.spinbtn_queryage), ctl->maxQueryAge );
 960         gtk_toggle_button_set_active(
 961                 GTK_TOGGLE_BUTTON( ldapedit.check_dynsearch), server->searchFlag );
 962         gtk_toggle_button_set_active(
 963                 GTK_TOGGLE_BUTTON( ldapedit.check_matchoption),
 964                 ( ctl->matchingOption == LDAPCTL_MATCH_CONTAINS ) );
 965 }
 966
 967 /**
 968  * Edit LDAP server datasource that appears addressbook.
 969  * \param addrIndex Address index object.
 970  * \param ads       Data source adapter.
 971  * \return Update data source adapter, or <code>NULL</code> if user cancelled
 972  *         edit with dialog.
 973  */
 974 AdapterDSource *addressbook_edit_ldap(
 975         AddressIndex *addrIndex, AdapterDSource *ads )
 976 {
 977         static gboolean cancelled;
 978         gchar *sName, *sHost, *sBase, *sBind, *sPass, *sCrit;
 979         gint iPort, iMaxE, iTime, iAge;
 980         gboolean bSrch, bMatch;
 981         AddressDataSource *ds = NULL;
 982         LdapServer *server = NULL;
 983         LdapControl *ctl = NULL;
 984         gboolean fin, ssl = FALSE, tls = FALSE;
 985
 986         if (!ldapedit.window)
 987                 addressbook_edit_ldap_create(&cancelled);
 988         gtk_notebook_set_current_page( GTK_NOTEBOOK(ldapedit.notebook), PAGE_BASIC );
 989         gtk_widget_grab_focus(ldapedit.ok_btn);
 990         gtk_widget_grab_focus(ldapedit.entry_name);
 991         gtk_widget_show(ldapedit.window);
 992         manage_window_set_transient(GTK_WINDOW(ldapedit.window));
 993
 994         edit_ldap_status_show( "" );
 995         if( ads ) {
 996                 ds = ads->dataSource;
 997                 server = ds->rawDataSource;
 998                 edit_ldap_set_fields( server );
 999                 gtk_window_set_title(
1000                         GTK_WINDOW(ldapedit.window), _("Edit LDAP Server"));
1001         }
1002         else {
1003                 edit_ldap_clear_fields(NULL);
1004                 gtk_window_set_title(
1005                         GTK_WINDOW(ldapedit.window), _("Add New LDAP Server"));
1006         }
1007
1008         gtk_main();
1009         gtk_widget_hide(ldapedit.window);
1010         if (cancelled == TRUE) return NULL;
1011
1012         sName = gtk_editable_get_chars(
1013                         GTK_EDITABLE(ldapedit.entry_name), 0, -1 );
1014         sHost = gtk_editable_get_chars(
1015                         GTK_EDITABLE(ldapedit.entry_server), 0, -1 );
1016         sBase = gtk_editable_get_chars(
1017                         GTK_EDITABLE(ldapedit.entry_baseDN), 0, -1 );
1018         sCrit = gtk_editable_get_chars(
1019                         GTK_EDITABLE(ldapedit.entry_criteria), 0, -1 );
1020         sBind = gtk_editable_get_chars(
1021                         GTK_EDITABLE(ldapedit.entry_bindDN), 0, -1 );
1022         sPass = gtk_editable_get_chars(
1023                         GTK_EDITABLE(ldapedit.entry_bindPW), 0, -1 );
1024         iPort = gtk_spin_button_get_value_as_int(
1025                         GTK_SPIN_BUTTON( ldapedit.spinbtn_port ) );
1026         iTime = gtk_spin_button_get_value_as_int(
1027                         GTK_SPIN_BUTTON( ldapedit.spinbtn_timeout ) );
1028         iMaxE = gtk_spin_button_get_value_as_int(
1029                         GTK_SPIN_BUTTON( ldapedit.spinbtn_maxentry ) );
1030         iAge  = gtk_spin_button_get_value_as_int(
1031                         GTK_SPIN_BUTTON( ldapedit.spinbtn_queryage ) );
1032         bSrch = gtk_toggle_button_get_active(
1033                         GTK_TOGGLE_BUTTON( ldapedit.check_dynsearch ) );
1034         bMatch = gtk_toggle_button_get_active(
1035                         GTK_TOGGLE_BUTTON( ldapedit.check_matchoption ) );
1036 #ifdef USE_LDAP_TLS
1037         ssl = gtk_toggle_button_get_active(
1038                         GTK_TOGGLE_BUTTON( ldapedit.enable_ssl ) );
1039         tls = gtk_toggle_button_get_active(
1040                         GTK_TOGGLE_BUTTON( ldapedit.enable_tls ) );
1041 #endif
1042         fin = FALSE;
1043         if( *sName == '\0' ) fin = TRUE;
1044         if( *sHost == '\0' ) fin = TRUE;
1045
1046         if( ! fin ) {
1047                 /* Save changes */
1048                 if( ! ads ) {
1049                         /* New server */
1050                         server = ldapsvr_create();
1051                         ds = addrindex_index_add_datasource(
1052                                 addrIndex, ADDR_IF_LDAP, server );
1053                         ads = addressbook_create_ds_adapter(
1054                                 ds, ADDR_LDAP, NULL );
1055                 }
1056                 ctl = server->control;
1057                 addressbook_ads_set_name( ads, sName );
1058                 ldapsvr_set_name( server, sName );
1059                 ldapsvr_set_search_flag( server, bSrch );
1060                 ldapctl_set_host( ctl, sHost );
1061                 ldapctl_set_base_dn( ctl, sBase );
1062                 ldapctl_set_bind_dn( ctl, sBind );
1063                 ldapctl_set_bind_password( ctl, sPass );
1064                 ldapctl_set_port( ctl, iPort );
1065                 ldapctl_set_max_entries( ctl, iMaxE );
1066                 ldapctl_set_timeout( ctl, iTime );
1067                 ldapctl_set_max_query_age( ctl, iAge );
1068 #ifdef USE_LDAP_TLS
1069                 ldapctl_set_tls( ctl, tls );
1070                 ldapctl_set_ssl( ctl, ssl );
1071 #endif
1072                 ldapctl_set_matching_option(
1073                         ctl, bMatch ?
1074                         LDAPCTL_MATCH_CONTAINS : LDAPCTL_MATCH_BEGINWITH );
1075
1076                 /* Save attributes */
1077                 editldap_parse_criteria( sCrit, ctl );
1078
1079         }
1080         g_free( sName );
1081         g_free( sHost );
1082         g_free( sBase );
1083         g_free( sBind );
1084         g_free( sPass );
1085         g_free( sCrit );
1086
1087         return ads;
1088 }
1089
1090 #endif /* USE_LDAP */
1091
1092 /*
1093 * End of Source.
1094 */