New address book.
[claws.git] / src / editgroup.c
1 /*
2  * Sylpheed -- a GTK+ based, lightweight, and fast e-mail client
3  * Copyright (C) 1999,2000 Hiroyuki Yamamoto
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 2 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, write to the Free Software
17  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
18  */
19
20 #ifdef HAVE_CONFIG_H
21 #  include "config.h"
22 #endif
23
24 #include "defs.h"
25
26 #include <glib.h>
27 #include <gdk/gdkkeysyms.h>
28
29 #include "intl.h"
30 #include "addressbook.h"
31 #include "addressitem.h"
32 #include "addrbook.h"
33 #include "addritem.h"
34
35 #include "prefs_common.h"
36
37 #include "alertpanel.h"
38 #include "inputdialog.h"
39
40 #define ADDRESSBOOK_GUESS_FOLDER_NAME   "NewFolder"
41 #define ADDRESSBOOK_GUESS_GROUP_NAME    "NewGroup"
42
43 #define EDITGROUP_WIDTH      580
44 #define EDITGROUP_HEIGHT     340
45
46 typedef enum {
47         GROUP_COL_NAME    = 0,
48         GROUP_COL_EMAIL   = 1,
49         GROUP_COL_REMARKS = 2
50 } GroupEditEMailColumnPos;
51
52 #define GROUP_N_COLS          3
53 #define GROUP_COL_WIDTH_NAME  140
54 #define GROUP_COL_WIDTH_EMAIL 120
55
56 static struct _GroupEdit_dlg {
57         GtkWidget *window;
58         GtkWidget *ok_btn;
59         GtkWidget *cancel_btn;
60         GtkWidget *statusbar;
61         gint status_cid;
62
63         // Basic data tab
64         GtkWidget *entry_name;
65         GtkCList *clist_group;
66         GtkCList *clist_avail;
67
68         GHashTable *hashEMail;
69         gint rowIndGroup;
70         gint rowIndAvail;
71
72 } groupeditdlg;
73
74
75 static gchar *_edit_group_dfl_message_ = NULL;
76
77 static void edit_group_status_show( gchar *msg ) {
78         if( groupeditdlg.statusbar != NULL ) {
79                 gtk_statusbar_pop( GTK_STATUSBAR(groupeditdlg.statusbar), groupeditdlg.status_cid );
80                 if( msg ) {
81                         gtk_statusbar_push( GTK_STATUSBAR(groupeditdlg.statusbar), groupeditdlg.status_cid, msg );
82                 }
83         }
84 }
85
86 static void edit_group_ok(GtkWidget *widget, gboolean *cancelled) {
87         gchar *sName = g_strdup( gtk_editable_get_chars( GTK_EDITABLE(groupeditdlg.entry_name), 0, -1 ) );
88         gboolean errFlag = TRUE;
89         if( sName ) {
90                 g_strstrip( sName );
91                 if( *sName != '\0' ) {
92                         gtk_entry_set_text(GTK_ENTRY(groupeditdlg.entry_name), sName );
93                         *cancelled = FALSE;
94                         gtk_main_quit();
95                         errFlag = FALSE;
96                 }
97         }
98         if( errFlag ) {
99                 edit_group_status_show( _( "A Group Name must be supplied." ) );
100         }
101         g_free( sName );
102 }
103         
104 static void edit_group_cancel(GtkWidget *widget, gboolean *cancelled) {
105         *cancelled = TRUE;
106         gtk_main_quit();
107 }
108
109 static gint edit_group_delete_event(GtkWidget *widget, GdkEventAny *event, gboolean *cancelled) {
110         *cancelled = TRUE;
111         gtk_main_quit();
112         return TRUE;
113 }
114
115 static void edit_group_key_pressed(GtkWidget *widget, GdkEventKey *event, gboolean *cancelled) {
116         if (event && event->keyval == GDK_Escape) {
117                 *cancelled = TRUE;
118                 gtk_main_quit();
119         }
120 }
121
122 static gchar *edit_group_format_item_clist( ItemPerson *person, ItemEMail *email ) {
123         gchar *str = NULL;
124         gchar *aName = ADDRITEM_NAME(email);
125         if( aName == NULL || *aName == '\0' ) return str;
126         if( person ) {
127                 str = g_strdup_printf( "%s - %s", ADDRITEM_NAME(person), aName );
128         }
129         else {
130                 str = g_strdup( aName );
131         }
132         return str;
133 }
134
135 static gint edit_group_clist_add_email( GtkCList *clist, ItemEMail *email ) {
136         ItemPerson *person = ( ItemPerson * ) ADDRITEM_PARENT(email);
137         gchar *str = edit_group_format_item_clist( person, email );
138         gchar *text[ GROUP_N_COLS ];
139         gint row;
140         if( str ) {
141                 text[ GROUP_COL_NAME ] = str;
142         }
143         else {
144                 text[ GROUP_COL_NAME ] = ADDRITEM_NAME(person);
145         }
146         text[ GROUP_COL_EMAIL   ] = email->address;
147         text[ GROUP_COL_REMARKS ] = email->remarks;
148         row = gtk_clist_append( clist, text );
149         gtk_clist_set_row_data( clist, row, email );
150         return row;
151 }
152
153 static void edit_group_load_clist( GtkCList *clist, GList *listEMail ) {
154         GList *node = listEMail;
155         while( node ) {
156                 ItemEMail *email = node->data;
157                 edit_group_clist_add_email( clist, email );
158                 node = g_list_next( node );
159         }
160 }
161
162 static void edit_group_group_selected( GtkCList *clist, gint row, gint column, GdkEvent *event, gpointer data ) {
163         groupeditdlg.rowIndGroup = row;
164 }
165
166 static void edit_group_avail_selected( GtkCList *clist, gint row, gint column, GdkEvent *event, gpointer data ) {
167         groupeditdlg.rowIndAvail = row;
168 }
169
170 static gint edit_group_move_email( GtkCList *clist_from, GtkCList *clist_to, gint row ) {
171         ItemEMail *email = gtk_clist_get_row_data( clist_from, row );
172         gint rrow = -1;
173         if( email ) {
174                 gtk_clist_remove( clist_from, row );
175                 rrow = edit_group_clist_add_email( clist_to, email );
176                 gtk_clist_select_row( clist_to, rrow, 0 );
177         }
178         return rrow;
179 }
180
181 static void edit_group_to_group( GtkWidget *widget, gpointer data ) {
182         groupeditdlg.rowIndGroup = edit_group_move_email( groupeditdlg.clist_avail,
183                                         groupeditdlg.clist_group, groupeditdlg.rowIndAvail );
184 }
185
186 static void edit_group_to_avail( GtkWidget *widget, gpointer data ) {
187         groupeditdlg.rowIndAvail = edit_group_move_email( groupeditdlg.clist_group,
188                                         groupeditdlg.clist_avail, groupeditdlg.rowIndGroup );
189 }
190
191 static void edit_group_list_group_button( GtkCList *clist, GdkEventButton *event, gpointer data ) {
192         if( ! event ) return;
193         if( event->button == 1 ) {
194                 if( event->type == GDK_2BUTTON_PRESS ) {
195                         edit_group_to_avail( NULL, NULL );
196                 }
197         }
198 }
199
200 static void edit_group_list_avail_button( GtkCList *clist, GdkEventButton *event, gpointer data ) {
201         if( ! event ) return;
202         if( event->button == 1 ) {
203                 if( event->type == GDK_2BUTTON_PRESS ) {
204                         edit_group_to_group( NULL, NULL );
205                 }
206         }
207 }
208
209 static gint edit_group_list_compare_func( GtkCList *clist, gconstpointer ptr1, gconstpointer ptr2 ) {
210         GtkCell *cell1 = ((GtkCListRow *)ptr1)->cell;
211         GtkCell *cell2 = ((GtkCListRow *)ptr2)->cell;
212         gchar *name1 = NULL, *name2 = NULL;
213         if( cell1 ) name1 = cell1->u.text;
214         if( cell2 ) name2 = cell2->u.text;
215         if( ! name1 ) return ( name2 != NULL );
216         if( ! name2 ) return -1;
217         return strcasecmp( name1, name2 );
218 }
219
220 static void addressbook_edit_group_create( gboolean *cancelled ) {
221         GtkWidget *window;
222         GtkWidget *vbox;
223         GtkWidget *hbbox;
224         GtkWidget *ok_btn;
225         GtkWidget *cancel_btn;
226         GtkWidget *hsbox;
227         GtkWidget *statusbar;
228
229         GtkWidget *hboxg;
230         GtkWidget *table;
231         GtkWidget *label;
232         GtkWidget *entry_name;
233         GtkWidget *hboxl;
234         GtkWidget *vboxl;
235         GtkWidget *hboxh;
236
237         GtkWidget *clist_swin;
238         GtkWidget *clist_group;
239         GtkWidget *clist_avail;
240
241         GtkWidget *vboxb;
242         GtkWidget *vbuttonbox;
243         GtkWidget *buttonGroup;
244         GtkWidget *buttonAvail;
245         gint top;
246
247         gchar *titles[ GROUP_N_COLS ] = { _( "Name" ), _("E-Mail Address"), _("Remarks") };
248         gchar *text;
249         gint i;
250
251         window = gtk_window_new(GTK_WINDOW_DIALOG);
252         gtk_widget_set_usize(window, EDITGROUP_WIDTH, EDITGROUP_HEIGHT );
253         gtk_container_set_border_width(GTK_CONTAINER(window), 0);
254         gtk_window_set_title(GTK_WINDOW(window), _("Edit Group Data"));
255         gtk_window_set_position(GTK_WINDOW(window), GTK_WIN_POS_CENTER);
256         gtk_window_set_modal(GTK_WINDOW(window), TRUE); 
257         gtk_signal_connect(GTK_OBJECT(window), "delete_event",
258                            GTK_SIGNAL_FUNC(edit_group_delete_event),
259                            cancelled);
260         gtk_signal_connect(GTK_OBJECT(window), "key_press_event",
261                            GTK_SIGNAL_FUNC(edit_group_key_pressed),
262                            cancelled);
263
264         vbox = gtk_vbox_new( FALSE, 6 );
265         gtk_container_set_border_width(GTK_CONTAINER(vbox), BORDER_WIDTH);
266         gtk_widget_show( vbox );
267         gtk_container_add( GTK_CONTAINER( window ), vbox );
268
269         // Group area
270         hboxg = gtk_hbox_new( FALSE, 0 );
271         gtk_box_pack_start(GTK_BOX(vbox), hboxg, FALSE, FALSE, 0);
272
273         // Data entry area
274         table = gtk_table_new( 1, 3, FALSE);
275         gtk_box_pack_start(GTK_BOX(hboxg), table, TRUE, TRUE, 0);
276         gtk_container_set_border_width( GTK_CONTAINER(table), 4 );
277         gtk_table_set_row_spacings(GTK_TABLE(table), 0);
278         gtk_table_set_col_spacings(GTK_TABLE(table), 4);
279
280         // First row
281         top = 0;
282         label = gtk_label_new(_("Group Name"));
283         gtk_table_attach(GTK_TABLE(table), label, 0, 1, top, (top + 1), GTK_FILL, 0, 0, 0);
284         gtk_misc_set_alignment(GTK_MISC(label), 0, 0.5);
285
286         entry_name = gtk_entry_new();
287         gtk_table_attach(GTK_TABLE(table), entry_name, 1, 2, top, (top + 1), GTK_EXPAND|GTK_SHRINK|GTK_FILL, 0, 0, 0);
288
289         // List area
290         hboxl = gtk_hbox_new( FALSE, 6 );
291         gtk_container_set_border_width( GTK_CONTAINER(hboxl), 8 );
292         gtk_box_pack_start(GTK_BOX(vbox), hboxl, TRUE, TRUE, 0);
293
294         // Group list
295         vboxl = gtk_vbox_new( FALSE, 0 );
296         gtk_box_pack_start(GTK_BOX(hboxl), vboxl, TRUE, TRUE, 0);
297
298         hboxh = gtk_hbox_new( FALSE, 0 );
299         gtk_container_set_border_width( GTK_CONTAINER(hboxh), 4 );
300         gtk_box_pack_start(GTK_BOX(vboxl), hboxh, FALSE, FALSE, 0);
301         label = gtk_label_new(_("Addresses in Group"));
302         gtk_box_pack_start(GTK_BOX(hboxh), label, TRUE, TRUE, 0);
303         buttonAvail = gtk_button_new_with_label( _( " -> " ) );
304         gtk_box_pack_end(GTK_BOX(hboxh), buttonAvail, FALSE, FALSE, 0);
305
306         clist_swin = gtk_scrolled_window_new( NULL, NULL );
307         gtk_box_pack_start(GTK_BOX(vboxl), clist_swin, TRUE, TRUE, 0);
308         gtk_scrolled_window_set_policy(GTK_SCROLLED_WINDOW(clist_swin),
309                                        GTK_POLICY_AUTOMATIC,
310                                        GTK_POLICY_ALWAYS);
311
312         clist_group = gtk_clist_new_with_titles( GROUP_N_COLS, titles );
313         gtk_container_add( GTK_CONTAINER(clist_swin), clist_group );
314         gtk_clist_set_selection_mode( GTK_CLIST(clist_group), GTK_SELECTION_BROWSE );
315         gtk_clist_set_column_width( GTK_CLIST(clist_group), GROUP_COL_NAME, GROUP_COL_WIDTH_NAME );
316         gtk_clist_set_column_width( GTK_CLIST(clist_group), GROUP_COL_EMAIL, GROUP_COL_WIDTH_EMAIL );
317         gtk_clist_set_compare_func( GTK_CLIST(clist_group), edit_group_list_compare_func );
318         gtk_clist_set_auto_sort( GTK_CLIST(clist_group), TRUE );
319
320         for( i = 0; i < GROUP_N_COLS; i++ )
321                 GTK_WIDGET_UNSET_FLAGS(GTK_CLIST(clist_group)->column[i].button, GTK_CAN_FOCUS);
322
323         // Available list
324         vboxl = gtk_vbox_new( FALSE, 0 );
325         gtk_box_pack_start(GTK_BOX(hboxl), vboxl, TRUE, TRUE, 0);
326
327         hboxh = gtk_hbox_new( FALSE, 0 );
328         gtk_container_set_border_width( GTK_CONTAINER(hboxh), 4 );
329         gtk_box_pack_start(GTK_BOX(vboxl), hboxh, FALSE, FALSE, 0);
330         buttonGroup = gtk_button_new_with_label( _( " <- " ) );
331         gtk_box_pack_start(GTK_BOX(hboxh), buttonGroup, FALSE, FALSE, 0);
332         label = gtk_label_new(_("Available Addresses"));
333         gtk_box_pack_end(GTK_BOX(hboxh), label, TRUE, TRUE, 0);
334
335         clist_swin = gtk_scrolled_window_new( NULL, NULL );
336         gtk_box_pack_start(GTK_BOX(vboxl), clist_swin, TRUE, TRUE, 0);
337         gtk_scrolled_window_set_policy(GTK_SCROLLED_WINDOW(clist_swin),
338                                        GTK_POLICY_AUTOMATIC,
339                                        GTK_POLICY_ALWAYS);
340
341         clist_avail = gtk_clist_new_with_titles( GROUP_N_COLS, titles );
342         gtk_container_add( GTK_CONTAINER(clist_swin), clist_avail );
343         gtk_clist_set_selection_mode( GTK_CLIST(clist_avail), GTK_SELECTION_BROWSE );
344         gtk_clist_set_column_width( GTK_CLIST(clist_avail), GROUP_COL_NAME, GROUP_COL_WIDTH_NAME );
345         gtk_clist_set_column_width( GTK_CLIST(clist_avail), GROUP_COL_EMAIL, GROUP_COL_WIDTH_EMAIL );
346         gtk_clist_set_compare_func( GTK_CLIST(clist_avail), edit_group_list_compare_func );
347         gtk_clist_set_auto_sort( GTK_CLIST(clist_avail), TRUE );
348
349         for( i = 0; i < GROUP_N_COLS; i++ )
350                 GTK_WIDGET_UNSET_FLAGS(GTK_CLIST(clist_avail)->column[i].button, GTK_CAN_FOCUS);
351
352         // Status line
353         hsbox = gtk_hbox_new(FALSE, 0);
354         gtk_box_pack_end(GTK_BOX(vbox), hsbox, FALSE, FALSE, BORDER_WIDTH);
355         statusbar = gtk_statusbar_new();
356         gtk_box_pack_start(GTK_BOX(hsbox), statusbar, TRUE, TRUE, BORDER_WIDTH);
357
358         // Button panel
359         gtkut_button_set_create(&hbbox, &ok_btn, _("OK"),
360                                 &cancel_btn, _("Cancel"), NULL, NULL);
361         gtk_box_pack_end(GTK_BOX(vbox), hbbox, FALSE, FALSE, 0);
362         gtk_widget_grab_default(ok_btn);
363
364         gtk_signal_connect(GTK_OBJECT(ok_btn), "clicked",
365                            GTK_SIGNAL_FUNC(edit_group_ok), cancelled);
366         gtk_signal_connect(GTK_OBJECT(cancel_btn), "clicked",
367                            GTK_SIGNAL_FUNC(edit_group_cancel), cancelled);
368
369         gtk_widget_show_all(vbox);
370
371         // Event handlers
372         gtk_signal_connect( GTK_OBJECT(clist_group), "select_row",
373                         GTK_SIGNAL_FUNC( edit_group_group_selected), NULL );
374         gtk_signal_connect( GTK_OBJECT(clist_avail), "select_row",
375                         GTK_SIGNAL_FUNC( edit_group_avail_selected), NULL );
376         gtk_signal_connect( GTK_OBJECT(buttonGroup), "clicked",
377                         GTK_SIGNAL_FUNC( edit_group_to_group ), NULL );
378         gtk_signal_connect( GTK_OBJECT(buttonAvail), "clicked",
379                         GTK_SIGNAL_FUNC( edit_group_to_avail ), NULL );
380         gtk_signal_connect(GTK_OBJECT(clist_avail), "button_press_event",
381                            GTK_SIGNAL_FUNC(edit_group_list_avail_button), NULL);
382         gtk_signal_connect(GTK_OBJECT(clist_group), "button_press_event",
383                            GTK_SIGNAL_FUNC(edit_group_list_group_button), NULL);
384
385         groupeditdlg.window     = window;
386         groupeditdlg.ok_btn     = ok_btn;
387         groupeditdlg.cancel_btn = cancel_btn;
388         groupeditdlg.statusbar  = statusbar;
389         groupeditdlg.status_cid = gtk_statusbar_get_context_id( GTK_STATUSBAR(statusbar), "Edit Group Dialog" );
390
391         groupeditdlg.entry_name  = entry_name;
392         groupeditdlg.clist_group = GTK_CLIST( clist_group );
393         groupeditdlg.clist_avail = GTK_CLIST( clist_avail );
394
395         if( ! _edit_group_dfl_message_ ) {
396                 _edit_group_dfl_message_ = _( "Move E-Mail Addresses to or from Group with arrow buttons" );
397         }
398 }
399
400 /*
401 * Return list of email items.
402 */
403 static GList *edit_group_build_email_list() {
404         GtkCList *clist = GTK_CLIST(groupeditdlg.clist_group);
405         GList *listEMail = NULL;
406         ItemEMail *email;
407         gint row = 0;
408         while( email = gtk_clist_get_row_data( clist, row ) ) {
409                 listEMail = g_list_append( listEMail, email );
410                 row++;
411         }
412         return listEMail;
413 }
414
415 /*
416 * Edit group.
417 * Enter: abf    Address book.
418 *        folder Parent folder for group (or NULL if adding to root folder). Argument is
419 *               only required for new objects).
420 *        group  Group to edit, or NULL for a new group object.
421 * Return: Edited object, or NULL if cancelled.
422 */
423 ItemGroup *addressbook_edit_group( AddressBookFile *abf, ItemFolder *parent, ItemGroup *group ) {
424         static gboolean cancelled;
425         GList *listEMail = NULL;
426
427         if (!groupeditdlg.window)
428                 addressbook_edit_group_create(&cancelled);
429         gtk_widget_grab_focus(groupeditdlg.ok_btn);
430         gtk_widget_grab_focus(groupeditdlg.entry_name);
431         gtk_widget_show(groupeditdlg.window);
432         manage_window_set_transient(GTK_WINDOW(groupeditdlg.window));
433
434         // Clear all fields
435         groupeditdlg.rowIndGroup = -1;
436         groupeditdlg.rowIndAvail = -1;
437         edit_group_status_show( "" );
438         gtk_clist_clear( GTK_CLIST(groupeditdlg.clist_group) );
439         gtk_clist_clear( GTK_CLIST(groupeditdlg.clist_avail) );
440
441         if( group ) {
442                 if( ADDRITEM_NAME(group) )
443                         gtk_entry_set_text(GTK_ENTRY(groupeditdlg.entry_name), ADDRITEM_NAME(group) );
444                 edit_group_load_clist( groupeditdlg.clist_group, group->listEMail );
445                 gtk_window_set_title( GTK_WINDOW(groupeditdlg.window), _("Edit Group Details"));
446         }
447         else {
448                 gtk_window_set_title( GTK_WINDOW(groupeditdlg.window), _("Add New Group"));
449                 gtk_entry_set_text(GTK_ENTRY(groupeditdlg.entry_name), ADDRESSBOOK_GUESS_GROUP_NAME );
450         }
451
452         listEMail = addrbook_get_available_email_list( abf, group );
453         edit_group_load_clist( groupeditdlg.clist_avail, listEMail );
454         mgu_clear_list( listEMail );
455         listEMail = NULL;
456         gtk_clist_select_row( groupeditdlg.clist_group, 0, 0 );
457         gtk_clist_select_row( groupeditdlg.clist_avail, 0, 0 );
458
459         edit_group_status_show( _edit_group_dfl_message_ );
460
461         gtk_main();
462         gtk_widget_hide( groupeditdlg.window );
463
464         if( cancelled ) {
465                 return NULL;
466         }
467
468         listEMail = edit_group_build_email_list();
469         if( group ) {
470                 // Update email list
471                 addrbook_update_group_list( abf, group, listEMail );
472         }
473         else {
474                 // Create new person and email list
475                 group = addrbook_add_group_list( abf, parent, listEMail );
476         }
477         addritem_group_set_name( group, gtk_editable_get_chars( GTK_EDITABLE(groupeditdlg.entry_name), 0, -1 ) );
478
479         listEMail = NULL;
480         return group;
481 }
482
483 /*
484 * Edit folder.
485 * Enter: abf    Address book.
486 *        parent Parent folder for folder (or NULL if adding to root folder). Argument is
487 *               only required for new objects).
488 *        folder Folder to edit, or NULL for a new folder object.
489 * Return: Edited object, or NULL if cancelled.
490 */
491 ItemFolder *addressbook_edit_folder( AddressBookFile *abf, ItemFolder *parent, ItemFolder *folder ) {
492         gchar *name = NULL;
493
494         if( folder ) {
495                 name = g_strdup( ADDRITEM_NAME(folder) );
496                 name = input_dialog( _("Edit folder"), _("Input the new name of folder:"), name );
497         }
498         else {
499                 name = input_dialog( _("New folder"),
500                                 _("Input the name of new folder:"),
501                                 _(ADDRESSBOOK_GUESS_FOLDER_NAME) );
502         }
503         if( ! name ) return NULL;
504         g_strstrip( name );
505         if( *name == '\0' ) {
506                 g_free( name );
507                 return NULL;
508         }
509         if( folder ) {
510                 if( strcasecmp( name, ADDRITEM_NAME(folder) ) == 0 ) {
511                         g_free( name );
512                         return NULL;
513                 }
514         }
515
516         if( ! folder ) {
517                 folder = addrbook_add_new_folder( abf, parent );
518         }
519         addritem_folder_set_name( folder, name );
520         g_free( name );
521         return folder;
522 }
523
524 /*
525 * End of Source.
526 */
527