]> git.deb.at Git - pkg/abook.git/blobdiff - options.c
build system: updating gnuconfig files to 2013-06-10
[pkg/abook.git] / options.c
index 82aae49cef02ae9566945f4559608d54e061a2e4..6f75a06db368f215c85f6731b3415222badb2a41 100644 (file)
--- a/options.c
+++ b/options.c
 #include <assert.h>
 #include "options.h"
 #include "abook.h"
+#include "gettext.h"
 #include "misc.h"
+#include "views.h"
+#include "xmalloc.h"
 
 #ifndef FALSE
 #      define FALSE    0
@@ -47,34 +50,58 @@ static struct option abook_vars[] = {
        { "autosave", OT_BOOL, BOOL_AUTOSAVE, TRUE },
 
        { "show_all_emails", OT_BOOL, BOOL_SHOW_ALL_EMAILS, TRUE },
-       { "emailpos", OT_INT, INT_EMAILPOS, 25 },
-       { "extra_column", OT_STR, STR_EXTRA_COLUMN, UL "phone" },
-       { "extra_alternative", OT_STR, STR_EXTRA_ALTERNATIVE, UL "-1" },
-       { "extrapos", OT_INT, INT_EXTRAPOS, 65 },
-
+       { "index_format", OT_STR, STR_INDEX_FORMAT, UL " {name:22} {email:40} {phone:12|workphone|mobile}" },
        { "mutt_command", OT_STR, STR_MUTT_COMMAND, UL "mutt" },
        { "mutt_return_all_emails", OT_BOOL, BOOL_MUTT_RETURN_ALL_EMAILS,
                TRUE },
-       
+
        { "print_command", OT_STR, STR_PRINT_COMMAND, UL "lpr" },
 
        { "www_command", OT_STR, STR_WWW_COMMAND, UL "lynx" },
-       
+
        { "address_style", OT_STR, STR_ADDRESS_STYLE, UL "eu" },
 
        { "use_ascii_only", OT_BOOL, BOOL_USE_ASCII_ONLY, FALSE },
 
+       { "add_email_prevent_duplicates", OT_BOOL, BOOL_ADD_EMAIL_PREVENT_DUPLICATES, FALSE },
+       { "preserve_fields", OT_STR, STR_PRESERVE_FIELDS, UL "standard" },
+       { "sort_field", OT_STR, STR_SORT_FIELD, UL "nick" },
+       { "show_cursor", OT_BOOL, BOOL_SHOW_CURSOR, FALSE },
+       { "use_mouse", OT_BOOL, BOOL_USE_MOUSE, FALSE },
+       { "scroll_speed", OT_INT, INT_SCROLL_SPEED, UL 2 },
+       { "use_colors", OT_BOOL, BOOL_USE_COLORS, FALSE },
+       { "color_header_fg", OT_STR, STR_COLOR_HEADER_FG, UL "blue" },
+       { "color_header_fg", OT_STR, STR_COLOR_HEADER_FG, UL "blue" },
+       { "color_header_bg", OT_STR, STR_COLOR_HEADER_BG, UL "red" },
+       { "color_footer_fg", OT_STR, STR_COLOR_FOOTER_FG, UL "red" },
+       { "color_footer_bg", OT_STR, STR_COLOR_FOOTER_BG, UL "default" },
+       { "color_list_even_fg", OT_STR, STR_COLOR_LIST_EVEN_FG, UL "yellow" },
+       { "color_list_even_bg", OT_STR, STR_COLOR_LIST_EVEN_BG, UL "default" },
+       { "color_list_odd_fg", OT_STR, STR_COLOR_LIST_ODD_FG, UL "default" },
+       { "color_list_odd_bg", OT_STR, STR_COLOR_LIST_ODD_BG, UL "default" },
+       { "color_list_header_fg", OT_STR, STR_COLOR_LIST_HEADER_FG, UL "white" },
+       { "color_list_header_bg", OT_STR, STR_COLOR_LIST_HEADER_BG, UL "blue" },
+       { "color_list_highlight_fg", OT_STR, STR_COLOR_LIST_HIGHLIGHT_FG, UL "black" },
+       { "color_list_highlight_bg", OT_STR, STR_COLOR_LIST_HIGHLIGHT_BG, UL "green" },
+       { "color_tab_border_fg", OT_STR, STR_COLOR_TAB_BORDER_FG, UL "cyan" },
+       { "color_tab_border_bg", OT_STR, STR_COLOR_TAB_BORDER_BG, UL "default" },
+       { "color_tab_label_fg", OT_STR, STR_COLOR_TAB_LABEL_FG, UL "magenta" },
+       { "color_tab_label_bg", OT_STR, STR_COLOR_TAB_LABEL_BG, UL "default" },
+       { "color_field_name_fg", OT_STR, STR_COLOR_FIELD_NAME_FG, UL "yellow" },
+       { "color_field_name_bg", OT_STR, STR_COLOR_FIELD_NAME_BG, UL "default" },
+       { "color_field_value_fg", OT_STR, STR_COLOR_FIELD_VALUE_FG, UL "green" },
+       { "color_field_value_bg", OT_STR, STR_COLOR_FIELD_VALUE_BG, UL "default" },
        { NULL }
 };
 
 static unsigned char bool_opts[BOOL_MAX];
