2 * Sylpheed -- a GTK+ based, lightweight, and fast e-mail client
3 * Copyright (C) 2003 Match Grun
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 2 of the License, or
8 * (at your option) any later version.
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.
15 * You should have received a copy of the GNU General Public License
16 * along with this program; if not, write to the Free Software
17 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
21 * Functions necessary to access LDAP servers.
38 #include "addrcache.h"
40 #include "ldapquery.h"
41 #include "ldapserver.h"
43 #include "adbookbase.h"
46 * Create new LDAP server interface object with no control object.
47 * \return Initialized LDAP server object.
49 LdapServer *ldapsvr_create_noctl( void ) {
52 server = g_new0( LdapServer, 1 );
53 server->type = ADBOOKTYPE_LDAP;
54 server->addressCache = addrcache_create();
55 server->retVal = MGU_SUCCESS;
56 server->control = NULL;
57 server->listQuery = NULL;
58 server->searchFlag = FALSE;
63 * Create new LDAP server interface object.
64 * \return Initialized LDAP server object.
66 LdapServer *ldapsvr_create( void ) {
69 server = ldapsvr_create_noctl();
70 server->control = ldapctl_create();
75 * Return name of server.
76 * \param server Server object.
77 * \return Name for server.
79 gchar *ldapsvr_get_name( LdapServer *server ) {
80 g_return_val_if_fail( server != NULL, NULL );
81 return addrcache_get_name( server->addressCache );
85 * Specify name to be used.
86 * \param server Server object.
87 * \param value Name for server.
89 void ldapsvr_set_name( LdapServer* server, const gchar *value ) {
90 g_return_if_fail( server != NULL );
91 addrcache_set_name( server->addressCache, value );
95 * Refresh internal variables to force a file read.
96 * \param server Server object.
98 void ldapsvr_force_refresh( LdapServer *server ) {
99 addrcache_refresh( server->addressCache );
103 * Return status/error code.
104 * \param server Server object.
105 * \return Status/error code.
107 gint ldapsvr_get_status( LdapServer *server ) {
108 g_return_val_if_fail( server != NULL, -1 );
109 return server->retVal;
113 * Return reference to root level folder.
114 * \param server Server object.
115 * \return Root level folder.
117 ItemFolder *ldapsvr_get_root_folder( LdapServer *server ) {
118 g_return_val_if_fail( server != NULL, NULL );
120 printf( "ldapsvr_get_root_folder/start\n" );
121 ldapsvr_print_data( server, stdout );
122 printf( "ldapsvr_get_root_folder/done\n" );
124 return addrcache_get_root_folder( server->addressCache );
128 * Test whether server data has been accessed.
129 * \param server Server object.
130 * \return <i>TRUE</i> if data was accessed.
132 gboolean ldapsvr_get_accessed( LdapServer *server ) {
133 g_return_val_if_fail( server != NULL, FALSE );
134 return server->addressCache->accessFlag;
138 * Specify that server's data whas beed accessed.
139 * \param server Server object.
140 * \param value Value for flag.
142 void ldapsvr_set_accessed( LdapServer *server, const gboolean value ) {
143 g_return_if_fail( server != NULL );
144 server->addressCache->accessFlag = value;
148 * Test whether server data has been modified.
149 * \param server Server object.
150 * \return <i>TRUE</i> if data was modified.
152 gboolean ldapsvr_get_modified( LdapServer *server ) {
153 g_return_val_if_fail( server != NULL, FALSE );
154 return server->addressCache->modified;
158 * Specify modify flag.
159 * \param server Server object.
160 * \param value Value for flag.
162 void ldapsvr_set_modified( LdapServer *server, const gboolean value ) {
163 g_return_if_fail( server != NULL );
164 server->addressCache->modified = value;
168 * Test whether data was read from server.
169 * \param server Server object.
170 * \return <i>TRUE</i> if data was read.
172 gboolean ldapsvr_get_read_flag( LdapServer *server ) {
173 g_return_val_if_fail( server != NULL, FALSE );
174 return server->addressCache->dataRead;
178 * Test whether server is to be used for dynamic searches.
179 * \param server Server object.
180 * \return <i>TRUE</i> if server is used for dynamic searches.
182 gboolean ldapsvr_get_search_flag( LdapServer *server ) {
183 g_return_val_if_fail( server != NULL, FALSE );
184 return server->searchFlag;
188 * Specify that server is to be used for dynamic searches.
189 * \param server Server object.
190 * \param value Name for server.
192 void ldapsvr_set_search_flag( LdapServer *server, const gboolean value ) {
193 g_return_if_fail( server != NULL );
194 server->searchFlag = value;
198 * Specify the reference to control data that will be used for the query. The calling
199 * module should be responsible for creating and destroying this control object.
200 * \param server Server object.
201 * \param ctl Control data.
203 void ldapsvr_set_control( LdapServer *server, LdapControl *ctl ) {
204 g_return_if_fail( server != NULL );
205 addrcache_refresh( server->addressCache );
206 server->control = ctl;
210 * Release LDAP control object.
211 * \param server Server object.
213 static void ldapsvr_release_control( LdapServer *server ) {
214 g_return_if_fail( server != NULL );
215 ldapctl_free( server->control );
216 server->control = NULL;
221 * \param server Server object.
223 void ldapsvr_free_all_query( LdapServer *server ) {
225 g_return_if_fail( server != NULL );
227 node = server->listQuery;
229 LdapQuery *qry = node->data;
232 node = g_list_next( node );
234 g_list_free( server->listQuery );
235 server->listQuery = NULL;
239 * Add query to server.
240 * \param server Server object.
241 * \param qry Query object.
243 void ldapsvr_add_query( LdapServer *server, LdapQuery *qry ) {
244 g_return_if_fail( server != NULL );
245 g_return_if_fail( qry != NULL );
247 server->listQuery = g_list_append( server->listQuery, qry );
248 qry->server = server;
252 * Free up LDAP server interface object by releasing internal memory.
253 * \param server Server object.
255 void ldapsvr_free( LdapServer *server ) {
256 g_return_if_fail( server != NULL );
258 /* Stop and cancel any queries that may be active */
259 ldapsvr_stop_all_query( server );
260 ldapsvr_cancel_all_query( server );
263 addrcache_clear( server->addressCache );
264 addrcache_free( server->addressCache );
266 /* Free LDAP control block */
267 ldapctl_free( server->control );
268 server->control = NULL;
270 /* Free all queries */
271 ldapsvr_free_all_query( server );
274 server->type = ADBOOKTYPE_NONE;
275 server->addressCache = NULL;
276 server->retVal = MGU_SUCCESS;
277 server->listQuery = NULL;
278 server->searchFlag = FALSE;
280 /* Now release LDAP object */
285 * Display object to specified stream.
286 * \param server Server object.
287 * \param stream Output stream.
289 void ldapsvr_print_data( LdapServer *server, FILE *stream ) {
293 g_return_if_fail( server != NULL );
295 fprintf( stream, "LdapServer:\n" );
296 fprintf( stream, " ret val: %d\n", server->retVal );
297 fprintf( stream, "srch flag: %s\n",
298 server->searchFlag ? "yes" : "no" );
299 if( server->control ) {
300 ldapctl_print( server->control, stream );
303 fprintf( stream, " control: NULL\n" );
305 addrcache_print( server->addressCache, stream );
306 addritem_print_item_folder( server->addressCache->rootFolder, stream );
310 node = server->listQuery;
312 LdapQuery *qry = node->data;
313 fprintf( stream, " query: %2d : %s\n", i, qry->queryName );
315 node = g_list_next( node );
320 * Return link list of persons.
321 * \param server Server object.
322 * \return List of persons.
324 GList *ldapsvr_get_list_person( LdapServer *server ) {
325 g_return_val_if_fail( server != NULL, NULL );
326 return addrcache_get_list_person( server->addressCache );
330 * Return link list of folders. There are no "real" folders that are returned
332 * \param server Server object.
333 * \return List of folders.
335 GList *ldapsvr_get_list_folder( LdapServer *server ) {
336 g_return_val_if_fail( server != NULL, NULL );
337 /* return addrcache_get_list_folder( server->addressCache ); */
342 * Execute specified query.
343 * \param server LDAP server.
344 * \param qry LDAP query.
346 void ldapsvr_execute_query( LdapServer *server, LdapQuery *qry ) {
347 LdapControl *ctlCopy;
349 g_return_if_fail( server != NULL );
350 g_return_if_fail( qry != NULL );
352 /* Copy server's control data to the query */
353 ctlCopy = ldapctl_create();
354 ldapctl_copy( server->control, ctlCopy );
355 ldapqry_set_control( qry, ctlCopy );
356 ldapqry_initialize();
359 /* printf( "ldapsvr_execute_query::reading with thread...\n" ); */
360 if( ldapqry_check_search( qry ) ) {
361 ldapqry_read_data_th( qry );
363 if( qry->retVal == LDAPRC_SUCCESS ) {
364 printf( "ldapsvr_execute_query::SUCCESS with thread...\n" );
368 /* printf( "ldapsvr_execute_query... terminated\n" ); */
372 * Stop all queries for specified ID.
373 * \param server Server object.
374 * \param queryID Query ID to stop.
376 void ldapsvr_stop_query_id( LdapServer *server, const gint queryID ) {
378 g_return_if_fail( server != NULL );
380 node = server->listQuery;
382 LdapQuery *qry = node->data;
383 if( qry->queryID == queryID ) {
384 /* Notify thread to stop */
385 ldapqry_set_stop_flag( qry, TRUE );
387 node = g_list_next( node );
392 * Stop all queries by notifying each thread to stop.
393 * \param server Server object.
395 void ldapsvr_stop_all_query( LdapServer *server ) {
397 g_return_if_fail( server != NULL );
399 node = server->listQuery;
401 LdapQuery *qry = node->data;
402 ldapqry_set_stop_flag( qry, TRUE );
403 node = g_list_next( node );
408 * Cancel all query threads for server.
409 * \param server Server object.
411 void ldapsvr_cancel_all_query( LdapServer *server ) {
413 g_return_if_fail( server != NULL );
415 node = server->listQuery;
417 LdapQuery *qry = node->data;
418 /* Notify thread to stop */
419 ldapqry_set_stop_flag( qry, TRUE );
420 /* Now cancel thread */
421 ldapqry_cancel( qry );
422 node = g_list_next( node );
427 * Search most recent query for specified search term. The most recent
428 * completed query is returned. If no completed query is found, the most recent
429 * incomplete is returned.
430 * \param server LdapServer.
431 * \param searchTerm Search term to locate.
432 * \return Query object, or <i>NULL</i> if none found.
434 LdapQuery *ldapsvr_locate_query( LdapServer *server, const gchar *searchTerm )
436 LdapQuery *incomplete = NULL;
438 g_return_if_fail( server != NULL );
440 node = server->listQuery;
441 node = g_list_last( node );
442 /* Search backwards for query */
444 LdapQuery *qry = node->data;
445 if( g_strcasecmp( qry->searchValue, searchTerm ) == 0 ) {
446 if( qry->agedFlag ) continue;
447 if( qry->completed ) {
455 node = g_list_previous( node );
461 * Retire aged queries.
462 * \param server LdapServer.
464 void ldapsvr_retire_query( LdapServer *server ) {
471 g_return_if_fail( server != NULL );
472 ctl = server->control;
473 maxAge = ctl->maxQueryAge;
475 /* Identify queries to age and move to deletion list */
477 node = server->listQuery;
479 LdapQuery *qry = node->data;
481 ldapqry_age( qry, maxAge );
482 if( qry->agedFlag ) {
483 /* Delete folder associated with query */
484 ldapqry_delete_folder( qry );
485 listDelete = g_list_append( listDelete, qry );
487 node = g_list_next( node );
491 listQuery = server->listQuery;
494 LdapQuery *qry = node->data;
496 listQuery = g_list_remove( listQuery, qry );
499 node = g_list_next( node );
501 server->listQuery = listQuery;
503 /* Free up deletion list */
504 g_list_free( listDelete );
507 #endif /* USE_LDAP */