src/editldap.c

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