3 * $Id: database.c,v 1.29.2.1 2005/10/26 19:45:23 jheinonen Exp $
5 * by JH <jheinonen@users.sourceforge.net>
7 * Copyright (C) Jaakko Heinonen
28 list_item *database = NULL;
32 #define INITIAL_LIST_CAPACITY 30
34 static int list_capacity = 0;
36 extern int first_list_item;
38 extern char *selected;
40 extern char *datafile;
49 * notes about adding fields:
50 * - do not change any fields in TAB_CONTACT
51 * - do not add fields to contact tab
52 * - 6 fields per tab is maximum
53 * - reorganize the field numbers in database.h
56 struct abook_field abook_fields[ITEM_FIELDS] = {
57 {N_("Name"), "name", TAB_CONTACT},/* NAME */
58 {N_("E-mails"), "email", TAB_CONTACT},/* EMAIL */
59 {N_("Address"), "address", TAB_ADDRESS},/* ADDRESS */
60 {N_("Address2"), "address2", TAB_ADDRESS},/* ADDRESS2 */
61 {N_("City"), "city", TAB_ADDRESS},/* CITY */
62 {N_("State/Province"),"state", TAB_ADDRESS},/* STATE */
63 {N_("ZIP/Postal Code"),"zip", TAB_ADDRESS},/* ZIP */
64 {N_("Country"), "country", TAB_ADDRESS},/* COUNTRY */
65 {N_("Home Phone"), "phone", TAB_PHONE},/* PHONE */
66 {N_("Work Phone"), "workphone", TAB_PHONE},/* WORKPHONE */
67 {N_("Fax"), "fax", TAB_PHONE},/* FAX */
68 {N_("Mobile"), "mobile", TAB_PHONE},/* MOBILEPHONE */
69 {N_("Nickname/Alias"), "nick", TAB_OTHER},/* NICK */
70 {N_("URL"), "url", TAB_OTHER},/* URL */
71 {N_("Notes"), "notes", TAB_OTHER},/* NOTES */
72 {N_("Custom1"), "custom1", TAB_CUSTOM},/* CUSTOM1 */
73 {N_("Custom2"), "custom2", TAB_CUSTOM},/* CUSTOM2 */
74 {N_("Custom3"), "custom3", TAB_CUSTOM},/* CUSTOM3 */
75 {N_("Custom4"), "custom4", TAB_CUSTOM},/* CUSTOM4 */
76 {N_("Custom5"), "custom5", TAB_CUSTOM},/* CUSTOM5 */
81 find_field(const char *field)
85 for(i = 0; i < ITEM_FIELDS; i++)
86 if( !strcmp(abook_fields[i].key, field) )
93 parse_database(FILE *in)
100 memset(&item, 0, sizeof(item));
105 if(item[NAME] && sec)
106 add_item2database(item);
108 free_list_item(item);
112 if(!*line || *line == '\n' || *line == '#') {
114 } else if(*line == '[') {
115 if( item[NAME] && sec )
116 add_item2database(item);
118 free_list_item(item);
119 memset(&item, 0, sizeof(item));
121 if(!(tmp = strchr(line, ']')))
122 sec = 0; /*incorrect section lines are skipped*/
123 } else if((tmp = strchr(line, '=') ) && sec) {
125 for(i = 0; i < ITEM_FIELDS; i++)
126 if(!strcmp(abook_fields[i].key, line)) {
127 item[i] = xstrdup(tmp);
142 load_database(char *filename)
149 if ((in = abook_fopen(filename, "r")) == NULL)
154 return (items == 0) ? 2 : 0;
158 write_database(FILE *out, struct db_enumerator e)
164 "# abook addressbook file\n\n"
166 "program=" PACKAGE "\n"
167 "version=" VERSION "\n"
171 db_enumerate_items(e) {
172 fprintf(out, "[%d]\n", i);
173 for(j = 0; j < ITEM_FIELDS; j++) {
174 if( database[e.item][j] != NULL &&
175 *database[e.item][j] )
176 fprintf(out, "%s=%s\n",
193 struct db_enumerator e = init_db_enumerator(ENUM_ALL);
194 char *datafile_new = strconcat(datafile, ".new", NULL);
195 char *datafile_old = strconcat(datafile, "~", NULL);
197 if( (out = abook_fopen(datafile_new, "w")) == NULL ) {
202 if(list_is_empty()) {
210 * Possibly should check if write_database failed.
211 * Currently it returns always zero.
213 write_database(out, e);
216 if(access(datafile, F_OK) == 0 &&
217 (rename(datafile, datafile_old)) == -1)
220 if((rename(datafile_new, datafile)) == -1)
232 free_list_item(database[item]);
236 free_list_item(list_item item)
240 for(i=0; i<ITEM_FIELDS; i++)
249 for(i=0; i < items; i++)
259 first_list_item = curitem = -1;
263 #define _MAX_FIELD_LEN(X) (X == EMAIL ? MAX_EMAILSTR_LEN:MAX_FIELD_LEN)
266 validate_item(list_item item)
271 if(item[EMAIL] == NULL)
272 item[EMAIL] = xstrdup("");
274 for(i=0; i<ITEM_FIELDS; i++)
275 if( item[i] && ((int)strlen(item[i]) > _MAX_FIELD_LEN(i) ) ) {
277 item[i][_MAX_FIELD_LEN(i)-1] = 0;
278 item[i] = xstrdup(item[i]);
285 adjust_list_capacity()
287 if(list_capacity < 1)
288 list_capacity = INITIAL_LIST_CAPACITY;
289 else if(items >= list_capacity)
291 else if(list_capacity / 2 > items)
296 database = xrealloc(database, sizeof(list_item) * list_capacity);
297 selected = xrealloc(selected, list_capacity);
301 add_item2database(list_item item)
303 if(item[NAME] == NULL || ! *item[NAME]) {
304 free_list_item(item);
308 if(++items > list_capacity)
309 adjust_list_capacity();
313 selected[LAST_ITEM] = 0;
314 itemcpy(database[LAST_ITEM], item);
320 remove_selected_items()
327 if(!selected_items())
328 selected[curitem] = 1;
330 for(j = LAST_ITEM; j >= 0; j--) {
332 free_item(j); /* added for .4 data_s_ */
333 for(i = j; i < LAST_ITEM; i++) {
334 itemcpy(database[i], database[i + 1]);
335 selected[i] = selected[i + 1];
341 if(curitem > LAST_ITEM && items > 0)
344 adjust_list_capacity();
352 char *p = s + strlen(s);
356 while(p > s && *(p - 1) != ' ')
363 surnamecmp(const void *i1, const void *i2)
372 s1 = get_surname(a[NAME]);
373 s2 = get_surname(b[NAME]);
375 if( !(ret = safe_strcoll(s1, s2)) )
376 ret = safe_strcoll(a[NAME], b[NAME]);
384 static int sort_field = -1;
387 namecmp(const void *i1, const void *i2)
391 assert(sort_field >= 0 && sort_field <= LAST_FIELD);
396 return safe_strcoll(a[sort_field], b[sort_field]);
400 name2field(char *name)
404 for(i = 0; i < ITEM_FIELDS; i++) {
405 if(!strcasecmp(name, abook_fields[i].key)) {
415 sort_by_field(int field)
419 assert(field <= LAST_FIELD);
422 field = name2field(opt_get_str(STR_SORT_FIELD));
424 statusline_msg(_("Invalid field value defined "
425 "in configuration"));
432 qsort((void *)database, items, sizeof(list_item), namecmp);
442 qsort((void *)database, items, sizeof(list_item), surnamecmp);
448 find_item(char *str, int start, int search_fields[])
451 char *findstr = NULL;
453 int ret = -1; /* not found */
454 struct db_enumerator e = init_db_enumerator(ENUM_ALL);
456 if(list_is_empty() || !is_valid_item(start))
457 return -2; /* error */
459 findstr = xstrdup(str);
460 findstr = strlower(findstr);
462 e.item = start - 1; /* must be "real start" - 1 */
463 db_enumerate_items(e) {
464 for(i = 0; search_fields[i] >= 0; i++) {
465 if(database[e.item][search_fields[i]] == NULL)
467 tmp = xstrdup(database[e.item][search_fields[i]]);
468 if( tmp && strstr(strlower(tmp), findstr) ) {
484 is_selected(int item)
486 return selected[item];
490 is_valid_item(int item)
492 return item <= LAST_ITEM && item >= 0;
496 real_db_enumerate_items(struct db_enumerator e)
498 int item = max(0, e.item + 1);
507 for(i = item; i < items; i++) {
516 fprintf(stderr, "real_db_enumerate_items() "
517 "BUG: unknown db_enumerator mode: %d\n",
523 return (item > LAST_ITEM || item < 0) ? -1 : item;
527 init_db_enumerator(int mode)
529 struct db_enumerator e;
531 e.item = -1; /* important - means "start from beginning" */
538 assign_fieldname(const char *name, int i)
543 assert(i >= 0 && i < ITEM_FIELDS);
545 if(strcasecmp(abook_fields[i].name, name)) { /* name differs */
547 * check if we are overwriting statically allocated default
549 if(strcasecmp(abook_fields[i].name, abook_fields[i].key))
550 xfree(abook_fields[i].name);
552 s = xmalloc_inc(MAX_FIELDNAME_LEN, 1);
553 snprintf(s, MAX_FIELDNAME_LEN, "%s", name);
554 abook_fields[i].name = s;
561 change_custom_field_name(const char *name, int n)
568 snprintf(keyname, sizeof(keyname), "custom%d", n);
570 for(i = CUSTOM_MIN; i <= CUSTOM_MAX; i++) {
571 if(!strcasecmp(abook_fields[i].key, keyname)) {
572 assign_fieldname(name, i);