5 * by JH <jheinonen@users.sourceforge.net>
7 * Copyright (C) Jaakko Heinonen
12 #include "abook_curses.h"
24 * some extern variables
27 extern struct abook_field abook_fields[];
29 extern list_item *database;
46 mvwhline(editw, TABLINE+1, 0, UI_HLINE_CHAR, EDITW_COLS);
48 for(i=0; i < TABS; i++)
49 mvwaddstr(editw, TABLINE, 16 * i + 3, tab_names[i]);
51 mvwaddstr(editw, TABLINE+1, 16 * tab + 2, "/ \\");
55 get_first_email(char *str, int item)
59 if(database[item][EMAIL] == NULL) {
64 strncpy(str, database[item][EMAIL], MAX_EMAIL_LEN);
65 if( (tmp = strchr(str, ',')) )
68 str[MAX_EMAIL_LEN-1] = 0;
74 char tmp[MAX_EMAILSTR_LEN];
77 strcpy(tmp, database[item][EMAIL]);
79 if( !(p = strchr(tmp, ',')) )
84 strcpy(database[item][EMAIL], p+1);
85 strcat(database[item][EMAIL], ",");
86 strcat(database[item][EMAIL], tmp);
93 editw = newwin(EDITW_LINES, EDITW_COLS, EDITW_TOP, EDITW_X);
99 * we have to introduce edit_undo here
101 static void edit_undo(int item, int mode);
113 edit_undo(-1, CLEAR_UNDO);
119 print_editor_header(int item)
122 char email[MAX_EMAIL_LEN];
125 if( (header = (char *)malloc(EDITW_COLS)) == NULL )
128 get_first_email(email, item);
130 if( *database[item][EMAIL] )
131 snprintf(header, EDITW_COLS, "%s <%s>",
132 database[item][NAME],
135 snprintf(header, EDITW_COLS, "%s", database[item][NAME]);
137 len = strlen(header);
138 x = (EDITW_COLS - len) / 2;
139 mvwaddstr(editw, 0, x, header);
140 for(i = x; i < x + len; i++)
141 mvwaddch(editw,1, i, '^');
146 editor_print_data(int tab, int item)
148 const int pos_x = EDITW_COLS > 70 ? 8:4;
149 const int start_y = 5;
153 for(i = 0, j = 1; i < ITEM_FIELDS; i++) {
154 if(abook_fields[i].tab != tab)
157 if(i==EMAIL) { /* special field */
159 char emails[MAX_EMAILS][MAX_EMAIL_LEN];
160 split_emailstr(item, emails);
162 mvwaddstr(editw, y+1, pos_x, "E-mail addresses:");
163 for(k = 0; k < MAX_EMAILS; k++) {
165 mvwprintw(editw, y+1, pos_x,
166 "%c -\t\t%s", '2' + k, emails[k] );
172 getyx(editw, y, x); y++;
176 mvwprintw(editw, y, pos_x, "%d - %s",
178 abook_fields[i].name);
179 mvwaddch(editw, y, 28, ':');
180 mvwaddstr(editw, y, 30, safe_str(database[item][i]));
187 * function: change_field
191 * message to display as a prompt
193 * a pointer to pointer which will point a new string. if the latter
194 * pointer != NULL it will be freed (if user doesn't cancel)
197 * a nonzero value if user has cancelled and zero if user has typed a
202 change_field(char *msg, char **field)
204 char tmp[MAX_FIELD_LEN];
205 int max_len = MAX_FIELD_LEN;
208 if( !strncmp("E-mail", msg, 6) )
209 max_len = MAX_EMAIL_LEN;
211 statusline_addstr(msg);
212 if( (ret = statusline_getnstr( tmp, max_len - 1, 0 ) ? 1:0 ) ) {
215 *field = strdup(tmp);
219 refresh_statusline();
225 change_name_field(char **field)
229 tmp = strdup(*field);
230 change_field("Name: ", field);
232 if( *field == NULL || ! **field ) {
234 *field = strdup(tmp);
241 fix_email_str(char *str)
244 *str = *str == ',' ? '_' : *str;
248 edit_emails(char c, int item)
251 char emails[MAX_EMAILS][MAX_EMAIL_LEN];
252 char tmp[MAX_EMAILSTR_LEN] = "";
255 split_emailstr(item, emails);
257 if(change_field("E-mail: ", &field)) {
259 fprintf(stderr, "change_field = TRUE\n");
261 return; /* user cancelled ( C-g ) */
264 strncpy(emails[c - '2'], field, MAX_EMAIL_LEN);
265 fix_email_str(emails[c - '2']);
267 *emails[c - '2'] = 0;
269 my_free(database[item][EMAIL]);
271 for(i=0; i<MAX_EMAILS; i++) {
273 strcat(tmp, emails[i]);
279 if(tmp[len -1] == ',')
282 database[item][EMAIL] = strdup(tmp);
286 edit_field(int tab, char c, int item)
295 edit_undo(item, BACKUP_ITEM);
297 if(tab == TAB_CONTACT) {
299 case '1': change_name_field(&database[item][NAME]);
304 case '5': edit_emails(c, item); break;
310 for(i=0, j=0; i< ITEM_FIELDS; i++) {
311 if(abook_fields[i].tab == tab)
320 str = mkstr("%s: ", abook_fields[i].name);
321 change_field(str, &database[item][i]);
329 edit_undo(int item, int mode)
332 static list_item *backup = NULL;
337 free_list_item(backup[0]);
343 free_list_item(backup[0]);
346 backup = abook_malloc(sizeof(list_item));
347 for(i = 0; i < ITEM_FIELDS; i++)
348 backup[0][i] = safe_strdup(database[item][i]);
352 free_list_item(database[item]);
353 itemcpy(database[item], backup[0]);
363 static int tab = 0; /* first tab */
367 headerline(EDITOR_HELPLINE);
368 refresh_statusline();
369 print_editor_header(item);
371 editor_print_data(tab, item);
372 wmove(editw, EDITW_LINES - 1, EDITW_COLS - 1);
377 switch( (c = getch()) ) {
378 case 'c': tab = TAB_CONTACT; break;
379 case 'a': tab = TAB_ADDRESS; break;
380 case 'p': tab = TAB_PHONE; break;
381 case 'o': tab = TAB_OTHER; break;
382 case KEY_LEFT: tab = tab == 0 ? MAX_TAB : tab - 1;
384 case KEY_RIGHT: tab = tab == MAX_TAB ? 0 : tab + 1;
387 case 'k': if(is_valid_item(item-1)) item--; break;
389 case 'j': if(is_valid_item(item+1)) item++; break;
390 case 'r': roll_emails(item); break;
391 case '?': display_help(HELP_EDITOR); break;
392 case 'u': edit_undo(item, RESTORE_ITEM); break;
393 case 'm': launch_mutt(item); clearok(stdscr, 1); break;
394 case 'v': launch_wwwbrowser(item); clearok(stdscr, 1); break;
395 case 12 : clearok(stdscr, 1); break; /* ^L (refresh screen) */
396 default: return edit_field(tab, c, item) ? item : -1;
414 while( (item = edit_loop(item)) >= 0 )
415 curitem = item; /* hmm, this is not very clean way to go */
426 change_field("Name: ", &field);
431 memset(item, 0, sizeof(item));
435 add_item2database(item);
439 edit_item(LAST_ITEM);