make clean should remove all the test programs too
[git/kirr.git] / builtin-config.c
blobb2515f7e65ed05a5352639686b5163f4c74bc1c2
1 #include "builtin.h"
2 #include "cache.h"
4 static const char git_config_set_usage[] =
5 "git-config [ --global | --system ] [ --bool | --int ] [--get | --get-all | --get-regexp | --replace-all | --add | --unset | --unset-all] name [value [value_regex]] | --rename-section old_name new_name | --remove-section name | --list";
7 static char *key;
8 static regex_t *key_regexp;
9 static regex_t *regexp;
10 static int show_keys;
11 static int use_key_regexp;
12 static int do_all;
13 static int do_not_match;
14 static int seen;
15 static enum { T_RAW, T_INT, T_BOOL } type = T_RAW;
17 static int show_all_config(const char *key_, const char *value_)
19 if (value_)
20 printf("%s=%s\n", key_, value_);
21 else
22 printf("%s\n", key_);
23 return 0;
26 static int show_config(const char* key_, const char* value_)
28 char value[256];
29 const char *vptr = value;
30 int dup_error = 0;
32 if (!use_key_regexp && strcmp(key_, key))
33 return 0;
34 if (use_key_regexp && regexec(key_regexp, key_, 0, NULL, 0))
35 return 0;
36 if (regexp != NULL &&
37 (do_not_match ^
38 regexec(regexp, (value_?value_:""), 0, NULL, 0)))
39 return 0;
41 if (show_keys)
42 printf("%s ", key_);
43 if (seen && !do_all)
44 dup_error = 1;
45 if (type == T_INT)
46 sprintf(value, "%d", git_config_int(key_, value_?value_:""));
47 else if (type == T_BOOL)
48 vptr = git_config_bool(key_, value_) ? "true" : "false";
49 else
50 vptr = value_?value_:"";
51 seen++;
52 if (dup_error) {
53 error("More than one value for the key %s: %s",
54 key_, vptr);
56 else
57 printf("%s\n", vptr);
59 return 0;
62 static int get_value(const char* key_, const char* regex_)
64 int ret = -1;
65 char *tl;
66 char *global = NULL, *repo_config = NULL;
67 const char *system_wide = NULL, *local;
69 local = getenv(CONFIG_ENVIRONMENT);
70 if (!local) {
71 const char *home = getenv("HOME");
72 local = getenv(CONFIG_LOCAL_ENVIRONMENT);
73 if (!local)
74 local = repo_config = xstrdup(git_path("config"));
75 if (home)
76 global = xstrdup(mkpath("%s/.gitconfig", home));
77 system_wide = ETC_GITCONFIG;
80 key = xstrdup(key_);
81 for (tl=key+strlen(key)-1; tl >= key && *tl != '.'; --tl)
82 *tl = tolower(*tl);
83 for (tl=key; *tl && *tl != '.'; ++tl)
84 *tl = tolower(*tl);
86 if (use_key_regexp) {
87 key_regexp = (regex_t*)xmalloc(sizeof(regex_t));
88 if (regcomp(key_regexp, key, REG_EXTENDED)) {
89 fprintf(stderr, "Invalid key pattern: %s\n", key_);
90 goto free_strings;
94 if (regex_) {
95 if (regex_[0] == '!') {
96 do_not_match = 1;
97 regex_++;
100 regexp = (regex_t*)xmalloc(sizeof(regex_t));
101 if (regcomp(regexp, regex_, REG_EXTENDED)) {
102 fprintf(stderr, "Invalid pattern: %s\n", regex_);
103 goto free_strings;
107 if (do_all && system_wide)
108 git_config_from_file(show_config, system_wide);
109 if (do_all && global)
110 git_config_from_file(show_config, global);
111 git_config_from_file(show_config, local);
112 if (!do_all && !seen && global)
113 git_config_from_file(show_config, global);
114 if (!do_all && !seen && system_wide)
115 git_config_from_file(show_config, system_wide);
117 free(key);
118 if (regexp) {
119 regfree(regexp);
120 free(regexp);
123 if (do_all)
124 ret = !seen;
125 else
126 ret = (seen == 1) ? 0 : seen > 1 ? 2 : 1;
128 free_strings:
129 free(repo_config);
130 free(global);
131 return ret;
134 int cmd_config(int argc, const char **argv, const char *prefix)
136 int nongit = 0;
137 setup_git_directory_gently(&nongit);
139 while (1 < argc) {
140 if (!strcmp(argv[1], "--int"))
141 type = T_INT;
142 else if (!strcmp(argv[1], "--bool"))
143 type = T_BOOL;
144 else if (!strcmp(argv[1], "--list") || !strcmp(argv[1], "-l"))
145 return git_config(show_all_config);
146 else if (!strcmp(argv[1], "--global")) {
147 char *home = getenv("HOME");
148 if (home) {
149 char *user_config = xstrdup(mkpath("%s/.gitconfig", home));
150 setenv("GIT_CONFIG", user_config, 1);
151 free(user_config);
152 } else {
153 die("$HOME not set");
156 else if (!strcmp(argv[1], "--system"))
157 setenv("GIT_CONFIG", ETC_GITCONFIG, 1);
158 else if (!strcmp(argv[1], "--rename-section")) {
159 int ret;
160 if (argc != 4)
161 usage(git_config_set_usage);
162 ret = git_config_rename_section(argv[2], argv[3]);
163 if (ret < 0)
164 return ret;
165 if (ret == 0) {
166 fprintf(stderr, "No such section!\n");
167 return 1;
169 return 0;
171 else if (!strcmp(argv[1], "--remove-section")) {
172 int ret;
173 if (argc != 3)
174 usage(git_config_set_usage);
175 ret = git_config_rename_section(argv[2], NULL);
176 if (ret < 0)
177 return ret;
178 if (ret == 0) {
179 fprintf(stderr, "No such section!\n");
180 return 1;
182 return 0;
184 else
185 break;
186 argc--;
187 argv++;
190 switch (argc) {
191 case 2:
192 return get_value(argv[1], NULL);
193 case 3:
194 if (!strcmp(argv[1], "--unset"))
195 return git_config_set(argv[2], NULL);
196 else if (!strcmp(argv[1], "--unset-all"))
197 return git_config_set_multivar(argv[2], NULL, NULL, 1);
198 else if (!strcmp(argv[1], "--get"))
199 return get_value(argv[2], NULL);
200 else if (!strcmp(argv[1], "--get-all")) {
201 do_all = 1;
202 return get_value(argv[2], NULL);
203 } else if (!strcmp(argv[1], "--get-regexp")) {
204 show_keys = 1;
205 use_key_regexp = 1;
206 do_all = 1;
207 return get_value(argv[2], NULL);
208 } else
210 return git_config_set(argv[1], argv[2]);
211 case 4:
212 if (!strcmp(argv[1], "--unset"))
213 return git_config_set_multivar(argv[2], NULL, argv[3], 0);
214 else if (!strcmp(argv[1], "--unset-all"))
215 return git_config_set_multivar(argv[2], NULL, argv[3], 1);
216 else if (!strcmp(argv[1], "--get"))
217 return get_value(argv[2], argv[3]);
218 else if (!strcmp(argv[1], "--get-all")) {
219 do_all = 1;
220 return get_value(argv[2], argv[3]);
221 } else if (!strcmp(argv[1], "--get-regexp")) {
222 show_keys = 1;
223 use_key_regexp = 1;
224 do_all = 1;
225 return get_value(argv[2], argv[3]);
226 } else if (!strcmp(argv[1], "--add"))
227 return git_config_set_multivar(argv[2], argv[3], "^$", 0);
228 else if (!strcmp(argv[1], "--replace-all"))
230 return git_config_set_multivar(argv[2], argv[3], NULL, 1);
231 else
233 return git_config_set_multivar(argv[1], argv[2], argv[3], 0);
234 case 5:
235 if (!strcmp(argv[1], "--replace-all"))
236 return git_config_set_multivar(argv[2], argv[3], argv[4], 1);
237 case 1:
238 default:
239 usage(git_config_set_usage);
241 return 0;