4 * by JH <jheinonen@users.sourceforge.net>
6 * Copyright (C) Jaakko Heinonen
19 #if defined(HAVE_LOCALE_H) && defined(HAVE_SETLOCALE)
34 static void init_abook();
35 static void quit_abook_sig(int i);
36 static void set_filenames();
37 static void parse_command_line(int argc, char **argv);
38 static void show_usage();
39 static void mutt_query(char *str);
40 static void init_mutt_query();
41 static void convert(char *srcformat, char *srcfile,
42 char *dstformat, char *dstfile);
43 static void add_email(int);
45 char *datafile = NULL;
48 bool alternative_datafile = FALSE;
49 bool alternative_rcfile = FALSE;
56 assert(datafile != NULL);
58 if( (f = fopen(datafile, "a")) == NULL)
67 check_abook_directory()
72 assert(!is_ui_initialized());
74 if(alternative_datafile)
77 dir = strconcat(getenv("HOME"), "/" DIR_IN_HOME, NULL);
80 if(stat(dir, &s) == -1) {
86 if(mkdir(dir, 0700) == -1) {
87 printf("Cannot create directory %s\n", dir);
92 } else if(!S_ISDIR(s.st_mode)) {
93 printf("%s is not a directory\n", dir);
105 check_abook_directory();
108 signal(SIGKILL, quit_abook_sig);
109 signal(SIGTERM, quit_abook_sig);
114 umask(DEFAULT_UMASK);
116 if(!datafile_writeable()) {
117 char *s = mkstr("File %s is not writeable", datafile);
121 if(load_database(datafile) || !statusline_ask_boolean(
122 "If you continue all changes will "
123 "be lost. Do you want to continue?", FALSE)) {
125 /*close_database();*/
130 load_database(datafile);
138 if( options_get_int("autosave") )
140 else if( statusline_ask_boolean("Save database", TRUE) )
152 quit_abook_sig(int i)
158 main(int argc, char **argv)
160 #if defined(HAVE_SETLOCALE) && defined(HAVE_LOCALE_H)
161 setlocale(LC_ALL, "" );
164 parse_command_line(argc, argv);
188 if( (stat(getenv("HOME"), &s)) == -1 || ! S_ISDIR(s.st_mode) ) {
189 fprintf(stderr,"%s is not a valid HOME directory\n", getenv("HOME") );
194 datafile = strconcat(getenv("HOME"), "/" DIR_IN_HOME "/"
198 rcfile = strconcat(getenv("HOME"), "/" DIR_IN_HOME "/"
201 atexit(free_filenames);
211 MODE_ADD_EMAIL_QUIET,
217 change_mode(int *current, int mode)
219 if(*current != MODE_CONT) {
220 fprintf(stderr, "Cannot combine options --mutt-query, "
222 "--add-email or --add-email-quiet\n");
230 set_filename(char **var, char *path)
235 assert(*var == NULL); /* or else we probably leak memory */
236 assert(path != NULL);
245 *var = strconcat(cwd, "/", path, NULL);
250 #define set_convert_var(X) do { if(mode != MODE_CONVERT) {\
251 fprintf(stderr, "please use option --%s after --convert option\n",\
252 long_options[option_index].name);\
259 parse_command_line(int argc, char **argv)
261 int mode = MODE_CONT;
262 char *query_string = NULL;
263 char *informat = "abook",
270 int option_index = 0;
282 static struct option long_options[] = {
283 { "help", 0, 0, 'h' },
284 { "add-email", 0, 0, OPT_ADD_EMAIL },
285 { "add-email-quiet", 0, 0, OPT_ADD_EMAIL_QUIET },
286 { "datafile", 1, 0, 'f' },
287 { "mutt-query", 1, 0, OPT_MUTT_QUERY },
288 { "config", 1, 0, 'C' },
289 { "convert", 0, 0, OPT_CONVERT },
290 { "informat", 1, 0, OPT_INFORMAT },
291 { "outformat", 1, 0, OPT_OUTFORMAT },
292 { "infile", 1, 0, OPT_INFILE },
293 { "outfile", 1, 0, OPT_OUTFILE },
294 { "formats", 0, 0, OPT_FORMATS },
298 c = getopt_long(argc, argv, "hC:",
299 long_options, &option_index);
309 change_mode(&mode, MODE_ADD_EMAIL);
311 case OPT_ADD_EMAIL_QUIET:
312 change_mode(&mode, MODE_ADD_EMAIL_QUIET);
315 set_filename(&datafile, optarg);
316 alternative_datafile = TRUE;
319 query_string = optarg;
320 change_mode(&mode, MODE_QUERY);
323 set_filename(&rcfile, optarg);
324 alternative_rcfile = TRUE;
327 change_mode(&mode, MODE_CONVERT);
330 set_convert_var(informat);
333 set_convert_var(outformat);
336 set_convert_var(infile);
339 set_convert_var(outfile);
350 fprintf(stderr, "%s: unrecognized arguments on command line\n",
358 case MODE_ADD_EMAIL_QUIET:
361 mutt_query(query_string);
363 convert(informat, infile, outformat, outfile);
371 puts (PACKAGE " v " VERSION "\n");
372 puts (" -h --help show usage");
373 puts (" -C --config <file> use an alternative configuration file");
374 puts (" --datafile <file> use an alternative addressbook file");
375 puts (" --mutt-query <string> make a query for mutt");
376 puts (" --add-email "
377 "read an e-mail message from stdin and\n"
379 "add the sender to the addressbook");
380 puts (" --add-email-quiet "
381 "same as --add-email but doesn't\n"
384 puts (" --convert convert address book files");
385 puts (" options to use with --convert:");
386 puts (" --informat <format> format for input file");
387 puts (" (default: abook)");
388 puts (" --infile <file> source file");
389 puts (" (default: stdin)");
390 puts (" --outformat <format> format for output file");
391 puts (" (default: text)");
392 puts (" --outfile <file> destination file");
393 puts (" (default: stdout)");
394 puts (" --formats list available formats");
401 extern list_item *database;
404 quit_mutt_query(int status)
413 muttq_print_item(FILE *file, int item)
415 char emails[MAX_EMAILS][MAX_EMAIL_LEN];
418 split_emailstr(item, emails);
420 for(i = 0; i < (options_get_int("mutt_return_all_emails") ?
421 MAX_EMAILS : 1) ; i++)
423 fprintf(file, "%s\t%s\t%s\n", emails[i],
424 database[item][NAME],
425 database[item][NOTES] == NULL ? " " :
426 database[item][NOTES]
431 mutt_query(char *str)
435 if( str == NULL || !strcasecmp(str, "all") ) {
436 struct db_enumerator e = init_db_enumerator(ENUM_ALL);
437 printf("All items\n");
438 db_enumerate_items(e)
439 muttq_print_item(stdout, e.item);
441 int search_fields[] = {NAME, EMAIL, NICK, -1};
443 if( (i = find_item(str, 0, search_fields)) < 0 ) {
444 printf("Not found\n");
449 muttq_print_item(stdout, i);
450 i = find_item(str, i+1, search_fields);
463 if( load_database(datafile) ) {
464 printf("Cannot open database\n");
472 make_mailstr(int item)
474 char email[MAX_EMAIL_LEN];
476 char *name = mkstr("\"%s\"", database[item][NAME]);
478 get_first_email(email, item);
480 ret = *database[item][EMAIL] ?
481 mkstr("%s <%s>", name, email) :
490 print_stderr(int item)
492 fprintf (stderr, "%c", '\n');
494 if( is_valid_item(item) )
495 muttq_print_item(stderr, item);
497 struct db_enumerator e = init_db_enumerator(ENUM_SELECTED);
498 db_enumerate_items(e) {
499 muttq_print_item(stderr, e.item);
506 launch_mutt(int item)
508 char *cmd = NULL, *mailstr = NULL;
509 char *mutt_command = options_get_str("mutt_command");
511 if(mutt_command == NULL || !*mutt_command)
514 if( is_valid_item(item) )
515 mailstr = make_mailstr(item);
517 struct db_enumerator e = init_db_enumerator(ENUM_SELECTED);
519 db_enumerate_items(e) {
522 strconcat(tmp, ",", make_mailstr(e.item), NULL):
523 strconcat(make_mailstr(e.item), NULL);
528 cmd = strconcat(mutt_command, " \'", mailstr,
532 fprintf(stderr, "cmd: %s\n", cmd);
538 * we need to make sure that curses settings are correct
544 launch_wwwbrowser(int item)
548 if( !is_valid_item(item) )
551 if( database[item][URL] )
552 cmd = mkstr("%s '%s'",
553 options_get_str("www_command"),
554 safe_str(database[item][URL]));
564 * we need to make sure that curses settings are correct
570 abook_malloc(size_t size)
574 if ( (ptr = malloc(size)) == NULL ) {
575 if( is_ui_initialized() )
577 perror("malloc() failed");
585 abook_realloc(void *ptr, size_t size)
587 ptr = realloc(ptr, size);
593 if( is_ui_initialized() )
595 perror("realloc() failed");
603 abook_fopen (const char *path, const char *mode)
607 if( ! strchr(mode, 'r') )
608 return fopen(path, mode);
610 if ( (stat(path, &s)) == -1 )
613 return S_ISREG(s.st_mode) ? fopen(path, mode) : NULL;
618 convert(char *srcformat, char *srcfile, char *dstformat, char *dstfile)
622 if( !srcformat || !srcfile || !dstformat || !dstfile ) {
623 fprintf(stderr, "too few argumets to make conversion\n");
624 fprintf(stderr, "try --help\n");
628 if( !strcasecmp(srcformat, dstformat) ) {
629 printf( "input and output formats are the same\n"
638 switch( import_file(srcformat, srcfile) ) {
641 "input format %s not supported\n", srcformat);
645 fprintf(stderr, "cannot read file %s\n", srcfile);
651 switch( export_file(dstformat, dstfile) ) {
654 "output format %s not supported\n",
660 "cannot write file %s\n", dstfile);
671 * --add-email handling
674 static int add_email_count = 0;
679 if(add_email_count > 0) {
680 if(save_database() < 0) {
681 fprintf(stderr, "cannot open %s\n", datafile);
684 printf("%d item(s) added to %s\n", add_email_count, datafile);
686 puts("Valid sender address not found");
693 quit_add_email_sig(int signal)
702 atexit(free_filenames);
704 atexit(close_config);
707 * we don't actually care if loading fails or not
709 load_database(datafile);
711 atexit(close_database);
713 signal(SIGINT, quit_add_email_sig);
717 add_email_add_item(int quiet, char *name, char *email)
722 FILE *in = fopen("/dev/tty", "r");
725 fprintf(stderr, "cannot open /dev/tty\n"
726 "you may want to use --add-email-quiet\n");
729 printf("Add ``%s <%s>'' to %s ? (y/n)\n",
736 if(c == 'n' || c == 'N') {
740 } while(c != 'y' && c != 'Y');
744 memset(item, 0, sizeof(item));
745 item[NAME] = strdup(name);
746 item[EMAIL] = strdup(email);
747 add_item2database(item);
756 char *name = NULL, *email = NULL;
761 line = getaline(stdin);
762 if(line && !strncasecmp("From:", line, 5) ) {
763 getname(line, &name, &email);
764 add_email_count += add_email_add_item(quiet,
770 } while( !feof(stdin) );
776 * end of --add-email handling