Johannes Schindelin <Johannes.Schindelin@xxxxxx> wrote: > Hi, > > On Mon, 15 Jan 2007, Eric Wong wrote: > > > > Would you write "git repo-config --perl", then? ;-) > > > > The below patch should be a start (only tested on my fairly standard > > .git/config). A --python option should be easy, too :) > > A bit shorter (and gets the booleans right, plus being even easier > towards --python extension): Your version doesn't get arrays right, however. Here's a Perl/Python/Ruby version below. It should be extendable for other languages; feedback and additions appreciated: Note that usage has been changed to --dump=(perl|python|ruby) I may add key_suffix to lang_dump just to be consistent with pairings, but array_start seems to handle all cases of it and it would be redundant... --- a/builtin-repo-config.c +++ b/builtin-repo-config.c @@ -1,5 +1,6 @@ #include "builtin.h" #include "cache.h" +#include "quote.h" static const char git_config_set_usage[] = "git-repo-config [ --global ] [ --bool | --int ] [--get | --get-all | --get-regexp | --replace-all | --add | --unset | --unset-all] name [value [value_regex]] | --rename-section old_name new_name | --list"; @@ -14,6 +15,90 @@ static int do_not_match; static int seen; static enum { T_RAW, T_INT, T_BOOL } type = T_RAW; +struct lang_dump { + const char *name; + const char *decl_start; + const char *decl_end; + const char *key_prefix; + const char *array_start; + const char *array_end; + const char *val_prefix; + const char *val_suffix; + const char *true_val; /* should already be quoted, if needed */ + void (*quote_key_fn)(FILE *, const char*); + void (*quote_val_fn)(FILE *, const char*); +}; +static char *last_key; +static struct lang_dump *lang; +static struct lang_dump lang_dump_defs[] = { + { "perl", + "\%git_config = (\n", ");\n", + "\t", + " => [\n", "\t],\n", + "\t\t", ",\n", + "'true'", + perl_quote_print, perl_quote_print }, + { "python", + "git_config = {\n", "}\n", + " ", + " : [\n", " ],\n", + " ", ",\n", + "True", + python_quote_print, python_quote_print }, + { "ruby", /* Ruby is very Perl-like */ + "git_config = {\n", "}\n", + " ", + " => [\n", " ],\n", + " ", ",\n", + "true", + perl_quote_print, perl_quote_print }, +}; + +static int show_lang_config(const char *key_, const char *value_) +{ + if (last_key) { + if (strcmp(last_key, key_)) { + free(last_key); + fputs(lang->array_end, stdout); + goto new_key; + } + } else { +new_key: + last_key = xstrdup(key_); + fputs(lang->key_prefix, stdout); + lang->quote_key_fn(stdout, key_); + fputs(lang->array_start, stdout); + } + fputs(lang->val_prefix, stdout); + if (value_) + lang->quote_val_fn(stdout, value_); + else + fputs(lang->true_val, stdout); + fputs(lang->val_suffix, stdout); + return 0; +} + +static int show_lang_config_all(const char *lang_name) +{ + int i, rv; + for (i = ARRAY_SIZE(lang_dump_defs); --i >= 0; ) { + if (strcmp(lang_name, lang_dump_defs[i].name)) + continue; + lang = lang_dump_defs + i; + fputs(lang->decl_start, stdout); + rv = git_config(show_lang_config); + if (last_key) { + free(last_key); + last_key = NULL; + fputs(lang->array_end, stdout); + fputs(lang->decl_end, stdout); + } + return rv; + } + fputs("Dumping config to '%s' is not yet supported", stderr); + return -1; +} + static int show_all_config(const char *key_, const char *value_) { if (value_) @@ -138,6 +223,8 @@ int cmd_repo_config(int argc, const char **argv, const char *prefix) type = T_BOOL; else if (!strcmp(argv[1], "--list") || !strcmp(argv[1], "-l")) return git_config(show_all_config); + else if (!strncmp(argv[1], "--dump=", 7)) + return show_lang_config_all(argv[1] + 7); else if (!strcmp(argv[1], "--global")) { char *home = getenv("HOME"); if (home) { -- Eric Wong - To unsubscribe from this list: send the line "unsubscribe git" in the body of a message to majordomo@xxxxxxxxxxxxxxx More majordomo info at http://vger.kernel.org/majordomo-info.html