4 * by JH <jheinonen@users.sourceforge.net>
6 * Copyright (C) Jaakko Heinonen
21 #if defined(HAVE_LOCALE_H) && defined(HAVE_SETLOCALE)
39 static void init_abook();
40 static void quit_abook_sig(int i);
41 static void set_filenames();
42 static void parse_command_line(int argc, char **argv);
43 static void show_usage();
44 static void mutt_query(char *str);
45 static void init_mutt_query();
46 static void convert(char *srcformat, char *srcfile,
47 char *dstformat, char *dstfile);
48 static void add_email(int);
50 char *datafile = NULL;
51 static char *rcfile = NULL;
53 struct abook_output_item_filter selected_item_filter;
55 bool alternative_datafile = FALSE;
56 bool alternative_rcfile = FALSE;
64 assert(datafile != NULL);
66 if( (f = fopen(datafile, "a")) == NULL)
75 check_abook_directory()
80 assert(!is_ui_initialized());
82 if(alternative_datafile)
85 dir = strconcat(getenv("HOME"), "/" DIR_IN_HOME, NULL);
88 if(stat(dir, &s) == -1) {
94 if(mkdir(dir, 0700) == -1) {
95 printf(_("Cannot create directory %s\n"), dir);
100 } else if(!S_ISDIR(s.st_mode)) {
101 printf(_("%s is not a directory\n"), dir);
110 xmalloc_error_handler(int err)
113 * We don't try to save addressbook here because we don't know
114 * if it's fully loaded to memory.
116 if(is_ui_initialized())
119 fprintf(stderr, _("Memory allocation failure: %s\n"), strerror(err));
127 check_abook_directory();
129 if(load_opts(rcfile) > 0) {
130 printf(_("Press enter to continue...\n"));
133 init_default_views();
135 signal(SIGTERM, quit_abook_sig);
142 umask(DEFAULT_UMASK);
144 if(!datafile_writeable()) {
145 char *s = strdup_printf(_("File %s is not writeable"), datafile);
149 if(load_database(datafile) || !statusline_ask_boolean(
150 _("If you continue all changes will "
151 "be lost. Do you want to continue?"), FALSE)) {
153 /*close_database();*/
158 load_database(datafile);
164 quit_abook(int save_db)
167 if(opt_get_bool(BOOL_AUTOSAVE))
169 else if(statusline_ask_boolean(_("Save database"), TRUE))
171 } else if(!statusline_ask_boolean(_("Quit without saving"), FALSE))
183 quit_abook_sig(int i)
185 quit_abook(QUIT_SAVE);
189 main(int argc, char **argv)
191 #if defined(HAVE_SETLOCALE) && defined(HAVE_LOCALE_H)
192 setlocale(LC_MESSAGES, "");
193 setlocale(LC_TIME, "");
194 setlocale(LC_CTYPE, "");
195 setlocale(LC_COLLATE, "");
197 bindtextdomain(PACKAGE, LOCALEDIR);
200 xmalloc_set_error_handler(xmalloc_error_handler);
202 prepare_database_internals();
204 parse_command_line(argc, argv);
210 quit_abook(QUIT_SAVE);
228 if( (stat(getenv("HOME"), &s)) == -1 || ! S_ISDIR(s.st_mode) ) {
229 fprintf(stderr,_("%s is not a valid HOME directory\n"), getenv("HOME") );
234 datafile = strconcat(getenv("HOME"), "/" DIR_IN_HOME "/"
238 rcfile = strconcat(getenv("HOME"), "/" DIR_IN_HOME "/"
241 atexit(free_filenames);
251 MODE_ADD_EMAIL_QUIET,
257 change_mode(int *current, int mode)
259 if(*current != MODE_CONT) {
260 fprintf(stderr, _("Cannot combine options --mutt-query, "
262 "--add-email or --add-email-quiet\n"));
270 set_filename(char **var, char *path)
275 assert(*var == NULL); /* or else we probably leak memory */
276 assert(path != NULL);
279 *var = xstrdup(path);
285 *var = strconcat(cwd, "/", path, NULL);
290 #define set_convert_var(X) do { if(mode != MODE_CONVERT) {\
291 fprintf(stderr, _("please use option --%s after --convert option\n"),\
292 long_options[option_index].name);\
299 parse_command_line(int argc, char **argv)
301 int mode = MODE_CONT;
302 char *query_string = NULL;
303 char *informat = "abook",
308 selected_item_filter = select_output_item_filter("muttq");
311 int option_index = 0;
323 static struct option long_options[] = {
324 { "help", 0, 0, 'h' },
325 { "add-email", 0, 0, OPT_ADD_EMAIL },
326 { "add-email-quiet", 0, 0, OPT_ADD_EMAIL_QUIET },
327 { "datafile", 1, 0, 'f' },
328 { "mutt-query", 1, 0, OPT_MUTT_QUERY },
329 { "config", 1, 0, 'C' },
330 { "convert", 0, 0, OPT_CONVERT },
331 { "informat", 1, 0, OPT_INFORMAT },
332 { "outformat", 1, 0, OPT_OUTFORMAT },
333 { "infile", 1, 0, OPT_INFILE },
334 { "outfile", 1, 0, OPT_OUTFILE },
335 { "formats", 0, 0, OPT_FORMATS },
339 c = getopt_long(argc, argv, "hC:",
340 long_options, &option_index);
350 change_mode(&mode, MODE_ADD_EMAIL);
352 case OPT_ADD_EMAIL_QUIET:
353 change_mode(&mode, MODE_ADD_EMAIL_QUIET);
356 set_filename(&datafile, optarg);
357 alternative_datafile = TRUE;
360 query_string = optarg;
361 change_mode(&mode, MODE_QUERY);
364 set_filename(&rcfile, optarg);
365 alternative_rcfile = TRUE;
368 change_mode(&mode, MODE_CONVERT);
371 set_convert_var(informat);
375 selected_item_filter = select_output_item_filter(outformat);
378 set_convert_var(infile);
381 set_convert_var(outfile);
391 if(! selected_item_filter.func)
392 selected_item_filter = select_output_item_filter("muttq");
394 fprintf(stderr, _("%s: unrecognized arguments on command line\n"),
402 case MODE_ADD_EMAIL_QUIET:
405 mutt_query(query_string);
407 convert(informat, infile, outformat, outfile);
415 puts (PACKAGE " v " VERSION "\n");
416 puts (_(" -h --help show usage"));
417 puts (_(" -C --config <file> use an alternative configuration file"));
418 puts (_(" --datafile <file> use an alternative addressbook file"));
419 puts (_(" --mutt-query <string> make a query for mutt"));
420 puts (_(" --add-email "
421 "read an e-mail message from stdin and\n"
423 "add the sender to the addressbook"));
424 puts (_(" --add-email-quiet "
425 "same as --add-email but doesn't\n"
426 " require to confirm adding"));
428 puts (_(" --convert convert address book files"));
429 puts (_(" options to use with --convert:"));
430 puts (_(" --informat <format> format for input file"));
431 puts (_(" (default: abook)"));
432 puts (_(" --infile <file> source file"));
433 puts (_(" (default: stdin)"));
434 puts (_(" --outformat <format> format for output file"));
435 puts (_(" (default: text)"));
436 puts (_(" --outfile <file> destination file"));
437 puts (_(" (default: stdout)"));
438 puts (_(" --formats list available formats"));
447 quit_mutt_query(int status)
456 mutt_query(char *str)
460 if( str == NULL || !strcasecmp(str, "all") ) {
461 export_file("muttq", "-");
463 int search_fields[] = {NAME, EMAIL, NICK, -1};
465 if( (i = find_item(str, 0, search_fields)) < 0 ) {
466 printf("Not found\n");
467 quit_mutt_query(EXIT_FAILURE);
471 e_write_item(stdout, i, selected_item_filter.func);
472 i = find_item(str, i + 1, search_fields);
476 quit_mutt_query(EXIT_SUCCESS);
486 if( load_database(datafile) ) {
487 printf(_("Cannot open database\n"));
488 quit_mutt_query(EXIT_FAILURE);
495 make_mailstr(int item)
497 char email[MAX_EMAIL_LEN];
499 char *name = strdup_printf("\"%s\"", db_name_get(item));
501 get_first_email(email, item);
504 strdup_printf("%s <%s>", name, email) :
513 print_stderr(int item)
515 fprintf (stderr, "%c", '\n');
517 if( is_valid_item(item) )
518 muttq_print_item(stderr, item);
520 struct db_enumerator e = init_db_enumerator(ENUM_SELECTED);
521 db_enumerate_items(e) {
522 muttq_print_item(stderr, e.item);
529 launch_mutt(int item)
531 char *cmd = NULL, *mailstr = NULL;
532 char *mutt_command = opt_get_str(STR_MUTT_COMMAND);
534 if(mutt_command == NULL || !*mutt_command)
537 if( is_valid_item(item) )
538 mailstr = make_mailstr(item);
540 struct db_enumerator e = init_db_enumerator(ENUM_SELECTED);
542 db_enumerate_items(e) {
545 strconcat(tmp, ",", make_mailstr(e.item), NULL):
546 strconcat(make_mailstr(e.item), NULL);
551 cmd = strconcat(mutt_command, " \'", mailstr, "\'", NULL);
554 fprintf(stderr, "cmd: %s\n", cmd);
560 * we need to make sure that curses settings are correct
566 launch_wwwbrowser(int item)
570 if( !is_valid_item(item) )
573 if(db_fget(item, URL))
574 cmd = strdup_printf("%s '%s'",
575 opt_get_str(STR_WWW_COMMAND),
576 safe_str(db_fget(item, URL)));
586 * we need to make sure that curses settings are correct
592 abook_fopen (const char *path, const char *mode)
597 stat_ok = (stat(path, &s) != -1);
599 if(strchr(mode, 'r'))
600 return (stat_ok && S_ISREG(s.st_mode)) ?
601 fopen(path, mode) : NULL;
603 return (stat_ok && S_ISDIR(s.st_mode)) ?
604 NULL : fopen(path, mode);
608 convert(char *srcformat, char *srcfile, char *dstformat, char *dstfile)
612 if( !srcformat || !srcfile || !dstformat || !dstfile ) {
613 fprintf(stderr, _("too few arguments to make conversion\n"));
614 fprintf(stderr, _("try --help\n"));
618 if( !strcasecmp(srcformat, dstformat) ) {
619 printf( _("input and output formats are the same\n"
628 init_standard_fields();
630 switch(import_file(srcformat, srcfile)) {
633 _("input format %s not supported\n"), srcformat);
637 fprintf(stderr, _("cannot read file %s\n"), srcfile);
643 switch(export_file(dstformat, dstfile)) {
646 _("output format %s not supported\n"),
652 _("cannot write file %s\n"), dstfile);
663 * --add-email handling
666 static int add_email_count = 0;
671 if(add_email_count > 0) {
672 if(save_database() < 0) {
673 fprintf(stderr, _("cannot open %s\n"), datafile);
676 printf(_("%d item(s) added to %s\n"), add_email_count, datafile);
678 puts(_("Valid sender address not found"));
685 quit_add_email_sig(int signal)
694 check_abook_directory();
697 init_standard_fields();
701 * we don't actually care if loading fails or not
703 load_database(datafile);
705 atexit(close_database);
707 signal(SIGINT, quit_add_email_sig);
711 add_email_add_item(int quiet, char *name, char *email)
715 if(opt_get_bool(BOOL_ADD_EMAIL_PREVENT_DUPLICATES)) {
716 int search_fields[] = { EMAIL, -1 };
717 if(find_item(email, 0, search_fields) >= 0) {
719 printf(_("Address %s already in addressbook\n"),
726 FILE *in = fopen("/dev/tty", "r");
729 fprintf(stderr, _("cannot open /dev/tty\n"
730 "you may want to use --add-email-quiet\n"));
735 printf(_("Add \"%s <%s>\" to %s? (%c/%c)\n"),
739 *S_("keybinding for yes|y"),
740 *S_("keybinding for no|n"));
741 c = tolower(getc(in));
742 if(c == *S_("keybinding for no|n")) {
746 } while(c != *S_("keybinding for yes|y"));
750 item = item_create();
751 item_fput(item, NAME, xstrdup(name));
752 item_fput(item, EMAIL, xstrdup(email));
753 add_item2database(item);
763 char *name = NULL, *email = NULL;
766 if( (fstat(fileno(stdin), &s)) == -1 || S_ISDIR(s.st_mode) ) {
767 fprintf(stderr, _("stdin is a directory or cannot stat stdin\n"));
774 line = getaline(stdin);
775 if(line && !strncasecmp("From:", line, 5) ) {
776 getname(line, &name, &email);
777 add_email_count += add_email_add_item(quiet,
783 } while( !feof(stdin) );
789 * end of --add-email handling