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