-static int int_opts[INT_MAX];
+static int int_opts[INT_MAXIMUM];
 static char *str_opts[STR_MAX];
 
 static void
 set_int(enum int_opts opt, int value)
 {
-       assert(opt >= 0 && opt < INT_MAX);
+       assert(opt >= 0 && opt < INT_MAXIMUM);
 
        int_opts[opt] = value;
 }
@@ -95,13 +122,13 @@ set_str(enum str_opts opt, char *value)
        if(str_opts[opt])
                free(str_opts[opt]);
 
-       str_opts[opt] = strdup(value);
+       str_opts[opt] = xstrdup(value);
 }
 
 int
 opt_get_int(enum int_opts opt)
 {
-       assert(opt >= 0 && opt < INT_MAX);
+       assert(opt >= 0 && opt < INT_MAXIMUM);
 
        return int_opts[opt];
 }
@@ -109,7 +136,7 @@ opt_get_int(enum int_opts opt)
 bool
 opt_get_bool(enum bool_opts opt)
 {
-       assert(opt >= 0 && opt < STR_MAX);
+       assert(opt >= 0 && opt < BOOL_MAX);
 
        return bool_opts[opt];
 }
@@ -168,6 +195,10 @@ free_opts()
  * file parsing
  */
 
+typedef struct {
+       char *data, *ptr;
+} buffer;
+
 static void
 opt_line_remove_comments(char *p)
 {
@@ -179,10 +210,8 @@ opt_line_remove_comments(char *p)
        for(; *p; p++) {
                switch(*p) {
                        case '\"':
-                               if(!escape) {
+                               if(!escape)
                                        in_quote = !in_quote;
-                                       escape = FALSE;
-                               }
                                break;
                        case '\\':
                                escape = TRUE;
@@ -198,42 +227,89 @@ opt_line_remove_comments(char *p)
        }
 }
 
+/* After calling,
+ * - b->data points to the found token, or NULL is end of parsing
+ * - b->ptr  points to the begining of next token
+ *
+ * If the TOKEN_ALLOC option is used, the original string is not mangled
+ * and memory is allocated for the token.
+ */
 static char *
-get_token_start(char *p)
+get_token(buffer *b, int options)
 {
-       assert(p);
-       
-       for(; ISSPACE(*p); p++);
+       char quote = 0, c;
+       char *end = NULL;
 
-       return p;
-}
+       assert(b);
 
-static char *
-get_token_end(char *p)
-{
-       assert(p);
+       SKIPWS(b->ptr);
+       if(*b->ptr && strchr("\"'", *b->ptr))
+               quote = *(b->ptr++);
+       b->data = b->ptr;
+
+       while(1) {
+               if(!(c = *b->ptr)) {
+                       end = b->ptr;
+                       break;
+               }
 
-       for(p = get_token_start(p); *p; p++) {
-               if(ISSPACE(*p)) {
+               if(!quote && (
+                               ISSPACE(c) ||
+                               ((options & TOKEN_EQUAL) && (c == '=')) ||
+                               ((options & TOKEN_COMMA) && (c == ',')))
+                               ) {
+                       end = b->ptr;
+                       break;
+               } else if(c == quote) {
+                       quote = 0;
+                       end = b->ptr++;
                        break;
                }
+
+               b->ptr++;
+       }
+
+       if(quote)
+               return _("quote mismatch");
+
+       if(options & (TOKEN_EQUAL | TOKEN_COMMA))
+               SKIPWS(b->ptr); /* whitespaces can precede the sign */
+
+       if((options & TOKEN_EQUAL) && (*b->ptr != '='))
+               return _("no assignment character found");
+
+       if((options & TOKEN_COMMA) && *b->ptr && (*b->ptr != ','))
+               return _("error in comma separated list");
+
+       if(b->ptr == b->data) {
+               b->data = NULL;
+               return NULL; /* no error, just end of parsing */
        }
 
-       return p;
+       if(options & TOKEN_ALLOC) /* freeing is the caller's responsibility */
+               b->data = xstrndup(b->data, end - b->data);
+       else
+               *end = 0;
+
+       b->ptr++; /* advance to next token */
+       SKIPWS(b->ptr);
+
+       return NULL;
 }
 
-static char *
-opt_set_set_option(char *var, char *p, struct option *opt)
+static const char *
+opt_set_set_option(char *p, struct option *opt)
 {
        int len;
-       
-       strtrim(p);
 
+       assert(p);
+
+       strtrim(p);
        len = strlen(p);
 
-       if(p[len - 1] == '\"' && *p == '\"') {
+       if(*p == '\"' && p[len - 1] == '\"') {
                if(len < 3)
-                       return "invalid value";
+                       return _("invalid value");
                p[len - 1] = 0;
                p++;
        }
@@ -246,46 +322,158 @@ opt_set_set_option(char *var, char *p, struct option *opt)
                        set_int(opt -> data, safe_atoi(p));
                        break;
                case OT_BOOL:
-                       if(!strcasecmp(p, "true") && !strcasecmp(p, "on"))
+                       if(!strcasecmp(p, "true") || !strcasecmp(p, "on"))
                                set_bool(opt -> data, TRUE);
-                       else if(!strcasecmp(p, "false") &&
+                       else if(!strcasecmp(p, "false") ||
                                        !strcasecmp(p, "off"))
                                set_bool(opt -> data, FALSE);
                        else
-                               return "invalid value";
+                               return _("invalid value");
                        break;
+               default:
+                       assert(0);
        }
-       
+
        return NULL;
 }
 
-static char *
-opt_parse_set(char *p)
+static const char *
+opt_set_option(char *var, char *p)
 {
-       char *var;
        int i;
 
-       var = get_token_start(p);
-       if((p = strchr(var, '=')))
-               *p++ = 0;
-       else
-               return "invalid value assignment";
-       
-       strtrim(var);
+       assert(var);
+       assert(p);
 
-       for(i = 0;abook_vars[i].option; i++)
+       for(i = 0; abook_vars[i].option; i++)
                if(!strcmp(abook_vars[i].option, var))
-                       return opt_set_set_option(var, p, &abook_vars[i]);
-       
-       return "unknown option";
+                       return opt_set_set_option(p, &abook_vars[i]);
+
+       return _("unknown option");
+}
+
+static int
+check_options()
+{
+       char *str;
+       int err = 0;
+
+       str = opt_get_str(STR_PRESERVE_FIELDS);
+       if(strcasecmp(str, "all") && strcasecmp(str, "none") &&
+                       strcasecmp(str, "standard")) {
+               fprintf(stderr, _("valid values for the 'preserve_fields' "
+                                       "option are 'all', 'standard' "
+                                       "(default), and 'none'\n"));
+               restore_default(&abook_vars[STR_PRESERVE_FIELDS]);
+               err++;
+       }
+       str = opt_get_str(STR_ADDRESS_STYLE);
+       if(strcasecmp(str, "eu") && strcasecmp(str, "uk") &&
+                       strcasecmp(str, "us")) {
+               fprintf(stderr, _("valid values for the 'address_style' "
+                                       "option are 'eu' (default), 'uk', "
+                                       "and 'us'\n"));
+               restore_default(&abook_vars[STR_ADDRESS_STYLE]);
+               err++;
+       }
+
+       return err;
+}
+
+/*
+ * syntax: set <option> = <value>
+ */
+static const char *
+opt_parse_set(buffer *b)
+{
+       char *var, *err;
+
+       if((err = get_token(b, TOKEN_EQUAL)))
+               return err;
+
+       if((var = b->data) == NULL)
+               return _("invalid value assignment");
+
+       return opt_set_option(var, b->ptr);
+}
+
+static const char *
+opt_parse_customfield(buffer *b)
+{
+       return _("customfield: obsolete command - please use the "
+                       "'field' and 'view' commands instead");
+}
+
+#include "views.h" /* needed for add_field_to_view */
+
+/*
+ * syntax: view <tab name> = <field1> [ , <field2>, ... ]
+ */
+static const char *
+opt_parse_view(buffer *b)
+{
+       char *err, *view;
+
+       if((err = get_token(b, TOKEN_EQUAL)))
+               return err;
+
+       if((view = b->data) == NULL)
+               return _("no view name provided");
+
+       while(1) {
+               if((err = get_token(b, TOKEN_COMMA)))
+                       return err;
+
+               if(b->data == NULL)
+                       break;
+
+               if((err = add_field_to_view(view, b->data)))
+                       return err;
+       }
+
+       return NULL;
+}
+
+#include "database.h" /* needed for declare_new_field */
+
+/*
+ * syntax: field <identifier> = <human readable name> [ , <type> ]
+ */
+static const char *
+opt_parse_field(buffer *b)
+{
+       char *err, *field, *name;
+
+       if((err = get_token(b, TOKEN_EQUAL)))
+               return err;
+
+       if((field = b->data) == NULL)
+               return _("no field identifier provided");
+
+       if((err = get_token(b, TOKEN_COMMA)))
+               return err;
+
+       if((name = b->data) == NULL)
+               return _("no field name provided");
+
+       if((err = declare_new_field(field,
+                                       name,
+                                       b->ptr,
+                                       0 /* reject "standard" fields */)))
+               return err;
+
+       return NULL;
 }
 
 
 static struct {
        char *token;
-       char * (*func) (char *line);
+       const char * (*func) (buffer *line);
 } opt_parsers[] = {
        { "set", opt_parse_set },
+       { "customfield", opt_parse_customfield }, /* obsolete */
+       { "view", opt_parse_view },
+       { "field", opt_parse_field },
        { NULL }
 };
 
@@ -293,33 +481,40 @@ static bool
 opt_parse_line(char *line, int n, char *fn)
 {
        int i;
-       char *p;
-       char *err = NULL;
-       
+       const char *err = NULL;
+       char *token;
+       buffer b;
+
        assert(line && fn);
 
-       line = get_token_start(line);
-       p = get_token_end(line);
-       *p++ = 0;
+       b.ptr = line;
 
-       if(!*line)
+       if((err = get_token(&b, 0))) {
+               fprintf(stderr, "%s\n", err);
                return FALSE;
+       }
 
-       strtrim(line);
-       strtrim(p);
+       if(b.data == NULL)
+               return FALSE;
+
+       strtrim(b.data);
+       strtrim(b.ptr);
+
+       token = b.data;
+       b.data = b.ptr = b.ptr;
 
        for(i = 0; opt_parsers[i].token; i++)
-               if(!strcmp(opt_parsers[i].token, line)) {
-                       if(!(err = opt_parsers[i].func(p)))
+               if(!strcmp(opt_parsers[i].token, token)) {
+                       if(!(err = opt_parsers[i].func(&b)))
                                return FALSE;
                        break;
                }
-       
-       fprintf(stderr, "%s: parse error at line %d: ", fn, n);
+
+       fprintf(stderr, _("%s: parse error at line %d: "), fn, n);
        if(err)
                fprintf(stderr, "%s\n", err);
        else
-               fprintf(stderr, "unknown token %s\n", line);
+               fprintf(stderr, _("unknown token %s\n"), token);
 
        return TRUE;
 }
@@ -330,12 +525,11 @@ load_opts(char *filename)
        FILE *in;
        char *line = NULL;
        int n;
-       bool err = FALSE;
-       
+       int err = 0;
+
        if((in = fopen(filename, "r")) == NULL)
                return -1;
 
-       
        for(n = 1;!feof(in); n++) {
                line = getaline(in);
 
@@ -345,19 +539,20 @@ load_opts(char *filename)
                if(line && *line) {
                        opt_line_remove_comments(line);
                        if(*line)
-                               err = opt_parse_line(line, n, filename);
+                               err += opt_parse_line(line, n, filename) ? 1:0;
                }
 
-               my_free(line);
+               free(line);
+               line = NULL;
        }
 
        free(line);
 
-       if(err) {
-               printf("Press any key to continue...\n");
-               fgetc(stdin);
-       }
-       
+       /* post-initialization */
+       err += check_options();
+       if(!strcasecmp(opt_get_str(STR_PRESERVE_FIELDS), "standard"))
+               init_standard_fields();
+
        return err;
 }